LASER
BEAM
For Atari And Commodore 64
Mike Greenfield
For Atari And Commodore 64
Mike Greenfield
This fast-paced arcade game is written entirely in machine language and challenges the quickest reflexes. Originally written for the Atari, the program has been adapted and enhanced for the Commodore 64. The Atari version runs on any 400, 800, XL, or XE with at least 16K RAM. Both versions require a joystick.
The Atari version of "Laser Beam" is a fast-action arcade-style game with a simple premise-you score by moving. The more you move, the more you score. You start off in an arena along with a bouncing ball. If you happen to run into the ball or the arena walls, the game ends.
But watch out! If you haven't collided with anything after half a minute or so, you advance to level 2 and a second bouncing ball appears. If you last a while longer, you reach level 3 and a third ball appears, and so on. Up to five balls can be bouncing around the arena simultaneously. Your score for each move depends on which level you're on. When there's one ball on the screen, you score one point per move; when there's five balls, you score five points.
In early stages of the game, you may not feel motivated to move unless you absolutely have to. So there's one additional challenge-the laser beams. Each side of the arena is guarded by a roving laser. You'll see a red indicator when the laser beam fire sequence has been activated, but the indicator tells you only where the beam will fire, not when. As the game progresses, it becomes more difficult to dodge the laser because the countdown before firing decreases.
Before starting the game, you can select one of ten difficulty options. The program automatically selects option 5. To change this, press the OPTION button. Option 9 is the slowest, and therefore the easiest; option 0 is the fastest.
To freeze the action, press the SELECT button. To continue, press SELECT and START together. After each round, press the START button to start another game. To return to the title screen, press START, SELECT, and OPTION simultaneously.
Entering The Atari Version
Programs 1 and 2 work together to load Laser Beam from BASIC. To fit the game into 16K of RAM, a single BASIC program can't hold all the DATA statements necessary for the machine language and also POKE them into memory.
Four bouncing balls fly wildly about the
screen as the player runs for his life in
the Atari version of "Laser Beam."
Therefore, the DATA statements in Program 1 create a machine language file on disk or tape called LASERBEM.OBJ. (If LASERBEM.OBJ already exists on a disk, Program 1 recognizes this and won't create a new file.) After Program 1 runs, it automatically loads and runs Program 2, assuming you have saved Program 2 with the filename shown in line 220. Program 2 reads the file LASERBEM.OBJ, POKEs the machine language into memory, and then jumps to the starting address to automatically run the game.
Tape users need to make a few modifications to the programs. In Program 1, delete lines 10-90, replace the statements in line 220 with END, and change D: to C: in line 100. In Program 2, change D: to C: in line 100.
After these changes, Program 1 creates a file on tape which Program 2 can load. That means the file created by Program 1 should immediately follow Program 2 on the tape. As Program 2 reads this file, it is normal for the cassette recorder to stop and start and it reads each block.
Commodore 64 Version
Laser Beam on the Commodore 64 is considerably different from the original Atari version. The object is not just to avoid the bouncing balls, but also to grab them at certain times and stuff them into a basket.
Written entirely in machine language, Program 3 must be entered with COMPUTE's "MLX" utility found elsewhere in this issue. Here is the information you'll need:
Starting address: 49152
Ending address: 52699
After you've saved Laser Beam on disk or tape according to the MLX instructions, plug a joystick into port 2 and type LOAD"LASER BEAM",8,1 for disk or LOAD"LASER BEAM",1,1 for tape (assuming you saved the program with the filename LASER BEAM, of course). Then type SYS 49152 and press RETURN.
In this Commodore 64 version of "Laser
Beam," the player has rendered a
bouncing ball harmless by shooting it
with the laser. Now he's carrying it to
the basket.
The Highlight Zone
Move the joystick up or down to select the difficulty level from 0 to 9. Unlike the Atari version, 0 is the slowest and 9 is the fastest (in fact, 9 is so fast that it's almost unplayable!). The game starts when you press the fire button.
Immediately you'll see seven colored balls bouncing around the screen. At the left is a highlighted "safe zone" occupied by a small stick figure-that's you. By moving the joystick, you can maneuver your figure around the screen. But if you venture out of the safe zone and bump into a bouncing ball, you're zapped. (You get three lives per game, as indicated by the figures at the bottom of the screen.)
Your goal is to render the balls harmless, grab them one by one, and drop them into the basket in the lower-right corner. To make a ball safe to touch, you have to shoot it with the laser gun. The laser is visible along the edge of the screen. To control it, first you must move your figure into the uppermost corner of the safe zone. The laser gun is under your control only when your figure is at this spot. Pushing the joystick to the right moves the laser clockwise around the edge of the screen, and pushing the joystick to the left moves the laser counterclockwise around the screen. Press the fire button to activate the beam. If you push the joystick in any other direction, you'll move your figure away from the top of the safe zone, and the laser gun will no longer be under your control.
Now, you can't shoot just any bouncing ball with the laser to make it safe to grab. You have to shoot the ball which matches the border color of the screen. As soon as you hit the ball, it turns white. Then you can maneuver your figure out of the safe zone, grab the white ball by touching it, carry it to the basket, and drop it in by pressing the fire button. Afterward you must scurry back to the safe zone before a collision with another ball.
For example, let's say the border color is red. First you move your figure to the top of the safe zone to take control of the laser gun. Next you push the joystick right or left to aim the laser at the red ball. When you have a clear shot, press the fire button to shoot the beam. If you score a hit, the red ball turns white. Then you can push the joystick in another direction to move your figure out of the safe zone. Grab the ball, stuff it into the basket by pressing the fire button, and make your escape-all while avoiding the other bouncing balls, of course. If you succeed, the border color changes to correspond to one of the remaining balls.
You continue with the process until all the balls are safely dropped into the basket. Then another round begins.
Bouncing Chaos
Sounds simple, right? Well, it's not. There are a few complications. Suppose you fire the laser and hit a bouncing ball that doesn't match the border color. It turns white, too. But it isn't safe to grab. If you touch it, you're zapped. This becomes a real problem when you accidentally shoot several of the balls and turn them white. Only one of them is safe, and you have to remember which one. It's not easy when three or more white balls are bopping all over the place.
There is an incentive for creating this chaos, however. The number of points you get for dropping a ball in the basket doubles for each white ball on the screen. If the only white ball is the one you're grabbing, you get only 5 points. If a second ball is white, you get 10 points; if a third ball is white, you get 20 points; and so on. If all seven balls are white when you drop the first one into the basket, you score 320 points.
Another complication is that your safe zone doesn't always stay safe for very long. After you shoot the ball that matches the border color, it begins shrinking from the bottom up. If you don't hurry out, you'll get zapped.
And there's yet another reason to move quickly: If you finish a round by dropping every ball into the basket before the horizontal bar at the bottom of the screen disappears, you get a 50-point bonus.
If all this action causes your brain to momentarily suffer a system crash, you can freeze everything by pressing and holding the SHIFT key. Press SHIFT LOCK tc freeze the game for extended periods. Release SHIFT to resume play.
For instructions on entering these listings,
please refer to "COMPUTEI's Guide to Typing
In Programs" published bimonthly in COMPUTE!.
Program 1: Atari Laser
Beam, Main Program
AB 10 TRAP 90
OG 20 OPEN 01,4,0,"D:LASERBE
M.OBJ"
CN 30 CLOSE 01
DB 40 BOTO 220
DD 90 CLOSE 01
BJ 100 OPEN 01,8,0,"D:LASERB
EM.OBJ"
JD 110 READ NUMBEROFBYTES
ME 115 READ SUMOFBYTES
EL 120 N=0:S=0:TRAP 200
PB 130 READ A
EP 140 PUT #1,A
FE 150 N=N+1:S=S+A
GE 160 GOTO 130
FM 200 CLOSE #1
FF 210 IF N<>NUMBEROFBYTES T
HEN PRINT "ERROR IN N
UMBER OF BYTES ":STOP
LH 215 IF S<>SUMOFBYTES THEN
PRINT "ERROR IN SUM
OF BYTES ":STOP
BA 220 RUN "D:LOADLSR.BAS"
EC 10005 DATA 2440,265870
NI 10010 DATA 255,255,0,40,1
19,45,255,255,255,2
55
AB 10020 DATA 255,255,255,25
5,0,0,0,255,255,0
CK 10030 DATA 0,0,24,24,24,2
4,24,24,24,24
MM 10040 DATA 16,124,84,84,4
0,40,40,108,0,24
GF 10050 DATA 60,126,126,60,
24,0,83,46,0,0
HN 10060 DATA 0,0,0,0,0,0,0,
0,0,0
DG 10070 DATA 5,15,13,169,0,
133,203,169,51,133
DJ 10080 DATA 204,165,190,13
3,195,165,195,201,0
,208
DJ 10090 DATA 1,96,162,0,160
,0,177,203,149,214
FF 10100 DATA 232,200,224,6,
208,246,160,0,162,0
II 10110 DATA 134,240,134,24
1,165,214,133,220,1
65,215
IM 10120 DATA 133,221,165,21
6,133,222,165,217,1
41,116
DC 10130 DATA 40,32,0,50,169
,129,193,220,240,6
KF 10140 DATA 169,133,193,22
0,208,9,32,71,41,22
8
C6 10150 DATA 216,240,2,133,
241,165,214,133,220
,165
JE 10160 DATA 215,133,221,16
5,218,133,222,165,2
19,141
JN 10170 DATA 157,40,32,0 50
,169,129,193,220,24
0
EI 10180 DATA 6,169,133,193,
220,208,9,32,85,41
CM 10190 DATA 228,218,240,2,
133,241,165,214,133
,220
JB 10200 DATA 165,215,133,22
1,165,216,133,222,1
65,217
JE 10216 DATA 141,198,40,32,
0,50,165,218,133,22
2
JG 10220 DATA 165,219,141,21
0,40,32,0,50,169,12
9
AF 10230 DATA 193,220,240,6,
169,133,193,220,208
,19
AF 10240 DATA 32,71,41,32,85
,41,133,241,169,1
NO 10250 DATA 197,240,240,40
,133,240,76,98,40,1
69
CL 10260 DATA 133,145,220,16
9,0,145,214,165,241
,201
CL 10270 DATA 0,240,3,32,37,
41,165,220,133,214
IK 10280 DATA 165,221,133,21
5,181,214,145,203,2
32,200
BH 10290 DATA 224,6,208,246,
32,56,41,24,169,6
AO 10300 DATA 101,203,133,20
3,198,195,76,69,40,
169
IL 10319 DATA 0,141,31,208,1
62,51,160,51,136,14
1
MM 10320 DATA 31,208,208,250
,202,208,245,96,162
,0
LP 10330 DATA 160,0,200,192,
40,208,251,232,224,
80
BD 10340 DATA 208,244,96,169
,160,197,217,240,3,
133
FO 10350 DATA 217,96,169,176
,133,217,96,169,160
,197
BI 10360 DATA 219,240,3,133,
219,96,169,176,133,
219
CF 10370 DATA 96,72,162,96,1
69,12,157,66,3,32
GD 10380 DATA 86,228,162,96,
169,3,157,66,3,169
BN 10390 DATA 40,157,68,3,16
9,40,157,69,3,104
NH 10400 DATA 157,75,3,41,24
0,73,16,9,12,157
BJ 10410 DATA 74,3,32,86,228
,96,162,0,169,224
KN 10420 DATA 141,158,41,169
,48,141,161,41,189,
0
BJ 10430 DATA 224,157,0,48,2
32,224,0,208,245,24
NK 10440 DATA 173,161,41,105
,1,141,161,41,173,1
58
NE 10450 DATA 41,105,1,141,1
58,41,201,226,208,2
24
EF 10460 DATA 169,48,141,244
,2,162,8,160,0,185
DF 10470 DATA 0,40,157,0,48,
232,200,224,47,208
NM 10480 DATA 244,96,169,0,1
33,203,169,52,133,2
04
MN 10490 DATA 216,162,0,160,
0,177,203,149,214,2
32
CO 10500 DATA 200,224,6,208,
246,165,214,201,255
,208
JG 10510 DATA 6,165,215,201,
255,240,64,162,0,16
0
BC 10520 DATA 0,196,217,240,
5,177,216,76,4,42
DE 10530 DATA 165,216,145,21
4,232,228,218,240,3
2,24
CJ 10540 DATA 165,219,101,21
4,133,214,169,0,101
,215
DB 10550 DATA 133,215,196,21
7,240,221,169,1,101
,216
AL 10560 DATA 133,216,169,0,
101,217,133,217,76,
249
KA 10570 DATA 41,24,169,6,10
1,203,133,203,76,21
9
BH 10580 DATA 41,96,162,0,16
0,0,165,206,133,220
PE 10590 DATA 165,207,133,22
1,173,120,2,201,14,
240
IA 10600 DATA 21,201,13,240,
29,201,11,240,37,20
1
HM 10610 DATA 7,240,45,169,0
,133,222,169,176,76
HB 10620 DATA 142,42,169,20,
133,222,32,9,44,169
BO 10630 DATA 160,76,142,42,
169,20,133,222,32,9
KP 10640 DATA 44,169,176,76,
142,42,169,1,133,22
2
BK 10650 DATA 32,9,44,169,16
0,76,142,42,169,1
HO 10660 DATA 133,222,32,9,4
4,169,176,76,142,42
MF 10670 DATA 141,146,42,32,
0,50,162,0,160,0
HJ 10680 DATA 169,129,193,22
0,240,27,169,133,19
3,220
KD 10690 DATA 240,21,169,0,1
45,206,169,4,145,22
0
CO 10700 DATA 165,220,133,20
6,165,221,133,207,1
69,0
OD 10710 DATA 133,240,96,169
,255,133,240,96,169
,0
NP 10720 DATA 133,240,197,18
1,240,5,198,181,76,
12
JD 10730 DATA 43,173,10,210,
141,45,40,24,101,18
8
AL 10740 DATA 144,3,76,143,4
3,173,45,40,41,31
GN 10750 DATA 201,17,16,233,
173,45,40,41,31,168
HE 10760 DATA 165,177,133,22
0,165,178,133,221,1
69,20
JH 10770 DATA 192,0,240,10,1
33,222,32,176,50,13
6
ED 10780 DATA 192,0,208,248,
165,220,133,179,165
,221
EK 10790 DATA 133,180,165,18
9,133,181,169,193,1
60,0
EF 10800 DATA 145,179,165,18
1,201,0,208,119,165
,179
CL 10810 DATA 133,220,165,18
0,133,221,169,2,133
,222
MN 10820 DATA 32,0,30,169,1,
133,222,160,0,76
AC 10830 DATA 51,43,32,0,50,
169,4,209,220,2 40
ED 10840 DATA 22,169,129,209
,220,240,27,169,133
,209
PN 10850 DATA 220,240,21,165
,183,145,220,32,216
,44
LF 10860 DATA 76,48,43,169,2
55,133,240,169,0,13
3
LF 10870 DATA 181,76,143,43,
32,56,41,165,179,13
3
AA 10880 DATA 220,165,180,13
3,221,169,2,133,222
,32
AC 10890 DATA 0,50,169,1,133
,222,160,0,76,120
GG 10900 DATA 43,32,0,50,169
,129,209,220,240,13
NC 10910 DATA 169,133,209,22
0,240,7,169,0,145,2
20
DA 10920 DATA 76,117,43,169,
129,145,179,96,169,
128
AF 10930 DATA 133,203,169,51
,133,204,164,176,16
2,1
GO 10940 DATA 177,203,149,17
6,232,200,224,12,20
8,246
EB 10950 DATA 96,165,182,141
,223,42,165,186,141
,241
NJ 10960 DATA 42,165,184,141
,40,43,141,109,43,1
65
AK 10970 DATA 185,141,33,43,
141,102,43,165,187,
141
KH 10980 DATA 37,43,141,106,
43,141,49,43,141,11
8
BJ 10990 DATA 43,96,169,128,
133,203,169,51,133,
204
CL 11000 DATA 164,176,162,1,
181,176,145,203,232
,200
MP 11010 DATA 224,12,208,246
,96,165,197,201,0,2
40
BO 11020 DATA 13,201,1,240,1
4,201,2,240,15 169
IH 11030 DATA 33,76,6,44,169
,0,76,6,44,169
BH 11040 DATA 11,76,6,44,169
,22,133,176,96,24
GG 11050 DATA 248,173,43,40,
109,51,40,141,43,40
CP 11060 DATA 173,44,40,105,
0,141,44,40,173,43
KD 11070 DATA 40,141,45,40,1
69,84,141,152,44,17
3
DM 11080 DATA 55,40,141,153,
44,32,70,44,173 44
KD 11090 DATA 40,141,45,40,1
69,82,141,152,44,17
3
DK 11100 DATA 55,40,141,153,
44,32,70,44 216,96
DE 11110 DATA 160,0,248,169,
0,141,46,40,141,47
MC 11120 DATA 40,14,45,40,12
1,46,40,10,14,45
PD 11130 DATA 40,121,46,40,1
0,14,45,40,121 46
PJ 11140 DATA 40,10,14,45,40
,121,46,40,153 46
LG 11150 DATA 40,78,45,40,78
,45,40,78,45,40
DM 11160 DATA 78,45,40,200,1
73,45,40,153,46,40
BD 11170 DATA 173,46,40,9,16
,141,46,40,173,47
NJ 11180 DATA 40,9,16,141,47
,40,160,0,185,46
AD 11190 DATA 40,153,0,0,200
,192,2,208,245,96
MM 11200 DATA 169,160,141,1,
210,166,194,32,207,
44
MM 11210 DATA 24,105,1,201,1
76,208,241,169,14,1
66
KL 11220 DATA 195,32,207,44,
56,233,1,208,246,16
9
KC 11230 DATA 175,141,1,210,
166,196,32,207,44,5
6
NE 11240 DATA 233,1,201,159,
208,241,96,160,19,1
36
BE 11250 DATA 208,253,202,20
8,248,96,169,1,133,
194
KC 11260 DATA 141,163,44,141
,192,44,169,64,141,
0
NL 11270 DATA 210,169,4,133,
195,169,1,133,196,1
40
EP 11280 DATA 48,40,32,160,4
4,172,48,40,96,169
OA 11290 DATA 2,133,194,133,
195,133,196,169,3,1
41
MK 11300 DATA 163,44,141,192
,44,165,192,141,2,2
10
DO 11310 DATA 140,48,40,32,1
60,44,172,48,40,96
KD 11320 DATA 173,54,40,141,
45,40,169,94,141,15
2
DK 11330 DATA 44,173,55,40,1
41,153,44,32,70,44
LB 11340 DATA 216,96,169,24,
141,196,2,169,15,14
1
LF 11350 DATA 197,2,169,114,
141,198,2,169,48,14
1
HP 11360 DATA 199,2,96,165,8
9,41,240,141,111,45
DI 11370 DATA 162,0,160,0,16
9,0,133,203,169,55
GB 11380 DATA 133,204,177,20
3,201,255,240,27,14
1,108
AA 11390 DATA 45,141,113,45,
200,177,203,141,109
,45
JP 11400 DATA 141,114,45,173
,255,255,9,0,141,25
5
HL 11410 DATA 255,200,76,86,
45,96,160,50,174,50
GB 11420 DATA 216,56,165,220
,229,222,133,220,16
5,221
AJ 11430 DATA 229,223,133,22
1,96,176,50,190,50,
216
EN 11440 DATA 24,165,220,101
,222,133,220,165,22
1,101
FJ 11450 DATA ZZ3,133,ZZl,96
,0,51,101,51,220,13
OL 11460 DATA 1,160,0,160,22
1,13,1,160,20,160
AI 11470 DATA 198,14,0,160,2
0,160,89,14,1,160
PJ 11480 DATA 20,160,16,14,0
,160,20,160,28,15
MI 11490 DATA 1,160,0,160,95
,14,1,160,20,160
ON 11500 DATA 243,13,1,160,2
0,160,22,15,1,160
CM 11510 DATA 20,160,194,14,
1,160,0,160,195,13
MC 11520 DATA 1,160,0,160,69
,14,0,160,20,160
PE 11530 DATA 39,14,1,160,20!
,160,140,14,1,160
FH 11540 DATA 20,160,203,14,
1,160,20,160,247,14
AL 11550 DATA 1,160,20,160,2
55,255,255,255,255,
255
KC 11560 DATA 128,51,182,51,
188,13,0,0,0,17
PN 11570 DATA 66,1,2,20,176,
150,13,0,0,0
GK 11580 DATA 15,67,20,40,1,
176,207,13,0,0
AJ 11590 DATA 0,17,66,1,2,20
,160,58,15,0
FK 11600 DATA 0,0,15,67,20,4
0,1,160,213,14
BE 11610 DATA 0,0,0,6,66,1,2
,20,176,0
NK 11620 DATA 52,89,52,128,1
3,129,0,20,1,148
JF 11630 DATA 13,129,0,20,1,
168,13,129,0,20
BB 11640 DATA 1,188,13,129,0
,18,20,189,13,129
MK 11650 DATA 0,18,20,206,13
,129,0,18,20,207
JM 11660 DATA 13,129,0,18,20
,36,15,129,0,20
HF 11670 DATA 1,56,15,129,0,
20,1,76,15,129
ND 11680 DATA 0,20,1,128,13,
0,53,5,1,76
AO 11690 DATA 15,5,53,5,1,13
6,13,10,53,7
LC 11700 DATA 1,88,15,27,53,
6,1,255,255,255
BE 11710 DATA 255,255,255,0,
53,32,53,44,37,54
KK 11720 DATA 37,44,51,35,47
,50,37,40,41,51
HH 11730 DATA 35,47,50,37,44
,33,51,37,50,0
LL 11740 DATA 34,37,33,45,47
,48,52,41,47,46
GP 11750 DATA 0,54,41,54,157
,14,17,53,10,1
MM 11760 DATA 213,14,129,0,6
,20,214,14,129,0
KF 11770 DATA 6,20,228,14,12
9,0,6,20,229,14
MN 11780 DATA 129,0,6,20,250
,14,4,0,1,1
MF 11790 DATA 255,255,255,25
5,255,255,0,55,89,5
5
DL 11800 DATA 1,51,7,51,13,5
1,19,51,25,51
KL 11810 DATA 31,51,37,51,43
,51,49,51,55,51
LL 11820 DATA 61,51,67,51,73
,51,79,51,85,51
GM 11830 DATA 91,51,129,51,1
40,51,151,51,162 51
HH 11840 DATA 173,51,1,52,7,
52,13,52,19,52
LB 11850 DATA 25,52,31,52,37
,52,43,52,49,52
MB 11860 DATA 55,52,61,52,67
,52,73,52,79,52
FB 11870 DATA 1,54,7,54,13,5
4,19,54,25,54
BN 11880 DATA 31,54,37,54,55
,40,56,40,255,2 55
PH 11890 DATA 0,56,167,57,16
9,17,32,99,41,32
PP 11900 DATA 144,41,32,46,4
5,32,210,41,32,24
BL 11910 DATA 45,56,173,44,4
0,237,53,40,48,28
NK 11920 DATA 201,0,240,3,76
,42,56,56,173,52
DF 11930 DATA 40,237,43,40,1
6,12,173,43,40,141
DL 11940 DATA 52,40,173,44,4
0,141,53,40,173,52
NJ 11950 DATA 40,141,45,40,1
69,146,141,152,44,1
73
EE 11960 DATA 56,40,141,153,
44,32,70,44,173,53
NJ 11970 DATA 40,141,45,40,1
69,144,141,152,44,1
73
HM 11980 DATA 56,40,141,153,
44,32,70,44,216,169
HK 11990 DATA 0,133,197,165,
197,201,4,240,18,32
GB 12000 DATA 231,43,32,144,
43,169,0,133,181,32
OI 12010 DATA 208,43,230,197
,76,99,56,169,240,1
33
EB 12020 DATA 206,173,56,40,
133,207,169,255,133
,188
NI 12030 DATA 169,32,133,189
,169,1,133,190,141,
51
AG 12040 DATA 40,169,0,133,1
97,133,192,133,193,
141
AE 12050 DATA 43,40,141,44,4
0,32,28,44,24,165
AG 12060 DATA 197,105,1,201,
4,208,7,169,0,133
LD 12070 DATA 197,76,182,56,
133,197,32,231,43,3
2
KM 12080 DATA 144,43,32,167,
43,32,190,42,169,25
5
NL 12090 DATA 197,240,240,12
5,169,0,133,77,32,2
08
NJ 12100 DATA 43,32,57,40,16
9,255,197,240,240,1
09
MO 12110 DATA 32,54,42,169,2
55,197,240,240,100,
32
HO 12120 DATA 249,44,169,5,2
05,31,208,208,7,169
AC 12130 DATA 4,205,31,208,2
08,249,165,192,133,
220
AE 12140 DATA 165,193,133,22
1,169,1,133,222,32,
176
GI 12150 DATA 50,165,220,133
,192,165,221,133,19
3,165
NH 12160 DATA 192,201,0,208,
39,230,190,24,165,1
88
BL 12170 DATA 233,10,133,188
,198,189,24,248,173
,51
DA 12180 DATA 40,105,1,141,5
1,40,141,45,40,169
NB 12190 DATA 133,141 152 44
,173,56,40,141,153,
44
DD 12200 DATA 32,70,44,216,1
65,192,201,0,208,6
KL 12210 DATA 165,193,201,16
,240,3,76,164,56,16
9
OB 12220 DATA 6,205,31,208,2
40,3,76,82,57,76
NI 12230 DATA 0,56,169,0,205
,31,208,208,3,76
EB 12240 DATA 3,58,169,3,205
,31,208,208,226,24
GJ 12250 DATA 248,173,54,40,
105,1,216,141,54,40
DI 12260 DATA 201,16,208,5,1
69,0,141,54,40,173
AK 12270 DATA 54,40,141,45,4
0,32,24,45,173,54
NM 12280 DATA 40,201,0,208,5
,169,1,76,144,57
CL 12290 DATA 10,10,10,10,14
1,67,41,24,162,255
HA 12300 DATA 160,255,192,0,
240,4,136,76,152,57
AP 12310 DATA 202,224,0,208,
241,76,69,57,0,58
EL 12320 DATA 126,58,32,67,4
5,32,144,41,169,18
BG 12330 DATA 32,99,41,32,14
4,41,32,46,45,169
JH 12340 DATA 0,133,203,169,
54,133,204,32,218,4
1
FM 12350 DATA 169,246,133,18
8,169,60,133,189,16
9,44
GP 12360 DATA 133,176,169,0,
162,0,160,0,192,255
HE 12370 DATA 240,4,200,76,4
6,58,224,255,240,34
GH 12380 DATA 232,141,50,40,
142,49,40,140,48,40
DO 12390 DATA 32,144,43,32,1
67,43,32,190,42,32
HF 12400 DATA 208,43,173,50,
40,174,49,40,172,48
JO 12410 DATA 40,76,44,58,20
1,5,240,5,105,1
CB 12420 DATA 76,42,58,169,1
7,32,99,41,32,144
AC 12436 DATA 41,32,46,45,32
,210,41,173,54,40
LA 12440 DATA 141,45,40,32,2
4,45,76,69,57,0
Program 2: Atari Laser
Beam, Loader Program
BF 100 OPEN •1,4,0,"D:LASERB
EM.OBJ"
DH 110 GET #1,X:GET #1,X
FN 120 TRAP 210
JO 130 GET #1,STARTLO:GET #1
,STARTHI:GET #1,LASTL
O:GET #1,LASTHI
JK 140 START=STARTLO+256*STA
RTHI
IN 150 LAST=LASTLO+256*LASTH
I
GJ 160 FOR I=START TO LAST
FA 170 GET #1,X
JF 180 POKE I,X
CC 190 NEXT I
FP 200 GOTO 130
IA 210 CLOSE #1:X=USR(14848)
GL 220 END
Program 3: Commodore 64
Laser Beam
Version by Kevin Mykytyn, Editorial
Programmer
Please refer to the "MLX" article in this issue
before entering the following listing.
49152 :169,004,141,181,002,032,017
49158 :058,197,032,204,196,169,094
49164 :000,141,021,208,169,147,186
49170 :032,210,255,169,000,141,057
49176 :033,208,141,032,208,169,047
49182 :046,141,160,206,133,010,214
49188 :032,202,204,162,009,160,037
49194 :017,024,032,240,255,169,011
49200 :221,160,204,032,030,171,098
49206 :169,109,141,160,206,133,204
49212 :010,032,202,204,162,012,170
49218 :160,018,024,032,240,255,027
49224 :169,233,160,204,032,030,132
49230 :171,162,011,165,162,197,178
49236 :162,240,252,202,208,247,115
49242 :173,181,002,009,048,141,132
49248 :112,006,173,000,220,074,169
49254 :176,010,174,181,002,224,101
49260 :009,240,003,238,181,002,013
49266 :074,176,008,174,181,002,217
49272 :240,248,206,181,002,074,047
49278 :074,074,176,205,173,181,241
49284 :002,041,015,141,181,002,002
49290 :169,003,141,179,002,169,033
49296 :000,141,185,002,141,186,031
49302 :002,169,010,056,237,181,037
49308 :002,010,133,079,133,078,079
49314 :169,007,141,178,002,032,179
49320 :226,202,032,025,199,032,116
49326 :204,196,032,070,195,169,016
49332 :020,141,183,002,032,123,169
49338 :199,172,179,002,200,169,083
49344 :032,153,223,007,136,169,144
49350 :040,153,223,007,169,007,029
49356 :153,223,219,136,208,243,106
49362 :032,169,197,165,162,197,108
49368 :162,240,252,173,030,208,001
49374 :173,031,208,032,169,197,008
49380 :198,065,208,021,165,066,183
49386 :133,065,032,231,197,032,156
49392 :133,204,032,069,205,169,028
49398 :000,141,180,002,032,072,161
49404 :193,198,078,208,007,165,077
49410 :079,133,078,032,194,195,201
49416 :234,032,031,193,032,095,113
49422 :203,032,055,204,173,141,054
49428 :002,240,202,173,141,002,012
49434 :208,251,076,225,192,162,116
49440 :002,173,031,208,074,074,082
49446 :144,026,072,189,038,208,203
49452 :041,015,201,001,240,015,045
49458 :169,001,157,038,208,202,057
49464 :228,167,208,004,169,024,088
49470 :133,169,232,104,232,224,132
49476 :009,208,222,096,165,010,010
49482 :208,003,076,022,194,173,238
49488 :180,002,208,008,032,236,234
49494 :198,144,003,076,026,194,215
49500 :165,083,208,045,174,160,159
49506 :206,189,000,207,133,170,235
49512 :133,251,189,128,207,133,121
49518 :171,133,252,189,000,206,037
49524 :133,084,074,144,008,169,216
49530 :064,133,149,169,036,208,113
49536 :006,169,066,133,149,169,052
49542 :022,133,147,133,148,133,082
49548 :083,165,084,201,035,176,116
49554 :023,201,033,208,004,169,016
49560 :001,208,002,169,040,024,084
49566 :101,170,133,170,165,171,044
49572 :105,000,133,171,208,025,038
49578 :201,036,240,004,169,001,053
49584 :208,002,169,040,133,016,232
49590 :165,170,056,229,016,133,183
49596 :170,165,171,233,000,133,036
49602 :171,165,149,160,000,145,216
49608 :170,165,170,024,105,000,066
49614 :133,253,165,171,105,212,221
49620 :133,254,169,010,160,000,170
49626 :145,253,169,128,141,011,041
49632 :212,169,008,141,012,212,210
49638 :165,147,024,105,010,010,179
49644 :141,008,212,169,129,141,012
49650 :011,212,198,147,208,030,024
49656 :165,149,201,032,240,018,029
49662 :169,032,133,149,165,251,129
49668 :133,170,165,252,133,171,004
49674 :165,148,133,147,208,006,049
49680 :169,000,133,010,133,083,032
49686 :096,076,212,194,169,000,001
49692 :133,010,166,166,189,150,074
49698 :003,201,002,144,240,173,029
49704 :080,003,240,235,173,060,063
49710 :003,201,055,208,228,173,146
49716 :070,003,201,214,144,221,137
49722 :138,072,032,023,195,104,110
49728 :170,169,026,133,169,134,097
49734 :016,162,000,160,006,185,087
49740 :040,208,041,015,201,001,070
49746 :208,001,232,136,016,243,150
49752 :189,050,197,024,109,185,074
49758 :002,141,185,002,173,186,015
49764 :002,105,000,141,186,002,024
49770 :032,120,205,166,016,169,046
49776 :255,157,070,003,206,178,213
49782 :002,208,080,169,000,141,206
49788 :021,208,169,147,032,210,143
49794 :255,162,010,160,015,024,244
49800 :032,240,255,032,213,194,078
49806 :169,032,160,205,032,030,002
49812 :171,173,183,002,010,133,052
49818 :016,010,010,024,101,016,075
49824 :170,072,169,000,032,205,040
49830 :189,104,024,109,185,002,011
49836 :141,185,002,173,186,002,093
49842 :105,000,141,186,002,169,013
49848 :000,133,162,165,162,201,239
49854 :120,208,250,104,104,238,190
49860 :181,002,076,151,192,032,062
49866 :035,195,169,001,157,150,141
49872 :003,032,255,194,096,169,189
49878 :020,141,004,212,141,011,231
49884 :212,169,010,141,005,212,201
49890 :141,012,212,173,181,002,179
49896 :010,024,105,005,141,001,006
49902 :212,169,035,141,008,212,247
49908 :169,017,141,004,212,169,188
49914 :021,141,011,212,096,230,193
49920 :168,166,168,189,249,199,115
49926 :134,167,141,032,208,160,080
49932 :007,185,249,199,153,039,076
49938 :208,136,016,247,096,162,115
49944 :024,160,005,138,032,165,036
49950 :204,202,208,247,096,169,132
49956 :020,141,011,212,173,178,003
49962 :002,024,105,004,141,001,063
49968 :212,173,179,002,010,010,122
49974 :010,010,141,008,212,169,092
49980 :012,141,012,212,169,021,115
49986 :141,011,212,096,238,160,156
49992 :206,173,160,206,201,122,116
49998 :208,017,169,000,141,160,005
50004 :206,240,010,206,160,206,088
50010 :016,005,169,121,141,160,190
50016 :206,173,160,206,168,032,017
50022 :111,195,185,000,206,032,063
50028 :156,195,096,173,155,195,054
50034 :201,025,176,005,238,155,146
50040 :195,208,005,169,005,141,075
50046 :155,195,169,020,141,011,049
50052 :212,169,007,141,001,212,106
50058 :173,155,195,141,008,212,254
50064 :169,038,141,012,212,169,117
50070 :021,141,011,212,096,005,124
50076 :072,173,160,206,168,185,096
50082 :000,207,133,004,185,128,051
50088 :207,133,005,104,160,000,009
50094 :145,004,165,004,024,105,109
50100 :000,133,004,165,005,105,080
50106 :212,133,005,169,007,145,089
50112 :004,096,162,007,189,150,032
50118 :003,240,003,076,131,196,079
50124 :189,070,003,201,055,208,162
50130 :005,254,070,003,208,007,245
50136 :201,215,208,017,222,070,125
50142 :003,189,100,003,073,001,079
50148 :157,100,003,032,138,196,086
50154 :032,183,196,189,060,003,129
50160 :201,055,208,010,189,080,215
50166 :003,208,005,254,060,003,011
50172 :208,015,189,060,003,201,160
50178 :055,208,022,189,080,003,047
50184 :240,017,222,060,003,189,227
50190 :090,003,073,001,157,090,172
50196 :003,032,138,196,032,183,092
50202 :196,189,090,003,208,029,229
50208 :189,130,003,024,125,110,101
50214 :003,157,130,003,189,060,068
50220 :003,105,000,157,060,003,116
50226 :189,080,003,105,000,157,072
50232 :080,003,076,087,196,189,175
50238 :130,003,056,253,110,003,105
50244 :157,130,003,189,060,003,098
50250 :233,000,157,060,003,189,204
50256 :080,003,233,000,157,080,121
50262 :003,189,100,003,208,021,098
50268 :189,140,003,024,125,120,181
50274 :003,157,140,003,189,070,148
50280 :003,105,000,157,070,003,186
50286 :076,131,196,189,140,003,077
50292 :056,253,120,003,157,140,077
50298 :003,189,070,003,233,000,108
50304 :157,070,003,202,240,003,035
50310 :076,196,195,096,032,167,128
50316 :196,024,125,110,003,201,031
50322 :100,144,003,157,110,003,151
50328 :032,167,196,024,125,120,048
50334 :003,201,150,144,003,157,048
50340 :120,003,096,173,027,212,027
50346 :041,031,172,027,212,016,157
50352 :005,073,255,024,105,001,127
50358 :096,169,128,141,004,212,164
50364 :169,064,141,005,212,169,180
50370 :020,141,001,212,169,129,098
50376 :141,004,212,096,032,084,001
50382 :204,169,000,133,012,133,089
50388 :010,133,083,169,009,133,237
50394 :064,141,170,002,169,128,124
50400 :141,015,212,141,018,212,195
50406 :169,008,133,065,133,066,036
50412 :169,003,141,184,002,169,136
50418 :007,141,167,002,141,168,100
50424 :002,160,007,032,042,197,176
50430 :153,110,003,032,042,197,023
50436 :153,120,003,173,027,212,180
50442 :041,001,153,090,003,173,215
50448 :027,212,041,001,153,100,038
50454 :003,136,208,225,169,009,004
50460 :133,164,169,000,133,168,027
50466 :032,255,194,169,001,133,050
50472 :063,096,173,027,212,201,044
50478 :150,144,249,096,000,005,178
50484 :010,020,040,080,120,160,226
50490 :162,255,169,003,133,002,014
50496 :169,004,133,003,169,034,064
50502 :032,154,197,230,002,165,082
50508 :002,201,040,208,243,198,200
50514 :002,169,035,032,154,197,159
50520 :165,002,024,105,040,133,045
50526 :002,165,003,105,000,133,246
50532 :003,165,002,201,231,208,142
50538 :232,169,191,133,002,169,234
50544 :036,032,154,197,198,002,219
50550 :165,002,201,154,208,243,067
50556 :230,002,169,033,032,154,232
50562 :197,165,002,056,233,040,055
50568 :133,002,165,003,233,000,160
50574 :133,003,201,003,208,234,156
50580 :169,020,141,160,206,096,172
50586 :232,157,000,206,165,002,148
50592 :157,000,207,165,003,157,081
50598 :128,207,096,169,000,133,131
50604 :016,162,007,160,014,189,208
50610 :150,003,201,002,208,018,248
50616 :173,060,003,157,060,003,128
50622 :173,070,003,157,070,003,154
50628 :173,080,003,157,080,003,180
50634 :189,080,003,074,038,016,090
50640 :189,060,003,153,000,208,053
50646 :189,070,003,153,001,208,070
50652 :136,136,202,016,208,165,059
50658 :016,141,016,208,096,169,104
50664 :000,133,006,160,000,165,184
50670 :083,240,001,096,173,000,063
50676 :220,074,176,015,174,070,205
50682 :003,224,055,240,008,206,218
50688 :070,003,162,001,134,006,120
50694 :200,074,176,015,174,070,203
50700 :003,224,215,240,008,238,172
50706 :070,003,162,002,134,006,139
50712 :200,074,176,059,032,236,033
50718 :198,176,015,208,052,072,239
50724 :169,032,032,156,195,032,140
50730 :087,195,104,076,087,198,021
50736 :174,090,003,208,007,174,182
50742 :060,003,224,025,240,027,121
50748 :072,173,060,003,056,233,145
50754 :001,141,060,003,173,080,012
50760 :003,233,000,141,080,003,020
50766 :192,000,208,004,169,003,142
50772 :133,006,104,074,176,059,124
50778 :032,236,198,176,015,208,187
50784 :052,072,169,032,032,156,097
50790 :195,032,070,195,104,076,006
50796 :149,198,174,080,003,240,184
50802 :007,174,060,003,224,055,125
50808 :240,027,072,173,060,003,183
50814 :024,105,001,141,060,003,204
50820 :173,080,003,105,000,141,122
50826 :080,003,192,000,208,004,113
50832 :169,004,133,006,104,074,122
50838 :176,004,169,001,133,010,131
50844 :165,006,208,010,166,063,006
50850 :189,016,199,141,248,007,194
50856 :208,063,198,064,208,048,189
50862 :169,009,133,064,165,012,214
50868 :073,001,133,012,169,064,120
50874 :141,004,212,165,006,205,151
50880 :131,204,240,008,141,131,023
50886 :204,169,000,141,132,204,024
50892 :238,132,204,173,132,204,007
50898 :024,105,005,010,141,001,240
50904 :212,169,065,141,004,212,251
50910 :165,012,166,006,024,125,208
50916 :020,199,141,248,007,134,209
50922 :063,096,174,060,003,224,086
50928 :025,208,028,174,070,003,236
50934 :224,055,208,021,174,080,240
50940 :003,208,016,206,167,002,086
50946 :208,008,174,168,002,142,192
50952 :167,002,162,000,024,144,251
50958 :001,056,096,204,207,211,021
50964 :213,205,208,210,212,169,213
50970 :147,032,210,255,169,000,071
50976 :141,033,208,169,011,141,223
50982 :032,208,169,024,133,016,108
50988 :169,105,160,199,032,030,227
50994 :171,198,016,208,245,160,024
51000 :037,152,153,191,007,169,253
51006 :001,153,191,219,200,192,250
51012 :040,208,242,162,019,169,140
51018 :160,157,192,007,169,010,001
51024 :157,192,219,202,016,243,085
51030 :162,024,160,020,024,032,252
51036 :240,255,169,112,160,199,203
51042 :032,030,171,032,120,205,176
51048 :096,030,018,032,032,032,088
51054 :013,000,159,018,083,067,194
51060 :079,082,069,146,032,048,060
51066 :000,160,000,185,034,200,189
51072 :153,000,051,185,034,201,240
51078 :153,000,052,185,034,202,248
51084 :153,000,053,136,208,235,157
51090 :169,255,141,021,208,169,085
51096 :007,168,056,237,178,002,032
51102 :133,016,185,249,199,153,069
51106 :039,208,185,001,200,153,182
51114 :248,007,173,001,200,141,172
51120 :248,007,185,009,200,153,210
51126 :060,003,173,009,200,141,000
51132 :060,003,185,017,200,153,038
51138 :070,003,173,017,200,141,030
51144 :070,003,185,025,200,153,068
51150 :080,003,169,000,141,080,167
51156 :003,169,000,153,150,003,178
51162 :141,150,003,136,196,016,092
51168 :208,190,169,255,141,028,191
51174 :208,169,007,141,037,208,232
51180 :169,006,141,038,208,169,199
51186 :026,133,169,032,023,195,052
51192 :096,002,002,003,004,013,112
51198 :006,007,011,204,214,214,142
51204 :214,214,214,214,214,025,075
51210 :100,100,100,100,100,100,098
51216 :100,100,100,100,100,100,104
51222 :100,100,100,000,000,000,066
51228 :000,000,000,000,000,096,124
51234 :000,000,000,000,000,000,034
51240 :000,060,000,000,255,000,099
51246 :000,255,000,000,255,000,044
51252 :000,060,000,002,255,128,241
51258 :002,255,128,002,255,128,060
51264 :000,255,128,000,085,128,148
51270 :000,255,000,000,255,000,068
51276 :000,255,000,000,255,000,074
51282 :000,255,000,000,100,000,181
51288 :000,170,000,000,170,000,172
51294 :000,170,000,000,000,000,008
51300 :000,000,000,000,000,060,160
51306 :000,000,255,000,000,255,104
51312 :000,000,255,000,000,060,171
51318 :000,002,255,128,002,255,248
51324 :128,002,255,128,000,255,124
51330 :128,000,085,128,000,255,214
51336 :000,000,255,000,000,255,134
51342 :000,000,175,000,000,175,236
51348 :000,000,010,000,000,010,168
51354 :000,000,010,000,000,010,174
51360 :000,000,000,000,000,000,160
51366 :000,000,000,060,000,000,226
51372 :255,000,000,255,000,000,170
51378 :255,000,000,060,000,002,239
51384 :255,128,002,255,128,002,186
51390 :255,128,002,255,000,002,064
51396 :085,000,000,255,000,000,024
51402 :255,000,000,255,000,000,200
51408 :250,000,000,250,000,000,196
51414 :160,000,000,160,000,000,022
51420 :160,000,000,160,000,000,028
51426 :000,000,000,000,000,000,226
51432 :000,060,000,000,255,000,035
51438 :000,235,000,000,255,000,216
51444 :000,060,000,002,255,128,177
51450 :002,255,128,001,255,128,251
51456 :001,255,128,000,085,128,085
51462 :000,255,128,000,255,000,132
51468 :000,255,000,000,255,000,010
51474 :000,255,000,000,170,000,187
51480 :000,170,000,000,170,000,108
51486 :000,170,000,000,000,000,200
51492 :000,000,000,000,000,060,096
51498 :000,000,255,000,000,235,020
51504 :000,000,255,000,000,060,107
51510 :000,002,255,128,002,255,184
51516 :128,001,255,128,001,255,060
51522 :128,000,085,128,000,255,150
51528 :000,000,255,000,000,255,070
51534 :000,000,255,000,000,175,252
51540 :000,000,010,000,000,010,104
51546 :000,000,010,000,000,010,110
51552 :000,000,000,000,000,000,096
51558 :000,000,000,060,000,000,162
51564 :255,000,000,235,000,000,086
51570 :255,000,000,060,000,002,175
51576 :255,128,002,255,128,002,122
51582 :255,128,002,255,128,001,127
51588 :085,000,001,255,000,000,217
51594 :255,000,000,255,000,000,136
51600 :255,000,000,250,000,000,137
51606 :160,000,000,160,000,000,214
51612 :160,000,000,160,000,000,220
51618 :000,000,000,000,000,000,162
51624 :000,240,000,000,252,000,148
51630 :000,188,000,000,252,000,102
51636 :000,060,000,000,251,000,235
51642 :020,250,000,006,254,128,076
51648 :000,255,128,000,086,000,149
51654 :000,248,000,000,255,000,189
51660 :003,207,000,015,015,000,188
51666 :012,015,000,008,003,168,160
51672 :008,000,008,008,000,008,248
51678 :040,000,000,255,000,000,005
51684 :000,000,000,000,000,240,212
51690 :000,000,252,000,000,188,162
51696 :000,000,252,000,000,060,040
51702 :000,000,251,000,000,251,236
51708 :000,002,171,000,000,255,168
51714 :000,000,084,000,000,252,082
51720 :000,000,252,000,000,060,064
51726 :000,000,060,000,000,060,134
51732 :000,000,040,000,000,040,100
51738 :000,000,040,000,000,168,234
51744 :000,255,000,000,000,000,031
51750 :000,000,000,015,000,000,053
51756 :063,000,000,062,000,000,169
51762 :063,000,000,060,000,000,173
51768 :239,000,000,175,032,002,248
51774 :191,128,002,255,000,000,126
51780 :149,000,000,039,000,000,000
51786 :245,000,000,243,192,000,242
51792 :240,240,000,240,048,042,122
51798 :192,032,032,000,032,032,150
51804 :000,032,000,000,040,255,163
51810 :000,000,000,000,000,000,098
51816 :000,015,000,000,063,000,182
51822 :000,062,000,000,063,000,235
51828 :000,060,000,000,239,000,159
51834 :000,239,020,000,234,144,247
51840 :000,255,000,000,021,000,148
51846 :000,063,000,000,063,000,004
51852 :000,060,000,000,060,000,004
51858 :000,060,000,000,040,000,246
51864 :000,040,000,000,040,000,232
51870 :000,042,000,255,000,000,199
51876 :000,000,000,000,000,000,164
51882 :000,000,170,000,002,170,000
51888 :128,010,090,160,009,090,151
51894 :160,041,106,168,041,170,100
51900 :168,042,170,168,042,170,180
51906 :168,042,170,168,042,170,186
51912 :168,042,170,168,010,170,160
51918 :160,010,170,160,002,170,110
51924 :128,000,170,000,000,000,254
51930 :000,000,000,000,000,000,218
51936 :000,000,120,169,051,133,185
51942 :001,169,000,133,002,169,192
51948 :056,133,003,169,000,133,218
51954 :004,169,208,133,005,162,155
51960 :008,160,000,177,004,145,230
51966 :002,136,208,249,230,005,060
51972 :230,003,202,208,242,169,034
51978 :055,133,001,169,030,141,027
51984 :024,208,160,063,185,031,175
51990 :203,153,008,057,136,016,083
51996 :247,088,096,128,192,216,227
52002 :231,231,216,192,128,255,007
52008 :126,024,036,036,024,024,054
52014 :024,001,003,027,231,231,051
52020 :027,003,001,024,024,024,155
52026 :036,036,024,126,255,127,150
52032 :063,042,031,021,015,010,246
52038 :007,255,255,165,255,082,065
52044 :255,165,255,248,240,080,039
52050 :224,160,192,064,128,028,110
52056 :020,029,063,092,060,020,116
52062 :054,173,030,208,041,001,089
52068 :240,101,162,007,169,255,010
52074 :133,016,169,009,133,164,218
52080 :189,150,003,208,057,173,124
52086 :080,003,221,080,003,208,201
52092 :049,173,060,003,056,253,206
52098 :060,003,016,005,073,255,030
52104 :024,105,001,201,015,176,146
52110 :031,133,165,173,070,003,205
52116 :056,253,070,003,016,005,039
52122 :073,255,024,105,001,201,045
52128 :015,176,011,024,101,165,140
52134 :197,016,176,004,133,016,196
52140 :134,164,202,208,191,166,213
52146 :164,224,009,240,020,169,236
52152 :002,157,150,003,134,166,028
52158 :228,167,208,010,189,039,007
52164 :208,041,015,201,001,208,102
52170 :001,096,169,005,133,016,110
52176 :169,020,141,011,212,169,162
52182 :000,141,008,212,169,010,242
52188 :141,012,212,169,021,141,148
52194 :011,212,162,000,172,027,042
52200 :212,169,000,153,000,051,049
52206 :153,000,052,142,008,212,037
52212 :153,128,052,032,049,204,094
52218 :202,208,233,198,016,208,035
52224 :229,104,104,032,202,204,107
52230 :206,179,002,240,003,076,200
52236 :184,192,169,000,141,021,207
52242 :208,162,011,160,015,024,086
52248 :032,240,255,169,032,141,125
52254 :224,007,169,015,160,205,042
52260 :032,030,171,173,000,220,150
52266 :041,016,208,249,076,005,125
52272 :192,160,100,136,208,253,073
52278 :096,165,169,010,010,010,002
52284 :024,105,023,205,070,003,234
52290 :176,015,173,080,003,208,209
52296 :010,173,060,003,201,042,049
52302 :176,003,076,204,203,096,068
52308 :162,000,138,157,000,212,241
52314 :232,224,026,208,248,169,173
52320 :020,141,001,212,169,066,193
52326 :141,005,212,169,008,141,010
52332 :003,212,169,005,141,012,138
52338 :212,169,005,141,010,212,095
52344 :169,255,141,015,212,169,057
52350 :015,141,024,212,096,000,102
52356 :000,206,170,002,208,026,232
52362 :169,050,141,170,002,165,067
52368 :169,201,026,240,015,198,225
52374 :169,016,006,169,000,133,131
52380 :169,240,005,160,007,032,001
52386 :165,204,096,132,016,168,175
52392 :169,216,133,002,169,215,048
52398 :133,003,165,002,024,105,094
52404 :040,133,002,165,003,105,116
52410 :000,133,003,136,208,240,138
52416 :165,016,160,002,145,002,170
52422 :136,016,251,096,169,001,099
52428 :141,180,002,032,072,193,056
52434 :165,162,197,162,240,252,108
52440 :165,010,208,238,096,158,067
52446 :146,076;032,065,032,083,144
52452 :032,069,032,082,000,066,253
52458 :032,069,032,065,032,077,029
52464 :150,017,017,017,157,157,243
52470 :157,157,157,157,157,076,083
52476 :069,086,069,076,032,032,104
52482 :017,017,017,157,157,157,012
52488 :157,157,157,157,157,157,182
52494 :157,018,159,072,073,084,065
52500 :032,070,073,082,069,066,156
52506 :085,084,084,079,078,000,180
52512 :158,076,069,086,069,076,054
52518 :032,067,079,077,080,076,193
52524 :069,084,069,068,017,017,112
52530 :157,157,157,157,157,157,224
52536 :157,157,157,157,157,157,230
52542 :066,079,078,085,083,032,229
52548 :000,173,183,002,240,045,199
52554 :206,182,002,208,040,206,150
52560 :184,002,208,035,162,003,162
52566 :142,184,002,206,183,002,037
52572 :173,183,002,208,016,169,075
52578 :024,133,169,169,001,162,244
52584 :006,157,040,208,202,016,221
52590 :250,169,000,170,169,032,132
52596 :157,192,007,096,162,024,242
52602 :160,026,024,032,240,255,091
52608 :173,186,002,201,255,240,161
52614 :007,174,185,002,032,205,227
52620 :189,096,169,152,160,205,087
52626 :032,030,171,104,104,096,171
52632 :147,017,017,017,032,067,193
52638 :079,078,071,082,065,084,105
52644 :085,076,065,084,073,079,114
52650 :078,083,044,032,089,079,063
52656 :085,032,065,082,069,032,029
52662 :079,078,069,032,079,070,077
52668 :032,084,072,069,032,070,035
52674 :069,087,032,084,079,032,065
52680 :087,073,078,032,065,084,107
52686 :032,076,065,083,069,082,101
52692 :032,066,069,065,077,046,055
52698 :000,013,013,013,013,013,027