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

25 lines
272 B
Plaintext

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