1
0
mirror of https://github.com/catseye/SixtyPical.git synced 2024-11-29 18:49:22 +00:00
SixtyPical/eg/rudiments/vector.60p

31 lines
359 B
Plaintext
Raw Normal View History

// Should print AB
include "chrout.60p"
vector routine
trashes a, z, n
print
2015-10-20 16:39:00 +00:00
define printa routine
trashes a, z, n
{
ld a, 65
call chrout
}
define printb routine
trashes a, z, n
{
ld a, 66
call chrout
2015-10-20 16:39:00 +00:00
}
define main routine
trashes print, a, z, n
{
copy printa, print
call print
copy printb, print
call print
2015-10-20 16:39:00 +00:00
}