10 IF Z=0THEN Z=1:LOAD"STAR-SUPPORT",8,1 20 PRINT"GIGA-STAR ANPASSUNGS ROUTINE:" 30 INPUT"SEKUNDAERADRESSE ";A 40 POKE 50512,A 50 INPUT"MUSS NACH EINEN CR NOCH EIN LF GESENDET WERDEN ";A$ 60 IF A$="JA" THEN POKE 50605,169:GOTO 80 70 IF A$="NEIN" THEN POKE 50605,96:GOTO 80 75 GOTO 50 80 PRINT"GRAFIK EIN - DOPPELTE DICHTE - 960 ZEICHEN:" 85 PRINT"BEIM STAR NL10: 4 CODES, 27, 76, 192, 3" 90 INPUT"WIEVIEL CODES ";A:POKE 50589,A 100 IF A<0 OR A>7 THEN 90 110 FOR T=0 TO A-1 120 INPUT B 130 POKE 50593+T,B 140 NEXT 150 PRINT"ZEILENABSTAND AUF 22/216 ZOLL:" 155 PRINT"BEIM NL10: 3 CODES, 27, 51, 22" 160 INPUT"WIEVIEL CODES ";A:POKE 50549,A 170 IF A<0 OR A>6 THEN 160 180 FOR T=0 TO A-1 190 INPUT B 200 POKE 50553+T,B 210 NEXT 220 PRINT"ZEILENABSTAND AUF 2/216 ZOLL:" 225 PRINT"BEIM NL10: 3 CODES, 27, 51, 2" 230 INPUT"WIEVIELE CODES ";A:POKE 50569,A 240 IF A<0 OR A>6 THEN 230 250 FOR T=0 TO A-1 260 INPUT B 270 POKE 50573+T,B 280 NEXT 290 INPUT"IST ALLES RICHTIG ";A$ 300 IF A$="JA" THEN 330 310 IF A$="NEIN" THEN 20 320 GOTO 290 330 POKE 43,0:POKE 44,192:POKE 45,10:POKE46,198:SAVE "@:STAR-SUPPORT",8:NEW