1040 Terminator

Maze๐Ÿ‡บ๐Ÿ‡ธ 1988
Needs JoysticksRequires BASIC
AtariMania
Escape from the "simplified" tax maze
Rush frantically through the maze of new "simplified" income tax laws, grabbing deductions and dodging through loopholes to escape the dreaded auditing android. This BASIC program works on 8-bit Atari computers with at least 48K memory, disk or cassette.

Hmm. . . seems like only a year ago that you last came in contact with those jolly folks at the Internal Revenue Service. How time flies when you're in the middle-income tax bracket!

Once again you hippity-hopped down to that well-known accounting firm, Ed and Martha's Discount Tax Service, only to find that Ed is on the lam-charged with tax evasion. And Martha now runs a folk-dancing school for wayward rodents. You can't afford to take your taxes anywhere else, so you'll just have to do them yourself. Blecch!

You must be meticulous in filling out your IRS forms to avoid going into debt from tax payments or, like poor old Ed, requiring an operation carried out by a competent cosmetic surgeon. You must carefully navigate the maze of new simplified (ha,ha) tax laws, collecting as much money as you can. You must also use the few remaining tax loopholes to avoid the IRS auditor who has been assigned to your case.

Perhaps you could take some comfort in knowing that you're going through the same trauma as every other American-except Ed. But my conscience forces me to warn you that, unlike most people, you aren't being hounded by just any old IRS auditor. Because you have come under suspicion, as a longtime client of Ed and Martha's Discount Tax Service, the IRS sent their toughest field agent after you - the 1040 Terminator.

Instructions
THE GAME

Is the Terminator human? Nobody knows. All I can say is that you'd better keep your hands and feet away from his mouth and don't stop running. The Terminator never gives up. He can't be stopped and he'll keep chasing you until he catches you. That's his job and the rumor is that he never loses an audit.

Plug a joystick into port 1 and, at the title screen, press the button to start the action. 1040 Terminator is not too complicated, just intense. You're in a maze and your goal is to pick up all the dollar signs without being caught by the Terminator. If you get all the dollar signs, then you advance to the next screen. If you finish all five screens, you win the game, the Terminator is retired and Uncle Sam gives you a big fat simulated refund!

The Terminator is fast and tireless. But he just runs around the maze randomly, changing direction each time he bumps into something. He's like a chicken with his legs cut off. No, that's not quite right. Anyway, you only have two lives so if he catches you twice, you're history.
LOOPHOLES

As if all this great action and exciting storyline wasn't enough, the game has another feature. Naturally, you know that the only way to avoid the IRS auditor is via tax loopholes. As it happens, each maze has several strategically placed loopholes.

These loopholes are turnstiles which you can go through-but fortunately, they block the Terminator! This gives you quite a tactical advantage over him. Use the loopholes wisely though, or you may outsmart yourself and wind up right back in the clutches of the Terminator.
Program Listing
For fans of type-ins I have reproduced the listing below. If you used to read Antic or Page 6 back in the day you'll probably recognise the TYPO II/III checksum codes on the left side of the listing which you can use to check your typing as you go. The code word-wraps to the screen width but each line starting with a TYPO code and line number should be typed as a single line.
RU
2
REM 1040 TERMINATOR
HD
4
REM BY STEPHEN STOUT
QU
6
REM (c)1988, ANTIC PUBLISHING
MP
10
GOTO 1750
SZ
20
POKE 77,0:ST=STICK(0):IX=(ST=7)-(ST=11):IY=(ST=13)-(ST=14):IF IX=0 AND IY=0 THEN 190
EP
30
LOCATE X+IX,Y+IY,Z
WY
40
IF Z<>32 AND Z<>133 AND Z<>136 AND Z<>38 THEN 190
VP
50
IF Z=133 THEN SOUND 0,150,12,15
JI
60
IF Z=38 THEN SOUND 0,50,10,15:DOTS=DOTS-1
CL
70
POSITION X,Y:? #6;" ":X=X+IX:Y=Y+IY:POSITION X,Y:? #6;"๎€‡"
LA
80
IF Z<>133 THEN 170
YA
90
IF IY<>0 THEN 130
NL
100
D=Y-1:LOCATE X,Y+1,Z:IF Z=132 THEN D=Y+1:POSITION X,D+1:? #6;" ":GOTO 120
JQ
110
POSITION X,D-1:? #6;" "
TR
120
POSITION X-1,D:? #6;"๎‚…๎‚„๎‚…":GOTO 160
EP
130
D=X-1:LOCATE X+1,Y,Z:IF Z=132 THEN D=X+1:POSITION D+1,Y:? #6;" ":GOTO 150
PA
140
POSITION D-1,Y:? #6;" "
CX
150
POSITION D,Y-1:? #6;"๎‚…":POSITION D,Y+1:? #6;"๎‚…"
RT
160
SOUND 0,0,0,0:GOTO 190
PS
170
SOUND 0,0,0,0:IF Z=8 THEN 350
IW
180
IF DOTS=0 THEN 470
BB
190
LOCATE X1+IX1,Y1+IY1,Z:IF Z=7 OR Z=32 OR Z=38 THEN 290
PC
200
IF IX1=0 THEN 250
VK
210
IY1=INT(RND(0)*2):IF IY1=0 THEN IY1=-1
SP
220
LOCATE X1,Y1+IY1,Z:IF Z<>32 AND Z<>7 AND Z<>38 THEN IY1=-IY1
KB
230
LOCATE X1,Y1+IY1,Z:IF Z<>32 AND Z<>7 AND Z<>38 THEN IY1=0:IX1=-IX1:GOTO 330
CK
240
IX1=0:GOTO 290
SZ
250
IX1=INT(RND(0)*2):IF IX1=0 THEN IX1=-1
MI
260
LOCATE X1+IX1,Y1,Z:IF Z<>32 AND Z<>7 AND Z<>38 THEN IX1=-IX1
AJ
270
LOCATE X1+IX1,Y1,Z:IF Z<>32 AND Z<>7 AND Z<>38 THEN IX1=0:IY1=-IY1:GOTO 290
CY
280
IY1=0:GOTO 290
EM
290
LOCATE X1,Y1,Z2:IF Z2=133 THEN Z1=Z2
CF
300
POSITION X1,Y1:? #6;CHR$(Z1)
YS
310
X1=X1+IX1:Y1=Y1+IY1:LOCATE X1,Y1,Z1:POSITION X1,Y1:? #6;"๎€ˆ"
IX
320
SOUND 0,0,12,15:SOUND 0,0,0,0
EK
330
IF Z=7 THEN 350
PW
340
GOTO 20
XH
350
LIVES=LIVES-1:POSITION 18,0:? #6;LIVES
NZ
360
FOR I=15 TO 0 STEP -1:SOUND 0,0,0,I:SOUND 1,0,0,0
XX
370
POSITION X,Y:? #6;"๎€‡":FOR D=1 TO 15:NEXT D:SOUND 1,200,12,I
YY
380
POSITION X,Y:? #6;"๎€ˆ":FOR D=1 TO 15:NEXT D:NEXT I:SOUND 0,0,0,0:SOUND 1,0,0,0
HV
390
IF Z1=7 THEN Z1=32
IG
400
IF Z2=7 THEN Z2=32
KW
410
IF LIVES=0 THEN 430
LY
420
X=OX:Y=OY:POSITION X,Y:? #6;"๎€‡":GOTO 20
SP
430
POSITION 0,1:? #6;"you lose hit trigger"
PP
440
FOR I=10 TO 250 STEP 2:SOUND 0,I,10,10:NEXT I:SOUND 0,0,0,0
OQ
450
POKE 77,0:IF STRIG(0)=1 THEN 450
VA
460
RUN
MH
470
FOR D=1 TO 250:NEXT D
QO
480
IF SCREEN=5 THEN 510
SC
490
SCREEN=SCREEN+1
OQ
500
GOTO 540
CQ
510
POSITION 0,1:? #6;"you win๎€ hit trigger"
RT
520
FOR I=250 TO 10 STEP -2:SOUND 0,I,10,10:NEXT I:SOUND 0,0,0,0
OX
530
GOTO 450
YG
540
POKE 559,0:POSITION 0,0:? #6;"๎ฝ"
FE
550
POSITION 0,0:? #6;" SCREEN:";SCREEN;" LIVES:";LIVES
EW
560
FOR I=2 TO 22:READ SC$:POSITION 0,I:? #6;SC$:NEXT I
WT
570
READ OX,OY:X=OX:Y=OY:POSITION X,Y:? #6;"๎€‡":READ DOTS
DY
580
READ X1,Y1,IX1,IY1:LOCATE X1,Y1,Z1:POSITION X1,Y1:? #6;"๎‚ˆ"
XE
590
POKE 559,34:GOTO 20
VA
600
DATA ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ
OP
610
DATA ๎‚ฃ&&&&& &&&&&& &&&&&๎‚ฃ
JE
620
DATA ๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ๎‚…๎‚„๎‚…๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚…๎‚„๎‚…๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ
BG
630
DATA ๎‚ฃ&๎‚…&&& &&&&&& &&&๎‚…&๎‚ฃ
XV
640
DATA ๎‚ฃ ๎‚„ ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ ๎‚„ ๎‚ฃ
LB
650
DATA ๎‚ฃ&๎‚…&๎‚ฃ&&&&&& &&&๎‚ฃ&๎‚…&๎‚ฃ
QM
660
DATA ๎‚ฃ&๎‚ฃ&๎‚…&๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚…๎‚„๎‚…๎‚ฃ&๎‚…&๎‚ฃ&๎‚ฃ
XF
670
DATA ๎‚ฃ&๎‚ฃ ๎‚„ ๎‚ฃ&&&& &๎‚ฃ ๎‚„ ๎‚ฃ&๎‚ฃ
GQ
680
DATA ๎‚ฃ&๎‚ฃ&๎‚…&๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚…&๎‚ฃ&๎‚ฃ
ZS
690
DATA ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ
UQ
700
DATA ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ& ๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ
ZD
710
DATA ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ
GF
720
DATA ๎‚ฃ&๎‚ฃ&๎‚…&๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚…&๎‚ฃ&๎‚ฃ
XQ
730
DATA ๎‚ฃ&๎‚ฃ ๎‚„ ๎‚ฃ& &&&&๎‚ฃ ๎‚„ ๎‚ฃ&๎‚ฃ
AW
740
DATA ๎‚ฃ&๎‚ฃ&๎‚…&๎‚ฃ๎‚…๎‚„๎‚…๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ&๎‚…&๎‚ฃ&๎‚ฃ
LU
750
DATA ๎‚ฃ&๎‚…&๎‚ฃ&&& &&&&&&๎‚ฃ&๎‚…&๎‚ฃ
YA
760
DATA ๎‚ฃ ๎‚„ ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ ๎‚„ ๎‚ฃ
BP
770
DATA ๎‚ฃ&๎‚…&&& &&&&&& &&&๎‚…&๎‚ฃ
JR
780
DATA ๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ๎‚…๎‚„๎‚…๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚…๎‚„๎‚…๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ
PG
790
DATA ๎‚ฃ&&&&& &&&&&& &&&&&๎‚ฃ
VC
800
DATA ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ
UF
810
DATA 9,12,156
EI
820
DATA 3,5,0,1
VI
830
DATA ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ
XX
840
DATA ๎‚ฃ&&&&&&&&&&&&&&&&&&๎‚ฃ
RB
850
DATA ๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ
AL
860
DATA ๎‚ฃ&&&&&&&&&&&๎‚…&&&&&&๎‚ฃ
DC
870
DATA ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ ๎‚„ ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ
AP
880
DATA ๎‚ฃ&&&&&&&&&&&๎‚…&&&&&&๎‚ฃ
TN
890
DATA ๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ
EC
900
DATA ๎‚ฃ&&&&&๎‚…&&&&&&&&&&&&๎‚ฃ
SH
910
DATA ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ ๎‚„ ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ
EG
920
DATA ๎‚ฃ&&&&&๎‚…&&&&&&&&&&&&๎‚ฃ
TC
930
DATA ๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ
AI
940
DATA ๎‚ฃ&&&&&&&&&&&๎‚…&&&&&&๎‚ฃ
CZ
950
DATA ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ ๎‚„ ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ
AM
960
DATA ๎‚ฃ&&&&&&&&&&&๎‚…&&&&&&๎‚ฃ
TK
970
DATA ๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ
ES
980
DATA ๎‚ฃ&&&&&๎‚…&&&&&&&&&&&&๎‚ฃ
SX
990
DATA ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ ๎‚„ ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ
OZ
1000
DATA ๎‚ฃ&&&&&๎‚…&&&&&&&&&&&&๎‚ฃ
GQ
1010
DATA ๎‚ฃ๎‚ฃ ๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ&๎‚ฃ
RF
1020
DATA ๎‚ฃ๎‚ฃ ๎‚ฃ๎‚ฃ&&&&&&&&&&&&&&๎‚ฃ
LG
1030
DATA ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ
BY
1040
DATA 2,21,193
BU
1050
DATA 18,3,-1,0
LP
1060
DATA ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ
DD
1070
DATA ๎‚ฃ&&&&&๎‚ฃ&&&๎‚ฃ๎‚ฃ&&&๎‚ฃ&&&๎‚ฃ
OG
1080
DATA ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ
GN
1090
DATA ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ
NK
1100
DATA ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ
JL
1110
DATA ๎‚ฃ&๎‚ฃ&&& &&&๎‚ฃ๎‚ฃ& &&&๎‚ฃ&๎‚ฃ
EJ
1120
DATA ๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚…๎‚„๎‚…๎‚ฃ&&๎‚ฃ๎‚…๎‚„๎‚…๎‚ฃ&๎‚ฃ&๎‚ฃ
QL
1130
DATA ๎‚ฃ&๎‚ฃ&&& &๎‚ฃ๎‚ฃ&&& &&&๎‚ฃ&๎‚ฃ
NW
1140
DATA ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ
KY
1150
DATA ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ
OC
1160
DATA ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ
GJ
1170
DATA ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ
OI
1180
DATA ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ
VG
1190
DATA ๎‚ฃ&&& &&&&&๎‚ฃ๎‚ฃ&&& &&&๎‚ฃ
EF
1200
DATA ๎‚ฃ&๎‚ฃ๎‚…๎‚„๎‚…๎‚ฃ&๎‚ฃ&&๎‚ฃ&๎‚ฃ๎‚…๎‚„๎‚…๎‚ฃ&๎‚ฃ
BE
1210
DATA ๎‚ฃ&&& &&&๎‚ฃ๎‚ฃ&&&&& &&&๎‚ฃ
XD
1220
DATA ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ
UF
1230
DATA ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ๎‚ฃ๎‚ฃ
WE
1240
DATA ๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&๎‚ฃ&&๎‚ฃ&๎‚ฃ&๎‚ฃ& ๎‚ฃ
EQ
1250
DATA ๎‚ฃ&&&๎‚ฃ&&&๎‚ฃ๎‚ฃ&&&๎‚ฃ&&&๎‚ฃ๎‚ฃ๎‚ฃ
LT
1260
DATA ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ
ON
1270
DATA 18,20,193
KQ
1280
DATA 1,3,0,1
MC
1290
DATA ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ
UF
1300
DATA ๎‚ฃ&&&&&&&&๎‚ฃ๎‚ฃ&&&&&&&&๎‚ฃ
UI
1310
DATA ๎‚ฃ&&&๎‚ฃ&&&&&&&&&&๎‚ฃ&&&๎‚ฃ
SW
1320
DATA ๎‚ฃ&&& &&&&&&&&&&๎‚…&&&๎‚ฃ
VN
1330
DATA ๎‚ฃ&๎‚ฃ๎‚…๎‚„๎‚…๎‚ฃ&&&&&&๎‚ฃ ๎‚„ ๎‚ฃ&๎‚ฃ
TC
1340
DATA ๎‚ฃ&&& &&&&&&&&&&๎‚…&&&๎‚ฃ
UU
1350
DATA ๎‚ฃ&&&๎‚ฃ&&&&&&&&&&๎‚ฃ&&&๎‚ฃ
UX
1360
DATA ๎‚ฃ&&&&&&๎‚ฃ&&&&๎‚ฃ&&&&&&๎‚ฃ
SE
1370
DATA ๎‚ฃ๎‚ฃ&&&&&&&&&&๎‚ฃ&&&&&&๎‚ฃ
IM
1380
DATA ๎‚ฃ&&&&&&๎‚ฃ๎‚ฃ&&&๎‚ฃ&&&&&&๎‚ฃ
VG
1390
DATA ๎‚ฃ&๎‚ฃ&&&&&&&&&&&&&&๎‚ฃ&๎‚ฃ
RF
1400
DATA ๎‚ฃ&&&&&&๎‚ฃ&& ๎‚ฃ๎‚ฃ&&&&&&๎‚ฃ
XG
1410
DATA ๎‚ฃ&&&&&&๎‚ฃ&&&&&&&&&&๎‚ฃ๎‚ฃ
UN
1420
DATA ๎‚ฃ&&&&&&๎‚ฃ&&&&๎‚ฃ&&&&&&๎‚ฃ
UQ
1430
DATA ๎‚ฃ&&&๎‚ฃ&&&&&&&&&&๎‚ฃ&&&๎‚ฃ
CL
1440
DATA ๎‚ฃ&&&๎‚…&&&&&&&&&& &&&๎‚ฃ
DH
1450
DATA ๎‚ฃ&๎‚ฃ ๎‚„ ๎‚ฃ&&&&&&๎‚ฃ๎‚…๎‚„๎‚…๎‚ฃ&๎‚ฃ
CR
1460
DATA ๎‚ฃ&&&๎‚…&&&&&&&&&& &&&๎‚ฃ
VC
1470
DATA ๎‚ฃ&&&๎‚ฃ&&&&&&&&&&๎‚ฃ&&&๎‚ฃ
VF
1480
DATA ๎‚ฃ&&&&&&&&๎‚ฃ๎‚ฃ&&&&&&&&๎‚ฃ
MG
1490
DATA ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ
MW
1500
DATA 10,13,285
YC
1510
DATA 1,21,0,-1
LN
1520
DATA ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ
JV
1530
DATA ๎‚ฃ๎‚ฃ๎‚ฃ&&&&&&&&&&&&&&๎‚ฃ๎‚ฃ๎‚ฃ
JY
1540
DATA ๎‚ฃ๎‚ฃ&&๎‚ฃ&&&&&&&&&&๎‚ฃ&&๎‚ฃ๎‚ฃ
CQ
1550
DATA ๎‚ฃ&&&๎‚…&&&&&&&&&& &&&๎‚ฃ
DM
1560
DATA ๎‚ฃ&๎‚ฃ ๎‚„ ๎‚ฃ&&&&&&๎‚ฃ๎‚…๎‚„๎‚…๎‚ฃ&๎‚ฃ
CW
1570
DATA ๎‚ฃ&&&๎‚…&&&&&&&&&& &&&๎‚ฃ
KK
1580
DATA ๎‚ฃ&&&๎‚ฃ&&๎‚ฃ&&&&๎‚ฃ&&๎‚ฃ&&&๎‚ฃ
IE
1590
DATA ๎‚ฃ&&&&&& &&&&๎‚…&&&&&&๎‚ฃ
SS
1600
DATA ๎‚ฃ&&&&๎‚ฃ๎‚…๎‚„๎‚…๎‚ฃ๎‚ฃ ๎‚„ ๎‚ฃ&&&&๎‚ฃ
HI
1610
DATA ๎‚ฃ&&&&&& &&&&๎‚…&&&&&&๎‚ฃ
UR
1620
DATA ๎‚ฃ&&&&&&๎‚ฃ&&&&๎‚ฃ&&&&&&๎‚ฃ
OD
1630
DATA ๎‚ฃ&&&&&&๎‚…&&&& &&&&&&๎‚ฃ
GA
1640
DATA ๎‚ฃ&&&&๎‚ฃ ๎‚„ ๎‚ฃ๎‚ฃ๎‚…๎‚„๎‚…๎‚ฃ&&&&๎‚ฃ
OJ
1650
DATA ๎‚ฃ&&&&&&๎‚…&&&& &&&&&&๎‚ฃ
KG
1660
DATA ๎‚ฃ&&&๎‚ฃ&&๎‚ฃ&&&&๎‚ฃ&&๎‚ฃ&&&๎‚ฃ
TR
1670
DATA ๎‚ฃ&&& &&&&&&&&&&๎‚…&&&๎‚ฃ
WI
1680
DATA ๎‚ฃ&๎‚ฃ๎‚…๎‚„๎‚…๎‚ฃ&&&&&&๎‚ฃ ๎‚„ ๎‚ฃ&๎‚ฃ
TX
1690
DATA ๎‚ฃ&&& &&&&&&&&&&๎‚…&&&๎‚ฃ
JQ
1700
DATA ๎‚ฃ๎‚ฃ&&๎‚ฃ&&&&&&&&&&๎‚ฃ&&๎‚ฃ๎‚ฃ
JT
1710
DATA ๎‚ฃ๎‚ฃ๎‚ฃ&&&&&&&&&&&&&&๎‚ฃ๎‚ฃ๎‚ฃ
LR
1720
DATA ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ๎‚ฃ
QG
1730
DATA 17,20,259
LI
1740
DATA 3,3,1,0
MW
1750
GRAPHICS 0:POKE 559,0:POKE 16,64:POKE 53774,64
ZV
1760
DIM MOVE$(56):MOVE$="hh๎‚…๎€‚h๎‚…๎€h๎‚…๎€„h๎‚…๎€ƒh๎‚…๎€†h๎‚…๎€…๎‚ ๎€€๎ƒฐ๎€๎‚ฑ๎€๎‚‘๎€ƒ๎ƒฆ๎€๎ƒ๎€‚๎ƒฆ๎€‚๎ƒฆ๎€ƒ๎ƒ๎€‚๎ƒฆ๎€„๎ƒ†๎€…๎‚ฅ๎€…๎ƒ‰๎ƒฟ๎ƒ๎ƒจ๎ƒ†๎€†๎‚ฅ๎€†๎ƒ‰๎ƒฟ๎ƒ๎ƒ ๎ "
IB
1770
CHSET=144*256
AM
1780
ML=USR(ADR(MOVE$),57344,CHSET,1024)
OT
1790
RESTORE 1830
RW
1800
GOTO 1820
TV
1810
FOR I=0 TO 7:READ D:POKE CHSET+A*8+I,D:NEXT I
BS
1820
READ A:IF A<>-1 THEN GOTO 1810
SZ
1830
DATA 3,255,129,189,189,189,189,129,255
JF
1840
DATA 4,60,102,195,153,153,195,102,60
MT
1850
DATA 5,126,255,255,255,255,255,255,126
SX
1860
DATA 6,24,62,96,60,6,124,24,0
DC
1870
DATA 7,60,126,219,255,102,60,36,102
ZZ
1880
DATA 8,56,56,16,124,186,186,40,40
FV
1890
DATA -1
MF
1900
DIM SC$(20)
NR
1910
GRAPHICS 1+16:POKE 559,0:POKE 16,64:POKE 53774,64
WS
1920
POKE 708,8:POKE 709,196
TX
1930
POSITION 3,0:? #6;"๎ƒก๎ƒฎ๎ƒด๎ƒฉ๎ƒฃ๎‚ ๎ƒญ๎ƒก๎ƒง๎ƒก๎ƒบ๎ƒฉ๎ƒฎ๎ƒฅ":POSITION 6,1:? #6;"๎ƒฐ๎ƒฒ๎ƒฅ๎ƒณ๎ƒฅ๎ƒฎ๎ƒด๎ƒณ"
VN
1940
D=PEEK(560)+PEEK(561)*256+4:POKE D+6,7:POKE D+8,7
DW
1950
POSITION 2,5:? #6;"1040 TERMINATOR":POSITION 2,7:? #6;"๎ƒ‚๎ƒ™๎‚ ๎ƒ“๎ƒ”๎ƒ…๎ƒ๎ƒˆ๎ƒ…๎ƒŽ๎‚ ๎ƒ“๎ƒ”๎ƒ๎ƒ•๎ƒ”"
FA
1960
POSITION 2,20:? #6;"trigger to begin"
ZR
1970
POKE 559,34
KA
1980
POKE 77,0:IF STRIG(0)<>0 THEN 1980
JE
1990
GRAPHICS 1+16:POKE 16,64:POKE 53774,64
IT
2000
POKE 711,40:POKE 710,116:POKE 708,198:POKE 709,10
LD
2010
POKE 756,CHSET/256:RESTORE 600:SCREEN=1:LIVES=2
QN
2020
GOTO 540