start tok64 d64-rz2jXU
10 FORa=49152TO49325:READq:POKEa,q:x=x+q:NEXT:IFx-21861THENPRINT"datafel":PRINTx
11 DATA32,149,192,132,49,133,50,32,149,192,132,47,133,48,32,149,192,132,251,133
12 DATA252,32,149,192,132,253,133,254,56,165,45,233,2,133,45,176,2,198,46,160,1
13 DATA152,145,45,200,165,251,145,45,200,24,101,253,133,251,165,252,145,45,200
14 DATA101,254,133,252,169,131,145,45,200,132,52,160,,177,49,168,169,,32,145
15 DATA179,32,221,189,164,52,162,,189,1,1,240,6,145,45,200,232,208,245,230,49
16 DATA208,2,230,50,165,49,197,47,240,16,192,70,144,6,32,158,192,76,39,192,169
17 DATA44,145,45,208,197,165,50,197,48,208,234,32,158,192,160,1,32,158,192,32
18 DATA51,165,104,104,76,99,166,32,253,174,32,138,173,76,247,183,169,,145,45
19 DATA200,24,152,101,45,133,45,144,2,230,46,96
stop tok64
(bastext 1.0)