1
0
mirror of https://github.com/catseye/SixtyPical.git synced 2024-11-22 01:32:13 +00:00
SixtyPical/eg/rudiments/memloc.60p

23 lines
292 B
Plaintext

// Include `support/${PLATFORM}.60p` before this source
// Should print AB
byte foo
define print routine
inputs foo
trashes a, z, n
{
ld a, foo
call chrout
}
define main routine
trashes a, y, z, n, foo
{
ld y, 65
st y, foo
call print
inc foo
call print
}