PAGE 66,132
TITLE** PROGRAMMA di GESTIONE di programmi ASSEMBLER tipo COM    (giugno 2005)
SUBTTL ** TUTORIAL ASSEMBLY  --  www.giobe2000.it   --    by ing. Giorgio OBER
;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
;ł NOME        : AT_Test1.ASM  ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄżł
;ł AUTORE      : Giorgio OBER  ł  ************ *********** **************   łł
;ł VERSIONE    : giugno 2005   ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮł
;ł DESCRIZIONE : Questo progetto, dotato di Desktop  di  presentazione  e  dił
;ł               menu interattivi,  decodifica e mette a video 9 messaggi SMSł
;ł               catturati   in  precedenza  dalla  memoria  di  un  Telefonoł
;ł               Cellulare con l'aiuto di Comandi, AT+CMGR=<numero>.         ł
;ł               Si  tratta  di  uno  strumento per  svelare  i  segreti  delł
;ł               Protocol  Data  Unit  (PDU),  lo  standard  utilizzato  per ł
;ł               trasmettere e  ricevere SMS,  alternativo  al formato Testo,ł
;ł               usato molto pi� raramente.                                  ł
;ł               Questa versione si limita a decodificare in blocco tutti e 9ł
;ł               i messaggi e mostrali insieme in un'unica schermata.        ł
;ł               La  versione  AT_Test2   opera   sostanzialmente  lo  stessoł
;ł               servizio,   organizzando   per�  in   riquadri  dedicati  leł
;ł               informazioni  trovate  nella  stringa  PDU di ciascuno dei 9ł
;ł               messaggi SMS, come far� il progetto finale, AT1_Srvr.       ł
;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
; MACRO UTILIZZATE DAL PROGRAMMA:
        if1
         include  GIOBE.MAC
        endif

;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÚÄÄÄÄżÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
;łPROCEDURE ESTERNEłNEARłUTILIZZATE dal PROGRAMMA (dalla LIBRERIA GIOBE.LIB) ł
;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŔÄÄÄÄŮÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
        EXTRN   CambiaCol:NEAR
        EXTRN     BIOchr1:NEAR
        EXTRN      RIEMPI:NEAR
        EXTRN     BIOSmsg:NEAR
        EXTRN       STAsp:NEAR
        EXTRN     BIOScls:NEAR
        EXTRN     SET_cur:NEAR
        EXTRN     VIA_cur:NEAR
        EXTRN     RIP_cur:NEAR
        EXTRN      RAMcur:NEAR
        EXTRN     KEYwait:NEAR
        EXTRN     Wor2Dec:NEAR

; DICHIARAZIONI (VARIABILI) PER I PROGRAMMI ESTERNI:
        PUBLIC  ATTRIB        ;Attributo di colore

; DICHIARAZIONI (PROCEDURE) PER I PROGRAMMI ESTERNI:
        PUBLIC  AT_Test1

;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
;łDEFINIZIONE DEL SEGMENTO DEL CODICE                                        ł
;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
_prog   SEGMENT BYTE PUBLIC 'CODE'
        ASSUME  CS:_prog,DS:_prog

        ORG     0100H
INIZIO: JMP     AT_Test1
;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
;łAREA DESTINATA AI DATI DEL PROGRAMMA                                       ł
;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
;łCome gi� sottolineato le stringhe PDU dei 9 messaggi sono  state  acquisiteł
;łin  precedenza  con  altri  mezzi,  dalla  memoria  del   telefono  e  reseł
;łdisponibili in questo sorgente ASM per il collaudo  della PROCEDURA AT_Chk.ł
;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
        ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
        ;ł  00390461987645                                                   ł
        ;ł  11/03/2005                                                       ł
        ;ł  17:35:52                                                         ł
        ;ł  15                                                               ł
        ;ł  "aliceadsl.it #B"                                                ł
        ;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
msg00   DB "079193338528520000"
        DB "0E8500934016896754"
        DB "3900"
        DB "503011"
        DB "715325"
        DB "40"
        DB "0F61767A5C0E93E76C579A0E1A0901"
        ;---------------------------------------------------------------------
        ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
        ;ł  00390461987645                                                   ł
        ;ł  11/03/2005                                                       ł
        ;ł  17:38:43                                                         ł
        ;ł  65                                                               ł
        ;ł  "aliceadsl.it #B#M0#N0#R1060072011155#K1230#L144#S Prova Finale "ł
        ;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
msg01   DB "079193338528520000"
        DB "0E8500934016896754"
        DB "3900"
        DB "503011"
        DB "718334"
        DB "40"
        DB "4161767A5C0E93E76C579A0E1A09474D"
        DB "D8C8091B4963301B0C7693C162B158AD"
        DB "365AC66433D88819A3D146531054FEB6"
        DB "8741C6B43BCC2E834020"
        ;---------------------------------------------------------------------
        ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
        ;ł  00390461987645                                                   ł
        ;ł  11/03/2005                                                       ł
        ;ł  17:40:30                                                         ł
        ;ł  17                                                               ł
        ;ł  "aliceadsl.it #t02"                                              ł
        ;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
msg02   DB "079193338528520004"
        DB "0E8500934016896754"
        DB "3900"
        DB "503011"
        DB "710403"
        DB "40"
        DB "1161767A5C0E93E76C579A0E1AD16132"
        ;---------------------------------------------------------------------
        ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
        ;ł  00390461987645                                                   ł
        ;ł  11/03/2005                                                       ł
        ;ł  17:36:25                                                         ł
        ;ł  21                                                               ł
        ;ł  "aliceadsl.it #B#M0#N0"                                          ł
        ;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
msg03   DB "079193338528040004"
        DB "0E8500934016896754"
        DB "3900"
        DB "503011"
        DB "716352"
        DB "40"
        DB "1561767A5C0E93E76C579A0E1A09474D"
        DB "D8C80903"
        ;---------------------------------------------------------------------
        ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
        ;ł  00390461987645                                                   ł
        ;ł  11/03/2005                                                       ł
        ;ł  17:37:37                                                         ł
        ;ł  28                                                               ł
        ;ł  "aliceadsl.it #R1060072011155"                                   ł
        ;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
msg04   DB "079193338518590000"
        DB "0E8500934016896754"
        DB "3900"
        DB "503011"
        DB "717373"
        DB "40"
        DB "1C61767A5C0E93E76C579A0E1A496330"
        DB "1B0C7693C162B158AD06"
        ;---------------------------------------------------------------------
        ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
        ;ł  00390461987645                                                   ł
        ;ł  11/03/2005                                                       ł
        ;ł  17:39:59                                                         ł
        ;ł  17                                                               ł
        ;ł  "aliceadsl.it #t01"                                              ł
        ;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
msg05   DB "079193338518590004"
        DB "0E8500934016896754"
        DB "3900"
        DB "503011"
        DB "719395"
        DB "40"
        DB "1161767A5C0E93E76C579A0E1AD16131"
        ;---------------------------------------------------------------------
        ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
        ;ł  00390461987645                                                   ł
        ;ł  11/03/2005                                                       ł
        ;ł  17:38:19                                                         ł
        ;ł  57                                                               ł
        ;ł  "aliceadsl.it #R1060072011155#K1230#L144#S Prova Finale "        ł
        ;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
msg06   DB "079193338528020004"
        DB "0E8500934016896754"
        DB "3900"
        DB "503011"
        DB "718391"
        DB "40"
        DB "3961767A5C0E93E76C579A0E1A496330"
        DB "1B0C7693C162B158AD365AC66433D88819A3"
        DB "D146531054FEB68741C6B43BCC2E834020"
        ;---------------------------------------------------------------------
        ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
        ;ł  00390461987645                                                   ł
        ;ł  11/03/2005                                                       ł
        ;ł  17:43:06                                                         ł
        ;ł  91                                                               ł
        ;ł  "aliceadsl.it #o55#h#oaa#h#o00#h#off#h#o01#h#o02#h#o04#h#o08#h   ł
        ;ł                                    #o10#h#o20#h#o40#h#o80#h#o00#h"ł
        ;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
msg07   DB "079193338528530004"
        DB "0E8500934016896754"
        DB "3900"
        DB "503011"
        DB "713460"
        DB "40"
        DB "5B61767A5C0E93E76C579A0E1ABD6BB5"
        DB "117AF40E8747E8D11B061BA1476FB379841E"
        DB "BD61B1117AF486C946E8D11B461BA1476F18"
        DB "6E841EBD63B0117AF496C146E8D19B061BA1"
        DB "476F1C6C841EBD61B0111A"
        ;---------------------------------------------------------------------
        ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
        ;ł  393331234567                                                     ł
        ;ł  11/03/2005                                                       ł
        ;ł  18:31:32                                                         ł
        ;ł  50                                                               ł
        ;ł  "#b#m0#n0#r1060072011155#k1230#144#s prova finale ?"             ł
        ;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
msg08   DB "079193432900808904"
        DB "0C91933313325476"
        DB "0000"
        DB "503011"
        DB "811323"
        DB "40"
        DB "3223F1A80D1BB96123790C6683C16E32"
        DB "582C16ABD546EB986C061BC568B4D11C0497"
        DB "BFED619039ED0EB3CB2005"
        ;---------------------------------------------------------------------
ATTRIB  DB 00H
        ;---------------------------------------------------------------------
SMSbyt  DB  512 DUP (' ')
SMStxt  DB  512 DUP (' ')
        ;---------------------------------------------------------------------
        ; ALFABETO  del caratteri a 7 bit (default alphabet)
        ; secondo le specifiche GSM 03.38.

AlfaTab DB      '@'       ;     00H  COMMERCIAL AT
        DB      'Ł'       ;     01H  POUND SIGN
        DB      '$'       ;     02H  DOLLAR SIGN
        DB      'Ľ'       ;     03H  YEN SIGN
        DB      'č'       ;     04H  LATIN SMALL LETTER E WITH GRAVE
        DB      'é'       ;     05H  LATIN SMALL LETTER E WITH ACUTE
        DB      'ů'       ;     06H  LATIN SMALL LETTER U WITH GRAVE
        DB      'ě'       ;     07H  LATIN SMALL LETTER I WITH GRAVE
        DB      'ň'       ;     08H  LATIN SMALL LETTER O WITH GRAVE
        DB      'Ç'       ;     09H  LATIN CAPITAL LETTER C WITH CEDILLA
        DB      0AH       ;     0AH  LINE FEED
        DB      'Ř'       ;     0BH  LATIN CAPITAL LETTER O WITH STROKE
        DB      'ř'       ;     0CH  LATIN SMALL LETTER O WITH STROKE
        DB      0DH       ;     0DH  CARRIAGE RETURN
        DB      'Ĺ'       ;     0EH  LATIN CAPITAL LETTER A WITH RING ABOVE
        DB      'ĺ'       ;     0FH  LATIN SMALL LETTER A WITH RING ABOVE
        DB      '?'       ;     10H  GREEK CAPITAL LETTER DELTA
        DB      '_'       ;     11H  LOW LINE        _
        DB      'F'       ;     12H  GREEK CAPITAL LETTER PHI
        DB      'G'       ;     13H  GREEK CAPITAL LETTER GAMMA
        DB      '?'       ;     14H  GREEK CAPITAL LETTER LAMBDA
        DB      'O'       ;     15H  GREEK CAPITAL LETTER OMEGA
        DB      '?'       ;     16H  GREEK CAPITAL LETTER PI
        DB      '?'       ;     17H  GREEK CAPITAL LETTER PSI
        DB      'S'       ;     18H  GREEK CAPITAL LETTER SIGMA
        DB      'T'       ;     19H  GREEK CAPITAL LETTER THETA
        DB      '?'       ;     1AH  GREEK CAPITAL LETTER XI
        DB      1BH       ;     1BH  ESCAPE TO EXTENSION TABLE
        DB      'Ć'       ;     1CH  LATIN CAPITAL LETTER AE
        DB      'ć'       ;     1DH  LATIN SMALL LETTER AE
        DB      'ß'       ;     1EH  LATIN SMALL LETTER SHARP S (German)
        DB      'É'       ;     1FH  LATIN CAPITAL LETTER E WITH ACUTE
        DB      ' '       ;     20H  SPACE
        DB      '!'       ;     21H  EXCLAMATION MARK
        DB      '"'       ;     22H  QUOTATION MARK
        DB      '#'       ;     23H  NUMBER SIGN
        DB      '¤'       ;     24H  CURRENCY SIGN
        DB      '%'       ;     25H  PERCENT SIGN
        DB      '&'       ;     26H  AMPERSAND
        DB      27H       ;     27H  APOSTROPHE   '
        DB      '('       ;     28H  LEFT PARENTHESIS
        DB      ')'       ;     29H  RIGHT PARENTHESIS
        DB      '*'       ;     2AH  ASTERISK
        DB      '+'       ;     2BH  PLUS SIGN
        DB      ','       ;     2CH  COMMA
        DB      '-'       ;     2DH  HYPHEN-MINUS
        DB      '.'       ;     2EH  FULL STOP
        DB      '/'       ;     2FH  SOLIDUS (SLASH)
        DB      '0'       ;     30H  DIGIT ZERO
        DB      '1'       ;     31H  DIGIT ONE
        DB      '2'       ;     32H  DIGIT TWO
        DB      '3'       ;     33H  DIGIT THREE
        DB      '4'       ;     34H  DIGIT FOUR
        DB      '5'       ;     35H  DIGIT FIVE
        DB      '6'       ;     36H  DIGIT SIX
        DB      '7'       ;     37H  DIGIT SEVEN
        DB      '8'       ;     38H  DIGIT EIGHT
        DB      '9'       ;     39H  DIGIT NINE
        DB      ':'       ;     3AH  COLON
        DB      ';'       ;     3BH  SEMICOLON
        DB      '<'       ;     3CH  LESS-THAN SIGN
        DB      '='       ;     3DH  EQUALS SIGN
        DB      '>'       ;     3EH  GREATER-THAN SIGN
        DB      '?'       ;     3FH  QUESTION MARK
        DB      'Ą'       ;     40H  INVERTED EXCLAMATION MARK
        DB      'A'       ;     41H  LATIN CAPITAL LETTER A
        DB      'B'       ;     42H  LATIN CAPITAL LETTER B
        DB      'C'       ;     43H  LATIN CAPITAL LETTER C
        DB      'D'       ;     44H  LATIN CAPITAL LETTER D
        DB      'E'       ;     45H  LATIN CAPITAL LETTER E
        DB      'F'       ;     46H  LATIN CAPITAL LETTER F
        DB      'G'       ;     47H  LATIN CAPITAL LETTER G
        DB      'H'       ;     48H  LATIN CAPITAL LETTER H
        DB      'I'       ;     49H  LATIN CAPITAL LETTER I
        DB      'J'       ;     4AH  LATIN CAPITAL LETTER J
        DB      'K'       ;     4BH  LATIN CAPITAL LETTER K
        DB      'L'       ;     4CH  LATIN CAPITAL LETTER L
        DB      'M'       ;     4DH  LATIN CAPITAL LETTER M
        DB      'N'       ;     4EH  LATIN CAPITAL LETTER N
        DB      'O'       ;     4FH  LATIN CAPITAL LETTER O
        DB      'P'       ;     50H  LATIN CAPITAL LETTER P
        DB      'Q'       ;     51H  LATIN CAPITAL LETTER Q
        DB      'R'       ;     52H  LATIN CAPITAL LETTER R
        DB      'S'       ;     53H  LATIN CAPITAL LETTER S
        DB      'T'       ;     54H  LATIN CAPITAL LETTER T
        DB      'U'       ;     55H  LATIN CAPITAL LETTER U
        DB      'V'       ;     56H  LATIN CAPITAL LETTER V
        DB      'W'       ;     57H  LATIN CAPITAL LETTER W
        DB      'X'       ;     58H  LATIN CAPITAL LETTER X
        DB      'Y'       ;     59H  LATIN CAPITAL LETTER Y
        DB      'Z'       ;     5AH  LATIN CAPITAL LETTER Z
        DB      'Ä'       ;     5BH  LATIN CAPITAL LETTER A WITH DIAERESIS
        DB      'Ö'       ;     5CH  LATIN CAPITAL LETTER O WITH DIAERESIS
        DB      'Ń'       ;     5DH  LATIN CAPITAL LETTER N WITH TILDE
        DB      'Ü'       ;     5EH  LATIN CAPITAL LETTER U WITH DIAERESIS
        DB      '§'       ;     5FH  SECTION SIGN
        DB      'ż'       ;     60H  INVERTED QUESTION MARK
        DB      'a'       ;     61H  LATIN SMALL LETTER A
        DB      'b'       ;     62H  LATIN SMALL LETTER B
        DB      'c'       ;     63H  LATIN SMALL LETTER C
        DB      'd'       ;     64H  LATIN SMALL LETTER D
        DB      'e'       ;     65H  LATIN SMALL LETTER E
        DB      'f'       ;     66H  LATIN SMALL LETTER F
        DB      'g'       ;     67H  LATIN SMALL LETTER G
        DB      'h'       ;     68H  LATIN SMALL LETTER H
        DB      'i'       ;     69H  LATIN SMALL LETTER I
        DB      'j'       ;     6AH  LATIN SMALL LETTER J
        DB      'k'       ;     6BH  LATIN SMALL LETTER K
        DB      'l'       ;     6CH  LATIN SMALL LETTER L
        DB      'm'       ;     6DH  LATIN SMALL LETTER M
        DB      'n'       ;     6EH  LATIN SMALL LETTER N
        DB      'o'       ;     6FH  LATIN SMALL LETTER O
        DB      'p'       ;     70H  LATIN SMALL LETTER P
        DB      'q'       ;     71H  LATIN SMALL LETTER Q
        DB      'r'       ;     72H  LATIN SMALL LETTER R
        DB      's'       ;     73H  LATIN SMALL LETTER S
        DB      't'       ;     74H  LATIN SMALL LETTER T
        DB      'u'       ;     75H  LATIN SMALL LETTER U
        DB      'v'       ;     76H  LATIN SMALL LETTER V
        DB      'w'       ;     77H  LATIN SMALL LETTER W
        DB      'x'       ;     78H  LATIN SMALL LETTER X
        DB      'y'       ;     79H  LATIN SMALL LETTER Y
        DB      'z'       ;     7AH  LATIN SMALL LETTER Z
        DB      'ä'       ;     7BH  LATIN SMALL LETTER A WITH DIAERESIS
        DB      'ö'       ;     7CH  LATIN SMALL LETTER O WITH DIAERESIS
        DB      'ń'       ;     7DH  LATIN SMALL LETTER N WITH TILDE ń
        DB      'ü'       ;     7EH  LATIN SMALL LETTER U WITH DIAERESIS
        DB      'ŕ'       ;     7FH  LATIN SMALL LETTER A WITH GRAVE

;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
;ł  AREA DESTINATA ALLE PROCEDURE DEL PROGRAMMA                              ł
;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
;ł PROCEDURA   : AT_Chk                                                      ł
;ł DESCRIZIONE : Il compito di questa procedura � quello di tradurre e mette-ł
;ł               re a video le principali informazioni nascoste nella stringał
;ł               di caratteri di un messaggio SMS, disponibile  nel  sorgenteł
;ł               ASM in formato PDU (Protocol Description Unit), lo  standardł
;ł               utilizzato da tutti i Telefoni Mobili.La versione AT_SMS delł
;ł               progetto finale godr�  dell'esperienza  maturata  in  questoł
;ł               studio, decodificando al  volo  i  caratteri  mentre  stannoł
;ł               arrivando dalla linea seriale.                              ł
;ł                                                                           ł
;ł               La stringa PDU  contiene, oltre  al  testo  del  messaggio, ł
;ł               anche numerose informazioni relative al mittente, al centro ł
;ł               servizi SMS, alla data e all'ora di ricezione, e cos� via.. ł
;ł               E' composta esclusivamente da caratteri  ascii alfanumerici ł
;ł               ma la loro interpretazione varia  notevolmente in  funzione ł
;ł               del contesto.                                               ł
;ł                                                                           ł
;ł               NB: in ingresso si aspetta in SI l'indirizzo della stringa  ł
;ł                   AT di caratteri associati  al  messaggio, in  DH,DL la  ł
;ł                   riga e la colonna di stampa corrente.                   ł
;ł                                                                           ł
;ł               Per facilitare la comprensione della procedura � preso per  ł
;ł               esempio il seguente messaggio SMS:                          ł
;ł                                                                           ł
;ł               0791933385285200 00 0E8500934016896754 39 00 503011 715325  ł
;ł                                          400F61767A5C0E93E76C579A0E1A0901 ł
;ł                                                                           ł
;ł               La stringa utilizzata � quella di un messaggio  in  ingressoł
;ł               al Telefonino e � composta esclusivamente da caratteri asciił
;ł               numerici (da "0" a "9") e  letterali (da "A" a "F"),  quellił
;ł               usati per esprimere i simboli  del  Sistema  di  numerazioneł
;ł               esadecimale; in ogni caso  bisogna  interpretarli  a coppie,ł
;ł               dette ottetti, o coppie di semi-ottetti, e la loro interpre-ł
;ł               tazione varia notevolmente in funzione del settore a cui  sił
;ł               riferiscono.                                                ł
;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
AT_Chk: PUSH    DX

;°°°°°°°°ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
;°°°°°°°°ł La prima parte della stringa PDU contiene informazioni sul  Centroł
;°°°°°°°°ł Servizi (SMSC, Short Message  Service Center)  che  ha  gestito ilł
;°°°°°°°°ł messaggio SMS.                                                    ł
;°° 01 °°ł        Úż    ÚÂÄÂÂÄÂÂÄÂÂÄÂÂÄÂÂÄÄ 7 coppie di caratteri scambiate  ł
;°°°°°°°°ł        07 91 93 33 85 28 52 00   >>>>  + 39 335 8822500           ł
;°°°°°°°°ł  Nř=7 ÄÁŮ ŔÁÄ tipo di SMSC ÄÄÄÄÄÄÄÄÄÄÄÄŮ                          ł
;°°°°°°°°ł  La prima coppia di caratteri,  la stringa "07",  va  interpretatał
;°°°°°°°°ł  come numero binario a 8 bit espresso in esadecimale: il valore adł
;°°°°°°°°ł  essa  corrispondente (07H = 7 decimale)  indica  la  quantit�  dił
;°°°°°°°°ł  ottetti (coppie di caratteri) destinata a documentare  il  numeroł
;°°°°°°°°ł  telefonico  del  Centro  Servizi,  annunciando  di  fatto  che  ił
;°°°°°°°°ł  rimanenti caratteri di questo settore saranno 14 (=7 ottetti).   ł
;°°°°°°°°ł                                                                   ł
;°°°°°°°°ł  La seconda coppia di caratteri, la stringa "91", rappresenta essał
;°°°°°°°°ł  pure un numero binario a 8 bit in esadecimale, il cui valore(91H)ł
;°°°°°°°°ł  indica che il numero telefonico del Centro Servizi � espresso  inł
;°°°°°°°°ł  formato internazionale, cio� conterr� il prefisso della Nazione ał
;°°°°°°°°ł  cui appartiene, per esempio 39 (da intendere +39) per Italia.    ł
;°°°°°°°°ł                                                                   ł
;°°°°°°°°ł  La parte finale del settore si riferisce ai 6  ottetti  rimanentił
;°°°°°°°°ł  (uno tra quelli  previsti �  stato  consumato  per  il  formato);ł
;°°°°°°°°ł  ciascuna delle 6 coppie di caratteri,la stringa 93 33 85 28 52 00ł
;°°°°°°°°ł  va interpretata come coppia di numeri decimali da utilizzare per�ł
;°°°°°°°°ł  scambiandone la posizione rispetto a quella occupata nella strin-ł
;°°°°°°°°ł  ga di riferimento; rappresenta il numero  telefonico  del  Centroł
;°°°°°°°°ł  Servizi che, interpretato in accordo con le regole appena esposteł
;°°°°°°°°ł  sar�: 39 33 58 82 25 00 cio� +39 335 8822500. La stringa  analiz-ł
;°°°°°°°°ł  zata  non contiene (nella  sua  parte finale)  il  carattere "F";ł
;°°°°°°°°ł  questo sta  ad  indicare  che  il numero  telefonico  del  Centroł
;°°°°°°°°ł  Servizi � espresso da un numero pari di cifre (semi-ottetti),  mał
;°°°°°°°°ł  potrebbe anche non essere cos�; per esempio la stringa "93 33 85 ł
;°°°°°°°°ł  28 52 F0" sar� interpretata come 39 33 58 82 25 0F cio�          ł
;°°°°°°°°ł                 +39 335 882250, un numero a 11 cifre.             ł
;°°°°°°°°ł Poich� le informazioni contenute in questi bytes non sono  utiliz-ł
;°°°°°°°°ł zate dal nostro progetto, il codice generato per tenerne  conto sił
;°°°°°°°°ł limita a saltare i 16 caratteri ad  essi relativi, posizionando ilł
;°°°°°°°°ł puntatore sul primo del prossimo settore.                         ł
;°°°°°°°°ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
        CALL    Asc2Byt_      ;żTrasforma in byte (in AL) la  prima  coppia di
        MOV     AH,00H        ;łcaratteri trovata nella stringa  e formatta il
        MOV     CX,AX         ;łrisultato a 16 bit (in AX = CX) per  preparare
                              ;Ůil contatore dei  bytes da saltare
                              ;żPoich� ora il contatore tien conto  dei  bytes
        ADD     CX,CX         ;łda saltare ne raddoppia il valore per adattar-
                              ;Ůlo al  nř di caratteri corrispondenti
                              ;żSalta  i  (N)*2   caratteri    semplicemente
        ADD     SI,CX         ;łspostando in  avanti  il  puntatore  SI  del
                              ;Ůcarattere corrente

;°°°°°°°°ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
;°°°°°°°°ł Il secondo settore della stringa PDU � rappresentato da  una  solał
;°°°°°°°°ł coppia di caratteri, la stringa "00", da interpretarsi come numeroł
;°°°°°°°°ł binario a 8 bit espresso in esadecimale: il valore ad essa  corri-ł
;°°°°°°°°ł spondente (00H = 0 decimale) � un descrittore del tipo di  messag-ł
;°°°°°°°°ł gio (PDU Type, Protocol Data Unit Type).                          ł
;°° 02 °°ł        ÚÂÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ 1 coppia di caratteri                ł
;°°°°°°°°ł        00                                                         ł
;°°°°°°°°ł Le informazioni contenute in questo byte sono, in realt�, affidateł
;°°°°°°°°ł ai suoi singoli bit e sono legate alle modalitŕ con cui si intendeł
;°°°°°°°°ł far gestire talune funzioni legate al messaggio  ricevuto  o  allał
;°°°°°°°°ł sua tipologia; in particolare il fatto che entrambi  i  2 bit menoł
;°°°°°°°°ł significativi siano entrambi nulli(come per altro tutti gli altri)ł
;°°°°°°°°ł sta ad indicare che il messaggio sotto test � del tipo  convenzio-ł
;°°°°°°°°ł nale (SMS Deliver); sono comunque irrilevanti ai  fini  del nostroł
;°°°°°°°°ł progetto e il codice generato per tener conto di questo settore sił
;°°°°°°°°ł limita a saltare i 2 caratteri ad  esso relativi, posizionando  ilł
;°°°°°°°°ł puntatore sul primo del prossimo settore.                         ł
;°°°°°°°°ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
                              ;żSalta i 2 caratteri del PDU Type semplicemente
        ADD     SI,2          ;łspostando in  avanti  il  puntatore  SI  del
                              ;Ůcarattere corrente

;°°°°°°°°ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
;°°°°°°°°ł Il terzo settore  della  stringa  PDU  contiene  informazioni  sulł
;°°°°°°°°ł Mittente (OA, Originator Address) del messaggio SMS ed �  struttu-ł
;°°°°°°°°ł ralmente simile al primo.                                         ł
;°° 03 °°ł        Úż    ÚÂÄÂÂÄÂÂÄÂÂÄÂÂÄÂÂÄÂÂÄ 7 coppie di caratteri scambiateł
;°°°°°°°°ł        0E 85 00 93 40 16 89 67 54  >>>>  + 00 39 0461 987645      ł
;°°°°°°°°ł Nř=14 ÄÁŮ ŔÁÄ tipo di OA ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ                        ł
;°°°°°°°°ł La prima coppia di caratteri, la stringa "0E",va interpretata comeł
;°°°°°°°°ł numero binario a 8 bit espresso in esadecimale: il valore ad  essał
;°°°°°°°°ł corrispondente (0EH =  14 decimale)  indica  il  numero  di  cifreł
;°°°°°°°°ł (semi-ottetti)da cui sar� formato il numero telefonico del Mitten-ł
;°°°°°°°°ł te (escluse quindi le 2 destinate  a documentare il  formato);  inł
;°°°°°°°°ł questo differisce dalla struttura che descrive le informazioni delł
;°°°°°°°°ł Centro Servizi, nella quale il valore della prima coppia  indicavał
;°°°°°°°°ł la quantit� di ottetti (coppie di caratteri, compresa  quella  delł
;°°°°°°°°ł formato) destinata a documentare quel numero telefonico.          ł
;°°°°°°°°ł                                                                   ł
;°°°°°°°°ł La seconda coppia di caratteri, la stringa "85", rappresenta  essał
;°°°°°°°°ł pure un numero binario a 8 bit in esadecimale, il cui valore (85H)ł
;°°°°°°°°ł indica il formato del numero telefonico del Mittente; la strutturał
;°°°°°°°°ł di questo byte indica che il suo Tipo (8xH) � sconosciuto e la suał
;°°°°°°°°ł Categoria (x5H) � non documentata; in casi come questi  il  numeroł
;°°°°°°°°ł pu� ammette la presenza del prefisso internazionale, come effetti-ł
;°°°°°°°°ł vamente rileveremo.                                               ł
;°°°°°°°°ł                                                                   ł
;°°°°°°°°ł La parte finale del settore si riferisce ai 14 semi-ottetti annun-ł
;°°°°°°°°ł ciati dalla prima coppia, la stringa "0E"; ciascuna delle 7 coppieł
;°°°°°°°°ł di caratteri, la stringa "00 93 40 16 89 67 54",  va  interpretatał
;°°°°°°°°ł come coppia di numeri decimali da utilizzare per� scambiandone  lał
;°°°°°°°°ł posizione rispetto a quella occupata nella stringa di riferimento,ł
;°°°°°°°°ł e rappresenta il numero telefonico del Mittente che,  interpretatoł
;°°°°°°°°ł in accordo con le regole appena esposte, sar� 00 39 04 61 98 76 45ł
;°°°°°°°°ł cio� +0039 0461 987645 . La stringa analizzata non contiene (nellał
;°°°°°°°°ł sua parte finale) il carattere "F", essendo il  numero  telefonicoł
;°°°°°°°°ł del Mittente espresso da un numero pari di cifre (appunto 14 semi-ł
;°°°°°°°°ł ottetti), ma potrebbe anche non essere cos�; per esempio la strin-ł
;°°°°°°°°ł ga "00 93 40 16 89 67 F0" sar� interpretata come 00 39 04 61 98 76ł
;°°°°°°°°ł 0F cio� +0039 0461 98760, un numero a 13 cifre; in questo caso  lał
;°°°°°°°°ł stringa affifata alla prima coppia sarebbe stata "0D".            ł
;°°°°°°°°ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
        CALL    Asc2Byt_      ;żTrasforma in byte (in AL) la coppia di  carat-
        MOV     AH,00H        ;łteri trovata in questo punto della  stringa  e
        MOV     CX,AX         ;łformatta  il risultato a 16 bit (in AX=CX) per
                              ;Ůpreparare il contatore  caratteri  da trattare
        MOV     BL,2          ;żControlla se la stringa  contiene il carattere
        MOV     AX,CX         ;ł"F" nella sua parte finale;  in questo caso il
        DIV     BL            ;łnumero telefonico del  Mittente ha  un  numero
        PUSH    AX            ;Ůdispari di cifre (ottetti) e AH � lasciato a 1
                              ;żPoich� ora il contatore tien conto del  numero
        SHR     CX,1          ;łeffettivo dei caratteri previsti per l'OA,  lo
                              ;łdivide per  2  per  mettersi in  condizione di
                              ;Ůtrattarli a coppie
        INC     SI            ;żSalta la coppia di caratteri del tipo di  "OA"
        INC     SI            ;Ůsemplicemente spostando avanti il puntatore
        M_CURSOR DH,DL        ;ż
        M_COLOR 0FH           ;ł
AT_C0:  MOV     AL,CS:[SI+1]  ;łMessa  a  video  del  numero  di  telefono
        CALL    BIOchr1       ;łdell'utente che ha spedito il "messaggino"
        MOV     AL,CS:[SI]    ;ł
        CALL    BIOchr1       ;ł
        ADD     SI,2          ;ł
        LOOP    AT_C0         ;Ů
        POP     AX            ;żSe la stringa NON  contiene  il  carattere "F"
        CMP     AH,00H        ;łnella sua parte  finale (numero telefonico del
        JE      AT_C1         ;łMittente  con  numero  dispari  di  cifre)  la
                              ;Ůvisualizzazione � stata operata  completamente
        INC     SI            ;żAltrimenti salta la "F" che serve per appaiare
        MOV     AL,CS:[SI]    ;łi caratteri e mette a video il carattere
        CALL    BIOchr1       ;łrimasto
        INC     SI            ;Ů

;°°°°°°°°ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
;°°°°°°°°ł Il quarto settore della stringa PDU � rappresentato  da  una  solał
;°°°°°°°°ł coppia di caratteri, la stringa "39", da interpretarsi come numeroł
;°°°°°°°°ł binario a 8 bit espresso in esadecimale: il valore ad essa  corri-ł
;°°°°°°°°ł spondente  ( 39H =  57   decimale)   contiene   informazioni   sulł
;°°°°°°°°ł Identificatore di Protocollo (PID, Protocol IDentifier).          ł
;°° 04 °°ł        ÚÂÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ 1 coppia di caratteri                ł
;°°°°°°°°ł        39                                                         ł
;°°°°°°°°ł Le informazioni contenute in questo byte  sono  affidate  ai  suoił
;°°°°°°°°ł singoli bit e sono legate a possibili operazioni da esercitare sulł
;°°°°°°°°ł messaggio SMS nel momento della ricezione;  sono  comunque irrile-ł
;°°°°°°°°ł vanti ai fini del nostro progetto e il codice generato  per  tenerł
;°°°°°°°°ł conto di questo settore si limita a saltare i 2 caratteri ad  essoł
;°°°°°°°°ł relativi, posizionando il puntatore sul primo del prossimo settoreł
;°°°°°°°°ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
                              ;żSalta i 2 caratteri del PID Protocol Identif.
AT_C1:  ADD     SI,2          ;łspostando in  avanti  il  puntatore  SI  del
                              ;Ůcarattere corrente

;°°°°°°°°ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
;°°°°°°°°ł Il quinto settore della stringa PDU č rappresentato  da  una  solał
;°°°°°°°°ł coppia di caratteri, la stringa "00", da interpretarsi come numeroł
;°°°°°°°°ł binario a 8 bit espresso in esadecimale: il valore ad essa  corri-ł
;°°°°°°°°ł spondente (00H = 0 decimale) contiene  informazioni sulle modalit�ł
;°°°°°°°°ł utilizzate per la Codifica del testo (DCS, Data Coding Scheme) delł
;°°°°°°°°ł messaggio SMS.                                                    ł
;°° 05 °°ł        ÚÂÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ 1 coppia di caratteri                ł
;°°°°°°°°ł        00                                                         ł
;°°°°°°°°ł Le informazioni contenute in questo  byte  sono  affidate  ai suoił
;°°°°°°°°ł singoli bit e forniscono indicazioni sulle tecniche utilizzate perł
;°°°°°°°°ł l'eventuale codifica e compressione del testo inserito nell'ultimoł
;°°°°°°°°ł settore della stringa PDU e sul l'alfabeto utilizzato per comporloł
;°°°°°°°°ł Il valore rilevato nel nostro esempio (00H) indica  che  il  testoł
;°°°°°°°°ł non � compresso ed � codificato con alfabeto standard, a 7 bit.   ł
;°°°°°°°°ł                                                                   ł
;°°°°°°°°ł In ogni caso le informazioni contenute in questo byte sono irrile-ł
;°°°°°°°°ł vanti ai fini del nostro progetto e il codice generato  per  tenerł
;°°°°°°°°ł conto di questo settore si limita a saltare i 2 caratteri ad  essoł
;°°°°°°°°ł relativi, posizionando il puntatore sul primo del prossimo settoreł
;°°°°°°°°ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
                              ;żSalta i 2 caratteri del  Data  Coding Scheme,
        ADD     SI,2          ;łspostando in  avanti  il  puntatore  SI  del
                              ;Ůcarattere corrente

;°°°°°°°°ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
;°°°°°°°°ł Il sesto settore della stringa PDU contiene informazioni sul tempoł
;°°°°°°°°ł (SCTS, Service Center Time Stamp) in cui il messaggio  SMS � statoł
;°°°°°°°°ł inviato dal Centro Servizi al nostro Telefonino.                  ł
;°° 06 °°ł   ÚÂÄÂÂÄÂÂÄÄÄÄÄÄÄÄÄÄÄÄÄ 3 coppie di caratteri scambiate           ł
;°°°°°°°°ł   50 30 11      >>>>    05/03/11 >>> 2005 marzo 11 >>> 11/03/05   ł
;°°°°°°°°ł 503011 715325 40                                                  ł
;°°°°°°°°ł La prima parte del settore, costituita da 3 coppie di caratteri,lał
;°°°°°°°°ł stringa "50 30 11", va interpretata come coppia di numeri decimalił
;°°°°°°°°ł (semi-ottetti)  da   utilizzare  per�  scambiandone  la  posizioneł
;°°°°°°°°ł rispetto a quella occupata nella stringa di riferimento;rappresen-ł
;°°°°°°°°ł ta la data nel formato "anno, mese, giorno" che, interpretato  in ł
;°°°°°°°°ł accordo con le regole appena esposte, sar�: 05 03 11 cio� 11/03/05ł
;°°°°°°°°ł 11 marzo 2005.                                                    ł
;°°°°°°°°ł   ÚÂÄÂÂÄÂÂÄÄÄÄÄÄÄÄÄÄÄÄÄ 3 coppie di caratteri scambiate           ł
;°°°°°°°°ł   71 53 25      >>>>    17:35:52 >>> ore 17, minuti 35, secondi 52ł
;°°°°°°°°ł Anche la  seconda  parte  del  settore � costituita da 3 coppie dił
;°°°°°°°°ł caratteri, la stringa "71 53 25", e va interpretata come coppia dił
;°°°°°°°°ł numeri decimali (semi-ottetti) da utilizzare per�  scambiandone lał
;°°°°°°°°ł posizione rispetto a quella occupata nella stringa di riferimento;ł
;°°°°°°°°ł rappresenta l'ora nel formato "ore,minuti,secondi" che,  interpre-ł
;°°°°°°°°ł tato in accordo con le regole appena esposte, sarŕ: 17 35 52  cio�ł
;°°°°°°°°ł 17:35:52, 17 ore, 35 minuti e 52 secondi.                         ł
;°°°°°°°°ł        ÚÂÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ 1 coppia di caratteri                ł
;°°°°°°°°ł        40                                                         ł
;°°°°°°°°ł La parte finale del settore � costituita  da  un'ultima  coppia dił
;°°°°°°°°ł caratteri, la stringa "40", essa pure da interpretare  come coppiał
;°°°°°°°°ł di numeri decimali (semi-ottetti); il valore ad essa relativo, conł
;°°°°°°°°ł il solito scambio di posizione, rappresenta il fuso orario o,  pi�ł
;°°°°°°°°ł esattamente la differenza di tempo (time zone, espressa in  inter-ł
;°°°°°°°°ł valli di 15 minuti ciascuno) tra l'ora locale e  il GMT (Greenwichł
;°°°°°°°°ł Main Time); in accordo con le solite  regole  appena  esposte,  ilł
;°°°°°°°°ł valore effettivo � 04 cio� GMT+1, GMT + 1 ora. da notare che,se ilł
;°°°°°°°°ł bit pi� significativo � a 1 il valore indicato � negativo.        ł
;°°°°°°°°ł                                                                   ł
;°°°°°°°°ł Il codice generato per tener conto di questo settore organizza  lał
;°°°°°°°°ł visualizzazione dei primi 12 semi-ottetti sotto forma  di  data  eł
;°°°°°°°°ł ora decodificate, limita a saltare gli ultimi 2 caratteri relativił
;°°°°°°°°ł al time zone, ritenuti non necessari; al  termine  il  puntatore �ł
;°°°°°°°°ł pronto per localizzare il primo carattere del prossimo settore    ł
;°°°°°°°°ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
        M_COLOR 0EH           ;ż
        CALL    STAsp         ;ł
        MOV     CX,3          ;ł
        MOV     AL,CS:[SI+5]  ;ł
        CALL    BIOchr1       ;ł        ÚÄÄÄÄÄÄÄÄÄÄÄ Anno
        MOV     AL,CS:[SI+4]  ;ł        ł  ÚÄÄÄÄÄÄÄÄ Mese
        CALL    BIOchr1       ;ł        ł  ł  ÚÄÄÄÄÄ Giorno

        MOV     AL,'/'        ;ł        50 30 11
        CALL    BIOchr1       ;ł        ł  ł  ł
        MOV     AL,CS:[SI+3]  ;ł        05 03 11 > 2005 marzo 11 > 11/03/05
        CALL    BIOchr1       ;ł
        MOV     AL,CS:[SI+2]  ;ł    Stampa la Data
        CALL    BIOchr1       ;ł
        MOV     AL,'/'        ;ł    (3 coppie di caratteri scambiate)
        CALL    BIOchr1       ;ł
        MOV     AL,'2'        ;ł
        CALL    BIOchr1       ;ł
        MOV     AL,'0'        ;ł
        CALL    BIOchr1       ;ł
        MOV     AL,CS:[SI+1]  ;ł
        CALL    BIOchr1       ;ł
        MOV     AL,CS:[SI]    ;ł
        CALL    BIOchr1       ;ł
        ADD     SI,6          ;Ů
       ;----------------------------------------------------------------------
        M_COLOR 0FH           ;ż
        CALL    STAsp         ;ł
        MOV     CX,3          ;ł
        MOV     AL,CS:[SI+1]  ;ł
        CALL    BIOchr1       ;ł        ÚÄÄÄÄÄÄÄÄÄÄÄ Ora
        MOV     AL,CS:[SI]    ;ł        ł  ÚÄÄÄÄÄÄÄÄ Minuti
        CALL    BIOchr1       ;ł        ł  ł  ÚÄÄÄÄÄ Secondi
        ADD     SI,2          ;ł        71 53 25
        MOV     AL,':'        ;ł
        CALL    BIOchr1       ;ł
        MOV     AL,CS:[SI+1]  ;ł
        CALL    BIOchr1       ;ł
        MOV     AL,CS:[SI]    ;ł    Stampa l'Ora
        CALL    BIOchr1       ;ł
        ADD     SI,2          ;ł
        MOV     AL,':'        ;ł    (3 coppie di caratteri scambiate)
        CALL    BIOchr1       ;ł
        MOV     AL,CS:[SI+1]  ;ł
        CALL    BIOchr1       ;ł
        MOV     AL,CS:[SI]    ;ł
        CALL    BIOchr1       ;ł
        ADD     SI,2          ;Ů
       ;----------------------------------------------------------------------
                              ;żSalta la coppia di caratteri del fuso orario
        ADD     SI,2          ;ł(time zone,  GMT+n) semplicemente spostando
                              ;Ůavanti il puntatore

;°°°°°°°°ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
;°°°°°°°°ł Il settimo e ultimo settore della  stringa  PDU  contiene  l'unicał
;°°°°°°°°ł parte veramente utile al nostro progetto finale: il testo (UD,Userł
;°°°°°°°°ł Data) del messaggio SMS.                                          ł
;°° 07 °°ł        Úż ÚÂÄÂÂÄÂÂÄÂÂÄÂÂÄÂÂÄÂÂÄÂÂÄÂÂÄÂÂÄÂÂÄÂÂÄÂÂÄÂÂÄÄsequenza di  ł
;°°°°°°°°ł        0F 61 76 7A 5C 0E 93 E7 6C 57 9A 0E 1A 09 01  codici da    ł
;°°°°°°°°ł Nř=15 ÄÁŮ                                            decodificare ł
;°°°°°°°°ł La prima coppia di caratteri, la stringa "0F",va interpretata comeł
;°°°°°°°°ł numero binario a 8 bit espresso in esadecimale: il valore ad  essał
;°°°°°°°°ł corrispondente (0FH = 15 decimale) indica il numero  effettivo deił
;°°°°°°°°ł caratteri che compongono il messaggio SMS dopo  la  sua  messa  inł
;°°°°°°°°ł chiaro, cioč non � il numero delle coppie  di  caratteri  ad  essał
;°°°°°°°°ł successive, raccolte nella seconda parte di  questo  settore.  Unał
;°°°°°°°°ł rapida indagine sottolinea che le coppie (ottetti) ad essa succes-ł
;°°°°°°°°ł sive ("61 76 7A 5C 0E 93 E7 6C 57 9A 0E 1A 09 01") sono 14, una inł
;°°°°°°°°ł meno dei caratteri attesi (0FH=15); basta questo per anticipare lał
;°°°°°°°°ł necessit� di intervenire con  qualche  magica  strategia  per  farł
;°°°°°°°°ł tornare i conti.                                                  ł
;°°°°°°°°ł                                                                   ł
;°°°°°°°°ł Tra poco sveleremo l'arcano, riassumibile nel fatto che ognuno deił
;°°°°°°°°ł 15 caratteri del testo in chiaro sar� codificato a 7 bit(settetti)ł
;°°°°°°°°ł e incluso con orrenda manipolazione dentro le 14 coppie di  carat-ł
;°°°°°°°°ł teri (ottetti) successive alla prima.                             ł
;°°°°°°°°ł                                                                   ł
;°°°°°°°°ł La seconda parte del settore � costituita da 14 coppie di caratte-ł
;°°°°°°°°ł ri, la stringa "61 76 7A 5C 0E 93 E7 6C 57 9A 0E 1A 09 01",  e  vał
;°°°°°°°°ł interpretata come sequenza di numeri binari a 8 bit(bytes=ottetti)ł
;°°°°°°°°ł espressi in esadecimale, nel  nostro esempio: 61H, 76H, 7AH, ...);ł
;°°°°°°°°ł come annunciato il testo in essi nascosto sar� codificato  utiliz-ł
;°°°°°°°°ł zando un alfabeto a 7 bit, per cui sarŕ  necessario  estrarre  daił
;°°°°°°°°ł 14*8=112  bit  disponibili  tutti  e  soli  i  gruppi  di   7 bit,ł
;°°°°°°°°ł tralasciando eventuali bit in surplus.                            ł
;°°°°°°°°ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ

;°°°°°°°°ł La parte iniziale della procedura prepara il contatore  CX  con il
;°°7 - 1°ł numero di caratteri attesi nel testo del messaggio e  ne mostra il
;°°°°°°°°ł valore

        CALL    Asc2Byt_      ;żTrasforma in byte (in AL) la coppia di  carat-
        MOV     AH,00H        ;łteri trovata in questo punto della  stringa  e
        MOV     CH,00H        ;łformatta  il risultato a 16 bit (in AX)
        MOV     CL,AL         ;ŮNell'esempio corrente alla fine  AX=000FH = 15
        PUSH    CX            ; Salva il Numero di CARATTERI attesi nel SMS
       ;----------------------------------------------------------------------
        M_COLOR 04H           ;ż
        CALL    STAsp         ;łMostra il  numero  di  caratteri  previsti
        MOV     AX,CX         ;ł"in chiaro" nel messaggio
        CALL    Wor2Dec       ;Ů

;°°°°°°°°ł Le 14 coppie di caratteri successive alla prima  sono  le  stringhe
;°°7 - 2°ł ("61","76", "7A", "5C", "0E", "93", "E7", "6C", "57",  "9A",  "0E",
;°°°°°°°°ł "1A", "09" e"01") associate ai 14 bytes (ottetti) che nascondono il
;°°°°°°°°ł testo da decifrare; la prima cosa  da  fare �  perci�  tradurle  in
;°°°°°°°°ł bytes e renderle disponibili per l'analisi in un piccolo buffer  di
;°°°°°°°°ł memoria (SMSbyt) ad esse dedicato

                              ;żPer estrarre  le  informazioni  dai  caratteri
                              ;łdella stringa � opportuno trasformare ciascuna
        LEA     DI,SMSbyt     ;łcoppia  di  caratteri  ascii  esadecimali  nel
AT_C2:  CALL    Asc2Byt_      ;łcorrispondente  byte,  salvato nella  zona  di
        MOV     CS:[DI],AL    ;łmemoria puntata da SMSbyt; nell'esempio le  15
        INC     DI            ;łcoppie  "61767A5C0E93E76C579A0E1A0901" + "??"
        LOOP    AT_C2         ;łdiventano 15 bytes effettivi: 61H,76H,7AH,5CH,
                              ;Ů0EH,93H,E7H,6CH,57H,9AH,0EH,1AH,09H,01H,??H
       ;----------------------------------------------------------------------
        POP     DX            ; Recupera in DX il Numero di CARATTERI nel SMS

;°°°°°°°°ł Nel buffer di memoria SMSbyt � ora disponibile  la  sequenza  di 14
;°°7 - 3°ł bytes estratti dalle 14 coppie di caratteri successive  alla prima;
;°°°°°°°°ł si prepara un secondo buffer di  memoria, SMStxt,  per  infilarci i
;°°°°°°°°ł caratteri a 7 bit (formattati a 8 con l'aggiunta di  un bit7 nullo)
;°°°°°°°°ł ricavati dal processo che stiamo per far partire;bisogna predispor-
;°°°°°°°°ł re una struttura in grado di manipolare i bytes in ingresso a grup-
;°°°°°°°°ł pi di  8 alla volta (CH=8) prevedendo comunque  la  possibilit�  di
;°°°°°°°°ł porre fine al ciclo di 8 se i caratteri attesi sono in  misura  non
;°°°°°°°°ł multipla di 8; per separare i bit appartenenti al carattere(settet-
;°°°°°°°°ł to)  corrente da quelli da aggiungere in coda  al  byte  successivo
;°°°°°°°°ł ho pensato di formattare il byte corrente (ottetto, disponibile  in
;°°°°°°°°ł AL) a 16 bit, in AX, ponendogli davanti 8 bit a 0 (cio� con AH=00H)

        LEA     SI,SMSbyt     ;żPunta i  bytes corrispondenti alle  coppie  di
                              ;Ůcaratteri ascii del Messaggio corrente
        LEA     DI,SMStxt     ; Punta l'area destinata alla  stringa in chiaro
                              ;żPredispone il "resto" iniziale da  sommare  al
AT_C3:  MOV     BH,00H        ;łprimo byte  della  sequenza  di 8,  al fine di
                              ;łgarantire  l'iterativit� dell'algoritmo  anche
                              ;Ůall'inizio (in assenza di "resti" riportati..)
        MOV     CH,8          ;żPrepara il meccanismo per ovviare al diabolico
        MOV     CL,1          ;łsistema di codifica: ogni byte di partenza:
AT_C4:                        ;ł             61H                 76H
                              ;ł           01100001           01110110
        MOV     AH,00H        ;łviene assunto dalla memoria e formattato  a 16
        MOV     AL,CS:[SI]    ;łbit, nel registro AX:  (Z vale zero)
        INC     SI            ;Ů      AX=ZZZZZZZZ01100001   ZZZZZZZ01110110Z

;°°°°°°°°ł Bastano ora dei semplici scorrimenti dei bit di  AX  verso sinistra
;°°7 - 4°ł (SHL) per ottenere entrambe le parti necessarie, ricordando che  il
;°°°°°°°°ł numero di shift sar�, byte dopo byte, progressivamente  sempre  pi�
;°°°°°°°°ł grande, da 1 a 8; dal codice si capisce che questo numero � affida-
;°°°°°°°°ł to a CL, incrementato dopo il trattamento operato su ognuno degli 8
;°°°°°°°°ł bytes del gruppo. Per ottenere il  settetto  corrente  basta  prima
;°°°°°°°°ł imporre uno scorrimento di AL di un posto  verso  destra (SHR)  con
;°°°°°°°°ł ingresso da sinistra di un bit a 0) e poi  sommare logicamente (OR)
;°°°°°°°°ł al risultato (copiato in BL) il valore corrente di  BH,  copia  del
;°°°°°°°°ł byte costruito in AH  nella  manipolazione  del  byte precedente (�
;°°°°°°°°ł chiaro che durante l'elaborazione del primo byte di ogni gruppo, si
;°°°°°°°°ł dovr� comunque garantire l'automatismo ponendo l'ininfluente BH=0)
                              ;żViene poi spostato verso sinistra di un numero
                              ;łdi posizioni pari al suo ordine nella stringa
        SHL     AX,CL         ;ł(1,2,3,...,8):
                              ;Ů     AX=ZZZZZZZ01100001Z   ZZZZZZ01110110ZZ
                              ;żLa parte bassa di AX � la base  del  carattere
                              ;łfinale decodificato, AL=BL:
        MOV     BL,AL         ;ł     BL=   1100001Z           110110ZZ
                              ;łInnanzi tutto lo si riformatta a 8 bit facendo
                              ;łentrare uno "0" da sinistra
        SHR     BL,1          ;ł     BL=   Z1100001           Z110110Z
                              ;łed  infine  si  crea  sommandogli logicamente
                              ;łil  "resto"  ottenuto nel giro precedente;
        OR      BL,BH         ;ł     BH+   ZZZZZZZZ+          ZZZZZZZ0+
                              ;ł     BL=   01100001=          01101100=
                              ;ł           --------           --------
                              ;ł     BL=   01100001=61H="a"   01101100=6CH="l"
        MOV     CS:[DI],BL    ;łNon rimane che  salvarlo  nelle  locazioni  di
        INC     DI            ;ŮDeposito,  per  essere eventualmente  trattato
                              ;żPrima di chiamarlo in causa prepara il "resto"
        MOV     BH,AH         ;łper il prossimo byte:
                              ;Ů     BH=   ZZZZZZZ0           ZZZZZZ01

;°°°°°°°°ł La parte finale della procedura garantisce lo  stesso  servizio per
;°°7 - 5°ł tutti e 8 i potenziali bytes del gruppo, a meno che non  sia  stato
;°°°°°°°°ł raggiunto il  numero  previsto  (DX=0000H);  le  ultime  istruzioni
;°°°°°°°°ł aggiungono il terminatore 00H  in  coda  al  testo  in  chiaro  del
;°°°°°°°°ł messaggio SMS, inserito carattere dopo carattere nel secondo buffer
;°°°°°°°°ł SMStxt, per poterlo stampare con la Macro M_msgC.
        INC     CL            ;ż
        DEC     DX            ;ł
        JZ      AT_C5         ;łControlla i contatori di processo per  vedere
        DEC     CH            ;łse l'operazione di decodifica � stata portata
        JNZ     AT_C4         ;łcompletamente a termine
        dec     SI            ;ł
        JMP     AT_C3         ;Ů
AT_C5:  MOV     AL,00H        ;żAggiunge il terminatore al testo in chiaro
        MOV     CS:[DI],AL    ;Ů

;°°°°°°°°ł Trasforma i settetti estratti dalla stringa (formattati a 8 bit) in
;°°7 - 6°ł modo da corrispondere  ai  caratteri  della  Tabella  dell'Alfabeto
;°°°°°°°°ł Standard a 7 bit (default alphabet) secondo le specifiche GSM 03.38

        LEA     BX,AlfaTab    ; Punta la Tabella dell'Alfabeto Standard a 7bit
        LEA     SI,SMStxt     ; Punta l'area destinata alla  stringa in chiaro
AT_C6:  MOV     AL,CS:[SI]    ;żAssume il carattere corrente e verifica se  si
        CMP     AL,00H        ;łtratta del terminatore del testo in chiaro
        JE      AT_C7         ;Ů
        PUSH    CS            ;żTrasferisce in AL il contenuto di DS:[BX + AL]
        POP     DS            ;łPer assicurare il corretto funzionamento anche
        XLAT                  ;Ůdella versione EXE � necessario copiare  CS=DS
        MOV     CS:[SI],AL    ;żSostituisce il  carattere  trovato  con quello
        INC     SI            ;Ůprevisto dalla  tabella  dell'Alfabeto a 7 bit
        JMP     SHORT AT_C6
AT_C7:  M_COLOR 0AH           ;ż
        CALL    STAsp         ;łStampa la stringa SMS in chiaro
        M_msgN  SMStxt        ;Ů
        POP     DX
        RET

;°°°°°°°°ł Ogni dettaglio sulla tecnica di ricostruzione applicata a tutte  le
;°°7 - 7°ł 14 coppie di caratteri previste dalla stringa PDU per ottenere  gli
;°°°°°°°°ł effettivi 15  caratteri a 7 bit  previsti �  disponibile  sul  sito
;°°°°°°°°ł                 http://www.giobe2000.it
;°°°°°°°°ł La tabella seguente ne mostra una sintesi:
;°°°°°°°°ł                                ÚÄÄÄÄÄż
;°°°°°°°°ł      "61" = 01100001= 0 1100001ł     ł = 1100001 = 61H= "a"
;°°°°°°°°ł      "76" = 01110110= 01 1101100     ł = 1101100 = 6CH= "l"
;°°°°°°°°ł      "7A" = 01111010= 011 1101001    ł = 1101001 = 69H= "i"
;°°°°°°°°ł      "5C" = 01011100= 0101 1100011   ł = 1100011 = 63H= "c"
;°°°°°°°°ł      "0E" = 00001110= 00001 1100101  ł = 1100101 = 65H= "e"
;°°°°°°°°ł      "93" = 10010011= 100100 1100001 ł = 1100001 = 61H= "a"
;°°°°°°°°ł      "E7" = 11100111= 1110011 1100100ł = 1100100 = 64H= "d"
;°°°°°°°°ł                                1110011 = 1110011 = 73H= "s"
;°°°°°°°°ł      "6C" = 01101100= 0 1101100ł     ł = 1101100 = 6CH= "l"
;°°°°°°°°ł      "57" = 01010111= 01 0101110     ł = 0101110 = 2EH= "."
;°°°°°°°°ł      "9A" = 10011010= 100 1101001    ł = 1101001 = 69H= "i"
;°°°°°°°°ł      "0E" = 00001110= 0000 1110100   ł = 1110100 = 74H= "t"
;°°°°°°°°ł      "1A" = 00011010= 00011 0100000  ł = 0100000 = 20H= " "
;°°°°°°°°ł      "09" = 00001001= 000010 0100011 ł = 0100011 = 23H= "#"
;°°°°°°°°ł      "01" = 00000001= 0000000 1000010ł = 1000010 = 42H= "B"
;°°°°°°°°ł                                ŔÄÄÄÄÄŮ
;°°°°°°°°ł       Notare come  i "resti" davanti a ciascun byte  vengano
;°°°°°°°°ł       posti in coda ai  bytes  successivi,  costruendo  cos�
;°°°°°°°°ł       l'effettivo carattere del SMS
;°°°°°°°°ł
;°°°°°°°°ł Alla fine il testo del messaggio SMS �:"aliceadsl.it #B"; nella sua
;°°°°°°°°ł parte iniziale appare il promo del gestore che lo  ha gestito (cosa
;°°°°°°°°ł tipica dei messaggi spediti via internet) seguito  da  uno spazio e
;°°°°°°°°ł (finalmente) dai 2 caratteri effettivamente digitati sulla tastiera
;°°°°°°°°ł del Telefonino, "#B",un comando del protocollo software che useremo
;°°°°°°°°ł nel progetto finale per il controllo remoto di un PC via telefono.

;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
;ł PROCEDURA   : Asc2Nib_ [******* Versione dedicata ai programmi AT_ ******]ł
;ł DESCRIZIONE : Converte il carattere ASCII corrispondente ad uno dei simbo-ł
;ł               li del sistema di numerazione esadecimale (da "0" a "9" e dał
;ł               "A" a "F"); tale carattere � puntato in ingresso da CS:SI edł
;ł               � trasformato nel valore esadecimale 0xH a otto bit che  glił
;ł               corrisponde, lasciato in uscita in AL; il puntatore SI vieneł
;ł               incrementato.                                               ł
;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
Asc2Nib_:MOV    AL,CS:[SI]
        CMP     AL,"9"
        JG      Asc_0
        CMP     AL,"0"
        JGE     Asc_1
Asc_0:  AND     AL,0DFH
        CMP     AL,"F"
        JG      Asc_2
        CMP     AL,"A"
        JB      Asc_2
        ;------------------
        SUB     AL,07H
Asc_1:  SUB     AL,30H
        INC     SI
        RET
Asc_2:  MOV     AL,00H        ;Errore: dato non attendibile
        RET                   ;        sostituito con 00H

;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
;ł PROCEDURA   : Asc2byt_ [******* Versione dedicata ai programmi AT_ ******]ł
;ł DESCRIZIONE : Converte la coppia di caratteri ASCII corrispondenti a  sim-ł
;ł               boli del sistema di numerazione esadecimale (da "0" a "9"  eł
;ł               da "A" a "F"); tale coppia � puntata in ingresso da DS:SI edł
;ł               � trasformata nel numero esadecimale xyH a otto bit  che  leł
;ł               corrisponde, lasciato in uscita in AL; il puntatore SI vieneł
;ł               incrementato di due posizioni.                              ł
;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
Asc2Byt_: CALL  Asc2Nib_      ;Preleva   in AL il valore 0xH
        MOV     AH,AL         ;Sposta    in AH il valore 0xH
        SHL     AH,1          ;Trasforma in AH il valore nella forma x0H
        SHL     AH,1          ;         ÚÄÄÄż     ÚÄÄż
        SHL     AH,1          ;  SHL:   łffCł <-- łAHł <-- 0
        SHL     AH,1          ;         ŔÄÄÄŮ     ŔÄÄŮ
        CALL    Asc2Nib_      ;Preleva in AL il valore 0yH
        OR      AL,AH         ;Lascia  in AL il valore finale xyH
        RET

;°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°
;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄż
                              ;ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄżł
AT_Test1 proc   NEAR          ;ł      AREA DEDICATA AL MAIN PROGRAM         łł
                              ;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮł
;ŔÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄŮ
        CALL    BIOScls
        MOV     DH,2
        MOV     DL,0
        LEA     SI,msg00
        CALL    AT_Chk

        ADD     DH,2
        LEA     SI,msg01
        CALL    AT_Chk

        ADD     DH,3
        LEA     SI,msg02
        CALL    AT_Chk

        ADD     DH,2
        LEA     SI,msg03
        CALL    AT_Chk

        ADD     DH,2
        LEA     SI,msg04
        CALL    AT_Chk

        ADD     DH,2
        LEA     SI,msg05
        CALL    AT_Chk

        ADD     DH,2
        LEA     SI,msg06
        CALL    AT_Chk

        ADD     DH,3
        LEA     SI,msg07
        CALL    AT_Chk

        ADD     DH,3
        LEA     SI,msg08
        CALL    AT_Chk

_OUT:   CALL    KEYwait
        MOV     AH,4CH
        INT     21H
_prog   ENDS
AT_Test1 ENDP
        END INIZIO