;
;Converts A binary number into the three equivalent
;digits for a decimal display. THen entry R0 has the
;address if where to store the three digit result
;
BIN_DEC:
    MOV    B, #100
    DIV    AB        ; divide entry value by 100
    MOV    @R0, A    ; place 100's digit in buffer
    INC    R0        ; bump buffer pointer
    MOV    A, B      ; get the previous remainder
    MOV    B, #10    ; divide the remainder by 10
    DIV    AB        ; tens in A, ones digit in B 
    MOV    @R0, A    ; place 10's digit in buffer
    INC    R0        ; bump the buffer pointer
    MOV    A, B      ; get the ones digit
    MOV    @R0, A    ; place 1's digit in buffer
    RET              ; exit