1 2 3 4 5 6 7 8 9 10 11 12
:lbab ;J=d0 A=d60 syscall x3c res d1000 :label B+=J B<<=d9 B-=J J?<B:label