1
0
mirror of https://github.com/catseye/SixtyPical.git synced 2024-12-01 16:50:09 +00:00
SixtyPical/eg/rudiments/conditional2.60p

24 lines
325 B
Plaintext

// Include `support/${PLATFORM}.60p` before this source
// Should print YA
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
}
}