Programas hechos en TAS



Programa 1: Hola mundo

CR equ 13

LF equ 0Ah

Datos Segment

Mensaje db CR,LF,'Hola Mundo!',CR,LF,'$'

Datos Ends

Pila Segment Stack

db 64 DUP('PILA')

Pila Ends

Codigo Segment

holam proc far

Assume CS:Codigo,DS:Datos,SS:Pila

mov ax,Datos

mov ds,ax

lea dx,Mensaje

mov ah,9

int 21h

mov ax,4c00h

int 21h

holam endp

Codigo Ends

end holam


Programa 2: Uso de constantes.


CR EQU 13

LF EQU 10

IMPRIMIR EQU 9

FIN EQU 4C00H

DOS EQU 21h



Datos Segment

texto db 'Ejemplo del uso de constantes.',CR,LF,'$'

Datos Ends



Pila Segment Stack

db 64 DUP('PILA')

Pila Ends



Codigo Segment

Assume CS:Codigo,DS:Datos,SS:Pila

Inicio: mov ax,Datos

mov ds,ax

mov dx,offset texto ;offset retorna la direcci?n de una variable

mov ah, IMPRIMIR

int DOS

mov ax,FIN

int DOS

Codigo End
s
End Inicio

Programa 3: Hola mundo con función/procedimiento.



CR EQU 13 ;Constante CR (Retorno de acarreo) en decimal o

LF EQU 10 ;Constante LF (Salto de linea) en hex es igual



Datos Segment

Mensaje db CR,LF, 'Hola Mundo! (con Funcion o Procedimiento)',CR,LF,'$'

Datos Ends



Pila Segment Stack

db 64 DUP('PILA') ;inicializaci?n de la pila

Pila Ends



Codigo Segment

holam3 proc far

Assume CS:Codigo,DS:Datos,SS:Pila

mov ax,Datos ;ax=direccion del segmento de datos

mov ds,ax ;ds=ax indicar el segmento de datos

lea dx,Mensaje ;ds:dx= direcci?n del mensaje

call Escribe;llamar al procedimiento Escribe

mov ax,4c00h;funcion para terminal el programa

int 21h;y volver al DOS

holam3 endp

Escribe proc; inicio procedimiento Escribe

mov ah,9; funci?n DOS para escribir texto en pantalla

int 21h; llamar a la interrupcion del DOS

ret;volver o retornar

Escribe endp; Fin del procedimiento Escribe

Codigo Ends

End holam3

Fuente: Fuente 1

Comentarios

Entradas populares de este blog

1.8 - Desplegado de mensajes en el monitor

1.5 - Llamadas a servicios del sistema