PAGE 66,132
TITLE** PROGRAMMA di GESTIONE di programmi ASSEMBLER  tipo COM   (aprile 2009)
SUBTTL** EsA002.ASM - Esercizi PALESTRA ASSEMBLY APPRENDISTI -  by ing. G.OBER
;/---------------------------------------------------------------------------\
;| NOME        : EsA002.ASM                                                  |
;| AUTORE      : Giorgio OBER                                                |
;| VERSIONE    : aprile 2009                                                 |
;| DESCRIZIONE : Esercizio nø 0002                                           |
;|               Pulisce lo schermo e stampa un carattere in alto a sinistra.|
;|               con aiuto delle procedure della Libreria Giobe.LIB.         |
;\---------------------------------------------------------------------------/

; LIBRERIA UTILIZZATA DAL PROGRAMMA [opzione WinASM altrimenti non necessaria]
        includelib      c:\arch-lab\bin\GIOBE.LIB

;PROCEDURE ESTERNE UTILIZZATE dal PROGRAMMA [NEAR, dalla LIBRERIA ~GIOBE.LIB~]
;-----------------------------------------------------------------------------
        EXTRN      BIOScls:NEAR
        EXTRN      BIOSchr:NEAR
        EXTRN      KEYwait:NEAR


;DEFINIZIONE DEL SEGMENTO DEL CODICE
;-----------------------------------------------------------------------------
_prog   SEGMENT BYTE PUBLIC 'CODE'   ;Inizio Standard  del  Segmento di CODICE
        ASSUME  CS:_prog,DS:_prog    ;Associazione  Standard  per  i  Segmenti

        ORG     0100H         ;Indirizzo d'Inizio standard dell'eseguibile COM
INIZIO:                       ;Indirizzo della prima istruzione  da  compilare
        JMP     EsA002        ;Istruzione  Standard  che  salta le (eventuali)
                              ;variabili del programma e punta il Main Program


;AREA DESTINATA AI DATI DEL PROGRAMMA
;-----------------------------------------------------------------------------
;in questo esempio non sono definite variabili o messaggi


;*****************************************************************************
                              ; ----------------------------------------------
EsA002  proc   NEAR           ;      AREA DEDICATA AL MAIN PROGRAM
                              ; ----------------------------------------------
;-----------------------------------------------------------------------------
                              ;Provvede    alla   cancellazione   del   video,
        CALL    BIOScls       ;posizionando il cursore alla  riga0,  colonna0,
                              ;in alto a sinistra

        MOV     AL,'A'        ;Provvede alla stampa  del  carattere  Ascii "A"
        CALL    BIOSchr       ;con i colori standard (bianco su nero) e  nella
                              ;posizione di  stampa corrente

        CALL    KeyWait       ;Rimane in attesa della pressione  di  un  tasto
                              ;qualunque  (lasciando  il  suo  valore  in  AL)

        MOV     AH,4CH        ;Pone fine al processo (eseguibile) in atto
        INT     21H           ;tornando al prompt del DOS nel modo migliore

EsA002  ENDP                  ;Chiusura Standard della Procedura "MainProgram"
_prog   ENDS                  ;Chiusura Standard del Segmento di CODICE
        END INIZIO            ;Indirizzo dell'ultima istruzione  da  compilare