First commit 06/07/1996

CDS/EJEMPLO2.ASM

@@ -0,0 +1,55 @@
+segmento    SEGMENT
+            ASSUME DS:segmento
+            ORG 100h
+principal   PROC NEAR
+
+            call Borra
+
+            mov ah, 02h
+            mov dh, 11
+            mov dl, 30
+            mov bh, 00h
+            int 10h
+
+            mov ah, 09h
+            mov dx, OFFSET MensajeSaludo
+            int 21h
+
+            mov ah, 00h
+            int 16h
+
+            call Borra
+
+            mov ah, 4ch
+            int 21h
+
+principal   ENDP
+
+Borra PROC NEAR
+
+      push ax    ; Se almacenan en la pila los registros que va a utilizar
+      push bx    ; la subrutina. El valor de SP disminuye en 4 * 2 = 8
+      push cx    ; unidades
+      push dx
+
+      mov ax, 0600h     ; Se borra la pantalla
+      mov bh, 07h
+      mov cx, 0000h
+      mov dx, 184fh
+      int 10h
+
+      pop dx     ; Se recuperan los valores de los registros, de forma que
+      pop cx     ; al volver el control de la ejecuci<63>n al m<>dulo principal
+      pop bx     ; <20>stos almacenen los valores que pose<73>an antes de la
+      pop ax     ; llamada al procedimiento. SP se incrementa en 4 * 2 = 8
+                 ; unidades
+
+      ret
+
+Borra ENDP
+
+MensajeSaludo DB '<27>Hola Mundo!$'
+
+segmento  ENDS
+          END  principal
+