home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Simtel MSDOS - Coast to Coast
/
simteldosarchivecoasttocoast2.iso
/
asmutil
/
stdlib.zip
/
PUTH.ASM
< prev
next >
Wrap
Assembly Source File
|
1990-04-29
|
630b
|
44 lines
stdlib segment para public 'slcode'
assume cs:stdlib
extrn sl_Putc:far
;
;
; Puth- Outputs value in AL as two hex digits.
;
public sl_Puth
sl_Puth proc far
push ax
mov ah, al
shr al, 1
shr al, 1
shr al, 1
shr al, 1
add al, 90h
daa
adc al, 40h
daa
call sl_Putc
mov al, ah
and al, 0fh
add al, 90h
daa
adc al, 40h
daa
call sl_Putc
pop ax
ret
sl_Puth endp
;
; Putw- Outputs word in AX as four hexadecimal digits:
;
public sl_Putw
sl_Putw proc far
xchg al, ah
call sl_Puth
xchg al, ah
jmp sl_Puth
sl_Putw endp
;
stdlib ends
end