1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
// 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 }