;::::::::::::::::::::::::::::::::::::::::::::::::::::
::                  Logo:  Edizioni ByteMan        ::
::               Collana:  Particelle Didattiche   ::
::             Argomento:  Assembly 8086           ::
::      Titolo originale:  XHEXSTRB.ASM            ::
:: Autore e Proprietario:  Salvatore ROSTA         ::
::      Ultima revisione:  07-04-1994              ::
::         Sito Internet:  w3.quipo.it/byteman     ::
::                e-mail:  byteman@quipo.it        ::
::                                                 ::
::     Tutti i diritti riservati (c)1993..2000     ::
;::::::::::::::::::::::::::::::::::::::::::::::::::::

COMMENT * ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
::        XHEXSTRB.ASM -  Revisione 19-9-1991, a cura di Salvo Rosta.       ::
::                                                                          ::	
:: Function  XHexStrB(PByte)        ; Converte PByte in stringa di Hex      ::
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
*
CODE      SEGMENT BYTE PUBLIC
          ASSUME  CS:CODE
          PUBLIC  XHexStrB

Function  EQU     DWORD PTR [BP+8]
PByte     EQU     BYTE  PTR [BP+6]

XHexStrB  PROC    FAR
          PUSH    BP
          MOV     BP,SP

          LES     DI,Function         ;Lettura Puntatore Funzione Stringa ES:DI
          CLD                         ;Direzione di scansione normale
          MOV     AL,2
          STOSB                       ;Scrittura Lunghezza Stringa
          MOV     AL,PByte            ;Lettura Byte
          MOV     AH,AL               ;Salvataggio in AH
          SHR     AL,1                ;Trattamento Nibble High
          SHR     AL,1
          SHR     AL,1
          SHR     AL,1
          ADD     AL,90h
          DAA
          ADC     AL,40h
          DAA
          CLD
          STOSB                       ;Scrittura Carattere Nibble High
          MOV     AL,AH               ;Trattamento Nibble Low
          AND     AL,0Fh
          ADD     AL,90h
          DAA
          ADC     AL,40h
          DAA
          STOSB                       ;Scrittura Carattere Nibble Low

          POP     BP
          RET     2
XHexStrB  ENDP

CODE      ENDS
          END

;::::::::::::::::  FINE FILE  :::::::::::::::::::