5 IFA=0THENA=1:LOAD"PATCH.MODE",8,1
10 PRINT"[147]";CHR$(14)
20 A$="[211]TARTOOL.[208]ATCH +"
30 PRINTTAB(20-LEN(A$)/2)A$:PRINT
40 PRINT"   [194]ITTE GEBEN SIE DIE [198]ARBEN EIN !":PRINT
45 HF=9:RF=0:SF=7
50 INPUT"[200]INTERGRUNDFARBE";HF:PRINT
60 INPUT"[210]AHMENFARBE";RF:PRINT
70 INPUT"[211]CHREIBFARBE";SF:PRINT
110 INPUT"OKAY";A$:IFLEFT$(A$,1)<>"J"THEN10
200 PRINT
210 PRINT"[194]ITTE  LEGEN SIE JETZT EINE SICHERHEITS-";
220 PRINT"KOPIE  VON [211]TAR[212]OOL  IN [204]AUFWERK  8  EIN";
230 PRINT"    UND DRUECKEN DANN EINE [212]ASTE !"
250 POKE198,0:WAIT198,255
300 OPEN1,8,15,"R:STARTOOL.OLD=STARTOOL.OBJ":CLOSE1
310 POKE49311,RF
320 POKE49316,HF
330 POKE49231,SF
340 SYS49152