Programas del dia 19/02/018

include 'emu8086.inc'
name "Muestra"
org 100h

call suma
call inicio
call resta
call final

inicio:
mov ax,20h
mov bx,13h
ret

suma:
add ax,1AAh
add bx,11ch
add ax,bx
ret

resta:
sub ax,3h
sub bx,2h
ret

final:

mov ax,4c00h
int 21h
ret


end
-------------------------------------------------------------------------
org 100h

 
CR EQU 13
lf EQU 10
imprimir EQU 9
fin EQU 4c00h
dos EQU 21h

.data
    txt DB 'ejemplos',CR,lf,'$'
   

.stack 100h
  

.code
  
    inicio:mov ax,@data
    mov ds,ax
    mov dx,offset txt
    mov ah,imprimir
    int dos
    mov ax,fin
    int dos

end inicio

ret
---------------------------------------------------------------------------------------
org 100h

 
CR EQU 13
lf EQU 10
imprimir EQU 9
fin EQU 4c00h
dos EQU 21h

.data
    txt DB 'ejemplos',CR,lf,'$'
   

.stack 100h
  

.code
  
    inicio proc
    mov ax,@data
    mov ds,ax
    mov dx,offset txt
    mov ah,imprimir
    int dos
    mov ax,fin
    int dos

end inicio

ret
------------------------------------------------------------------------------------------------
include 'emu8086.inc'
name "Muestra"
org 100h

call suma
call inicio
call resta
call final

inicio proc
mov ax,20h
mov bx,13h
ret

suma proc
add ax,1AAh
add bx,11ch
add ax,bx
ret

resta proc
sub ax,3h
sub bx,2h
ret

final proc

mov ax,4c00h
int 21h
ret


end
-----------------------------------------------------------------------------------------------------------------------