1 PRINT"[147]"
2 REM **********************
3 REM *                    *
4 REM *    SPIELE TEST     *
5 REM *                    *
6 REM *  BY ACHIM WAGNER   *
7 REM *                    *
8 REM *                    *
9 REM **********************
10 POKE53281,0:POKE53280,0:PRINT""
20 PRINTTAB(12)"SPIELE TEST"
25 GOSUB 1000
30 GETA$:IFA$<>"W"THEN30
40 PRINT"[147]      SPIEL         AUSGABE     JAHRGANG"
45 PRINT"[184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]  [184][184][184][184][184][184][184]     [184][184][184][184][184][184][184][184]
50 [153]"HESGAMES               9          1984
51 PRINT"THE DALLAS QUEST       9          1984
52 [153]"WORLD CUP FOODBALL     9          1984
53 PRINT"RAILS WEST             9          1984
54 [153]"QUIX                   8          1984
55 PRINT"U-BOOT COMMANDER       8          1984
56 [153]"SUMMER GAMES           8          1984
57 PRINT"SOCCER                 8          1984
58 [153]"PROFI-FUSSBALL         8          1984
59 PRINT"DIG DUG                8          1984
60 [153]"JET SET WILLY          8          1984
61 PRINT"TOD IN DER KARIBIK     8          1984
62 [153]"SPACE PILOT            8          1984
63 PRINT"BRUCE LEE              7          1984
64 [153]"SPACE MISSILE COMMAND  7          1984
65 PRINT"VAN DRIVER             7          1984
66 [153]"STREET RACER           7          1984
67 PRINT"AZTEK                  7          1984
68 [153]"ENCOUNTER              7          1984
69 PRINTTAB(4)"'W' FUER WEITER   'E' FUER ENDE[146]"
71 GOSUB 20000
72 PRINT"[147]      SPIEL         AUSGABE     JAHRGANG"
73 PRINT"[184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]  [184][184][184][184][184][184][184]     [184][184][184][184][184][184][184][184]"
74 PRINT"QUEST FOR TIRES        7          1984
75 [153]"POGO JOE               7          1984
76 PRINT"PSSST                  7          1984
77 [153]"AXIS ASSASSIN          6          1984
78 PRINT"JET BOAT JACK          6          1984
79 [153]"EISHOCKEY-LIGA         6          1984
80 PRINT"FRED                   6          1984
81 [153]"STAR TREK              6          1984
82 PRINT"ZEPPELIN               6          1984
83 [153]"DRELBS                 6          1984
84 PRINT"JUICE                  6          1984
85 [153]"TENNIS                 6          1984
86 PRINT"THE MAZE MACHINE       6          1984
87 [153]"DIMENSION X            5          1984
88 PRINT"G-FORCE                5          1984
89 [153]"POD                    5          1984
90 PRINT"BUGABOO                5          1984
91 [153][163]4)"'W' FUER WEITER   'E' FUER ENDE"
92 [141] 30000
93 [153]"LOAD      SPIEL         AUSGABE     JAHRGANG"
94 [153]"FREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFRE  FREFREFREFREFREFREFRE     FREFREFREFREFREFREFREFRE"
95 [153]"MR.ROBOT               5          1984
96 PRINT"ATIC ATAC              5          1984
97 [153]"WIZZARDRY              5          1984
98 PRINT"POPEYE                 5          1984
99 [153]"CAPTURE THE FLAG       4          1984
100 PRINT"RALLY SPEEDWAY         4          1984
101 [153]"RAINBOWWALKER          4          1984
102 PRINT"COLOSSAL ADVENTURE     3          1984
103 [153]"ZX-FLUGSIMULATOR       4          1984
104 PRINT"RITTER ERIC            3          1984
105 [153]"MISSION ASTROID        4          1984
106 PRINT"SHAMUS                 3          1984
108 [153]"BLUE MAX               3          1984
110 PRINT"ZAXXON                 3          1984
111 [153]"ANT ATTACK             3          1984
112 PRINT"ARCADE MACHINE         3          1984
113 [153]"CORRIDORS OF GENON     3          1984
114 PRINT"GAMES DISIGNER         3          1984
116 [153]"WAR GAMES              2          1984
117 PRINTTAB(4)"'W' FUER WEITER   'E' FUER ENDE
118 [141] 40000
121 [153]"LOAD      SPIEL         AUSGABE     JAHRGANG"
122 [153]"FREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFRE   FREFREFREFREFREFREFRE     FREFREFREFREFREFREFREFRE"
124 [153]"HARD HAT MACK          2          1984
125 PRINT"COOKIE                 2          1984
126 [153]"SERPENTINE             2          1984
127 PRINT"Q-BERT                 2          1984
128 [153]"R-NEST                 2          1984
129 PRINT"HOBBIT                 2          1984
130 [153]"ULTIMA II              2          1984
132 PRINT"FORT APOCALYPSE        1          1984
134 [153]"PHARAO'S CURSE         1          1984
136 PRINT"SHADOW WORLD           1          1984
138 [153]"TIME GATE              1          1984
140 PRINT"MANIC MINER            1          1984
142 [153]"COMBAT ZONE            1          1984
144 PRINT"ZX-SCHACH              1          1984
146 [153]"FLUGKAPITAEN           4          1984
148 PRINT"DARK KRYSTAL           4          1984
150 [153]"CRANSTON MANOR         4          1984
152 PRINT"TELENGARD              1          1984
154 [153]"POOYAN                 1          1984
155 PRINTTAB(4)"'W' FUER WEITER   'E' FUER ENDE[146]"
156 GOSUB 50000
157 PRINT"[147]      SPIEL         AUSGABE     JAHRGANG"
158 PRINT"[184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]   [184][184][184][184][184][184][184]     [184][184][184][184][184][184][184][184]
161 [153]"DONKEY KONG            1          1984
162 PRINT"PIMANIA               12          1983
163 [153]"MINER 2049'ER         12          1983
164 PRINT"PICNIC PARAMIA        12          1983
166 [153]"ZOKS KINGDOM          12          1983
168 PRINT"FROGGER               12          1983
170 [153]"MUTANT CAMELS         12          1983
172 PRINT"PINBALL SET           12          1983
174 [153]"POLE POSITION         12          1983
175 PRINTTAB(14)"'E' FUER ENDE[146]"
176 GET A$:IFA$="E"THENGOTO 2000
177 GOTO 176
999 END
1000 PRINTTAB(5)"DIESES PROGRAMM ENTHAELT ALLE"
1010 PRINTTAB(3)"SPIELE TESTS IN DEN HAPPY COMPUTERN"
1011 PRINTTAB(7)"VON AUSGABE 12/83-9/84"
1020 PRINTTAB(10)"'W' FUER WEITER"
1030 RETURN
2000 PRINT"[147]TSCHUES[146]":PRINT"LOAD[145][145][145]":END
20000 GETA$:IFA$=""THEN20000
20010 IFA$="W"THENRETURN
20020 IFA$="E"THEN2000
30000 GETA$:IFA$=""THEN30000
30010 IFA$="W"THENRETURN
30020 IFA$="E"THEN2000
40000 GETA$:IFA$=""THEN40000
40010 IFA$="W"THENRETURN
40020 IFA$="E"THEN2000
50000 GETA$:IFA$=""THEN50000
50010 IFA$="W"THENRETURN
50020 IFA$="E"THEN2000