1
0
mirror of https://github.com/catseye/SixtyPical.git synced 2024-11-22 01:32:13 +00:00
SixtyPical/eg/cinv.60pical
2014-04-01 22:05:02 +01:00

16 lines
221 B
Plaintext

assign byte screen 1024
assign vector cinv 788
reserve vector save_cinv
routine main {
sei {
copy vector cinv to save_cinv
copy routine our_cinv to cinv
}
}
routine our_cinv {
inc screen
jmp save_cinv
}