1
0
mirror of https://github.com/catseye/SixtyPical.git synced 2024-11-25 07:32:16 +00:00
SixtyPical/eg/rudiments/conditional2.60p
2018-03-06 10:32:52 +00:00

26 lines
291 B
Plaintext

routine chrout
inputs a
trashes a
@ 65490
routine main
trashes a, x, y, z, n, c, v
{
ld a, 0
if z {
ld a, 89
call chrout
ld a, 1
}
ld a, 65
call chrout
ld a, 1
if z {
ld a, 89
call chrout
ld a, 1
}
}