1
0
mirror of https://github.com/catseye/SixtyPical.git synced 2024-12-02 07:49:21 +00:00
SixtyPical/eg/rudiments/memloc.60p

23 lines
292 B
Plaintext
Raw Normal View History

// Include `support/${PLATFORM}.60p` before this source
// Should print AB
byte foo
2018-09-09 14:03:43 +00:00
define print routine
inputs foo
trashes a, z, n
{
ld a, foo
call chrout
}
2018-09-09 14:03:43 +00:00
define main routine
trashes a, y, z, n, foo
{
ld y, 65
st y, foo
call print
inc foo
call print
}