Palestra Livello Apprendisti - Esercizio 022 - Conversione da word a caratteri Ascii DECIMALI - Progetto di Wor2Dec - Mostra valore binario a 16 bit e decimale di 80 numeri, in sequenza casuale

Sezione

Indirizzi Base Registri Interni
Area Comunicazione BIOS Funzioni BIOS Funzioni DOS
Prefazione Capitolo 1 Capitolo 2 Schede
Libreria ASM Libreria MAC Palestra Progetti ASM
Info Download INDICE

Palestra Livello Apprendisti Livello Esperti

Home » Programma il Computer » Tutorial Assembly

Programmare in Assembly

Esercizio nÂ° A022 2/4 [111 di 157]

Analisi del Codice · Progetto procedura Wor2Dec · Conclusioni

Gestione Numeri Binari - Conversione da word a Ascii DECIMALI - Progetto di Wor2Dec
Mostra valore binario a 16 bit e decimale di 80 numeri casuali

Analisi del Codice

L'esercizio EsA022.ASM stampa i primi 80 numeri binari a 16 bit, in sequenza casuale (di volta in volta diversi (cioè non consecutivi) perchè generati dalla Procedura Random), mostrando sia il valore esadecimale che quello decimale.

Si tratta della naturale estensione del progetto precedente, la cui basi sono valido supporto anche per questo.

Ecco la versione integrale del Main Program, nella casella di testo:

Esercizio

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

;°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°
                              ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
EsA022  proc    NEAR          ;³      AREA DEDICATA AL MAIN PROGRAM         ³
                              ;ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
                              ;¿Provvede   alla   cancellazione   del   video,
        CALL    BIOScls       ;³posizionando il cursore alla riga0,  colonna0,
                              ;Ùin alto a sinistra
        CALL    VIA_cur       ; Rende il  cursore invisibile
      M_msgC Testo01,00,10,1FH;¿
      M_msgC Testo02,01,10,1FH;³
      M_msgC Testo03,02,10,1FH;³Mette a video il titolo
      M_msgC Testo04,03,10,1FH;Ù
        M_COLOR  0FH          ; Fissa il colore con cui stampare la stringa
        MOV     AL,00H        ; Inizializza il registro a 8 bit
        MOV     DH,07         ; Fissa la riga iniziale a 7
        MOV     CX,16         ; Contatore delle righe da stampare (sono 16)
xxx00:  PUSH    CX            ; Ciclo esterno, per gestire le 16 righe di dati
        MOV     DL,05         ; Fissa la colonna iniziale a 5
        MOV     CX,5          ; Contatore dei dati per ogni riga (sono 5)
xxx01:                        ; Ciclo interno, per gestire i 5 dati per riga
                              ;¿Genera un numero casuale a 16 bit, lasciato in
        MOV     AX,0FFFFH     ;³uscita, nel registro AX; il numero Š  compreso
        CALL    Random        ;³tra  0000H e il valore (meno 1) passato in
                              ;Ùingresso sempre in AX.
        CALL    SET_cur       ; Fissa  dinamicamente la  posizione  di stampa
                              ; Ciclo interno, per gestire i 10 dati per riga
        CALL    Wor2Asc       ;¿
        PUSH    AX            ;³
        MOV     AL,'H'        ;³Dopo la stampa dei  4  caratteri ascii  corri-
        CALL    BIOchr1       ;³spondenti ai 4 nibble della word corrente sono
        MOV     AL,'='        ;³aggiunti il carattere "H" (per ribadire che si
        CALL    BIOchr1       ;³tratta di un valore esadecimale) e  il  valore
        POP     AX            ;³decimale, seguito da uno spazio, per  staccare
        CALL    Wor2Dec       ;³la stampa di un valore dal successivo
        PUSH    AX            ;³
        MOV     AL,' '        ;³
        CALL    BIOchr1       ;³
        POP     AX            ;Ù
        INC     AL
        ADD     DL,15         ;¿Punta la colonna  successiva  e  provvede alla
        LOOP    xxx01         ;Ùstampa del dato successivo

INC     DH            ;¿Punta la riga successiva  e  provvede alla sua
        POP     CX            ;³stampa
        LOOP    xxx00         ;Ù
                              ;-----------------------------------------------
        M_msgC Testo05,24,10,1FH; Mette a video la frase di commiato
        CALL    KEYwait       ;
       ;----------------------------------------------------------------------
_OUT:   PUSH    AX            ;¿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
        MOV     AH,4CH        ;³variabile DOS "ERRORLEVEL" 
        INT     21H           ;Ù
EsA022  ENDP

La struttura del programma è sempre la stessa:

un loop esterno (istruzioni tra xxx00 e LOOP xxx00) per gestire la stampa delle 16 righe consecutive generate dal loop interno (istruzioni tra xxx01 e LOOP xxx01)

il loop interno provvede a stampare una riga completa di 5 stringhe, ciascuna chiamata a mostrare la word corrispondente al valore corrente di AX in espressione esadecimale (CALL Wor2Asc, completato esteticamente con una 'H' e con l'aggiunta del segno '=', in attesa dell'espressione seguente) e in espressione decimale, con la nuovissima Wor2Dec (CALL Wor2Dec, con l'aggiunta di uno spazio, per evitare che le 5 stringhe risultino attaccate tra loro)

La parte iniziale del loop interno predispone in AX il valore corrente della word da visualizzare, generata in modo casuale dalla preziosa Procedura Random.

	Palestra Apprendisti			Esercizio nÂ° A022 2/4
	111 di 157

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 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157

PALESTRA » Apprendisti »	Es.001 Es.002 Es.003 Es.004 Es.005 Es.006 Es.007 Es.008 Es.009 Es.010 Es.011 Es.012 Es.013 Es.014 Es.015 Es.016 Es.017 Es.018 Es.019 Es.020 Es.021 Es.022 Es.023 Es.024 Es.025 Es.026 Es.027 Es.028 Es.029 Es.030 Es.031 Es.032 Es.033
	\| Che serve per iniziare \| Prima compilazione \| Livello Esperti \|

TUTORIAL »

^Home

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

Aggiungi Giobe®2000 ai preferiti

Motore
Ricerca

Rendi Giobe®2000 pagina di Default