Maniac! was the first machine language game in ANALOG Computing. It was originally published as a 48K cassette-only program. The next issue included modifications for disk, which indirectly indicated that 64 out of the original 315 data lines weren’t used (ouch!). The next issue then included changes to fit the program into 32K by relocating the player-missile graphics. All of these changes were then republished in The Analog Compendium.

Unlike later machine language games in ANALOG, the source code for this game was never published.

A.N.A.L.O.G. ISSUE 6 / MAY 1982 / PAGE 14

Maniac!

Requires 48K

by Rick Messner

Over the past several years many programs have been developed for the ATARI computers. Unfortunately, most of the game programs cost from $30 to $40 apiece. Taking pity on those who, like myself, cannot afford to buy all those great games, I programmed an arcade-style game called Maniac! This fast-action assembly language game is yours for the price of an hour or two of typing. You’re going to like this game!!

THE GAME

Maniac! is set in a maze with eight levels. Each level is filled with crazed robots. These robots were once peaceful gardeners but became short-circuited by pesticides and now try to destroy anything that moves with their missile-firing shovels. You are dropped into the first level of this maze, equipped only with your trusty .45 and ammunition. Your job is to stop all the robots on each level. At first your task is not particularly difficult but as you enter the higher-numbered maze levels the job gets harder and harder. That’s because the robots on the higher-numbered maze levels have been around longer and are covered with a protective layer of earth and bullrushes.

TO START

At the beginning of this game there is a short introduction (just to help you learn my name) and then the machine asks you if you are going to have a one or two player game. Enter your choice. A light grey maze appears on your monitor screen along with a green figure representing you and three red figures representing the robots. At the end of the maze opposite from where you start is a door. Your objective is to destroy all three robots and to run out the exit door. If you do this the computer automatically advances you to the next level of the maze. If, however, you exit without destroying all the robots you remain at your current level and must try again.

MOVEMENT

The computer moves the robots in a one-person game. In a two-person game one player controls the hunter and the other player controls the robots. Moving either the hunter or the robots is very simple. Hold the joystick in the normal position and push it in the direction you wish to move.

If a robot and the hunter collide either one or both are blown up. If either a robot or a hunter walks into a wall it will explode.

EARTH and BULRUSHES

Robots on the higher-numbered maze levels become increasingly covered with a layer of earth and bulrushes. This makes it rather hard for the hunter’s .45 to hit one. To kill a robot the hunter must shoot it once for each level of the maze. Thus, on level six the hunter must shoot each robot six times before it is destroyed.

TWO-PLAYER VERSION

In the two-player game one person controls the hunter and the other person controls the robots. The hunter is controlled by the joystick in port zero and the robots are moved by the joystick in port one.

To start, the person with the robots moves only the leftmost robot. If it is killed control switches to the center robot. When that one is killed control moves to the rightmost robot.

As the player controlling the robots becomes more skilled he may want to switch control from robot to robot at will. This can be done by using one of three keyboard keys. To make the joystick control the leftmost robot press the semi-colon key; to make the joystick control the center robot press the plus sign key; to make the joystick control the rightmost robot press the multiplication sign key.

FIRING

Both the hunter and the robot can fire in many different directions. To rotate the arm — and the weapon — of either the hunter or the robot, do this: press the joystick button and hold it down. While the button is depressed you may move the joystick in any direction and this will cause the arm to rotate. As soon as you let go of the red button the weapon will fire.

If you wish to fire without moving the direction of the weapon simply press and release the red button on your joystick.

SCORING

Points are awarded to the hunter but not to the robots. The robots get their pleasure solely from frustrating the hunter. Scoring is as follows: the hunter gets ten points per level for each robot destroyed with a 1,000 point bonus for making it through all eight levels.

TYPING IN THE PROGRAM

The program listing follows these remarks. To use it, type the program in from BASIC and run it. Each line of numbers is followed by an additional number which checks on your typing. If you make a mistake on any line the computer will tell you so. To correct the mistake, retype the line that had an error.

A nice feature of this game is that I have built in a procedure to create a “boot” tape so you won’t have to type all those numbers more than once. After typing in the numbers put a blank tape in your cassette recorder. Type RUN. You will hear a loud buzz. Press any key. The computer now creates a “boot” tape which contains your copy of Maniac!

To use this “boot” tape remove all cartridges from your machine. Hold down the start key and close the lid simultaneously. When the computer beeps press any key and the program will load and execute itself.

It is my sincere hope that, besides being an enjoyable game, Maniac! will prompt other programmers to submit assembly language games to this magazine.

5 CLR
10 Q=0
20 LINE=4990
100 DIM X$(5100)
110 P=0
112 LINE=LINE+10
120 FOR I=1 TO 16
130 Q=Q+1
140 READ J
143 IF J=999 THEN 1000
145 X$(Q)=CHR$(J)
160 P=P+J
180 NEXT I
200 READ J:IF P=J THEN 110
220 ? "ERROR IN LINE";LINE
240 STOP
1000 OPEN #1,8,128,"C:"
1020 ? #1;X$
1040 CLOSE #1
5000 DATA 0,31,0,64,35,64,169,60,141,2,211,169,119,141,231,2,1439
5010 DATA 133,14,169,79,141,232,2,133,15,169,38,133,10,169,64,133,1634
5020 DATA 11,24,96,96,83,58,32,28,76,32,55,72,162,255,141,30,1251
5030 DATA 208,232,224,4,240,246,142,184,79,169,2,141,187,79,32,148,2317
5040 DATA 75,172,185,79,185,232,76,133,176,133,180,185,233,76,133,177,2430
5050 DATA 133,181,189,127,79,24,201,3,176,18,32,210,64,32,184,65,1718
5060 DATA 32,38,68,32,173,70,32,223,68,32,17,71,189,159,79,201,1484
5070 DATA 0,240,6,32,108,70,32,179,69,32,108,65,169,11,24,237,1382
5080 DATA 191,79,141,188,79,169,2,141,190,79,32,189,75,173,188,79,1995
5090 DATA 141,181,79,32,61,65,32,253,73,32,178,64,32,180,71,32,1506
5100 DATA 248,71,173,127,79,201,7,240,3,76,49,64,32,127,72,76,1645
5110 DATA 44,64,173,252,2,141,0,136,173,200,79,201,1,208,1,96,1771
5120 DATA 173,252,2,201,7,240,46,201,6,240,34,201,2,240,22,76,1943
5130 DATA 250,64,189,135,79,24,233,47,157,173,79,189,139,79,24,233,2094
5140 DATA 16,157,177,79,96,169,1,141,195,79,76,250,64,169,2,141,1812
5150 DATA 195,79,76,250,64,169,3,141,195,79,172,195,79,185,127,79,2088
5160 DATA 24,201,2,176,1,96,173,207,79,24,201,0,176,5,169,2,1536
5170 DATA 141,207,79,206,207,79,173,207,79,201,1,240,1,96,169,0,2086
5180 DATA 141,207,79,160,1,185,127,79,24,201,2,144,7,200,152,201,1910
5190 DATA 4,208,242,96,140,195,79,169,255,141,252,2,96,142,182,79,2282
5200 DATA 140,183,79,162,255,232,236,181,79,240,11,160,255,200,152,201,2766
5210 DATA 255,208,250,76,69,65,174,182,79,172,183,79,96,142,182,79,2291
5220 DATA 162,255,232,236,181,79,208,250,174,182,79,96,189,127,79,24,2553
5230 DATA 201,2,176,1,96,24,201,7,144,1,96,24,105,10,141,187,1416
5240 DATA 79,169,15,141,184,79,32,148,75,173,185,79,24,109,230,76,1798
5250 DATA 133,178,173,186,79,109,231,76,133,179,165,176,24,125,139,79,2185
5260 DATA 133,176,165,177,105,0,133,177,160,0,177,178,145,176,200,152,2254
5270 DATA 201,15,208,246,254,127,79,96,189,131,79,201,1,208,1,96,2132
5280 DATA 224,0,240,14,236,195,79,240,3,76,216,65,173,121,2,76,1960
5290 DATA 38,67,189,120,2,76,38,67,169,1,157,131,79,173,191,79,1577
5300 DATA 141,187,79,169,10,141,184,79,32,148,75,173,10,210,24,205,1867
5310 DATA 185,79,144,1,96,189,139,79,24,205,139,79,144,50,24,233,1810
5320 DATA 1,24,205,139,79,176,35,169,15,141,114,3,189,135,79,24,1528
5330 DATA 205,135,79,144,15,24,205,135,79,176,3,76,38,67,32,163,1576
5340 DATA 66,76,38,67,32,224,66,76,38,67,32,54,66,76,9,66,1053
5350 DATA 32,110,66,76,9,66,189,173,79,133,85,189,177,79,24,233,1720
5360 DATA 0,133,84,32,36,70,160,0,177,178,201,0,208,29,230,85,1623
5370 DATA 32,36,70,173,181,79,201,0,208,17,198,85,198,85,32,36,1631
5380 DATA 70,173,181,79,201,0,208,3,169,14,96,169,15,96,189,173,1836
5390 DATA 79,133,85,189,177,79,24,105,17,133,84,32,36,70,160,0,1403
5400 DATA 177,178,201,0,208,229,230,85,32,36,70,173,181,79,201,0,2080
5410 DATA 208,217,230,85,230,85,32,36,70,173,181,79,201,0,208,203,2238
5420 DATA 169,13,96,189,173,79,133,85,189,177,79,133,84,32,36,70,1737
5430 DATA 169,16,141,181,79,160,0,140,183,79,160,0,177,178,201,0,1864
5440 DATA 208,94,165,178,24,109,193,79,133,178,165,179,105,0,133,179,2122
5450 DATA 172,183,79,200,152,205,181,79,208,221,173,114,3,41,11,96,2118
5460 DATA 189,173,79,24,105,8,133,85,189,177,79,133,84,32,36,70,1596
5470 DATA 169,16,141,181,79,160,0,140,183,79,160,0,177,178,201,0,1864
5480 DATA 208,30,165,178,24,109,193,79,133,178,165,179,105,0,133,179,2058
5490 DATA 172,183,79,200,152,205,181,79,208,221,173,114,3,41,7,96,2114
5500 DATA 173,114,3,41,15,96,201,14,240,29,201,6,240,59,201,7,1640
5510 DATA 240,33,201,5,240,65,201,13,240,19,201,9,240,71,201,11,1990
5520 DATA 240,28,201,10,240,77,96,32,222,67,76,161,67,32,0,68,1617
5530 DATA 76,161,67,169,1,157,127,79,254,135,79,76,161,67,169,0,1778
5540 DATA 157,127,79,222,135,79,76,161,67,32,222,67,254,135,79,169,2061
5550 DATA 1,157,127,79,76,161,67,32,0,68,254,135,79,169,1,157,1563
5560 DATA 127,79,76,161,67,32,0,68,222,135,79,169,0,157,127,79,1578
5570 DATA 76,161,67,32,222,67,222,135,79,169,0,157,127,79,76,161,1830
5580 DATA 67,32,189,67,189,135,79,157,0,208,189,119,79,201,1,240,1952
5590 DATA 6,169,1,157,119,79,96,169,0,157,119,79,96,189,135,79,1650
5600 DATA 24,201,208,176,6,24,201,48,144,14,96,169,208,157,135,79,1890
5610 DATA 224,0,208,3,76,228,74,96,169,48,157,135,79,96,189,139,1921
5620 DATA 79,24,201,13,144,25,222,139,79,24,105,16,141,181,79,188,1660
5630 DATA 139,79,177,176,136,145,176,200,200,152,205,181,79,208,243,96,2592
5640 DATA 189,139,79,24,201,96,176,29,24,105,16,168,177,176,200,145,1944
5650 DATA 176,136,136,189,139,79,24,233,3,141,181,79,152,205,181,79,2133
5660 DATA 208,234,254,139,79,96,189,131,79,201,1,240,1,96,224,0,2172
5670 DATA 240,57,236,195,79,240,46,169,0,157,131,79,189,139,79,24,2060
5680 DATA 233,14,24,205,139,79,176,14,24,105,22,205,139,79,144,12,1614
5690 DATA 169,1,157,123,79,96,169,0,157,123,79,96,169,2,157,123,1700
5700 DATA 79,96,76,110,68,173,121,2,76,110,68,189,120,2,201,6,1497
5710 DATA 201,6,240,62,201,10,240,25,201,7,240,65,201,11,240,28,1978
5720 DATA 201,5,240,68,201,9,240,31,201,14,240,71,201,13,240,73,2048
5730 DATA 96,169,0,157,123,79,169,0,157,127,79,96,169,1,157,123,1702
5740 DATA 79,169,0,157,127,79,96,169,2,157,123,79,169,0,157,127,1690
5750 DATA 79,96,169,0,157,123,79,169,1,157,127,79,96,169,1,157,1659
5760 DATA 123,79,169,1,157,127,79,96,169,2,157,123,79,169,1,157,1688
5770 DATA 127,79,96,169,0,157,123,79,96,169,2,157,123,79,96,224,1776
5780 DATA 0,240,38,236,195,79,240,27,173,191,79,141,187,79,169,10,2084
5790 DATA 141,184,79,32,148,75,173,10,210,24,205,185,79,144,1,96,1786
5800 DATA 76,30,69,173,133,2,76,12,69,189,132,2,201,0,240,8,1412
5810 DATA 189,131,79,201,1,240,7,96,169,1,157,131,79,96,189,159,1925
5820 DATA 79,201,0,240,1,96,169,1,141,196,79,169,0,157,131,79,1739
5830 DATA 189,127,79,201,1,240,8,169,254,157,151,79,76,68,69,169,2037
5840 DATA 2,157,151,79,189,123,79,201,0,240,9,201,1,240,13,201,1886
5850 DATA 2,240,17,96,169,255,157,155,79,76,105,69,169,0,157,155,1901
5860 DATA 79,76,105,69,169,1,157,155,79,169,35,157,159,79,189,127,1805
5870 DATA 79,141,187,79,169,3,141,184,79,32,148,75,173,185,79,24,1778
5880 DATA 125,123,79,141,184,79,169,2,141,187,79,32,148,75,173,185,1922
5890 DATA 79,168,185,241,77,24,125,135,79,157,143,79,185,242,77,24,2020
5900 DATA 125,139,79,157,147,79,188,147,79,189,110,78,25,128,137,153,1960
5910 DATA 128,137,96,222,159,79,188,147,79,189,110,78,89,128,137,153,2119
5920 DATA 128,137,152,24,125,155,79,157,147,79,189,159,79,201,0,240,2051
5930 DATA 74,189,143,79,24,125,151,79,157,143,79,24,233,47,133,85,1765
5940 DATA 189,147,79,24,233,16,133,84,32,36,70,173,181,79,24,201,1701
5950 DATA 0,208,31,230,85,32,36,70,173,181,79,201,0,208,19,188,1741
5960 DATA 147,79,189,110,78,25,128,137,153,128,137,189,143,79,157,4,1883
5970 DATA 208,96,169,0,157,159,79,157,4,208,96,169,0,157,143,79,1881
5980 DATA 157,4,208,96,140,183,79,165,84,141,187,79,173,193,79,141,2109
5990 DATA 184,79,32,148,75,165,85,141,188,79,169,4,141,190,79,32,1791
6000 DATA 189,75,173,185,79,24,109,188,79,141,185,79,173,186,79,101,2045
6010 DATA 89,133,179,173,185,79,24,101,88,133,178,165,179,105,0,133,1944
6020 DATA 179,160,0,177,178,141,181,79,172,183,79,96,189,143,79,24,2060
6030 DATA 201,208,176,19,24,201,44,144,27,189,147,79,24,201,112,176,1972
6040 DATA 32,24,201,13,144,33,96,169,1,157,159,79,169,208,157,143,1785
6050 DATA 79,76,121,70,169,1,157,159,79,169,44,157,143,79,76,121,1700
6060 DATA 70,169,1,157,159,79,96,169,1,157,159,79,96,189,127,79,1787
6070 DATA 141,184,79,169,3,141,187,79,32,148,75,173,185,79,24,125,1824
6080 DATA 123,79,141,181,79,189,119,79,141,184,79,169,6,141,187,79,1976
6090 DATA 32,148,75,173,185,79,24,109,181,79,141,187,79,169,15,141,1817
6100 DATA 184,79,32,148,75,173,185,79,24,109,230,76,133,178,173,186,2064
6110 DATA 79,109,231,76,133,179,165,180,24,125,139,79,133,180,165,181,2178
6120 DATA 105,0,133,181,160,0,177,178,145,180,200,152,201,15,208,246,2281
6130 DATA 96,189,4,208,24,201,0,208,73,189,12,208,24,201,0,208,1845
6140 DATA 65,160,0,142,181,79,152,24,205,181,79,240,39,189,135,79,1950
6150 DATA 24,217,143,79,176,30,24,105,8,24,217,143,79,144,21,189,1623
6160 DATA 139,79,24,217,147,79,176,12,24,105,15,24,217,147,79,144,1628
6170 DATA 3,76,98,71,200,152,24,201,4,208,200,96,169,1,157,159,1819
6180 DATA 79,96,222,163,79,169,1,153,159,79,189,163,79,24,201,0,1856
6190 DATA 240,1,96,169,1,141,197,79,169,2,157,127,79,152,201,0,1811
6200 DATA 240,9,138,201,0,240,31,206,194,79,96,173,191,79,141,184,2202
6210 DATA 79,169,10,141,187,79,32,148,75,173,185,79,141,181,79,32,1790
6220 DATA 159,73,206,194,79,96,206,192,79,173,192,79,201,0,240,1,2170
6230 DATA 96,76,83,74,173,196,79,201,2,240,19,201,0,240,48,169,1897
6240 DATA 2,141,196,79,160,0,140,198,79,169,175,141,1,210,172,198,2061
6250 DATA 79,200,140,0,210,200,140,0,210,200,140,0,210,200,140,0,2069
6260 DATA 210,200,140,0,210,152,24,201,240,176,4,140,198,79,96,169,2239
6270 DATA 0,141,196,79,141,1,210,96,140,183,79,173,197,79,201,0,1916
6280 DATA 240,41,201,2,240,15,169,2,141,197,79,169,143,141,3,210,1993
6290 DATA 169,0,141,199,79,172,199,79,140,2,210,200,140,2,210,152,2094
6300 DATA 201,240,176,7,140,199,79,172,183,79,96,169,0,141,197,79,2158
6310 DATA 141,3,210,172,183,79,96,169,7,141,181,79,32,82,73,169,1817
6320 DATA 46,141,47,2,169,3,141,29,208,169,200,141,192,2,169,56,1715
6330 DATA 141,193,2,141,194,2,141,195,2,169,0,141,197,79,141,196,1934
6340 DATA 79,169,136,141,7,212,160,1,140,191,79,169,3,141,192,79,1899
6350 DATA 169,16,162,0,157,167,79,232,224,6,208,248,32,43,74,169,1986
6360 DATA 0,141,1,210,141,0,210,141,3,210,141,2,210,141,207,79,1837
6370 DATA 173,191,79,24,201,8,176,21,168,185,110,79,141,196,2,169,1923
6380 DATA 0,141,198,2,141,197,79,141,196,79,32,114,73,172,191,79,1835
6390 DATA 140,184,79,169,4,141,187,79,32,148,75,169,3,141,194,79,1824
6400 DATA 173,200,79,201,2,240,8,169,4,141,195,79,76,217,72,169,2025
6410 DATA 1,141,195,79,169,2,141,252,2,169,40,141,193,79,173,185,1962
6420 DATA 79,24,233,3,168,24,105,4,141,181,79,162,0,185,46,78,1512
6430 DATA 157,0,208,157,135,79,185,78,78,157,139,79,173,191,79,157,2052
6440 DATA 163,79,169,0,157,131,79,157,143,79,157,159,79,200,232,152,2136
6450 DATA 205,181,79,208,216,169,1,141,163,79,160,0,169,0,153,128,2052
6460 DATA 137,153,0,138,153,128,138,153,0,139,153,128,139,200,152,201,2112
6470 DATA 128,208,233,169,1,141,123,79,141,124,79,141,125,79,141,126,2038
6480 DATA 79,169,1,141,127,79,169,0,141,128,79,141,129,79,141,130,1733
6490 DATA 79,96,169,3,141,114,3,169,36,141,116,3,169,64,141,117,1561
6500 DATA 3,169,28,141,122,3,173,181,79,141,123,3,162,48,32,86,1494
6510 DATA 228,96,160,0,185,253,77,24,201,255,240,34,133,85,200,185,2356
6520 DATA 253,77,133,84,169,85,32,221,75,200,185,253,77,133,85,200,2262
6530 DATA 185,253,77,133,84,169,85,32,2,76,200,76,116,73,96,142,1799
6540 DATA 182,79,162,0,160,0,185,167,79,24,105,1,9,16,153,167,1489
6550 DATA 79,201,26,208,11,169,16,153,167,79,200,152,201,6,208,230,2106
6560 DATA 232,24,236,181,79,208,221,174,182,79,32,206,73,96,160,86,2269
6570 DATA 173,48,2,133,180,173,49,2,133,181,177,180,24,105,7,133,1700
6580 DATA 178,200,177,180,133,179,142,182,79,162,5,160,0,189,167,79,2212
6590 DATA 145,178,200,202,152,201,6,208,244,174,182,79,96,160,86,173,2486
6600 DATA 48,2,133,180,173,49,2,133,181,177,180,24,105,45,133,178,1743
6610 DATA 200,177,180,133,179,160,0,169,65,145,178,200,152,201,10,240,2389
6620 DATA 5,205,192,79,208,241,169,0,145,178,96,160,86,173,48,2,1987
6630 DATA 133,180,173,49,2,133,181,177,180,133,178,200,177,180,133,179,2388
6640 DATA 160,0,185,118,78,201,255,240,9,24,233,31,145,178,200,76,2133
6650 DATA 66,74,96,32,194,76,169,0,141,181,79,32,82,73,169,0,1464
6660 DATA 141,198,2,170,157,0,208,157,4,208,157,1,210,157,0,210,1980
6670 DATA 232,224,4,208,239,160,0,185,37,79,24,201,255,240,9,24,2121
6680 DATA 233,31,145,88,200,76,119,74,160,12,162,0,189,167,79,145,1880
6690 DATA 88,136,232,224,6,208,245,32,184,74,160,30,162,0,189,201,2171
6700 DATA 79,145,88,136,232,224,6,208,245,169,255,141,252,2,173,252,2607
6710 DATA 2,201,255,240,249,76,38,64,160,5,185,167,79,24,233,0,1978
6720 DATA 24,217,201,79,176,15,24,105,1,217,201,79,144,6,136,152,1777
6730 DATA 201,255,208,230,96,160,0,185,167,79,153,201,79,200,152,201,2567
6740 DATA 6,208,244,96,162,0,169,0,157,4,208,157,0,208,157,0,1776
6750 DATA 210,157,1,210,232,224,4,208,239,32,54,75,173,194,79,24,2116
6760 DATA 201,0,208,3,238,191,79,173,191,79,24,201,8,144,33,169,1942
6770 DATA 1,141,191,79,160,0,169,200,141,181,79,140,183,79,32,159,1935
6780 DATA 73,172,183,79,200,140,183,79,152,201,5,208,241,238,192,79,2425
6790 DATA 32,127,72,76,44,64,169,175,141,1,210,162,0,165,88,133,1659
6800 DATA 178,165,89,133,179,32,86,75,232,224,16,208,240,169,0,141,2167
6810 DATA 1,210,141,0,210,96,142,182,79,162,0,32,126,75,165,178,1799
6820 DATA 24,109,193,79,133,178,165,179,105,0,133,179,238,199,79,173,2166
6830 DATA 199,79,141,0,210,232,224,79,208,225,174,182,79,96,160,0,2288
6840 DATA 177,178,24,42,145,178,177,178,24,42,145,178,200,152,205,193,2238
6850 DATA 79,208,237,96,169,0,141,185,79,141,186,79,142,182,79,162,2165
6860 DATA 8,10,46,186,79,14,187,79,144,9,24,109,184,79,144,3,1305
6870 DATA 238,186,79,202,208,235,141,185,79,174,182,79,96,142,182,79,2487
6880 DATA 169,0,162,8,14,188,79,42,205,190,79,144,6,237,190,79,1792
6890 DATA 238,188,79,202,208,238,141,189,79,174,182,79,96,141,181,79,2494
6900 DATA 142,182,79,140,183,79,169,11,141,114,3,169,0,141,120,3,1676
6910 DATA 141,121,3,162,48,173,181,79,32,86,228,174,182,79,172,183,2044
6920 DATA 79,96,141,251,2,142,182,79,140,183,79,169,17,141,114,3,1818
6930 DATA 162,48,32,86,228,174,182,79,172,183,79,96,32,194,76,169,1992
6940 DATA 2,141,181,79,32,82,73,169,0,141,198,2,165,88,24,105,1482
6950 DATA 61,133,178,165,89,105,0,133,179,160,0,185,163,78,201,255,2085
6960 DATA 240,9,24,233,31,145,178,200,76,59,76,32,205,76,32,205,1821
6970 DATA 76,32,205,76,32,205,76,32,205,76,169,255,141,181,79,32,1872
6980 DATA 61,65,32,61,65,32,61,65,32,61,65,32,61,65,32,61,851
6990 DATA 65,32,194,76,169,2,141,181,79,32,82,73,169,0,141,198,1634
7000 DATA 2,165,88,24,105,40,133,178,165,89,133,179,160,0,185,218,1864
7010 DATA 78,201,255,240,9,24,233,31,145,178,200,76,142,76,32,194,2114
7020 DATA 76,169,255,141,252,2,173,252,2,24,201,30,240,14,24,201,2056
7030 DATA 31,240,3,76,166,76,169,1,141,200,79,96,169,2,141,200,1790
7040 DATA 79,96,169,12,141,114,3,162,48,32,86,228,96,169,1,141,1577
7050 DATA 196,79,32,180,71,169,2,141,181,79,32,61,65,173,196,79,1736
7060 DATA 201,0,208,238,96,51,242,76,0,138,128,138,0,139,128,139,1922
7070 DATA 128,137,140,92,76,44,28,12,12,12,12,12,4,4,4,4,721
7080 DATA 12,12,28,12,204,124,12,12,12,12,12,4,4,4,4,12,480
7090 DATA 12,28,12,12,28,108,204,12,12,12,4,4,4,4,12,49,517
7100 DATA 58,50,52,56,48,48,48,48,48,32,32,32,32,48,48,56,736
7110 DATA 48,51,62,48,48,48,48,48,32,32,32,32,48,48,56,48,729
7120 DATA 48,56,54,51,48,48,48,32,32,32,32,48,140,92,76,44,881
7130 DATA 28,12,12,12,12,12,10,10,9,9,27,12,28,12,204,124,533
7140 DATA 12,12,12,12,12,10,10,9,9,27,12,28,12,12,28,108,325
7150 DATA 204,12,12,12,10,10,9,9,27,49,58,50,52,56,48,48,666
7160 DATA 48,48,48,80,80,144,144,216,48,56,48,51,62,48,48,48,1217
7170 DATA 48,48,80,80,144,144,216,48,56,48,48,56,54,51,48,48,1217
7180 DATA 48,80,80,144,144,216,128,4,2,8,64,0,10,128,4,32,1092
7190 DATA 2,4,8,4,0,2,1,4,0,128,0,5,0,2,0,64,224
7200 DATA 1,2,4,2,0,2,0,0,0,0,2,0,1,0,128,0,142
7210 DATA 0,1,2,1,0,0,0,0,0,1,0,0,0,0,0,0,5
7220 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
7230 DATA 0,0,0,0,3,0,6,7,0,7,3,7,6,0,0,159,198
7240 DATA 0,159,0,159,28,159,52,159,78,159,78,0,78,0,78,0,1187
7250 DATA 50,0,30,0,0,40,0,40,40,40,40,80,40,110,78,110,698
7260 DATA 64,100,0,100,40,100,40,130,40,255,192,48,12,3,51,75,1250
7270 DATA 112,176,51,96,160,192,51,58,128,192,51,72,120,128,51,51,1689
7280 DATA 91,154,51,112,160,192,51,51,136,192,51,24,50,72,50,32,1469
7290 DATA 38,38,50,64,64,72,50,32,64,56,50,18,69,64,50,18,797
7300 DATA 18,18,50,58,72,48,50,24,72,50,50,24,24,69,3,12,642
7310 DATA 48,192,1,2,4,8,83,67,79,82,69,58,32,48,48,48,869
7320 DATA 48,48,48,32,32,32,32,32,32,32,32,32,32,32,32,32,560
7330 DATA 32,32,32,32,32,32,32,32,32,32,32,32,32,32,77,69,594
7340 DATA 78,58,255,32,32,32,32,32,77,65,78,73,65,67,33,32,1041
7350 DATA 32,32,32,32,32,32,32,32,32,32,32,32,32,32,66,89,603
7360 DATA 32,32,32,32,32,32,32,32,32,32,32,32,32,82,73,67,638
7370 DATA 75,32,77,69,83,83,78,69,82,255,80,82,69,83,83,32,1332
7380 DATA 49,32,79,82,32,50,32,32,32,32,32,32,32,32,32,32,644
7390 DATA 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,512
7400 DATA 32,32,49,32,45,32,79,78,69,32,80,76,65,89,69,82,941
7410 DATA 32,32,32,32,32,32,50,32,45,32,84,87,79,32,80,76,789
7420 DATA 65,89,69,82,255,83,67,79,82,69,58,32,32,32,32,32,1158
7430 DATA 32,32,32,32,72,73,45,83,67,79,82,69,58,32,32,32,852
7440 DATA 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,512
7450 DATA 32,32,32,32,80,82,69,83,83,32,65,78,89,32,75,69,965
7460 DATA 89,32,84,79,32,67,79,78,84,73,78,85,69,255,0,6,1190
7470 DATA 52,101,199,167,54,162,176,52,49,155,138,27,59,59,1,49,1500
7480 DATA 57,54,44,55,57,44,51,50,44,49,56,48,44,55,49,44,801
7490 DATA 49,54,57,44,50,44,49,52,49,44,49,56,49,44,55,57,802
7500 DATA 44,51,50,44,54,49,44,54,53,44,49,55,51,44,49,57,792
7510 DATA 54,44,55,57,155,148,27,59,59,1,50,48,49,44,48,44,942
7520 DATA 50,48,56,44,50,51,56,44,57,54,44,48,44,50,52,50,798
7530 DATA 44,55,54,44,48,44,49,51,56,44,49,50,56,44,49,51,788
7540 DATA 56,44,48,44,49,51,57,44,49,50,56,44,49,51,57,155,904
7550 DATA 158,27,52,52,1,49,50,56,44,49,51,55,44,49,52,48,837
7560 DATA 44,57,50,44,55,54,44,52,52,44,50,56,44,49,50,44,789
7570 DATA 49,50,44,49,50,44,49,50,44,49,50,44,52,44,52,44,764
7580 DATA 52,44,52,155,168,27,51,51,1,49,50,44,49,50,44,50,937
7590 DATA 56,44,49,50,44,50,48,52,44,49,50,52,44,49,50,44,775
7600 DATA 49,50,44,49,50,44,49,50,44,49,50,44,52,44,52,44,764
7610 DATA 52,44,52,44,49,50,155,178,27,51,51,1,49,50,44,50,947
7620 DATA 56,44,49,50,44,49,50,44,50,56,44,49,48,56,44,50,783
7630 DATA 48,52,44,49,50,44,49,50,44,49,50,44,52,44,52,44,765
7640 DATA 52,44,52,44,49,50,44,52,57,155,188,27,53,53,1,53,974
7650 DATA 56,44,53,48,44,53,50,44,53,54,44,52,56,44,52,56,803
7660 DATA 44,52,56,44,52,56,44,52,56,44,51,50,44,51,50,44,790
7670 DATA 51,50,44,51,50,44,52,56,44,52,56,44,53,54,155,198,1054
7680 DATA 27,53,53,1,52,56,44,53,49,44,54,50,44,52,56,44,732
7690 DATA 52,56,44,52,56,44,52,56,44,52,56,44,51,50,44,51,804
7700 DATA 50,44,51,50,44,51,50,44,52,56,44,52,56,44,53,54,795
7710 DATA 44,52,56,155,208,27,54,54,1,52,56,44,53,54,44,53,1007
7720 DATA 52,44,53,49,44,52,56,44,52,56,44,52,56,44,51,50,799
7730 DATA 44,51,50,44,51,50,44,51,50,44,52,56,44,49,52,48,780
7740 DATA 44,57,50,44,55,54,44,52,52,155,218,27,53,53,1,50,1009
7750 DATA 56,44,49,50,44,49,50,44,49,50,44,49,50,44,49,50,771
7760 DATA 44,49,48,44,49,48,44,57,44,57,44,50,55,44,49,50,776
7770 DATA 44,50,56,44,49,50,44,50,48,52,44,49,50,52,155,228,1065
7780 DATA 27,52,52,1,49,50,44,49,50,44,49,50,44,49,50,44,704
7790 DATA 49,50,44,49,48,44,49,48,44,57,44,57,44,50,55,44,776
7800 DATA 49,50,44,50,56,44,49,50,44,49,50,44,50,56,44,49,778
7810 DATA 48,56,155,238,27,52,52,1,50,48,52,44,49,50,44,49,1015
7820 DATA 50,44,49,50,44,49,48,44,49,48,44,57,44,57,44,50,771
7830 DATA 55,44,52,57,44,53,56,44,53,48,44,53,50,44,53,54,804
7840 DATA 44,52,56,44,52,56,155,248,27,56,56,1,52,56,44,52,1051
7850 DATA 56,44,52,56,44,56,48,44,56,48,44,49,52,52,44,49,794
7860 DATA 52,52,44,50,49,54,44,52,56,44,53,54,44,52,56,44,800
7870 DATA 53,49,44,54,50,44,52,56,44,52,56,44,52,56,155,2,863
7880 DATA 28,56,56,1,52,56,44,52,56,44,56,48,44,56,48,44,741
7890 DATA 49,52,52,44,49,52,52,44,50,49,54,44,52,56,44,53,796
7900 DATA 54,44,52,56,44,52,56,44,53,54,44,53,52,44,53,49,804
7910 DATA 44,52,56,44,52,56,155,12,28,53,53,1,52,56,44,56,814
7920 DATA 48,44,56,48,44,49,52,52,44,49,52,52,44,50,49,54,787
7930 DATA 44,49,50,56,44,52,44,50,44,56,44,54,52,44,48,44,775
7940 DATA 49,48,44,49,50,56,44,52,44,51,50,155,22,28,40,40,822
7950 DATA 1,50,44,52,44,56,44,52,44,48,44,50,44,49,44,52,718
7960 DATA 44,48,44,49,50,56,44,48,44,53,44,48,44,50,44,48,758
7970 DATA 44,54,52,155,32,28,39,39,1,49,44,50,44,52,44,50,777
7980 DATA 44,48,44,50,44,48,44,48,44,48,44,48,44,50,44,48,740
7990 DATA 44,49,44,48,44,49,50,56,44,48,155,42,28,37,37,1,776
8000 DATA 48,44,49,44,50,44,49,44,48,44,48,44,48,44,48,44,740
8010 DATA 48,44,49,44,48,44,48,44,48,44,48,44,48,44,48,155,848
8020 DATA 52,28,37,37,1,48,44,48,44,48,44,48,44,48,44,48,663
8030 DATA 44,48,44,48,44,48,44,48,44,48,44,48,44,48,44,48,736
8040 DATA 44,48,44,48,155,62,28,39,39,1,48,44,48,44,48,44,784
8050 DATA 48,44,51,44,48,44,54,44,55,44,48,44,55,44,51,44,762
8060 DATA 55,44,54,44,48,44,48,44,49,53,57,155,72,28,53,53,901
8070 DATA 1,48,44,49,53,57,44,48,44,49,53,57,44,50,56,44,741
8080 DATA 49,53,57,44,53,50,44,49,53,57,44,55,56,44,49,53,810
8090 DATA 57,44,55,56,44,48,44,55,56,44,48,44,55,56,44,48,798
8100 DATA 155,82,28,51,51,1,53,48,44,48,44,51,48,44,48,44,840
8110 DATA 48,44,52,48,44,48,44,52,48,44,52,48,44,52,48,44,760
8120 DATA 52,48,44,56,48,44,52,48,44,47,49,48,44,55,56,44,781
8130 DATA 49,49,48,155,92,28,57,57,1,54,52,44,49,48,48,44,875
8140 DATA 999
A.N.A.L.O.G. ISSUE 7 / SEPTEMBER 1982 / PAGE 4
0 REM CHANGE LINE5 1600, 5069, 7480
      DELETE LINES 7490-8130
1 REM MANIAC MAKER PROGRAM
2 REM DISK VERSION
3 REM
1000 OPEN #1,8,0,"D:MANIAC.OBJ"
5000 DATA 255,255,6,64,127,79,169,60,141,2,211,169,119,141,231,2,2031
7480 DATA 10,0,11,0,38,64,224,2,225,2,38,64,0,0,0,8,678
A.N.A.L.O.G. ISSUE 8 / NOVEMBER 1982 / PAGE 7

MANIAC IN 32K

We have received many requests for information on how to run issue no. 6’s “Maniac” game in 32K machines. Stephen A. Vance, of Brooklyn, Ohio, has found a way to do just that. He writes:

“When Issue Number 6 of A.N.A.L.O.G. Magazine arrived in the mail, I was thrilled to see a machine language game in it. Unfortunately, the article states that the program requires 48K and I only have 32K. I decided to take a closer look to see if it really needed 48K. I discovered that (the program) was using address $8800 (34816 decimal) to $9000 (36864 decimal) for player-missile graphics. Since I only have 32K, the system can’t use those addresses. Therefore, I went through the program changing the player-missile graphics to $6800 (26624 decimal) to $7000 (28672 decimal). After doing this, I rewrote it to tape again and it worked perfectly. This program was worth the effort.”

Use the appropriate changes below to make “Maniac” run in 32K. Note: the disk version will create a file called “MANIAC.OBJ”. This is a binary file. Use DOS menu option “L” to load this file (no cartridge). The “Maniac” game will automatically start.

1 REM MANIAC 32K CASSETTE CHANGES
100 DIM X$(3984)
143 IF J=999 THEN 500
500 X$(184,184)=CHR$(104)
510 X$(1455,1455)=CHR$(105)
520 X$(1458,1458)=CHR$(105)
530 X$(1471,1471)=CHR$(105)
540 X$(1474,1474)=CHR$(105)
550 X$(1544,1544)=CHR$(105)
560 X$(1547,1547)=CHR$(105)
570 X$(2147,2147)=CHR$(104)
580 X$(2337,2337)=CHR$(105)
590 X$(2348,2348)=CHR$(106)
600 X$(2343,2343)=CHR$(106)
610 X$(2346,2346)=CHR$(107)
620 X$(2349,2349)=CHR$(107)
630 X$(3306,3306)=CHR$(106)
640 X$(3308,3308)=CHR$(106)
650 X$(3318,3319)=CHRS(107)
660 X$(3312,3312)=CHR$(107)
670 X$(3314,3314)=CHR$(105)
7490 DATA 999
1 REM MANIAC 32K DISK CHANGES
100 DIM X$(3984)
143 IF J=999 THEN 500
500 X$(184,184)=CHR$(104)
510 X$(1455,1455)=CHR$(105)
520 X$(1458,1458)=CHR$(105)
530 X$(1471,1471)=CHR$(105)
540 X$(1474,1474)=CHRS(105)
550 X$(1544,1544)=CHR$(105)
560 XS(1547,1547)=CHR$(105)
570 X$(2147,2147)=CHR$(104)
580 XS(2337,2337)=CHR$(105)
590 X$(2348,2348)=CHR$(106)
600 X$(2343,2343)=CHRS(106)
610 X$(2346,2346)=CHR$(107)
620 X$(2349,2349)=CHR$(107)
630 X$(3306,3386)=CHR$(106)
640 X$(3308,3308)=CHR$(106)
650 X$(3318,3310)=CHR$(107)
660 X$(3312,3312)=CHR$(107)
670 X$(3314,3314)=CHR$(105)
1000 OPEN #1,8,0,"D:MANIAC.OBJ"
5000 DATA 255,255,6,64,127,79,169,60,141,2,211,169,119,141,231,2,2031
7480 DATA 10,0,11,8,38,64,224,2,225,2,38,64,8,8,8,0,678
7490 DATA 999
THE A.N.A.L.O.G COMPENDIUM / PAGE 161

MANIAC!

32K Cassette or Disk

by Rick Messner

Over the past several years, many game programs have been developed for the ATARI computers. Unfortunately, most of these games cost from $30 to $40 apiece. Taking pity on those who, like myself, cannot afford to buy all those great games, I programmed an arcade-style game called Maniac! This fast-action Assembly language game is yours for the price of a few hours of typing. You’re going to like this one!

The game.

Maniac! is set in a maze with eight levels. Each level is filled with crazed robots. These robots were once peaceful gardeners but became short-circuited by pesticides, and are now trying to destroy anything that moves with their missile-firing shovels. You are dropped into the first level of this maze, equipped only with your trusty .45 and ammunition. Your job is to stop all the robots on each level.

At first, your task is not particularly difficult, but as you enter the higher-numbered maze levels the job gets harder and harder. That’s because the robots on the higher-numbered maze levels have been around longer and are covered with a protective layer of earth and hullrushes.

To start.

At the beginning of this game there is a short introduction (just to help you learn my name), and then the machine asks you if you are going to have a one or two-player game. Enter your choice. A light grey maze appears on your monitor screen, along with a green figure representing you and three red figures representing the robots. At the end of the maze opposite from where you start is a door. Your objective is to destroy all three robots and to run out the exit door. If you do this, the computer automatically advances you to the next level of the maze. If, however, you exit without destroying all the robots, you remain at your current level and must try again.

Movement.

The computer moves the robots in a one-person game. In a two-person game, one player controls the hunter, and the other player controls the robots. Moving either the hunter or the robots is very simple. Hold the joystick in the normal position and push it in the direction you wish to move.

If a robot and the hunter collide, either one or both is blown up. If either a robot or a hunter walks into a wall, it will explode.

Earth and bulrushes.

Robots on the higher-numbered maze levels become increasingly covered with a layer of earth and bulrushes. This makes it rather hard for the hunter’s .45 to hit one. To kill a robot, the hunter must shoot it once for each level of the maze. Thus, on level six, the hunter must shoot each robot six times before it is destroyed.

2-player version.

In the two-player game, one person controls the hunter, and the other person controls the robots. The hunter is controlled by the joystick in port zero, and the robots are moved by the joystick in port one.

To start, the person with the robots moves only the leftmost robot. If it is killed, control switches to the center robot. When that one is killed, control moves to the rightmost robot.

As the player controlling the robots becomes more skilled he may want to switch control from robot to robot at will. This can be done by using one of three keyboard keys. To make the joystick control the leftmost robot, press the semi-colon key; to make the joystick control the center robot, press the plus sign key; to make the joystick control the rightmost robot, press the multiplication sign key.

Firing.

Both the hunter and the robot can fire in many different directions. To rotate the arm — and the weapon — of either the hunter or the robot, do this: press the joystick button and hold it down. While the button is depressed, you may move the joystick in any direction — this will cause the arm to rotate. As soon as you let go of the red button, the weapon will fire.

If you wish to fire without moving the direction of the weapon, simply press and release the red button on your joystick.

Scoring.

Points are awarded to the hunter but not to the robots. The robots get their pleasure solely from frustrating the hunter. Scoring is as follows: the hunter gets ten points per level for each robot destroyed, with a 1,000-point bonus for making it through all eight levels.

Typing the program.

Two program listings follow this article. Listing 1 is the main data and data checking routine, and will create the cassette version of Maniac! Listing 2 should be added to Listing 1 for disk users.

Cassette instructions.

  1. Type Listing 1 into your computer and check it for typing errors by using C:CHECK.
  2. Type RUN and press RETURN. The program will check for errors in the DATA lines. If any error messages are displayed, correct the lines indicated and re-RUN the program until all errors are eliminated.
  3. When all the DATA statements are correct, the program will ask you to “READY CASSETTE AND PRESS RETURN” and the console will BEEP twice. Place a cassette in your program recorder, press RECORD and PLAY simultaneously, then press RETURN. The computer will create a boot tape containing the Maniac! game. It is a good idea to CSAVE the BASIC program at this time, just in case you want to use it again later.
  4. To play Maniac!, remove any cartridges from your system. Place the Maniac! boot tape in your program recorder, rewind it to the beginning and press PLAY. Turn the computer’s power OFF, then turn it ON while pressing START. The computer will BEEP. Press RETURN and the game will load and run automatically.

Disk instructions.

  1. Type Listing 1 into your computer and check it for typing errors with D:CHECK. After correcting any typing errors, enter the lines with Listing 2. These lines will merge with Listing 1 in order to create a Maniac! disk version maker program.
  2. Type RUN and press RETURN. The program will check for any errors in the DATA statements and will display a message if any errors are found. Correct any DATA lines that are in error and re-RUN the program until all errors are corrected.
  3. When the computer has made sure there are no errors in the DATA lines, it will ask “INSERT DISK WITH DOS, PRESS RETURN.” Place a disk with DOS in drive 1 and press RETURN. The program will create an AUTORUN.SYS file containing the Maniac! game. When the READY prompt appears, the program is finished. It is a good idea to SAVE the Maniac! BASIC program just in case you need it later.
  4. To play Maniac!, place the disk containing the AUTORUN.SYS file in drive 1. Remove any cartridges and turn the computer’s power OFF, then ON. The Maniac! game will automatically load and start.

32K Cassette listing.

10 REM MANIAC CASSETTE MAKER PROGRAM
20 REM 
30 CLR :DIM X$(3984):Q=0:LINE=4990:RESTORE 5000
40 P=0
50 LINE=LINE+10:? "CHECKING LINE ";LINE
60 FOR I=1 TO 16
70 Q=Q+1
80 TRAP 140:READ J:IF I=1 THEN IF LINE<>PEEK(183)+PEEK(184)*256 THEN ? "LINE ";LINE;" MISSING!":END 
90 IF J=999 THEN 150
100 X$(Q)=CHR$(J)
110 P=P+J
120 NEXT I
130 TRAP 140:READ J:IF P=J THEN 40
140 ? "ERROR IN LINE ";LINE:STOP 
150 ? "READY CASSETTE AND PRESS RETURN":OPEN #1,8,0,"C:"
160 ? #1;X$
170 CLOSE #1
5000 DATA 0,31,0,64,35,64,169,60,141,2,211,169,119,141,231,2,1439
5010 DATA 133,14,169,79,141,232,2,133,15,169,38,133,10,169,64,133,1634
5020 DATA 11,24,96,96,83,58,32,28,76,32,55,72,162,255,141,30,1251
5030 DATA 208,232,224,4,240,246,142,184,79,169,2,141,187,79,32,148,2317
5040 DATA 75,172,185,79,185,232,76,133,176,133,180,185,233,76,133,177,2430
5050 DATA 133,181,189,127,79,24,201,3,176,18,32,210,64,32,184,65,1718
5060 DATA 32,38,68,32,173,70,32,223,68,32,17,71,189,159,79,201,1484
5070 DATA 0,240,6,32,108,70,32,179,69,32,108,65,169,11,24,237,1382
5080 DATA 191,79,141,188,79,169,2,141,190,79,32,189,75,173,188,79,1995
5090 DATA 141,181,79,32,61,65,32,253,73,32,178,64,32,180,71,32,1506
5100 DATA 248,71,173,127,79,201,7,240,3,76,49,64,32,127,72,76,1645
5110 DATA 44,64,173,252,2,141,0,104,173,200,79,201,1,208,1,96,1739
5120 DATA 173,252,2,201,7,240,46,201,6,240,34,201,2,240,22,76,1943
5130 DATA 250,64,189,135,79,24,233,47,157,173,79,189,139,79,24,233,2094
5140 DATA 16,157,177,79,96,169,1,141,195,79,76,250,64,169,2,141,1812
5150 DATA 195,79,76,250,64,169,3,141,195,79,172,195,79,185,127,79,2088
5160 DATA 24,201,2,176,1,96,173,207,79,24,201,0,176,5,169,2,1536
5170 DATA 141,207,79,206,207,79,173,207,79,201,1,240,1,96,169,0,2086
5180 DATA 141,207,79,160,1,185,127,79,24,201,2,144,7,200,152,201,1910
5190 DATA 4,208,242,96,140,195,79,169,255,141,252,2,96,142,182,79,2282
5200 DATA 140,183,79,162,255,232,236,181,79,240,11,160,255,200,152,201,2766
5210 DATA 255,208,250,76,69,65,174,182,79,172,183,79,96,142,182,79,2291
5220 DATA 162,255,232,236,181,79,208,250,174,182,79,96,189,127,79,24,2553
5230 DATA 201,2,176,1,96,24,201,7,144,1,96,24,105,10,141,187,1416
5240 DATA 79,169,15,141,184,79,32,148,75,173,185,79,24,109,230,76,1798
5250 DATA 133,178,173,186,79,109,231,76,133,179,165,176,24,125,139,79,2185
5260 DATA 133,176,165,177,105,0,133,177,160,0,177,178,145,176,200,152,2254
5270 DATA 201,15,208,246,254,127,79,96,189,131,79,201,1,208,1,96,2132
5280 DATA 224,0,240,14,236,195,79,240,3,76,216,65,173,121,2,76,1960
5290 DATA 38,67,189,120,2,76,38,67,169,1,157,131,79,173,191,79,1577
5300 DATA 141,187,79,169,10,141,184,79,32,148,75,173,10,210,24,205,1867
5310 DATA 185,79,144,1,96,189,139,79,24,205,139,79,144,50,24,233,1810
5320 DATA 1,24,205,139,79,176,35,169,15,141,114,3,189,135,79,24,1528
5330 DATA 205,135,79,144,15,24,205,135,79,176,3,76,38,67,32,163,1576
5340 DATA 66,76,38,67,32,224,66,76,38,67,32,54,66,76,9,66,1053
5350 DATA 32,110,66,76,9,66,189,173,79,133,85,189,177,79,24,233,1720
5360 DATA 0,133,84,32,36,70,160,0,177,178,201,0,208,29,230,85,1623
5370 DATA 32,36,70,173,181,79,201,0,208,17,198,85,198,85,32,36,1631
5380 DATA 70,173,181,79,201,0,208,3,169,14,96,169,15,96,189,173,1836
5390 DATA 79,133,85,189,177,79,24,105,17,133,84,32,36,70,160,0,1403
5400 DATA 177,178,201,0,208,229,230,85,32,36,70,173,181,79,201,0,2080
5410 DATA 208,217,230,85,230,85,32,36,70,173,181,79,201,0,208,203,2238
5420 DATA 169,13,96,189,173,79,133,85,189,177,79,133,84,32,36,70,1737
5430 DATA 169,16,141,181,79,160,0,140,183,79,160,0,177,178,201,0,1864
5440 DATA 208,94,165,178,24,109,193,79,133,178,165,179,105,0,133,179,2122
5450 DATA 172,183,79,200,152,205,181,79,208,221,173,114,3,41,11,96,2118
5460 DATA 189,173,79,24,105,8,133,85,189,177,79,133,84,32,36,70,1596
5470 DATA 169,16,141,181,79,160,0,140,183,79,160,0,177,178,201,0,1864
5480 DATA 208,30,165,178,24,109,193,79,133,178,165,179,105,0,133,179,2058
5490 DATA 172,183,79,200,152,205,181,79,208,221,173,114,3,41,7,96,2114
5500 DATA 173,114,3,41,15,96,201,14,240,29,201,6,240,59,201,7,1640
5510 DATA 240,33,201,5,240,65,201,13,240,19,201,9,240,71,201,11,1990
5520 DATA 240,28,201,10,240,77,96,32,222,67,76,161,67,32,0,68,1617
5530 DATA 76,161,67,169,1,157,127,79,254,135,79,76,161,67,169,0,1778
5540 DATA 157,127,79,222,135,79,76,161,67,32,222,67,254,135,79,169,2061
5550 DATA 1,157,127,79,76,161,67,32,0,68,254,135,79,169,1,157,1563
5560 DATA 127,79,76,161,67,32,0,68,222,135,79,169,0,157,127,79,1578
5570 DATA 76,161,67,32,222,67,222,135,79,169,0,157,127,79,76,161,1830
5580 DATA 67,32,189,67,189,135,79,157,0,208,189,119,79,201,1,240,1952
5590 DATA 6,169,1,157,119,79,96,169,0,157,119,79,96,189,135,79,1650
5600 DATA 24,201,208,176,6,24,201,48,144,14,96,169,208,157,135,79,1890
5610 DATA 224,0,208,3,76,228,74,96,169,48,157,135,79,96,189,139,1921
5620 DATA 79,24,201,13,144,25,222,139,79,24,105,16,141,181,79,188,1660
5630 DATA 139,79,177,176,136,145,176,200,200,152,205,181,79,208,243,96,2592
5640 DATA 189,139,79,24,201,96,176,29,24,105,16,168,177,176,200,145,1944
5650 DATA 176,136,136,189,139,79,24,233,3,141,181,79,152,205,181,79,2133
5660 DATA 208,234,254,139,79,96,189,131,79,201,1,240,1,96,224,0,2172
5670 DATA 240,57,236,195,79,240,46,169,0,157,131,79,189,139,79,24,2060
5680 DATA 233,14,24,205,139,79,176,14,24,105,22,205,139,79,144,12,1614
5690 DATA 169,1,157,123,79,96,169,0,157,123,79,96,169,2,157,123,1700
5700 DATA 79,96,76,110,68,173,121,2,76,110,68,189,120,2,201,6,1497
5710 DATA 201,6,240,62,201,10,240,25,201,7,240,65,201,11,240,28,1978
5720 DATA 201,5,240,68,201,9,240,31,201,14,240,71,201,13,240,73,2048
5730 DATA 96,169,0,157,123,79,169,0,157,127,79,96,169,1,157,123,1702
5740 DATA 79,169,0,157,127,79,96,169,2,157,123,79,169,0,157,127,1690
5750 DATA 79,96,169,0,157,123,79,169,1,157,127,79,96,169,1,157,1659
5760 DATA 123,79,169,1,157,127,79,96,169,2,157,123,79,169,1,157,1688
5770 DATA 127,79,96,169,0,157,123,79,96,169,2,157,123,79,96,224,1776
5780 DATA 0,240,38,236,195,79,240,27,173,191,79,141,187,79,169,10,2084
5790 DATA 141,184,79,32,148,75,173,10,210,24,205,185,79,144,1,96,1786
5800 DATA 76,30,69,173,133,2,76,12,69,189,132,2,201,0,240,8,1412
5810 DATA 189,131,79,201,1,240,7,96,169,1,157,131,79,96,189,159,1925
5820 DATA 79,201,0,240,1,96,169,1,141,196,79,169,0,157,131,79,1739
5830 DATA 189,127,79,201,1,240,8,169,254,157,151,79,76,68,69,169,2037
5840 DATA 2,157,151,79,189,123,79,201,0,240,9,201,1,240,13,201,1886
5850 DATA 2,240,17,96,169,255,157,155,79,76,105,69,169,0,157,155,1901
5860 DATA 79,76,105,69,169,1,157,155,79,169,35,157,159,79,189,127,1805
5870 DATA 79,141,187,79,169,3,141,184,79,32,148,75,173,185,79,24,1778
5880 DATA 125,123,79,141,184,79,169,2,141,187,79,32,148,75,173,185,1922
5890 DATA 79,168,185,241,77,24,125,135,79,157,143,79,185,242,77,24,2020
5900 DATA 125,139,79,157,147,79,188,147,79,189,110,78,25,128,105,153,1928
5910 DATA 128,105,96,222,159,79,188,147,79,189,110,78,89,128,105,153,2055
5920 DATA 128,105,152,24,125,155,79,157,147,79,189,159,79,201,0,240,2019
5930 DATA 74,189,143,79,24,125,151,79,157,143,79,24,233,47,133,85,1765
5940 DATA 189,147,79,24,233,16,133,84,32,36,70,173,181,79,24,201,1701
5950 DATA 0,208,31,230,85,32,36,70,173,181,79,201,0,208,19,188,1741
5960 DATA 147,79,189,110,78,25,128,105,153,128,105,189,143,79,157,4,1819
5970 DATA 208,96,169,0,157,159,79,157,4,208,96,169,0,157,143,79,1881
5980 DATA 157,4,208,96,140,183,79,165,84,141,187,79,173,193,79,141,2109
5990 DATA 184,79,32,148,75,165,85,141,188,79,169,4,141,190,79,32,1791
6000 DATA 189,75,173,185,79,24,109,188,79,141,185,79,173,186,79,101,2045
6010 DATA 89,133,179,173,185,79,24,101,88,133,178,165,179,105,0,133,1944
6020 DATA 179,160,0,177,178,141,181,79,172,183,79,96,189,143,79,24,2060
6030 DATA 201,208,176,19,24,201,44,144,27,189,147,79,24,201,112,176,1972
6040 DATA 32,24,201,13,144,33,96,169,1,157,159,79,169,208,157,143,1785
6050 DATA 79,76,121,70,169,1,157,159,79,169,44,157,143,79,76,121,1700
6060 DATA 70,169,1,157,159,79,96,169,1,157,159,79,96,189,127,79,1787
6070 DATA 141,184,79,169,3,141,187,79,32,148,75,173,185,79,24,125,1824
6080 DATA 123,79,141,181,79,189,119,79,141,184,79,169,6,141,187,79,1976
6090 DATA 32,148,75,173,185,79,24,109,181,79,141,187,79,169,15,141,1817
6100 DATA 184,79,32,148,75,173,185,79,24,109,230,76,133,178,173,186,2064
6110 DATA 79,109,231,76,133,179,165,180,24,125,139,79,133,180,165,181,2178
6120 DATA 105,0,133,181,160,0,177,178,145,180,200,152,201,15,208,246,2281
6130 DATA 96,189,4,208,24,201,0,208,73,189,12,208,24,201,0,208,1845
6140 DATA 65,160,0,142,181,79,152,24,205,181,79,240,39,189,135,79,1950
6150 DATA 24,217,143,79,176,30,24,105,8,24,217,143,79,144,21,189,1623
6160 DATA 139,79,24,217,147,79,176,12,24,105,15,24,217,147,79,144,1628
6170 DATA 3,76,98,71,200,152,24,201,4,208,200,96,169,1,157,159,1819
6180 DATA 79,96,222,163,79,169,1,153,159,79,189,163,79,24,201,0,1856
6190 DATA 240,1,96,169,1,141,197,79,169,2,157,127,79,152,201,0,1811
6200 DATA 240,9,138,201,0,240,31,206,194,79,96,173,191,79,141,184,2202
6210 DATA 79,169,10,141,187,79,32,148,75,173,185,79,141,181,79,32,1790
6220 DATA 159,73,206,194,79,96,206,192,79,173,192,79,201,0,240,1,2170
6230 DATA 96,76,83,74,173,196,79,201,2,240,19,201,0,240,48,169,1897
6240 DATA 2,141,196,79,160,0,140,198,79,169,175,141,1,210,172,198,2061
6250 DATA 79,200,140,0,210,200,140,0,210,200,140,0,210,200,140,0,2069
6260 DATA 210,200,140,0,210,152,24,201,240,176,4,140,198,79,96,169,2239
6270 DATA 0,141,196,79,141,1,210,96,140,183,79,173,197,79,201,0,1916
6280 DATA 240,41,201,2,240,15,169,2,141,197,79,169,143,141,3,210,1993
6290 DATA 169,0,141,199,79,172,199,79,140,2,210,200,140,2,210,152,2094
6300 DATA 201,240,176,7,140,199,79,172,183,79,96,169,0,141,197,79,2158
6310 DATA 141,3,210,172,183,79,96,169,7,141,181,79,32,82,73,169,1817
6320 DATA 46,141,47,2,169,3,141,29,208,169,200,141,192,2,169,56,1715
6330 DATA 141,193,2,141,194,2,141,195,2,169,0,141,197,79,141,196,1934
6340 DATA 79,169,104,141,7,212,160,1,140,191,79,169,3,141,192,79,1867
6350 DATA 169,16,162,0,157,167,79,232,224,6,208,248,32,43,74,169,1986
6360 DATA 0,141,1,210,141,0,210,141,3,210,141,2,210,141,207,79,1837
6370 DATA 173,191,79,24,201,8,176,21,168,185,110,79,141,196,2,169,1923
6380 DATA 0,141,198,2,141,197,79,141,196,79,32,114,73,172,191,79,1835
6390 DATA 140,184,79,169,4,141,187,79,32,148,75,169,3,141,194,79,1824
6400 DATA 173,200,79,201,2,240,8,169,4,141,195,79,76,217,72,169,2025
6410 DATA 1,141,195,79,169,2,141,252,2,169,40,141,193,79,173,185,1962
6420 DATA 79,24,233,3,168,24,105,4,141,181,79,162,0,185,46,78,1512
6430 DATA 157,0,208,157,135,79,185,78,78,157,139,79,173,191,79,157,2052
6440 DATA 163,79,169,0,157,131,79,157,143,79,157,159,79,200,232,152,2136
6450 DATA 205,181,79,208,216,169,1,141,163,79,160,0,169,0,153,128,2052
6460 DATA 105,153,0,106,153,128,106,153,0,107,153,128,107,200,152,201,1952
6470 DATA 128,208,233,169,1,141,123,79,141,124,79,141,125,79,141,126,2038
6480 DATA 79,169,1,141,127,79,169,0,141,128,79,141,129,79,141,130,1733
6490 DATA 79,96,169,3,141,114,3,169,36,141,116,3,169,64,141,117,1561
6500 DATA 3,169,28,141,122,3,173,181,79,141,123,3,162,48,32,86,1494
6510 DATA 228,96,160,0,185,253,77,24,201,255,240,34,133,85,200,185,2356
6520 DATA 253,77,133,84,169,85,32,221,75,200,185,253,77,133,85,200,2262
6530 DATA 185,253,77,133,84,169,85,32,2,76,200,76,116,73,96,142,1799
6540 DATA 182,79,162,0,160,0,185,167,79,24,105,1,9,16,153,167,1489
6550 DATA 79,201,26,208,11,169,16,153,167,79,200,152,201,6,208,230,2106
6560 DATA 232,24,236,181,79,208,221,174,182,79,32,206,73,96,160,86,2269
6570 DATA 173,48,2,133,180,173,49,2,133,181,177,180,24,105,7,133,1700
6580 DATA 178,200,177,180,133,179,142,182,79,162,5,160,0,189,167,79,2212
6590 DATA 145,178,200,202,152,201,6,208,244,174,182,79,96,160,86,173,2486
6600 DATA 48,2,133,180,173,49,2,133,181,177,180,24,105,45,133,178,1743
6610 DATA 200,177,180,133,179,160,0,169,65,145,178,200,152,201,10,240,2389
6620 DATA 5,205,192,79,208,241,169,0,145,178,96,160,86,173,48,2,1987
6630 DATA 133,180,173,49,2,133,181,177,180,133,178,200,177,180,133,179,2388
6640 DATA 160,0,185,118,78,201,255,240,9,24,233,31,145,178,200,76,2133
6650 DATA 66,74,96,32,194,76,169,0,141,181,79,32,82,73,169,0,1464
6660 DATA 141,198,2,170,157,0,208,157,4,208,157,1,210,157,0,210,1980
6670 DATA 232,224,4,208,239,160,0,185,37,79,24,201,255,240,9,24,2121
6680 DATA 233,31,145,88,200,76,119,74,160,12,162,0,189,167,79,145,1880
6690 DATA 88,136,232,224,6,208,245,32,184,74,160,30,162,0,189,201,2171
6700 DATA 79,145,88,136,232,224,6,208,245,169,255,141,252,2,173,252,2607
6710 DATA 2,201,255,240,249,76,38,64,160,5,185,167,79,24,233,0,1978
6720 DATA 24,217,201,79,176,15,24,105,1,217,201,79,144,6,136,152,1777
6730 DATA 201,255,208,230,96,160,0,185,167,79,153,201,79,200,152,201,2567
6740 DATA 6,208,244,96,162,0,169,0,157,4,208,157,0,208,157,0,1776
6750 DATA 210,157,1,210,232,224,4,208,239,32,54,75,173,194,79,24,2116
6760 DATA 201,0,208,3,238,191,79,173,191,79,24,201,8,144,33,169,1942
6770 DATA 1,141,191,79,160,0,169,200,141,181,79,140,183,79,32,159,1935
6780 DATA 73,172,183,79,200,140,183,79,152,201,5,208,241,238,192,79,2425
6790 DATA 32,127,72,76,44,64,169,175,141,1,210,162,0,165,88,133,1659
6800 DATA 178,165,89,133,179,32,86,75,232,224,16,208,240,169,0,141,2167
6810 DATA 1,210,141,0,210,96,142,182,79,162,0,32,126,75,165,178,1799
6820 DATA 24,109,193,79,133,178,165,179,105,0,133,179,238,199,79,173,2166
6830 DATA 199,79,141,0,210,232,224,79,208,225,174,182,79,96,160,0,2288
6840 DATA 177,178,24,42,145,178,177,178,24,42,145,178,200,152,205,193,2238
6850 DATA 79,208,237,96,169,0,141,185,79,141,186,79,142,182,79,162,2165
6860 DATA 8,10,46,186,79,14,187,79,144,9,24,109,184,79,144,3,1305
6870 DATA 238,186,79,202,208,235,141,185,79,174,182,79,96,142,182,79,2487
6880 DATA 169,0,162,8,14,188,79,42,205,190,79,144,6,237,190,79,1792
6890 DATA 238,188,79,202,208,238,141,189,79,174,182,79,96,141,181,79,2494
6900 DATA 142,182,79,140,183,79,169,11,141,114,3,169,0,141,120,3,1676
6910 DATA 141,121,3,162,48,173,181,79,32,86,228,174,182,79,172,183,2044
6920 DATA 79,96,141,251,2,142,182,79,140,183,79,169,17,141,114,3,1818
6930 DATA 162,48,32,86,228,174,182,79,172,183,79,96,32,194,76,169,1992
6940 DATA 2,141,181,79,32,82,73,169,0,141,198,2,165,88,24,105,1482
6950 DATA 61,133,178,165,89,105,0,133,179,160,0,185,163,78,201,255,2085
6960 DATA 240,9,24,233,31,145,178,200,76,59,76,32,205,76,32,205,1821
6970 DATA 76,32,205,76,32,205,76,32,205,76,169,255,141,181,79,32,1872
6980 DATA 61,65,32,61,65,32,61,65,32,61,65,32,61,65,32,61,851
6990 DATA 65,32,194,76,169,2,141,181,79,32,82,73,169,0,141,198,1634
7000 DATA 2,165,88,24,105,40,133,178,165,89,133,179,160,0,185,218,1864
7010 DATA 78,201,255,240,9,24,233,31,145,178,200,76,142,76,32,194,2114
7020 DATA 76,169,255,141,252,2,173,252,2,24,201,30,240,14,24,201,2056
7030 DATA 31,240,3,76,166,76,169,1,141,200,79,96,169,2,141,200,1790
7040 DATA 79,96,169,12,141,114,3,162,48,32,86,228,96,169,1,141,1577
7050 DATA 196,79,32,180,71,169,2,141,181,79,32,61,65,173,196,79,1736
7060 DATA 201,0,208,238,96,51,242,76,0,106,128,106,0,107,128,107,1794
7070 DATA 128,105,140,92,76,44,28,12,12,12,12,12,4,4,4,4,689
7080 DATA 12,12,28,12,204,124,12,12,12,12,12,4,4,4,4,12,480
7090 DATA 12,28,12,12,28,108,204,12,12,12,4,4,4,4,12,49,517
7100 DATA 58,50,52,56,48,48,48,48,48,32,32,32,32,48,48,56,736
7110 DATA 48,51,62,48,48,48,48,48,32,32,32,32,48,48,56,48,729
7120 DATA 48,56,54,51,48,48,48,32,32,32,32,48,140,92,76,44,881
7130 DATA 28,12,12,12,12,12,10,10,9,9,27,12,28,12,204,124,533
7140 DATA 12,12,12,12,12,10,10,9,9,27,12,28,12,12,28,108,325
7150 DATA 204,12,12,12,10,10,9,9,27,49,58,50,52,56,48,48,666
7160 DATA 48,48,48,80,80,144,144,216,48,56,48,51,62,48,48,48,1217
7170 DATA 48,48,80,80,144,144,216,48,56,48,48,56,54,51,48,48,1217
7180 DATA 48,80,80,144,144,216,128,4,2,8,64,0,10,128,4,32,1092
7190 DATA 2,4,8,4,0,2,1,4,0,128,0,5,0,2,0,64,224
7200 DATA 1,2,4,2,0,2,0,0,0,0,2,0,1,0,128,0,142
7210 DATA 0,1,2,1,0,0,0,0,0,1,0,0,0,0,0,0,5
7220 DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
7230 DATA 0,0,0,0,3,0,6,7,0,7,3,7,6,0,0,159,198
7240 DATA 0,159,0,159,28,159,52,159,78,159,78,0,78,0,78,0,1187
7250 DATA 50,0,30,0,0,40,0,40,40,40,40,80,40,110,78,110,698
7260 DATA 64,100,0,100,40,100,40,130,40,255,192,48,12,3,51,75,1250
7270 DATA 112,176,51,96,160,192,51,58,128,192,51,72,120,128,51,51,1689
7280 DATA 91,154,51,112,160,192,51,51,136,192,51,24,50,72,50,32,1469
7290 DATA 38,38,50,64,64,72,50,32,64,56,50,18,69,64,50,18,797
7300 DATA 18,18,50,58,72,48,50,24,72,50,50,24,24,69,3,12,642
7310 DATA 48,192,1,2,4,8,83,67,79,82,69,58,32,48,48,48,869
7320 DATA 48,48,48,32,32,32,32,32,32,32,32,32,32,32,32,32,560
7330 DATA 32,32,32,32,32,32,32,32,32,32,32,32,32,32,77,69,594
7340 DATA 78,58,255,32,32,32,32,32,77,65,78,73,65,67,33,32,1041
7350 DATA 32,32,32,32,32,32,32,32,32,32,32,32,32,32,66,89,603
7360 DATA 32,32,32,32,32,32,32,32,32,32,32,32,32,82,73,67,638
7370 DATA 75,32,77,69,83,83,78,69,82,255,80,82,69,83,83,32,1332
7380 DATA 49,32,79,82,32,50,32,32,32,32,32,32,32,32,32,32,644
7390 DATA 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,512
7400 DATA 32,32,49,32,45,32,79,78,69,32,80,76,65,89,69,82,941
7410 DATA 32,32,32,32,32,32,50,32,45,32,84,87,79,32,80,76,789
7420 DATA 65,89,69,82,255,83,67,79,82,69,58,32,32,32,32,32,1158
7430 DATA 32,32,32,32,72,73,45,83,67,79,82,69,58,32,32,32,852
7440 DATA 32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,32,512
7450 DATA 32,32,32,32,80,82,69,83,83,32,65,78,89,32,75,69,965
7460 DATA 89,32,84,79,32,67,79,78,84,73,78,85,69,255,0,6,1190
7470 DATA 52,101,199,167,54,162,176,52,49,155,138,27,59,59,1,49,1500
7480 DATA 999

32K Disk revision.

10 REM MANIAC 32K DISK CHANGES
150 ? "INSERT DISK WITH DOS, PRESS RETURN";:DIM IN$(1):INPUT IN$:OPEN #1,8,0,"D:AUTORUN.SYS"
5000 DATA 255,255,6,64,127,79,169,60,141,2,211,169,119,141,231,2,2031
7480 DATA 10,0,11,0,38,64,224,2,225,2,38,64,0,0,0,0,678
7490 DATA 999