1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24
// Should print YA include "chrout.60p" 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 } }