100 IFA=0THENPOKE56,32:CLR:A=1:LOAD"ULTIMATE TRON",8,1
110 GOSUB270:PRINT"[147] ULTIMATE [212][210][207][206]   BY [207]LIVER [211]TILLER 1988"
120 DATA LINKS,OBEN,RECHTS,UNTEN
130 PRINT"[211]TEUERUNG: (1)  <Q> UND <STOP>"
140 PRINTSPC(11)"(2)  <=>[160]UND <^>"
150 PRINTSPC(11)"(3)  JOY.PORT 1"
160 PRINTSPC(11)"(4)  JOY.PORT 2"
170 FORT=0TO3:READA$:PRINT"SPIELER NR.";T+1;" STARTPOSITION ";A$
180 INPUT"NAME <RETURN>=EXT.NICHT ";N$(T):IFN$(T)=""THENS(T)=0:GOTO200
190 INPUT"STEUERUNG (1-4)";S(T):P=P+1
200 NEXT
210 PRINT:IFP>2THENPRINT"NUN VEREINBAREN, WER ZUSAMMENSPIELT  UND"
220 PRINT"BEREITMACHEN UND [212]ASTE DRUECKEN"
230 WAIT198,1
240 SYS49152,S(0),S(1),S(2),S(3):GOSUB270:PRINT"[147][211]IEGER IST: "N$(PEEK(2))
250 INPUT"NOCH EIN [211]PIEL (J/N)   J[157][157][157]";J$:IFJ$="J"THEN210
260 PRINT"SEE YOU AGAIN IN ULTIMATE [212][210][207][206] [201][201]":END
270 POKE53281,0:POKE53280,5:POKE788,52:RETURN