Category : Assembly Language Source Code
Archive   : ASM-SUBR.ZIP
Filename : BIN8OUT

;-------------------------bin8out routine begins--------------------------+
; from BLUEBOOK OF ASSEMBLY ROUTINES FOR IBM PC & XT.
; page : 43
;
; ROUTINE FOR CONVERSION FROM 8-BIT BINARY TO ASCII BINARY
;
; FUNCTION: This routine accepts an 8-bit binary number in the DL register
; and converts it to ASCII binary form which is sent to the std output
; device.
; INPUT: Upon entry an 8-bit binary is in the DL register
; OUTPUT: A string of ASCII digits representing a binary number is sent
; out through the std output device.
; REGISTERS USED: No registers are modified. DL is used for input
; SEGMENTS REFERENCED: None
; ROUTINES CALLED: STDOUT
; SPECIAL NOTES: None
;
; ROUTINE TO CONVERT FROM INTERNAL 8-BIT BINARY TO ASCII BINARY
;
bin8out proc far
;
push cx ; save registers
push ax
;
mov cx,8 ; loop for a count of 8
bin8out1:
rol dl,1 ; rotate DL left once
mov al,dl ; move into AL
and al,1 ; just keep digit
add al,30h ; adjust AL to ASCII
call stdout ; output to console
loop bin8out1 ; again until cx is 0
;
pop ax ; restore registers
pop cx
ret ; return
;
bin8out endp
;-------------------------bin8out routine ends---------------------------+