1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
routine chrout inputs a trashes a @ 65490 routine main trashes a, y, z, n, c { ld y, 65 repeat { ld a, y call chrout inc y cmp y, 91 } until z }