10FORI%=0TO2STEP2
20P%=&53
30[OPT I%
40.loop1 LDX #data-2
50.loop2 LDA 0,X
60STA 6,X
70.eor EOR data-2
80CMP #42
90BEQ skip
100LDA #32
110.skip JSR &FFEE
120INX
130BPL loop2
140JSR &FFE7
150INC eor+1
160BPL loop1
170RTS
180.data EQUB 74
190EQUB 207
200EQUB 74
210EQUB 96
220]
230NEXT
