**Update**
I have spent the entire day working on this probelm now and it works except for even numbers after the first digit (ex: x2435). The first digit can be found correctly and also odd digits but any even digits will mess the output up. If anyone knows what i'm forgetting please let me know. THANKS
THE PROGRAM IS BELOW :
.orig x3000
and r0,r0,#0 ; clear all registers
and r1,r1,#0
and r2,r2,#0
and r3,r3,#0
and r4,r4,#0
and r5,r5,#0
and r6,r6,#0
ld r5,hex ; point to the character string
startover add r5,r5,#1
and r4,r4,#0
ldr r0,r5,#0 ; load the character
add r1,r0,#1
brz end ; see if we have xFFFF (means done)
and r1,r1,#0 ;clear R1 now, using it later
ld r1,frstdig ;finding first digit of hex
not r1,r1 ;start subtraction (for divide)
add r3,r0,r1
add r3,r3,#1
brn print1
add r4,r4,#1
add r2,r1,r3
add r2,r2,#1
brn print1
add r4,r4,#1
add r3,r2,r1
add r3,r3,#1
brn print1
add r4,r4,#1
add r2,r3,r1
add r2,r2,#1
brn print1
add r4,r4,#1
add r3,r2,r1
add r3,r3,#1
brn print1
add r4,r4,#1
add r2,r3,r1
add r2,r2,#1
brn print1
add r4,r4,#1
add r3,r2,r1
add r3,r3,#1
brn print1
add r4,r4,#1
add r2,r3,r1
add r2,r2,#1
brn print1
add r4,r4,#1
add r3,r2,r1
add r3,r3,#1
brn print1
and r4,r4,#0
print1 add r0,r4,#0
add r1,r0,#15
add r0,r1,#15
add r1,r0,#15
add r0,r1,#3
trap x21
and r4,r4,#0
;find value of 2nd hex
ld r1,scndig ;load 2^8
not r1,r1 ;start subtraction (for divide)
add r3,r3,r1
add r3,r3,#1
brn print2
add r4,r4,#1
add r2,r1,r3
add r2,r2,#1
brn print2
add r4,r4,#1
add r3,r2,r1
add r3,r3,#1
brn print2
add r4,r4,#1
add r2,r3,r1
add r2,r2,#1
brn print2
add r4,r4,#1
add r3,r2,r1
add r3,r3,#1
brn print2
add r4,r4,#1
add r2,r3,r1
add r2,r2,#1
brn print2
add r4,r4,#1
add r3,r2,r1
add r3,r3,#1
brn print2
add r4,r4,#1
add r2,r3,r1
add r2,r2,#1
brn print2
add r4,r4,#1
add r3,r2,r1
add r3,r3,#1
brn print2
print2 add r0,r4,#0
add r1,r0,#15
add r0,r1,#15
add r1,r0,#15
add r0,r1,#3
trap x21
and r4,r4,#0
;find value of 3rd hex
ld r1,thrdig ;load 2^4
not r1,r1 ;start subtraction (for divide)
add r3,r3,r1
add r3,r3,#1
brn print3
add r4,r4,#1
add r2,r1,r3
add r2,r2,#1
brn print3
add r4,r4,#1
add r3,r2,r1
add r3,r3,#1
brn print3
add r4,r4,#1
add r2,r3,r1
add r2,r2,#1
brn print3
add r4,r4,#1
add r3,r2,r1
add r3,r3,#1
brn print3
add r4,r4,#1
add r2,r3,r1
add r2,r2,#1
brn print3
add r4,r4,#1
add r3,r2,r1
add r3,r3,#1
brn print3
add r4,r4,#1
add r2,r3,r1
add r2,r2,#1
brn print3
add r4,r4,#1
add r3,r2,r1
add r3,r3,#1
brn print3
print3 add r0,r4,#0
add r1,r0,#15
add r0,r1,#15
add r1,r0,#15
add r0,r1,#3
trap x21
and r4,r4,#0
;find value of 4th hex
ld r1,frthdig ;load 2^0
not r1,r1 ;start subtraction (for divide)
add r3,r3,r1
add r3,r3,#1
brn print4
add r4,r4,#1
add r2,r1,r3
add r2,r2,#1
brn print4
add r4,r4,#1
add r3,r2,r1
add r3,r3,#1
brn print4
add r4,r4,#1
add r2,r3,r1
add r2,r2,#1
brn print4
add r4,r4,#1
add r3,r2,r1
add r3,r3,#1
brn print4
add r4,r4,#1
add r2,r3,r1
add r2,r2,#1
brn print4
add r4,r4,#1
add r3,r2,r1
add r3,r3,#1
brn print4
add r4,r4,#1
add r2,r3,r1
add r2,r2,#1
brn print4
add r4,r4,#1
add r3,r2,r1
add r3,r3,#1
brn print4
print4 add r0,r4,#0
add r1,r0,#15
add r0,r1,#15
add r1,r0,#15
add r0,r1,#3
trap x21
and r0,r0,#0
add r0,r0,#13
trap x21
brnzp startover
end trap x25
hex .fill x3FFF
frstdig .fill x1000
scndig .fill x0100
thrdig .fill x0010
frthdig .fill x0001
.end