1 STEP"@:XF,P,W"
2 +$6000
100 TO SETNAM=$FFBD
110 TO SETLFS=$FFBA
120 TO LOAD=$FFD5
130 LADEN PEEK#8;GERAET
140  LEN#1;SEKUND
150  (null)SETLFS
160  MID$#<(E-NAM);LAENGE
170  PEEK#<(NAM)
180  LEN#>(NAM)
190  (null)SETNAM
200  MID$#0
210  (null)LOAD
220  MID$#<($5400-1)
230  PEEK#>($5400-1)
240  (null)$08D1
250  (null)$08D2
260  MID$#48;ASCII: \
270  (null)$088D
280  MID$#$53;OBERE
290  (null)$1CAD;SPEICHER-
300  (null)$27E8;GRENZE
310  (null)$20D7;AUF
320  (null)$23C5;$5400 !!
330  (null)$275C
340  (null)$3402
1030  (null)$243F;RET.PFOX
1040 NAM NOT"LUPE.FOX
1050 E [228]
63000 [179]