, Set number to be divided
set 800 64
, Set divisor number
set 801 3
, Output number (quotient)
set 802 0
set 803 1
ldi 1
add 802
sta 802
loda 800
sub 801
sta 800
jmpc 0
jmp 8
loda 802
sub 803
out
hlt