1 POKE53265,11
5 POKE52 ,15:POKE56,15
10 FORL=1TO15
20 READ A:READ B:POKE52992+L,A:POKE53024+L,B
30 NEXT
100 PQ = 7*11:PO = 5*3^2:PW = 8.7*10^1
120 C$=CHR$(PQ)+CHR$(PO)+CHR$(PW)
1000 POKE53280,0:POKE53281,0:PRINT"[147][144]";
1010 FOR Y = 1 TO 2
1020 GOSUB 2000
1030 NEXT
1040 SYS 1024
1050 FOR Y = 3 TO 15
1060 GOSUB2000
1070 NEXT
1080 SYS57812"HYPERSCORE",8,1
1090 POKE780,0:SYS65493:OPEN1,8,15,"I":CLOSE1
1105 POKE40959,0:SYS 52224
2000 OPEN1,8,15:PRINT#1,C$CHR$(31.5*4)CHR$(0)CHR$(1)CHR$(PEEK(52992+Y))
2020 PRINT#1,C$CHR$(100+11)CHR$(2)CHR$(1)CHR$(PEEK(53024+Y)):CLOSE1
2030 SYS57812"*",8,1
2040 POKE780,0:SYS65493:RETURN
10000 DATA 17,0,17,1,17,10,19,0,19,5
10005 DATA 21,2,21,7,21,8,14,0,14,5
10010 DATA 22,2,13,3,13,4,13,20,23,9