100 A=A+1:IF A=1 THEN LOAD"CAT.ASSRECH",8,1
110 IF A=2 THEN LOAD"CAT.KOPF",8,1
120 IF A=3 THEN LOAD"CAT.KORPUS",8,1
130 IF A=4 THEN LOAD"CAT.SPR1",8,1
140 IF A=5 THEN LOAD"CAT.DIR",8,1
160 POKE53280,0:POKE53281,0:POKE646,0
170 PRINTCHR$(147):PRINT:PRINT
180 PRINT"LOAD"CHR$(34)"CAT.SCHWAENZE"CHR$(34)",8,1"
185 PRINT:PRINT:PRINT:PRINT:PRINT"POKE44,9:POKE9*256,0:NEW"
190 PRINT:PRINT:PRINT"LOAD"CHR$(34)"CAT.MAIN"CHR$(34)",8"
200 PRINT:PRINT:PRINT:PRINT:PRINT"RUN"
210 PRINTCHR$(19);
220 FORX=1TO5:POKE630+X,13:NEXT
230 POKE198,X
240 NEW