2021-11-12 22:55:46 -05:00
|
|
|
R+=D
|
|
|
|
x3c
|
|
|
|
call :funciton
|
|
|
|
x4b
|
2021-11-12 22:00:46 -05:00
|
|
|
!:label
|
|
|
|
?J<B:label
|
|
|
|
:label
|
|
|
|
e
|
|
|
|
; :l ba b
|
2021-11-11 12:54:20 -05:00
|
|
|
;J=d0
|
2021-11-10 21:22:25 -05:00
|
|
|
A=d60
|
2021-11-12 22:00:46 -05:00
|
|
|
syscall x3c
|
2021-11-12 16:51:28 -05:00
|
|
|
align
|
2021-11-10 21:22:25 -05:00
|
|
|
:label
|
2021-11-12 22:00:46 -05:00
|
|
|
reserve d1000
|
2021-11-10 21:22:25 -05:00
|
|
|
B+=J
|
2021-11-12 16:51:28 -05:00
|
|
|
B<=d9
|
2021-11-10 21:22:25 -05:00
|
|
|
B-=J
|
2021-11-12 21:12:59 -05:00
|
|
|
?J=B:label
|
|
|
|
?A!B:label
|
|
|
|
?A>B:label
|
2021-11-12 16:51:28 -05:00
|
|
|
A=:label
|
2021-11-12 22:55:46 -05:00
|
|
|
x3c
|
|
|
|
return
|