1 POKE53280,0:POKE53281,0
2 PRINTCHR$(14)"[147]"TAB(15)"[194]AMDOK 7"TAB(97)"VON"TAB(49)"[200]ANS-[202]UERGEN [218]IETHMANN"
3 PRINT"[194]ITTE DEFEKTE [196]ESKPACKDISKETTE "TAB(80)"IN DAS [204]AUFWERK LEGEN"
4 PRINT"UND EINE [212]ASTE DRUECKEN":WAIT203,64,64:OPEN1,8,15,"I":OPEN2,8,2,"#"
5 PRINT#1,"U1:"2;0;10;5:PRINT#1,"B-P"2;20:GET#2,A$:A=ASC(A$+CHR$(0))
6 IFA<>169THENPRINT"[147]NICHT AUF DIESER [196]ISK ANWENDBAR!":CLOSE2:CLOSE1:END
7 READN:IFN<0THEN9
8 PRINT#1,"M-W"CHR$(LB)CHR$(05)CHR$(1)CHR$(N):LB=LB+1:GOTO7
9 ON ABS(N) GOTO10,11,14
10 READ LB:GOTO 7
11 IF SI=1 THENPRINT#1,"U2:";2;0;T;S
12 READ T: READ S
13 PRINT#1,"U1:";2;0;T;S:SI=1:GOTO7
14 PRINT#1,"U2:";2;0;T;S:PRINT#1,"I"
15 CLOSE2:CLOSE1:PRINT"[196]ESKPACKDISKETTE NUN WIEDER"TAB(80)"VERWENDBAR!"
16 DATA-2,18,0,-1,0,18,1,65,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
17 DATA0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
18 DATA0,0,0,0,0,0,0,0,16,252,253,7,0,0,0,0,0,0,0,0,0,0,0,0,10,210,150,6,19
19 DATA255,255,7,19,255,255,7,18,255,255,3,17,127,255,3,15,223,190,3,13,183,187
20 DATA1,18,255,255,3,18,255,255,3,17,255,255,1,17,255,255,1,17,255,255,1,17
21 DATA255,255,1,17,255,255,1,68,69,83,75,32,80,65,67,75,160,160,160,160,160
22 DATA160,160,160,160,68,49,160,50,65,160,160,160,160,19,8,71,69,79,83,32,102
23 DATA111,114,109,97,116,32,86,49,46,48,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
24 DATA0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
25 DATA0,0,0,0,0,0,0,0,0,0,0,0,-2
26 DATA18,1,-1,0,18,9,131,1,16,71,82,65,80,72,73,67,83,32,71,82,65,66,66,69,82
27 DATA1,8,0,6,88,4,26,14,37,55,0,0,0,131,12,0,98,108,97,99,107,106,97,99,107
28 DATA160,160,160,160,160,160,160,12,13,0,5,88,1,4,16,15,39,0,0,0,131,14,5,99
29 DATA97,108,101,110,100,97,114,160,160,160,160,160,160,160,160,14,18,0,5,87
30 DATA12,29,16,4,49,0,0,0,131,14,4,73,99,111,110,32,69,100,105,116,111,114,160
31 DATA160,160,160,160,14,17,0,6,87,12,15,14,31,44,0,0,0,131,3,3,103,101,111
32 DATA68,101,120,160,160,160,160,160,160,160,160,160,160,3,16,0,5,88,4,26,14
33 DATA37,83,0,0,0,131,7,19,71,69,79,77,69,82,71,69,160,160,160,160,160,160,160
34 DATA160,7,6,1,6,88,7,6,13,6,66,0,0,0,131,27,8,67,111,109,109,111,100,111,114
35 DATA101,95,71,69,160,160,160,160,27,5,1,8,87,11,3,11,28,7,0,0,0,0,22,6,27,83
36 DATA119,97,112,32,70,105,108,101,160,160,160,160,160,160,22,17,0,13,88,7,6
37 DATA13,10,83,0,-3