1
0
mirror of https://github.com/catseye/SixtyPical.git synced 2024-11-22 01:32:13 +00:00
SixtyPical/eg/rudiments/conditional2.60p
2018-09-09 15:31:35 +01:00

26 lines
305 B
Plaintext

define chrout routine
inputs a
trashes a
@ 65490
define main routine
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
}
}