Stampanti - Applicazioni Software ["Dentro il Computer" di Giobe®2000]

		Come Funziona Indirizzi Base Area Comunicaz. Bios Registri Livello Hardware Livello BIOS Livello DOS Tecniche d'Interruzione Connettori Cavi Interfaccia Applicazioni Software Download INDICE
Stampanti

Applicazioni Software

PROGRAMMA nÂ° 02 5/6 [41 di 52]

Analisi del Problema · Analisi del Codice · Analisi delle Procedure importanti

Stampanti - Stampa su carta a livello Registri di stringhe ASCII: Tipologie

Analisi del Codice Sorgente

Il codice assembly del programma è visibile, nella sua totalità, scorrendo con la barra laterale il testo della seguente casella:

Progetto

NB: se il testo nell'Area ti sembra strano
installa il font Giobe.TTF: clicca qui!!

PAGE 66,132
TITLE** PROGRAMMA di GESTIONE di programmi ASSEMBLER  tipo COM    (marzo 2003)
SUBTTL ** TUTORIAL ASSEMBLY  --  www.giobe2000.it   --    by ing. Giorgio OBER
;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
;³ NOME        : Printer2.ASM                                                ³
;³ AUTORE      : Giorgio OBER                                                ³
;³ VERSIONE    : marzo 2003                                                  ³
;³ DESCRIZIONE : Controllo di una Stampante a basso livello al fine di garan-³
;³               tire la corretta stampa delle stringhe ASCII.               ³
;³                                                                           ³
;³               Il programma consente la verifica  delle possibili tipologie³
;³               di stampa provando tutte le possibili combinazioni garantite³
;³               da qualunque comune STAMPANTE ad aghi; il numero di caratte-³
;³               ri per pollice pu• esser facilmente cambiato scegliendo  uno³
;³               dei 2 tipi, PICA o ELITE, ma anche combinando con essi  la³
;³               caratteristica di  "CONDENSATO"  o  "ALLARGATO";  combinando³
;³               tra loro queste opzioni si possono  ottenute  fino  a  7³
;³               diverse densit… di caratteri per riga:                      ³
;³                 160 CARATTERI per RIGA con ELITE CONDENSATO               ³
;³                 137 CARATTERI per RIGA con PICA  CONDENSATO               ³
;³                  96 CARATTERI per RIGA con ELITE                          ³
;³                  80 CARATTERI per RIGA con PICA=ELITE CONDENSATO ALLARGATO³
;³                  68 CARATTERI per RIGA con PICA CONDENSATO ALLARGATO      ³
;³                  48 CARATTERI per RIGA con ELITE ALLARGATO                ³
;³                  40 CARATTERI per RIGA con PICA  ALLARGATO                ³
;³                                                                           ³
;³               Ognuna di queste impostazioni Š poi disponibile con  4³
;³               gradazioni di nero:                                         ³
;³                  NORMALE, RIBATTUTO, GRASSETTO e GRASSETTO+RIBATTITURA.   ³
;³ ÚÄÄÄÄÄÄÄÄÄÄ¿ -------------------------------------------------------------³
;³ ³°°°°°°°°°°³ Se si lavora con i Sistemi Operativi Win2000, Win NT o WinXP ³
;³ ³°°°NB !!°°³ bisogna prima installare il Driver Configura_LPT1; scaricalo ³
;³ ³°°°°°°°°°°³ a:   http://www.giobe2000.it/consigli/Scarica_VediLPT_XP.htm ³
;³ ÃÄÄÄÄÄÄÄÄÄÄ´ -------------------------------------------------------------³
;³ ³°°°°°°°°°°³ Se si lavora con i Sistemi Operativi Win2000, Win NT o WinXP ³
;³ ³°°°NB !!°°³ la SHELL DOS deve essere a "Pieno Schermo" (l'esecuzione  in ³
;³ ³°°°°°°°°°°³ "finestra DOS" non produce effetto sulla Stampante)          ³
;³ ÃÄÄÄÄÄÄÄÄÄÄ´ -------------------------------------------------------------³
;³ ³°°°°°°°°°°³ In ogni caso PRIMA DI OGNI SESSIONE DOS Š necessario eseguire³
;³ ³°°°NB !!°°³ il programma Config_LPT1.EXE in ambiente Windows per attivare³
;³ ³°°°°°°°°°°³ la visibilit… dei driver installati con Configura_LPT1 !!!!! ³
;³ ÀÄÄÄÄÄÄÄÄÄÄÙ -------------------------------------------------------------³
;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
; COSTANTI DEFINITE PER IL PROGRAMMA:
        Kdelay  EQU    1      ;Costante di ritardo
        ESC_    EQU    27
        CR      EQU   0DH
        LF      EQU   0AH
        PRNdato EQU  378H     ;Registro   dei   DATI ( USCITA )
        PRNstat EQU  379H     ;Registro   di   STATO (INGRESSO)
        PRNcomd EQU  37AH     ;Registro di CONTROLLO ( USCITA )

; MACRO UTILIZZATE DAL PROGRAMMA:
        if1     ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
         include  GIOBE.MAC ;(C:\ARCH-LAB\BIN\GIOBE.MAC);³
        endif   ;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ

;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÚÄÄÄÄ¿ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
;³PROCEDURE ESTERNE³NEAR³UTILIZZATE dal PROGRAMMA (dalla LIBRERIA GIOBE.LIB~)³
;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÀÄÄÄÄÙÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
        EXTRN    CambiaCol:NEAR
        EXTRN      SET_cur:NEAR
        EXTRN      VIA_cur:NEAR
        EXTRN      RIP_cur:NEAR
        EXTRN      KEYwait:NEAR
        EXTRN        STAsp:NEAR
        EXTRN        Acapo:NEAR
        EXTRN      BIOScls:NEAR
        EXTRN      BIOchr1:NEAR
        EXTRN      BIObeep:NEAR
        EXTRN      BIOSmsg:NEAR
        EXTRN        Delay:NEAR
        EXTRN       RAMcls:NEAR
        EXTRN       RAMchr:NEAR
        EXTRN       RAMcur:NEAR
        EXTRN       RAMmes:NEAR
        EXTRN       RIEMPI:NEAR
        EXTRN       RAMpiu:NEAR

; DICHIARAZIONI PER I PROGRAMMI ESTERNI:
        PUBLIC  ATTRIB
        PUBLIC  Printer2

;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
;³DEFINIZIONE DEL SEGMENTO DEL CODICE                                        ³
;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
_prog   SEGMENT BYTE PUBLIC 'CODE'
        ASSUME  CS:_prog,DS:_prog

ORG     0100H
INIZIO: JMP     Printer2

;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
;³AREA DESTINATA AI DATI DEL PROGRAMMA                                       ³
;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
ATTRIB  DB   1FH
TESTO1  DB   " Stampa di dati a Basso Livello su porta parallela ",00H
TESTO2  DB   " TUTORIAL ASSEMBLY  ---  www.Giobe2000.it",00H
TESTO3  DB   "Quit",00H
TESTO4  DB   " La stampa del testo di prova Š terminata...",00H
        ;Ú[Stringhe di controllo per STAMPANTE HEWLETT PACKARD LASERjet IID]Ä¿
        ;³NER_on= "(streb"                    ;GRASSETTO attivata             ³
        ;³NER_of= "(s0b"                    ;GRASSETTO disattivata          ³
        ;³SOV_on= "(s1s"                    ;SOVRASTAMPA attivata           ³
        ;³SOV_of= "(s0s"                    ;SOVRASTAMPA disattivata        ³
        ;³ALL_on= "(s10.00h12.0v"           ;ALLARGATO attivata             ³
        ;³ALL_of= "(s12.00h10.0v"           ;ALLARGATO disattivata          ³
        ;³COND_on="(8U(s0p16.67h8.5v0streT"  ;CONDENSATO attivata            ³
        ;³COND_of="(8U(s0p12.00h10.0v0streT" ;CONDENSATO disattivata         ³
        ;³ELIT=   "(8U(s0p12.00h10.0v0streT" ;ELITE                          ³
        ;³PICA=   "(8U(s0p12.00h10.ov0streT" ;PICA                           ³
        ;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ

TESTO   LABEL   word    ;Identifica la locazione corrente "inizio del testo"

;ÚÄÄÄÄÄÄ[Stringhe di controllo per STAMPANTE NORMALE (tipo EPSON)]ÄÄÄ¿
        ;³ **************** STAMPA in CARATTERE "PICA" ********************* ³
        ;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
        DB   "P"     ;scrittura in PICA  (80 caratteri per riga)
                      ;-----------------------------------------------------
        DB   ""      ;scrittura in CONDENSATO attivata (136 carat./PICA 
        DB   "TESTO in carattere PICA CONDENSATO NORMALE",CR,LF          
        DB   "G"     ;scrittura in SOVRASTAMPA (RIBATTITURA) attivata   
        DB   "TESTO in carattere PICA CONDENSATO RIBATTUTO",CR,LF        
        DB   "H"     ;scrittura in SOVRASTAMPA (SOVRASTAMPA) disattivata
        DB   "E"     ;scrittura in GRASSETTO attivata                   
        DB   "TESTO in carattere PICA CONDENSATO GRASSETTO ",CR,LF       
        DB   "F"     ;scrittura in GRASSETTO disattivata                
        DB   "EG"   ;scrittura in GRASSETTO e SOVRASTAMPA attivata     
        DB   "TESTO in carattere PICA CONDENSATO GRASSETTO+RIBATTITURA"  
        DB   CR,LF                                                       
        DB   "FH"   ;scrittura in GRASSETTO e SOVRASTAMPA disattivata  
        DB   ""      ;scrittura in CONDENSATO disattivata  
        DB   CR,LF    ;-----------------------------------------------------
        DB   "TESTO in carattere PICA NORMALE",CR,LF                     
        DB   "G"     ;scrittura in SOVRASTAMPA (RIBATTITURA) attivata   
        DB   "TESTO in carattere PICA RIBATTUTO",CR,LF                   
        DB   "H"     ;scrittura in SOVRASTAMPA (SOVRASTAMPA) disattivata
        DB   "E"     ;scrittura in GRASSETTO attivata                   
        DB   "TESTO in carattere PICA GRASSETTO ",CR,LF                  
        DB   "F"     ;scrittura in GRASSETTO disattivata                
        DB   "EG"   ;scrittura in GRASSETTO e SOVRASTAMPA attivata     
        DB   "TESTO in carattere PICA GRASSETTO+RIBATTITURA",CR,LF       
        DB   "FH"   ;scrittura in GRASSETTO e SOVRASTAMPA disattivata  
        DB   CR,LF    ;-----------------------------------------------------
        DB   "W1"    ;scrittura in ALLARGATO attivata 
        DB   "TESTO in PICA ALLARGATO NORMALE",CR,LF                     
        DB   "G"     ;scrittura in SOVRASTAMPA (RIBATTITURA) attivata   
        DB   "TESTO in PICA ALLARGATO RIBATTUTO",CR,LF                   
        DB   "H"     ;scrittura in SOVRASTAMPA (SOVRASTAMPA) disattivata
        DB   "E"     ;scrittura in GRASSETTO attivata                   
        DB   "TESTO in PICA ALLARGATO GRASSETTO ",CR,LF                  
        DB   "F"     ;scrittura in GRASSETTO disattivata                
        DB   "EG"   ;scrittura in GRASSETTO e SOVRASTAMPA attivata     
        DB   "TESTO in PICA ALLARGATO GRASS.+RIBATT.",CR,LF              
        DB   "FH"   ;scrittura in GRASSETTO e SOVRASTAMPA disattivata  
        DB   "W0"    ;scrittura in ALLARGATO disattivata  
        DB   CR,LF    ;-----------------------------------------------------
        DB   "W1"   ;scrittura in CONDENSATO e in ALLARGATO attivata 
        DB   "TESTO in carattere PICA CONDENSATO ALLARGATO NORMALE",CR,LF
        DB   "G"     ;scrittura in SOVRASTAMPA (RIBATTITURA) attivata   
        DB   "TESTO in carattere PICA CONDENSATO ALLARGATO RIBATTUTO",CR,LF;
        DB   "H"     ;scrittura in SOVRASTAMPA (SOVRASTAMPA) disattivata
        DB   "E"     ;scrittura in GRASSETTO attivata                   
        DB   "TESTO in carattere PICA CONDENSATO ALLARGATO GRASSETTO ",CR,LF
        DB   "F"     ;scrittura in GRASSETTO disattivata                
        DB   "EG"   ;scrittura in GRASSETTO e SOVRASTAMPA attivata     
        DB   "TESTO in carattere PICA CONDENSATO ALLARGATO GRASSETTO+"   
        DB   "RIBATTITURA",CR,LF                                         
        DB   "FH"   ;scrittura in GRASSETTO e SOVRASTAMPA disattivata  
        DB   "W0"   ;scrittura in CONDENSATO e in ALLARGATO disattivata
        DB   CR,LF    ;-----------------------------------------------------
        
        ;ÚÄÄÄÄÄÄ[Stringhe di controllo per STAMPANTE NORMALE (tipo EPSON)]ÄÄÄ¿
        ;³ **************** STAMPA in CARATTERE "ELITE" ******************** ³
        ;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
        DB   "M"     ;scrittura in ELITE  (96 caratteri per riga)  
                      ;-----------------------------------------------------
        DB   ""      ;scrittura in CONDENSATO attivata (160 carat./ELITE
        DB   "TESTO in carattere ELITE CONDENSATO NORMALE",CR,LF         
        DB   "G"     ;scrittura in SOVRASTAMPA (RIBATTITURA) attivata   
        DB   "TESTO in carattere ELITE CONDENSATO RIBATTUTO",CR,LF       
        DB   "H"     ;scrittura in SOVRASTAMPA (SOVRASTAMPA) disattivata
        DB   "E"     ;scrittura in GRASSETTO attivata                   
        DB   "TESTO in carattere ELITE CONDENSATO GRASSETTO ",CR,LF      
        DB   "F"     ;scrittura in GRASSETTO disattivata                
        DB   "EG"   ;scrittura in GRASSETTO e SOVRASTAMPA attivata     
        DB   "TESTO in carattere ELITE CONDENSATO GRASSETTO+RIBATTITURA" 
        DB   CR,LF                                                       
        DB   "FH"   ;scrittura in GRASSETTO e SOVRASTAMPA disattivata  
        DB   ""      ;scrittura in CONDENSATO disattivata  
        DB   CR,LF    ;-----------------------------------------------------
        DB   "TESTO in carattere ELITE NORMALE",CR,LF                    
        DB   "G"     ;scrittura in SOVRASTAMPA (RIBATTITURA) attivata   
        DB   "TESTO in carattere ELITE RIBATTUTO",CR,LF                  
        DB   "H"     ;scrittura in SOVRASTAMPA (SOVRASTAMPA) disattivata
        DB   "E"     ;scrittura in GRASSETTO attivata                   
        DB   "TESTO in carattere ELITE GRASSETTO ",CR,LF                 
        DB   "F"     ;scrittura in GRASSETTO disattivata                
        DB   "EG"   ;scrittura in GRASSETTO e SOVRASTAMPA attivata     
        DB   "TESTO in carattere ELITE GRASSETTO+RIBATTITURA",CR,LF      
        DB   "FH"   ;scrittura in GRASSETTO e SOVRASTAMPA disattivata 
        DB   CR,LF    ;-----------------------------------------------------
        DB   "W1"    ;scrittura in ALLARGATO attivata              
        DB   "TESTO in ELITE ALLARGATO NORMALE",CR,LF                    
        DB   "G"     ;scrittura in SOVRASTAMPA (RIBATTITURA) attivata   
        DB   "TESTO in ELITE ALLARGATO RIBATTUTO",CR,LF                  
        DB   "H"     ;scrittura in SOVRASTAMPA (SOVRASTAMPA) disattivata
        DB   "E"     ;scrittura in GRASSETTO attivata                   
        DB   "TESTO in ELITE ALLARGATO GRASSETTO ",CR,LF                 
        DB   "F"     ;scrittura in GRASSETTO disattivata                
        DB   "EG"   ;scrittura in GRASSETTO e SOVRASTAMPA attivata     
        DB   "TESTO in ELITE ALLARGATO GRASS.+RIBATT.",CR,LF             
        DB   "FH"   ;scrittura in GRASSETTO e SOVRASTAMPA disattivata  
        DB   "W0"    ;scrittura in ALLARGATO disattivata         
        DB   CR,LF    ;-----------------------------------------------------
        DB   "W1"   ;scrittura in CONDENSATO e in ALLARGATO attivata  
        DB   "TESTO in carattere ELITE CONDENSATO ALLARGATO NORMALE",CR,LF
        DB   "G"     ;scrittura in SOVRASTAMPA (RIBATTITURA) attivata   
        DB   "TESTO in carattere ELITE CONDENSATO ALLARGATO RIBATTUTO",CR,LF
        DB   "H"     ;scrittura in SOVRASTAMPA (SOVRASTAMPA) disattivata
        DB   "E"     ;scrittura in GRASSETTO attivata                   
        DB  "TESTO in carattere ELITE CONDENSATO ALLARGATO GRASSETTO ",CR,LF
        DB   "F"     ;scrittura in GRASSETTO disattivata                
        DB   "EG"   ;scrittura in GRASSETTO e SOVRASTAMPA attivata     
        DB   "TESTO in carattere ELITE CONDENSATO ALLARGATO GRASSETTO+"  
        DB   "RIBATTITURA",CR,LF                                         
        DB   "FH"   ;scrittura in GRASSETTO e SOVRASTAMPA disattivata  
        DB   "W0"   ;scrittura in CONDENSATO e in ALLARGATO disattivata
        DB   CR,LF    ;-----------------------------------------------------
        DB   00H      ;Terminatore del TESTO in stampa

;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
;³  AREA DESTINATA ALLE PROCEDURE DEL PROGRAMMA                              ³
;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
;³PROCEDURA  : DeskTop                                                       ³
;³DESCRIZIONE: Procedura che inizializza completamente il  piano  di  lavoro.³
;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
DeskTop:CALL    RAMcls        ;Pulisce lo schermo e inizializza il segmento
                              ;dedicato alla RamVideo (ES=0B800H)
        CALL    VIA_cur       ; Rende il  cursore invisibile
        M_COLOR  71H          ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
        MOV     AL,"°"        ;³                                             ³
        CALL    RIEMPI        ;³                                             ³
      RAMrepC 80," ", 0, 0,30H;³                                             ³
      RAMrepC 80," ",24, 0,30H;³                                             ³
      RAMcol  TESTO1, 0,15,3FH;³Organizza il piano di presentazione          ³
      RAMcol  TESTO2,24, 0,3FH;³                                             ³
      RAMcol  TESTO3,24,73,30H;³                                             ³
        RAM_cur 24,73         ;³                                             ³
        M_COLOR 3FH           ;³                                             ³
        MOV     AL,"Q"        ;³                                             ³
        CALL    RAMchr        ;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
        RET

;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
;³PROCEDURA  : Chk_Busy                                                      ³
;³DESCRIZIONE: Controlla se la Stampante Š disponibile a  ricevere  DATI  dal³
;³             computer, interrogando i bit7 del Registro di Stato 0379H.    ³
;³                                                                           ³
;³             ÚÄ[0379H/0279H - PORTA d'INGRESSO dello STATO]Ä¿              ³
;³             ³       ÚÄ7ÄÂÄ6ÄÂÄ5ÄÂ4ÄÄÂÄ3ÄÂÄ2ÄÂÄ1ÄÂÄ0Ä¿      ³              ³
;³             ³       ³ ? ³ 1 ³ 1 ³ 1 ³ 0 ³ x ³ x ³ 0 ³      ³              ³
;³             ³       ÀÄÄÄÁÄÄÄÁÄÄÄÁÄÄÄÁÄÄÄÁÄÄÄÁÄÄÄÁÄÄÄÙ      ³              ³
;³             ³         ³   ³   ³   ³   ³   ³   ³   ÀÄTimeOut³              ³
;³             ³**BUSY**ÄÙ   ³   ³   ³   ³   ÀÄÄÄÁÄÄÄnon usati³              ³
;³             ³ACKNOWL. (ok)Ù   ³   ³   ÀÄÄÄÄÄÄÄnessun ERRORE³              ³
;³             ³PAPER EMPTY (ok)ÄÙ   ÀÄÄÄÄÄÄÄÄSELECT (ON-LINE)³              ³
;³             ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ              ³
;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
Chk_Busy:MOV    DX,PRNstat    ;¿Controlla  se  la  Stampante Š  disponibile  a
Chk_01: IN      AL,DX         ;³ricevere DATI dal computer: in questo caso  la
        TEST    AL,80H        ;³linea  di  BUSY  (bit7)  Š  a  "1"   e  si pu•
        JZ      Chk_02        ;³proseguire; in  caso  contrario (bit7="0")  la
        RET                   ;Ùstampante Š "occupata" (busy)
Chk_02: MOV     AH,01H        ;¿Funzione BIOS INT 16H che consente di  verifi-
        INT     16H           ;³care la eventuale  pressione  di  tasti  senza
        JZ      Chk_01        ;³fermarsi; se non si introduce questo controllo
                              ;³se la stampate non Š in linea non si esce pi—!
                              ;Ù(NB: ffZ="1" = nessuna pressione tasti (Z) )
        CALL    KEYwait       ;¿
        AND     AL,11011111B  ;³In ogni caso Š ammesa l'uscita  solo  dopo  la
        CMP     AL,'Q'        ;³pressione del tasto "Q"
        JNZ     Chk_01        ;Ù
        RET

;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
;³PROCEDURA  : Out_Chr                                                       ³
;³DESCRIZIONE: Colloca il carattere  corrente  sul  Registro  d'uscita  Dati,³
;³             0378H, a disposizione della Stampante.                        ³
;³                                                                           ³
;³             ÚÄ[0378H/0278H -  PORTA d'USCITA dei DATI]ÄÄÄÄÄ¿              ³
;³             ³       ÚÄ7ÄÂÄ6ÄÂÄ5ÄÂ4ÄÄÂÄ3ÄÂÄ2ÄÂÄ1ÄÂÄ0Ä¿      ³              ³
;³             ³       ³ D7³ D6³ D5³ D4³ D3³ D2³ D1³ D0³      ³              ³
;³             ³       ÀÄÄÄÁÄÄÄÁÄÄÄÁÄÄÄÁÄÄÄÁÄÄÄÁÄÄÄÁÄÄÄÙ      ³              ³
;³             ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ              ³
;³             Dopo la trasmissione crea da  software  il  breve  impulso  di³
;³             STROBE, a beneficio della Stampante, in sequenza il  bit0  del³
;³             Registro di Controllo prima a "1" [1=Dato Erogato] e poi a "0"³
;³             [0=nessun Dato]                                               ³
;³                                                                           ³
;³             ÚÄ[037AH/027AH -  PORTA d'USCITA dei COMANDI ]Ä¿              ³
;³             ³       ÚÄ7ÄÂÄ6ÄÂÄ5ÄÂ4ÄÄÂÄ3ÄÂÄ2ÄÂÄ1ÄÂÄ0Ä¿      ³   ÚÄÄÄÄÄÄÄÄÄ¿³
;³             ³       ³ 0 ³ 0 ³ 0 ³ 0 ³ 1 ³ 1 ³ 0 ³ ? ³      ³   ³         ³³
;³             ³       ÀÄÄÄÁÄÄÄÁÄÄÄÁÄÄÄÁÄÄÄÁÄÄÄÁÄÄÄÁÄÄÄÙ      ³   ³   Ú¿    ³³
;³             ³non usatiÁÄÄÄÁÄÄÄÙ   ³   ³   ³   ³   ÀÄÄSTROBE³   ³ ÄÄÙÀÄ÷Ä ³³
;³             ³ENABLE INT (disab)ÄÄÄÙ   ³   ³   ÀAUTOFEED(no)³   ³ STROBE  ³³
;³             ³SELECT IN (ok:on-line)ÄÄÄÙ   ÀÄÄÄÄÄÄÄÄINIT(ok)³   ÀÄÄÄÄÄÄÄÄÄÙ³
;³             ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ              ³
;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
Out_Chr:MOV     DX,PRNdato    ;¿Colloca carattere corrente  dalla stringa  sul
        OUT     DX,AL         ;³Registro d'uscita Dati,  a disposizione  della
                              ;ÙStampante
        MOV     DX,PRNcomd    ;¿
        IN      AL,DX         ;³Crea da software il breve impul-   ÚÄÄÄÄÄÄÄÄÄ¿
        OR      AL,01H        ;³so di "STROBE", a beneficio del-   ³         ³
        OUT     DX,AL         ;³la Stampante: il bit0 del  Regi-   ³   Ú¿    ³
        CALL    Delay__       ;³stro "PRNcomd" viene forzato  in   ³ ÄÄÙÀÄ÷Ä ³
        AND     AL,0FEH       ;³sequenza prima a "1" e poi a "0"   ³ STROBE  ³
        OUT     DX,AL         ;³[1=Dato Erogato / 0=nessun Dato]   ÀÄÄÄÄÄÄÄÄÄÙ
        CALL    Delay__       ;³
        RET                   ;Ù

;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
;³PROCEDURA   : Delay__                                                      ³
;³DESCRIZIONE : Il ritardo prodotto Š legato dalla velocit… del processore   ³
;³              perch‚ utilizza le un ciclo di istruzioni.. Š di circa 1 ms  ³
;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
Delay__:PUSH    CX
        MOV     CX,0000H ;65536
del2_:  PUSH    AX
        PUSH    BX
        PUSH    CX
        PUSH    DX
        POP     DX
        POP     CX
        POP     BX
        POP     AX
        LOOP    del2_
        POP     CX
        RET

;°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°
;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
                              ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿³
Printer2 proc   NEAR          ;³      AREA DEDICATA AL MAIN PROGRAM         ³³
                              ;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ³
;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
                              ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
        CALL    DeskTop       ;³Organizza il piano di presentazione          ³
                              ;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
        LEA     SI,TESTO      ; Punta il testo da proporre sulla carta
Prnt00: CALL    Chk_Busy      ;¿Controlla  se  la  Stampante Š  disponibile  a
                              ;Ùricevere DATI dal computer
        CMP     AL,'Q'        ;¿Se, durante l'attesa, Š stato premuto il tasto
        JZ      _OUT          ;Ù"Q" si torna immediatamemte al DOS

;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
                              ;³ FASE DI STAMPA DI UN CARATTERE              ³
                              ;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
        MOV     AL,CS:[SI]    ;¿Preleva il carattere corrente dalla stringa  e
        CMP     AL,00H        ;³verifica se si tratta  del "terminatore"; se Š
        JZ      Prnt01        ;Ùcos il servizio di stampa Š terminato
                              ;¿Altrimenti lo colloca  sul  Registro  d'uscita
        CALL    Out_Chr       ;³Dati a disposizione della Stampante, lasciando
        INC     SI            ;Ùaggiornato il puntatore alla stringa
        JMP     SHORT Prnt00  ; Ritorna nel loop di stampa

Prnt01:RAMcol TESTO4,12,18,0CFH;¿Messaggio di fine lavoro
                               ;ÙLa stampa del testo di prova Š terminata...
Prnt02: CALL    KEYwait       ;¿Rimane  in  attesa  di tasti premuti e, quando
        AND     AL,11011111B  ;³ci• Š vero, ne controlla il valore
        CMP     AL,'Q'        ;³Se il tasto premuto  Š  "Q", viene  imposto un
        JNZ     Prnt02        ;Ùritorno immediato al sistema operativo

_OUT:   PUSH    AX            ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
       RAMrepC 80," ", 0,0,0FH;³                                             ³
       RAMrepC 80," ",24,0,0FH;³Torna al DOS con la memoria liberata e con la³
        CALL    RIP_cur       ;³chiusura di tutti i file; cede  il  controllo³
        MOV     DH,23         ;³al processo padre (generalmente COMMAND.COM);³
        MOV     DL,0          ;³il valore posto eventualmente  in AL prima di³
        CALL    SET_cur       ;³uscire pu• essere testato in  uscita  con  la³
        POP     AX            ;³funzione 4DH o mediante la lettura della  va-³
        MOV     AH,4CH        ;³riabile DOS "ERRORLEVEL"                     ³
        INT     21H           ;³                                             ³
                              ;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
                              ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
Printer2 ENDP                 ;³Chiusura standard del codice                 ³
_prog   ENDS                  ;ÃÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´
        END INIZIO            ;³Chiusura del segmento di codice e conclusione³
                              ;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ

La lettura può essere operata anche in Ambiente Assembler (disponibile sul Sito accedendo a questa pagina); se hai già provveduto alla sua installazione scarica il sorgente del progetto direttamente nella cartella C:\Arch-Lab\Lavoro (scegliendo il pulsante di opzione "Salva" e, come destinazione, seleziona la cartella che ti ho appena suggerito).

Ricorda: se fai click sull'icona a sinistra si apre l'Ambiente Assembly e puoi entrare in Ambiente on-line.
Scegli il pulsante di opzione "Aprire il file" o "Esegui l'applicazione" e conferma con OK.
NB: alcuni gestori di protezione (per esempio SP2 di WinXP) non ti consentono questa operazione:
in questo caso scrivi c:\arch-lab\bin\sys\assembler.pif direttamente nel campo indirizzo del Browser

Nella shell DOS aperta (o a pieno schermo) puoi iniziare una sessione di lavoro digitando MACRO Printer2 /e (con gli spazi al posto giusto !!) e conferma con Invio.

	Stampanti			PROGRAMMA nÂ° 02 5/6
	41 di 52

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52

Stampanti »

^Home

Pascal|Manuali|Tabelle|Schede
Tutorial Assembly|Palestra Assembler

Aggiungi Giobe®2000 ai preferiti

Motore
Ricerca

Rendi Giobe®2000 pagina di Default