MOVSI,?0500H
MOVAX,?[SI]
MOVDX,?0
MOVBX,?10000
DIVBX
ADDAL,?30H
MOV[SI?+?10H],?AL
MOVAX,?DX
MOVDX,?0
MOVBX,?1000
DIVBX
ADDAL,?30H
MOV[SI?+?11H],?AL
MOVAX,?DX
MOVDX,?0
MOVBX,?100
DIVBX
ADDAL,?30H
MOV[SI?+?12H],?AL
MOVAX,?DX
MOVDX,?0
MOVBX,?10
DIVBX
ADDAL,?30H
MOV[SI?+?13H],?AL
MOVAX,?DX
ADDAL,?30H
MOV[SI?+?14H],?AL
END