1
0
mirror of https://github.com/catseye/SixtyPical.git synced 2024-11-28 12:51:10 +00:00
SixtyPical/eg/rudiments/loop.60p

16 lines
222 B
Plaintext

// Should print ABCDEFGHIJKLMNOPQRSTUVWXYZ
include "chrout.60p"
define main routine
trashes a, y, z, n, c
{
ld y, 65
repeat {
ld a, y
call chrout
inc y
cmp y, 91
} until z
}