10 REM"(C) BY RAINBOW ARTS
11 [143] ""[204]
12 [143] ""[204]
13 [151]53280,11:[151]53281,0:[153][199](142)[199](8)
15 [129] WW[178]1 [164] 3
17 [143] ""[204]
20 [153]"LOADPOKE  DISK-KOPFJUSTAGE    BY RAINBOW ARTS   WAIT
25 PRINT"[154] DISK-STATUS WAEHREND JUSTAGE :"
27 PRINT" LESEZEIT ( MUSS <4.5 SEIN ) :"
28 PRINT" DURCHLAUF :"WW
30 AA$=" ":BB$="        [157][157][157][157][157][157][157][157]"
31 REM ""(null)
35 A1$=A1$+"                    [157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157][157]"
40 OPEN15,8,15:OPEN4,8,3,"#"
50 TI$="000000":PRINT#15,"B-R";3;0;1;3:PRINT#15,"B-P"3;1:GET#4,A$
70 PRINT#15,"B-R";3;0;33;3:PRINT#15,"B-P"3;1:GET#4,A$
80 INPUT#15,A$,B$,C$,D$:PRINTAA$;B$:RR=TI
85 REM ""(null)
90 PRINTBB$;RR/2:IFRR<9THENFORW=1TO1100:NEXTW:GOTO160
100 GOTO50
160 CLOSE4:CLOSE15
165 REM ""(null)
170 OPEN15,8,15
180 PRINTBB$;"[145][154] DISKETTE WIRD INITIALISIERT ! "
190 FORW=1TO12:PRINT#15,"I":INPUT#15,A$,B$,C$,D$:PRINTAA$;B$:NEXTW:CLOSE15
205 NEXT WW
210 PRINT"[147][151]         DISK-DRIVE JUSTIERT !!         "
220 PRINT"LOAD"CHR$(34)":*"CHR$(34)",8,1[145][145][145]":NEW