[FXINTD
[FLOD-1R PIECED
[FIX INTEGER
#1J CLR
ADD 0
JMP 1X-1
LDA i
-26
JMP 1G+3
[END FXINTD
[JAN 6|26|69