Data
Prev: 5B01 Up: Map Next: E92F
5CCB: BASIC Program
The game is mostly Sinclair BASIC. See the recovered listing on the BASIC listing page. LIST only shows line 1; line 15's header is corrupted on the tape so listing stops. The program still runs. Line 1 does RANDOMIZE USR (VARS-74) — digits show 8C, hidden float 74 — entering Run_Bootstrap.
BasicProgram 5CCB DEFB $00,$01,$37,$00,$08,$08,$08,$08 Line 1: RANDOMIZE USR ((PEEK 23627)+((PEEK 23628)*256)-116).
5CD3 DEFB $08,$11,$07,$10,$07,$F9,$C0,$28
5CDB DEFB $28,$BE,$35,$0E,$00,$00,$4B,$5C
5CE3 DEFB $00,$29,$2B,$28,$28,$BE,$36,$0E
5CEB DEFB $00,$00,$4C,$5C,$00,$29,$2A,$32
5CF3 DEFB $0E,$00,$00,$00,$01,$00,$29,$2D
5CFB DEFB $31,$34,$30,$0E,$00,$00,$74,$00
5D03 DEFB $00,$29,$0D
Corrupted line 15 (LIST protection).
5D06 DEFB $FF,$0F,$CB,$4E,$41,$4D,$45,$20 LIST stops here: the line-number high byte is FF. Reading the bytes as a line anyway, the length word swallows the "N" of "NAME" and it would show as: 65295AME DO YOU GO BY?": INPUT "ENTER NAME "; LINE N$: IF N$="" THEN GO TO VAL "15".
5D0E DEFB $44,$4F,$20,$59,$4F,$55,$20,$47
5D16 DEFB $4F,$20,$42,$59,$3F,$22,$3A,$EE
5D1E DEFB $22,$45,$4E,$54,$45,$52,$20,$4E
5D26 DEFB $41,$4D,$45,$20,$22,$3B,$CA,$4E
5D2E DEFB $24,$3A,$FA,$4E,$24,$3D,$22,$22
5D36 DEFB $CB,$EC,$B0,$22,$31,$35,$22,$0D
5D3E DEFB $00,$14,$98,$00,$D7,$2E,$34,$0E Line 20: BEEP .4,-10: CLS : PRINT AT 8,3;"ENTER LEVEL OF DIFFICULTY": INPUT " LEVEL 1,2 OR 3 "; LINE E$: LET E$=E$+" ": IF CODE E$(1)>51 OR CODE E$(1)<49 THEN GO TO VAL "20".
5D46 DEFB $7F,$4C,$CC,$CC,$CC,$2C,$2D,$31
5D4E DEFB $30,$0E,$00,$00,$0A,$00,$00,$3A
5D56 DEFB $FB,$3A,$F5,$AC,$38,$0E,$00,$00
5D5E DEFB $08,$00,$00,$2C,$33,$0E,$00,$00
5D66 DEFB $03,$00,$00,$3B,$22,$45,$4E,$54
5D6E DEFB $45,$52,$20,$4C,$45,$56,$45,$4C
5D76 DEFB $20,$4F,$46,$20,$44,$49,$46,$46
5D7E DEFB $49,$43,$55,$4C,$54,$59,$22,$3A
5D86 DEFB $EE,$22,$20,$4C,$45,$56,$45,$4C
5D8E DEFB $20,$31,$2C,$32,$C5,$33,$20,$22
5D96 DEFB $3B,$CA,$45,$24,$3A,$F1,$45,$24
5D9E DEFB $3D,$45,$24,$2B,$22,$20,$22,$3A
5DA6 DEFB $FA,$AF,$45,$24,$28,$31,$0E,$00
5DAE DEFB $00,$01,$00,$00,$29,$3E,$35,$31
5DB6 DEFB $0E,$00,$00,$33,$00,$00,$C5,$AF
5DBE DEFB $45,$24,$28,$31,$0E,$00,$00,$01
5DC6 DEFB $00,$00,$29,$3C,$34,$39,$0E,$00
5DCE DEFB $00,$31,$00,$00,$CB,$EC,$B0,$22
5DD6 DEFB $32,$30,$22,$0D
5DDA DEFB $00,$16,$0A,$00,$F1,$4C,$56,$3D Line 22: LET LV=VAL E$+U.
5DE2 DEFB $B0,$45,$24,$2B,$55,$0D
5DE8 DEFB $00,$1E,$BF,$00,$D7,$2E,$35,$0E Line 30: BEEP .5,30: CLS : PRINT AT 10,10;"PLEASE WAIT": LET LM=3: LET SC=O: LET JB=O: LET L=6: LET CS=1500: LET DT=O: RANDOMIZE O: DIM T(5,5): RESTORE 9110: FOR N=U TO 5: FOR A=U TO 5: READ S: LET T(N,A)=S: NEXT A: NEXT N.
5DF0 DEFB $7F,$7F,$FF,$FF,$FF,$2C,$33,$30
5DF8 DEFB $0E,$00,$00,$1E,$00,$00,$3A,$FB
5E00 DEFB $3A,$F5,$AC,$31,$30,$0E,$00,$00
5E08 DEFB $0A,$00,$00,$2C,$31,$30,$0E,$00
5E10 DEFB $00,$0A,$00,$00,$3B,$22,$50,$4C
5E18 DEFB $45,$41,$53,$45,$20,$57,$41,$49
5E20 DEFB $54,$22,$3A,$F1,$4C,$4D,$3D,$33
5E28 DEFB $0E,$00,$00,$03,$00,$00,$3A,$F1
5E30 DEFB $53,$43,$3D,$4F,$3A,$F1,$4A,$42
5E38 DEFB $3D,$4F,$3A,$F1,$4C,$3D,$36,$0E
5E40 DEFB $00,$00,$06,$00,$00,$3A,$F1,$43
5E48 DEFB $53,$3D,$31,$35,$30,$30,$0E,$00
5E50 DEFB $00,$DC,$05,$00,$3A,$F1,$44,$54
5E58 DEFB $3D,$4F,$3A,$F9,$4F,$3A,$E9,$54
5E60 DEFB $28,$35,$0E,$00,$00,$05,$00,$00
5E68 DEFB $2C,$35,$0E,$00,$00,$05,$00,$00
5E70 DEFB $29,$3A,$E5,$39,$31,$31,$30,$0E
5E78 DEFB $00,$00,$96,$23,$00,$3A,$EB,$4E
5E80 DEFB $3D,$55,$CC,$35,$0E,$00,$00,$05
5E88 DEFB $00,$00,$3A,$EB,$41,$3D,$55,$CC
5E90 DEFB $35,$0E,$00,$00,$05,$00,$00,$3A
5E98 DEFB $E3,$53,$3A,$F1,$54,$28,$4E,$2C
5EA0 DEFB $41,$29,$3D,$53,$3A,$F3,$41,$3A
5EA8 DEFB $F3,$4E,$0D
5EAB DEFB $00,$28,$54,$00,$F1,$43,$53,$3D Line 40: LET CS=1450: DIM U(5,INT PI): RESTORE VAL "9120": FOR N=U TO 5: FOR A=U TO 3: READ S: LET U(N,A)=S: NEXT A: NEXT N.
5EB3 DEFB $31,$34,$35,$30,$0E,$00,$00,$AA
5EBB DEFB $05,$00,$3A,$E9,$55,$28,$35,$0E
5EC3 DEFB $00,$00,$05,$00,$00,$2C,$BA,$A7
5ECB DEFB $29,$3A,$E5,$B0,$22,$39,$31,$32
5ED3 DEFB $30,$22,$3A,$EB,$4E,$3D,$55,$CC
5EDB DEFB $35,$0E,$00,$00,$05,$00,$00,$3A
5EE3 DEFB $EB,$41,$3D,$55,$CC,$33,$0E,$00
5EEB DEFB $00,$03,$00,$00,$3A,$E3,$53,$3A
5EF3 DEFB $F1,$55,$28,$4E,$2C,$41,$29,$3D
5EFB DEFB $53,$3A,$F3,$41,$3A,$F3,$4E,$0D
5F03 DEFB $00,$32,$38,$00,$E9,$4B,$24,$28 Line 50: DIM K$(16,20): RESTORE VAL "9140": FOR N=U TO 16: READ K$(N): NEXT N.
5F0B DEFB $31,$36,$0E,$00,$00,$10,$00,$00
5F13 DEFB $2C,$32,$30,$0E,$00,$00,$14,$00
5F1B DEFB $00,$29,$3A,$E5,$B0,$22,$39,$31
5F23 DEFB $34,$30,$22,$3A,$EB,$4E,$3D,$55
5F2B DEFB $CC,$31,$36,$0E,$00,$00,$10,$00
5F33 DEFB $00,$3A,$E3,$4B,$24,$28,$4E,$29
5F3B DEFB $3A,$F3,$4E,$0D
5F3F DEFB $00,$3C,$2E,$00,$E9,$4B,$28,$31 Line 60: DIM K(16): RESTORE VAL "9145": FOR N=U TO 16: READ K(N): NEXT N:.
5F47 DEFB $36,$0E,$00,$00,$10,$00,$00,$29
5F4F DEFB $3A,$E5,$B0,$22,$39,$31,$34,$35
5F57 DEFB $22,$3A,$EB,$4E,$3D,$55,$CC,$31
5F5F DEFB $36,$0E,$00,$00,$10,$00,$00,$3A
5F67 DEFB $E3,$4B,$28,$4E,$29,$3A,$F3,$4E
5F6F DEFB $3A,$0D
5F71 DEFB $00,$46,$89,$00,$E9,$49,$28,$31 Line 70: DIM I(16): FOR N=U TO 16: LET I(N)=O: NEXT N: LET I(6)=5: LET I(4)=U: DIM R(5): RESTORE VAL "9095": FOR N=U TO 5: READ R(N): NEXT N: DIM D$(5,19).
5F79 DEFB $36,$0E,$00,$00,$10,$00,$00,$29
5F81 DEFB $3A,$EB,$4E,$3D,$55,$CC,$31,$36
5F89 DEFB $0E,$00,$00,$10,$00,$00,$3A,$F1
5F91 DEFB $49,$28,$4E,$29,$3D,$4F,$3A,$F3
5F99 DEFB $4E,$3A,$F1,$49,$28,$36,$0E,$00
5FA1 DEFB $00,$06,$00,$00,$29,$3D,$35,$0E
5FA9 DEFB $00,$00,$05,$00,$00,$3A,$F1,$49
5FB1 DEFB $28,$34,$0E,$00,$00,$04,$00,$00
5FB9 DEFB $29,$3D,$55,$3A,$E9,$52,$28,$35
5FC1 DEFB $0E,$00,$00,$05,$00,$00,$29,$3A
5FC9 DEFB $E5,$B0,$22,$39,$30,$39,$35,$22
5FD1 DEFB $3A,$EB,$4E,$3D,$55,$CC,$35,$0E
5FD9 DEFB $00,$00,$05,$00,$00,$3A,$E3,$52
5FE1 DEFB $28,$4E,$29,$3A,$F3,$4E,$3A,$E9
5FE9 DEFB $44,$24,$28,$35,$0E,$00,$00,$05
5FF1 DEFB $00,$00,$2C,$31,$39,$0E,$00,$00
5FF9 DEFB $13,$00,$00,$29,$0D
5FFE DEFB $00,$73,$34,$00,$EB,$4E,$3D,$55 Line 115: FOR N=U TO 5: RESTORE VAL "9000"+INT (RND*12)+U: READ l$: LET D$(n)=L$.
6006 DEFB $CC,$35,$0E,$00,$00,$05,$00,$00
600E DEFB $3A,$E5,$B0,$22,$39,$30,$30,$30
6016 DEFB $22,$2B,$BA,$28,$A5,$2A,$31,$32
601E DEFB $0E,$00,$00,$0C,$00,$00,$29,$2B
6026 DEFB $55,$3A,$E3,$6C,$24,$3A,$F1,$44
602E DEFB $24,$28,$6E,$29,$3D,$4C,$24,$0D
6036 DEFB $00,$87,$14,$00,$EB,$41,$3D,$55 Line 135: FOR A=U TO N: IF A=N THEN GO TO VAL "145".
603E DEFB $CC,$4E,$3A,$FA,$41,$3D,$4E,$CB
6046 DEFB $EC,$B0,$22,$31,$34,$35,$22,$0D
604E DEFB $00,$8C,$15,$00,$FA,$44,$24,$28 Line 140: IF D$(N)=D$(A) THEN GO TO VAL "115".
6056 DEFB $4E,$29,$3D,$44,$24,$28,$41,$29
605E DEFB $CB,$EC,$B0,$22,$31,$31,$35,$22
6066 DEFB $0D
6067 DEFB $00,$91,$06,$00,$F3,$41,$3A,$F3 Line 145: NEXT A: NEXT N.
606F DEFB $4E,$0D
6071 DEFB $00,$9B,$36,$00,$E9,$42,$24,$28 Line 155: DIM B$(5,15): RESTORE VAL "9015": FOR N=U TO 5: READ B$(N): NEXT N.
6079 DEFB $35,$0E,$00,$00,$05,$00,$00,$2C
6081 DEFB $31,$35,$0E,$00,$00,$0F,$00,$00
6089 DEFB $29,$3A,$E5,$B0,$22,$39,$30,$31
6091 DEFB $35,$22,$3A,$EB,$4E,$3D,$55,$CC
6099 DEFB $35,$0E,$00,$00,$05,$00,$00,$3A
60A1 DEFB $E3,$42,$24,$28,$4E,$29,$3A,$F3
60A9 DEFB $4E,$0D
60AB DEFB $00,$A5,$24,$00,$E9,$56,$28,$35 Line 165: DIM V(5): FOR N=U TO 5: LET V(N)=R: NEXT N.
60B3 DEFB $0E,$00,$00,$05,$00,$00,$29,$3A
60BB DEFB $EB,$4E,$3D,$55,$CC,$35,$0E,$00
60C3 DEFB $00,$05,$00,$00,$3A,$F1,$56,$28
60CB DEFB $4E,$29,$3D,$52,$3A,$F3,$4E,$0D
60D3 DEFB $00,$AA,$13,$00,$F1,$4D,$42,$3D Line 170: LET MB=INT (RND*5)+U.
60DB DEFB $BA,$28,$A5,$2A,$35,$0E,$00,$00
60E3 DEFB $05,$00,$00,$29,$2B,$55,$0D
60EA DEFB $00,$B4,$3F,$00,$E9,$54,$24,$28 Line 180: DIM T$(5,14): RESTORE VAL "9045": FOR N=U TO 5: READ T$(N): NEXT N: GO TO VAL "8900".
60F2 DEFB $35,$0E,$00,$00,$05,$00,$00,$2C
60FA DEFB $31,$34,$0E,$00,$00,$0E,$00,$00
6102 DEFB $29,$3A,$E5,$B0,$22,$39,$30,$34
610A DEFB $35,$22,$3A,$EB,$4E,$3D,$55,$CC
6112 DEFB $35,$0E,$00,$00,$05,$00,$00,$3A
611A DEFB $E3,$54,$24,$28,$4E,$29,$3A,$F3
6122 DEFB $4E,$3A,$EC,$B0,$22,$38,$39,$30
612A DEFB $30,$22,$0D
612D DEFB $01,$36,$84,$00,$E7,$55,$3A,$DA Line 310: BORDER U: PAPER R: CLS : LET S$=" ": FOR N=U TO 30: PRINT AT U,N;"~";AT 11,N;"~": NEXT N: FOR N=R TO 10: PRINT AT N,U;"~"; PAPER 6;S$; PAPER R;"~": NEXT N.
6135 DEFB $52,$3A,$FB,$3A,$F1,$53,$24,$3D
613D DEFB $22,$20,$20,$20,$20,$20,$20,$20
6145 DEFB $20,$20,$20,$20,$20,$20,$20,$20
614D DEFB $20,$20,$20,$20,$20,$20,$20,$20
6155 DEFB $20,$20,$20,$20,$20,$22,$3A,$EB
615D DEFB $4E,$3D,$55,$CC,$33,$30,$0E,$00
6165 DEFB $00,$1E,$00,$00,$3A,$F5,$AC,$55
616D DEFB $2C,$4E,$3B,$22,$7E,$22,$3B,$AC
6175 DEFB $31,$31,$0E,$00,$00,$0B,$00,$00
617D DEFB $2C,$4E,$3B,$22,$7E,$22,$3A,$F3
6185 DEFB $4E,$3A,$EB,$4E,$3D,$52,$CC,$31
618D DEFB $30,$0E,$00,$00,$0A,$00,$00,$3A
6195 DEFB $F5,$AC,$4E,$2C,$55,$3B,$22,$7E
619D DEFB $22,$3B,$DA,$36,$0E,$00,$00,$06
61A5 DEFB $00,$00,$3B,$53,$24,$3B,$DA,$52
61AD DEFB $3B,$22,$7E,$22,$3A,$F3,$4E,$0D
61B5 DEFB $01,$3B,$C3,$00,$F5,$DA,$36,$0E Line 315: PRINT PAPER 6;AT 7,6;"_";AT 2,9;"4";AT 5,3;"5 _";AT 6,9;"_ 3";TAB 21;"1";AT 9,10;"2";AT 3,27;"N";AT 4,27;"↑".
61BD DEFB $00,$00,$06,$00,$00,$3B,$AC,$37
61C5 DEFB $0E,$00,$00,$07,$00,$00,$2C,$36
61CD DEFB $0E,$00,$00,$06,$00,$00,$3B,$22
61D5 DEFB $5F,$22,$3B,$AC,$32,$0E,$00,$00
61DD DEFB $02,$00,$00,$2C,$39,$0E,$00,$00
61E5 DEFB $09,$00,$00,$3B,$22,$34,$14,$01
61ED DEFB $14,$00,$82,$22,$3B,$AC,$35,$0E
61F5 DEFB $00,$00,$05,$00,$00,$2C,$33,$0E
61FD DEFB $00,$00,$03,$00,$00,$3B,$22,$35
6205 DEFB $14,$01,$87,$14,$00,$20,$20,$20
620D DEFB $5F,$22,$3B,$AC,$36,$0E,$00,$00
6215 DEFB $06,$00,$00,$2C,$39,$0E,$00,$00
621D DEFB $09,$00,$00,$3B,$22,$5F,$20,$20
6225 DEFB $20,$81,$33,$22,$3B,$AD,$32,$31
622D DEFB $0E,$00,$00,$15,$00,$00,$3B,$22
6235 DEFB $81,$31,$22,$3B,$AC,$39,$0E,$00
623D DEFB $00,$09,$00,$00,$2C,$31,$30,$0E
6245 DEFB $00,$00,$0A,$00,$00,$3B,$22,$81
624D DEFB $32,$22,$3B,$AC,$33,$0E,$00,$00
6255 DEFB $03,$00,$00,$2C,$32,$37,$0E,$00
625D DEFB $00,$1B,$00,$00,$3B,$22,$4E,$22
6265 DEFB $3B,$AC,$34,$0E,$00,$00,$04,$00
626D DEFB $00,$2C,$32,$37,$0E,$00,$00,$1B
6275 DEFB $00,$00,$3B,$22,$5E,$22,$0D
627C DEFB $01,$40,$F2,$00,$F6,$39,$32,$0E Line 320: PLOT 92,136: DRAW 5,9: DRAW INT PI,-5: PLOT 97,136: DRAW 5,7: DRAW 5,-7: PLOT 105,139: DRAW INT PI,6: DRAW 5,-9: PLOT 111,140: DRAW 5,4: DRAW 6,-8: CIRCLE 219,144,12.
6284 DEFB $00,$00,$5C,$00,$00,$2C,$31,$33
628C DEFB $36,$0E,$00,$00,$88,$00,$00,$3A
6294 DEFB $FC,$35,$0E,$00,$00,$05,$00,$00
629C DEFB $2C,$39,$0E,$00,$00,$09,$00,$00
62A4 DEFB $3A,$FC,$BA,$A7,$2C,$2D,$35,$0E
62AC DEFB $00,$00,$05,$00,$00,$3A,$F6,$39
62B4 DEFB $37,$0E,$00,$00,$61,$00,$00,$2C
62BC DEFB $31,$33,$36,$0E,$00,$00,$88,$00
62C4 DEFB $00,$3A,$FC,$35,$0E,$00,$00,$05
62CC DEFB $00,$00,$2C,$37,$0E,$00,$00,$07
62D4 DEFB $00,$00,$3A,$FC,$35,$0E,$00,$00
62DC DEFB $05,$00,$00,$2C,$2D,$37,$0E,$00
62E4 DEFB $00,$07,$00,$00,$3A,$F6,$31,$30
62EC DEFB $35,$0E,$00,$00,$69,$00,$00,$2C
62F4 DEFB $31,$33,$39,$0E,$00,$00,$8B,$00
62FC DEFB $00,$3A,$FC,$BA,$A7,$2C,$36,$0E
6304 DEFB $00,$00,$06,$00,$00,$3A,$FC,$35
630C DEFB $0E,$00,$00,$05,$00,$00,$2C,$2D
6314 DEFB $39,$0E,$00,$00,$09,$00,$00,$3A
631C DEFB $F6,$31,$31,$31,$0E,$00,$00,$6F
6324 DEFB $00,$00,$2C,$31,$34,$30,$0E,$00
632C DEFB $00,$8C,$00,$00,$3A,$FC,$35,$0E
6334 DEFB $00,$00,$05,$00,$00,$2C,$34,$0E
633C DEFB $00,$00,$04,$00,$00,$3A,$FC,$36
6344 DEFB $0E,$00,$00,$06,$00,$00,$2C,$2D
634C DEFB $38,$0E,$00,$00,$08,$00,$00,$3A
6354 DEFB $D8,$32,$31,$39,$0E,$00,$00,$DB
635C DEFB $00,$00,$2C,$31,$34,$34,$0E,$00
6364 DEFB $00,$90,$00,$00,$2C,$31,$32,$0E
636C DEFB $00,$00,$0C,$00,$00,$0D
6372 DEFB $01,$45,$90,$00,$F5,$AC,$31,$33 Line 325: PRINT AT 13,R;"1=DRY GULCH : 2=DODGE CITY";TAB R;"3=NUGGET CITY : 4=BULLETVILLE";TAB 8;"5=DEADMANS CREEK";AT 16,7;"------------------".
637A DEFB $0E,$00,$00,$0D,$00,$00,$2C,$52
6382 DEFB $3B,$22,$31,$3D,$44,$52,$59,$20
638A DEFB $47,$55,$4C,$43,$48,$20,$3A,$20
6392 DEFB $32,$3D,$44,$4F,$44,$47,$45,$20
639A DEFB $43,$49,$54,$59,$22,$3B,$AD,$52
63A2 DEFB $3B,$22,$33,$3D,$4E,$55,$47,$47
63AA DEFB $45,$54,$20,$43,$49,$54,$59,$20
63B2 DEFB $3A,$20,$34,$3D,$42,$55,$4C,$4C
63BA DEFB $45,$54,$56,$49,$4C,$4C,$45,$22
63C2 DEFB $3B,$AD,$38,$0E,$00,$00,$08,$00
63CA DEFB $00,$3B,$22,$35,$3D,$44,$45,$41
63D2 DEFB $44,$4D,$41,$4E,$53,$20,$43,$52
63DA DEFB $45,$45,$4B,$22,$3B,$AC,$31,$36
63E2 DEFB $0E,$00,$00,$10,$00,$00,$2C,$37
63EA DEFB $0E,$00,$00,$07,$00,$00,$3B,$22
63F2 DEFB $2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D
63FA DEFB $2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D
6402 DEFB $2D,$2D,$22,$0D
6406 DEFB $01,$4A,$36,$00,$E5,$B0,$22,$39 Line 330: RESTORE VAL "9050": FOR N=U TO 5: READ Z: READ X: BEEP Z/4,X+3: NEXT N: RETURN.
640E DEFB $30,$35,$30,$22,$3A,$EB,$4E,$3D
6416 DEFB $55,$CC,$35,$0E,$00,$00,$05,$00
641E DEFB $00,$3A,$E3,$5A,$3A,$E3,$58,$3A
6426 DEFB $D7,$5A,$2F,$34,$0E,$00,$00,$04
642E DEFB $00,$00,$2C,$58,$2B,$33,$0E,$00
6436 DEFB $00,$03,$00,$00,$3A,$F3,$4E,$3A
643E DEFB $FE,$0D
6440 DEFB $01,$E0,$09,$00,$ED,$B0,$22,$37 Line 480: GO SUB VAL "7500".
6448 DEFB $35,$30,$30,$22,$0D
644D DEFB $01,$E5,$0F,$00,$FA,$55,$4D,$3D Line 485: IF UM=TN THEN GO TO VAL "487".
6455 DEFB $54,$4E,$CB,$EC,$B0,$22,$34,$38
645D DEFB $37,$22,$0D
6460 DEFB $01,$E6,$08,$00,$EC,$B0,$22,$35 Line 486: GO TO VAL "500".
6468 DEFB $30,$30,$22,$0D
646C DEFB $01,$E7,$F6,$00,$E7,$A7,$3A,$DA Line 487: BORDER PI: PAPER PI: CLS : PRINT : PRINT : PRINT : PRINT "YOU HAVE ENTERED ";T$(TN): PRINT : PRINT "AGENT CHARLES A.SIRINGO OF THE": PRINT : PRINT "PINKERTON DETECTIVE AGENCY": PRINT : PRINT "IS WAITING FOR YOU.": PRINT : PRINT "HE ARRESTS YOU ON A CHARGE OF": PRINT : PRINT "MURDER. YOU ARE GOING TO PRISON": PRINT : PRINT "FOR A LONG LONG TIME....": GO TO VAL "2725".
6474 DEFB $A7,$3A,$FB,$3A,$F5,$3A,$F5,$3A
647C DEFB $F5,$3A,$F5,$22,$59,$4F,$55,$20
6484 DEFB $48,$41,$56,$45,$20,$45,$4E,$54
648C DEFB $45,$52,$45,$44,$20,$22,$3B,$54
6494 DEFB $24,$28,$54,$4E,$29,$3A,$F5,$3A
649C DEFB $F5,$22,$41,$47,$45,$4E,$54,$20
64A4 DEFB $43,$48,$41,$52,$4C,$45,$53,$20
64AC DEFB $41,$2E,$53,$49,$52,$49,$4E,$47
64B4 DEFB $4F,$20,$4F,$46,$20,$54,$48,$45
64BC DEFB $22,$3A,$F5,$3A,$F5,$22,$50,$49
64C4 DEFB $4E,$4B,$45,$52,$54,$4F,$4E,$20
64CC DEFB $44,$45,$54,$45,$43,$54,$49,$56
64D4 DEFB $45,$20,$41,$47,$45,$4E,$43,$59
64DC DEFB $22,$3A,$F5,$3A,$F5,$22,$49,$53
64E4 DEFB $20,$57,$41,$49,$54,$49,$4E,$47
64EC DEFB $20,$46,$4F,$52,$20,$59,$4F,$55
64F4 DEFB $2E,$22,$3A,$F5,$3A,$F5,$22,$48
64FC DEFB $45,$20,$41,$52,$52,$45,$53,$54
6504 DEFB $53,$20,$59,$4F,$55,$20,$4F,$4E
650C DEFB $20,$41,$20,$43,$48,$41,$52,$47
6514 DEFB $45,$20,$4F,$46,$22,$3A,$F5,$3A
651C DEFB $F5,$22,$4D,$55,$52,$44,$45,$52
6524 DEFB $2E,$20,$59,$4F,$55,$20,$41,$52
652C DEFB $45,$20,$47,$4F,$49,$4E,$47,$20
6534 DEFB $54,$4F,$20,$50,$52,$49,$53,$4F
653C DEFB $4E,$22,$3A,$F5,$3A,$F5,$22,$46
6544 DEFB $4F,$52,$20,$41,$20,$4C,$4F,$4E
654C DEFB $47,$20,$4C,$4F,$4E,$47,$20,$54
6554 DEFB $49,$4D,$45,$2E,$2E,$2E,$2E,$22
655C DEFB $3A,$EC,$B0,$22,$32,$37,$32,$35
6564 DEFB $22,$0D
6566 DEFB $01,$F9,$56,$00,$E7,$BA,$A7,$3A Line 505: BORDER INT PI: PAPER U: CLS : PRINT PAPER 4;AT U,INT PI;;"YOU ARE IN ";T$(TN): PRINT : PRINT TAB INT PI; PAPER U;"YOU CAN DO THE FOLLOWING:-".
656E DEFB $DA,$55,$3A,$FB,$3A,$F5,$DA,$34
6576 DEFB $0E,$00,$00,$04,$00,$00,$3B,$AC
657E DEFB $55,$2C,$BA,$A7,$3B,$3B,$22,$59
6586 DEFB $4F,$55,$20,$41,$52,$45,$20,$49
658E DEFB $4E,$20,$22,$3B,$54,$24,$28,$54
6596 DEFB $4E,$29,$3A,$F5,$3A,$F5,$AD,$BA
659E DEFB $A7,$3B,$DA,$55,$3B,$22,$59,$4F
65A6 DEFB $55,$20,$43,$41,$4E,$20,$44,$4F
65AE DEFB $20,$54,$48,$45,$20,$46,$4F,$4C
65B6 DEFB $4C,$4F,$57,$49,$4E,$47,$3A,$2D
65BE DEFB $22,$0D
65C0 DEFB $01,$FE,$E3,$00,$F5,$AC,$36,$0E Line 510: PRINT AT 6,4;"1-GO TO SALOON",,TAB 4;"2-GO TO SHERIFFS' OFFICE",,TAB 4;"3-GO TO STORE",,TAB 4;"4-GO TO TELEGRAPH OFFICE",,TAB 4;"5-MOVE ON",,,TAB 4;"6-STATUS";AT 19,2;"PRESS NUMBER OF YOUR CHOICE".
65C8 DEFB $00,$00,$06,$00,$00,$2C,$34,$0E
65D0 DEFB $00,$00,$04,$00,$00,$3B,$22,$31
65D8 DEFB $2D,$47,$4F,$20,$54,$4F,$20,$53
65E0 DEFB $41,$4C,$4F,$4F,$4E,$22,$2C,$2C
65E8 DEFB $AD,$34,$0E,$00,$00,$04,$00,$00
65F0 DEFB $3B,$22,$32,$2D,$47,$4F,$20,$54
65F8 DEFB $4F,$20,$53,$48,$45,$52,$49,$46
6600 DEFB $46,$53,$27,$20,$4F,$46,$46,$49
6608 DEFB $43,$45,$22,$2C,$2C,$AD,$34,$0E
6610 DEFB $00,$00,$04,$00,$00,$3B,$22,$33
6618 DEFB $2D,$47,$4F,$20,$54,$4F,$20,$53
6620 DEFB $54,$4F,$52,$45,$22,$2C,$2C,$AD
6628 DEFB $34,$0E,$00,$00,$04,$00,$00,$3B
6630 DEFB $22,$34,$2D,$47,$4F,$20,$54,$4F
6638 DEFB $20,$54,$45,$4C,$45,$47,$52,$41
6640 DEFB $50,$48,$20,$4F,$46,$46,$49,$43
6648 DEFB $45,$22,$2C,$2C,$AD,$34,$0E,$00
6650 DEFB $00,$04,$00,$00,$3B,$22,$35,$2D
6658 DEFB $4D,$4F,$56,$45,$20,$4F,$4E,$22
6660 DEFB $2C,$2C,$2C,$AD,$34,$0E,$00,$00
6668 DEFB $04,$00,$00,$3B,$22,$36,$2D,$53
6670 DEFB $54,$41,$54,$55,$53,$22,$3B,$AC
6678 DEFB $31,$39,$0E,$00,$00,$13,$00,$00
6680 DEFB $2C,$32,$0E,$00,$00,$02,$00,$00
6688 DEFB $3B,$22,$50,$52,$45,$53,$53,$20
6690 DEFB $4E,$55,$4D,$42,$45,$52,$20,$4F
6698 DEFB $46,$20,$59,$4F,$55,$52,$20,$43
66A0 DEFB $48,$4F,$49,$43,$45,$22,$0D
66A7 DEFB $02,$08,$25,$00,$D7,$2E,$30,$30 Line 520: BEEP .001,45: IF INKEY$="1" THEN GO TO VAL "1000".
66AF DEFB $31,$0E,$77,$03,$12,$6E,$97,$2C
66B7 DEFB $34,$35,$0E,$00,$00,$2D,$00,$00
66BF DEFB $3A,$FA,$A6,$3D,$22,$31,$22,$CB
66C7 DEFB $EC,$B0,$22,$31,$30,$30,$30,$22
66CF DEFB $0D
66D0 DEFB $02,$09,$10,$00,$FA,$A6,$3D,$22 Line 521: IF INKEY$="2" THEN GO TO VAL "3000".
66D8 DEFB $32,$22,$CB,$EC,$B0,$22,$33,$30
66E0 DEFB $30,$30,$22,$0D
66E4 DEFB $02,$0A,$10,$00,$FA,$A6,$3D,$22 Line 522: IF INKEY$="3" THEN GO TO VAL "7666".
66EC DEFB $33,$22,$CB,$EC,$B0,$22,$37,$36
66F4 DEFB $36,$36,$22,$0D
66F8 DEFB $02,$0B,$10,$00,$FA,$A6,$3D,$22 Line 523: IF INKEY$="4" THEN GO TO VAL "2500".
6700 DEFB $34,$22,$CB,$EC,$B0,$22,$32,$35
6708 DEFB $30,$30,$22,$0D
670C DEFB $02,$0C,$10,$00,$FA,$A6,$3D,$22 Line 524: IF INKEY$="5" THEN GO TO VAL "6000".
6714 DEFB $35,$22,$CB,$EC,$B0,$22,$36,$30
671C DEFB $30,$30,$22,$0D
6720 DEFB $02,$0D,$10,$00,$FA,$A6,$3D,$22 Line 525: IF INKEY$="6" THEN GO TO VAL "7800".
6728 DEFB $36,$22,$CB,$EC,$B0,$22,$37,$38
6730 DEFB $30,$30,$22,$0D
6734 DEFB $02,$17,$1C,$00,$D7,$2E,$30,$30 Line 535: BEEP .005,0: GO TO VAL "520".
673C DEFB $35,$0E,$79,$23,$D7,$0A,$3D,$2C
6744 DEFB $30,$0E,$00,$00,$00,$00,$00,$3A
674C DEFB $EC,$B0,$22,$35,$32,$30,$22,$0D
6754 DEFB $03,$F2,$5B,$00,$E7,$55,$3A,$DA Line 1010: BORDER U: PAPER R: CLS : PRINT PAPER 4;AT R,5;"YOU'RE IN THE SALOON"; PAPER R;AT 4,7;"DO YOU WANT TO:-".
675C DEFB $52,$3A,$FB,$3A,$F5,$DA,$34,$0E
6764 DEFB $00,$00,$04,$00,$00,$3B,$AC,$52
676C DEFB $2C,$35,$0E,$00,$00,$05,$00,$00
6774 DEFB $3B,$22,$59,$4F,$55,$27,$52,$45
677C DEFB $20,$49,$4E,$20,$54,$48,$45,$20
6784 DEFB $53,$41,$4C,$4F,$4F,$4E,$22,$3B
678C DEFB $DA,$52,$3B,$AC,$34,$0E,$00,$00
6794 DEFB $04,$00,$00,$2C,$37,$0E,$00,$00
679C DEFB $07,$00,$00,$3B,$22,$44,$4F,$20
67A4 DEFB $59,$4F,$55,$20,$57,$41,$4E,$54
67AC DEFB $20,$54,$4F,$3A,$2D,$22,$0D
67B3 DEFB $03,$F7,$AA,$00,$F5,$AC,$36,$0E Line 1015: PRINT AT 6,6;"1) DRINK": PRINT : PRINT TAB 6;"2) PLAY POKER": PRINT : PRINT TAB 6;"3) LOOK AROUND": PRINT : PRINT TAB 6;"4) LEAVE";AT 15,R;"PRESS NUMBER OF YOUR CHOICE": BEEP .3,20.
67BB DEFB $00,$00,$06,$00,$00,$2C,$36,$0E
67C3 DEFB $00,$00,$06,$00,$00,$3B,$22,$31
67CB DEFB $29,$20,$44,$52,$49,$4E,$4B,$22
67D3 DEFB $3A,$F5,$3A,$F5,$AD,$36,$0E,$00
67DB DEFB $00,$06,$00,$00,$3B,$22,$32,$29
67E3 DEFB $20,$50,$4C,$41,$59,$20,$50,$4F
67EB DEFB $4B,$45,$52,$22,$3A,$F5,$3A,$F5
67F3 DEFB $AD,$36,$0E,$00,$00,$06,$00,$00
67FB DEFB $3B,$22,$33,$29,$20,$4C,$4F,$4F
6803 DEFB $4B,$20,$41,$52,$4F,$55,$4E,$44
680B DEFB $22,$3A,$F5,$3A,$F5,$AD,$36,$0E
6813 DEFB $00,$00,$06,$00,$00,$3B,$22,$34
681B DEFB $29,$20,$4C,$45,$41,$56,$45,$22
6823 DEFB $3B,$AC,$31,$35,$0E,$00,$00,$0F
682B DEFB $00,$00,$2C,$52,$3B,$22,$50,$52
6833 DEFB $45,$53,$53,$20,$4E,$55,$4D,$42
683B DEFB $45,$52,$20,$4F,$46,$20,$59,$4F
6843 DEFB $55,$52,$20,$43,$48,$4F,$49,$43
684B DEFB $45,$22,$3A,$D7,$2E,$33,$0E,$7F
6853 DEFB $19,$99,$99,$99,$2C,$32,$30,$0E
685B DEFB $00,$00,$14,$00,$00,$0D
6861 DEFB $03,$FC,$1D,$00,$D7,$2E,$30,$31 Line 1020: BEEP .01,PI: IF INKEY$="1" THEN GO TO VAL "1150".
6869 DEFB $0E,$7A,$23,$D7,$0A,$3D,$2C,$A7
6871 DEFB $3A,$FA,$A6,$3D,$22,$31,$22,$CB
6879 DEFB $EC,$B0,$22,$31,$31,$35,$30,$22
6881 DEFB $0D
6882 DEFB $03,$FD,$10,$00,$FA,$A6,$3D,$22 Line 1021: IF INKEY$="2" THEN GO TO VAL "1250".
688A DEFB $32,$22,$CB,$EC,$B0,$22,$31,$32
6892 DEFB $35,$30,$22,$0D
6896 DEFB $03,$FE,$10,$00,$FA,$A6,$3D,$22 Line 1022: IF INKEY$="3" THEN GO TO VAL "2000".
689E DEFB $33,$22,$CB,$EC,$B0,$22,$32,$30
68A6 DEFB $30,$30,$22,$0D
68AA DEFB $04,$00,$0F,$00,$FA,$A6,$3D,$22 Line 1024: IF INKEY$="4" THEN GO TO VAL "500".
68B2 DEFB $34,$22,$CB,$EC,$B0,$22,$35,$30
68BA DEFB $30,$22,$0D
68BD DEFB $04,$06,$18,$00,$D7,$2E,$30,$30 Line 1030: BEEP .005,-PI: GO TO VAL "1020".
68C5 DEFB $35,$0E,$79,$23,$D7,$0A,$3D,$2C
68CD DEFB $2D,$A7,$3A,$EC,$B0,$22,$31,$30
68D5 DEFB $32,$30,$22,$0D
68D9 DEFB $04,$7E,$94,$00,$DA,$34,$0E,$00 Line 1150: PAPER 4: CLS : PRINT AT 4,6;"YOU ARE AT THE BAR": PRINT : PRINT : PRINT : PRINT TAB 5;"WHAT WILL YOU HAVE ?": PRINT : PRINT TAB 6;"1) BEER ($1)": PRINT : PRINT TAB 6;"2) RED EYE ($2)".
68E1 DEFB $00,$04,$00,$00,$3A,$FB,$3A,$F5
68E9 DEFB $AC,$34,$0E,$00,$00,$04,$00,$00
68F1 DEFB $2C,$36,$0E,$00,$00,$06,$00,$00
68F9 DEFB $3B,$22,$59,$4F,$55,$20,$41,$52
6901 DEFB $45,$20,$41,$54,$20,$54,$48,$45
6909 DEFB $20,$42,$41,$52,$22,$3A,$F5,$3A
6911 DEFB $F5,$3A,$F5,$3A,$F5,$AD,$35,$0E
6919 DEFB $00,$00,$05,$00,$00,$3B,$22,$57
6921 DEFB $48,$41,$54,$20,$57,$49,$4C,$4C
6929 DEFB $20,$59,$4F,$55,$20,$48,$41,$56
6931 DEFB $45,$20,$3F,$22,$3A,$F5,$3A,$F5
6939 DEFB $AD,$36,$0E,$00,$00,$06,$00,$00
6941 DEFB $3B,$22,$31,$29,$20,$42,$45,$45
6949 DEFB $52,$20,$20,$28,$24,$31,$29,$22
6951 DEFB $3A,$F5,$3A,$F5,$AD,$36,$0E,$00
6959 DEFB $00,$06,$00,$00,$3B,$22,$32,$29
6961 DEFB $20,$52,$45,$44,$20,$45,$59,$45
6969 DEFB $20,$20,$28,$24,$32,$29,$22,$0D
6971 DEFB $04,$83,$69,$00,$D7,$2E,$36,$0E Line 1155: BEEP .6,25: INPUT "ENTER (1 OR 2) "; LINE E$: LET E$=E$+" ": IF CODE E$(U)=49 OR CODE E$(U)=50 THEN LET H=VAL E$(U): GO TO VAL "1160".
6979 DEFB $80,$19,$99,$99,$99,$2C,$32,$35
6981 DEFB $0E,$00,$00,$19,$00,$00,$3A,$EE
6989 DEFB $22,$45,$4E,$54,$45,$52,$20,$28
6991 DEFB $31,$20,$4F,$52,$20,$32,$29,$20
6999 DEFB $22,$3B,$CA,$45,$24,$3A,$F1,$45
69A1 DEFB $24,$3D,$45,$24,$2B,$22,$20,$22
69A9 DEFB $3A,$FA,$AF,$45,$24,$28,$55,$29
69B1 DEFB $3D,$34,$39,$0E,$00,$00,$31,$00
69B9 DEFB $00,$C5,$AF,$45,$24,$28,$55,$29
69C1 DEFB $3D,$35,$30,$0E,$00,$00,$32,$00
69C9 DEFB $00,$CB,$F1,$48,$3D,$B0,$45,$24
69D1 DEFB $28,$55,$29,$3A,$EC,$B0,$22,$31
69D9 DEFB $31,$36,$30,$22,$0D
69DE DEFB $04,$85,$09,$00,$EC,$B0,$22,$31 Line 1157: GO TO VAL "1155".
69E6 DEFB $31,$35,$35,$22,$0D
69EB DEFB $04,$88,$3C,$00,$FA,$4D,$55,$3C Line 1160: IF MU<H THEN PRINT : PRINT TAB 5;"YOU CAN'T AFFORD IT!!": GO SUB VAL "9231": GO TO VAL "1000".
69F3 DEFB $48,$CB,$F5,$3A,$F5,$AD,$35,$0E
69FB DEFB $00,$00,$05,$00,$00,$3B,$22,$59
6A03 DEFB $4F,$55,$20,$43,$41,$4E,$27,$54
6A0B DEFB $20,$41,$46,$46,$4F,$52,$44,$20
6A13 DEFB $49,$54,$21,$21,$22,$3A,$ED,$B0
6A1B DEFB $22,$39,$32,$33,$31,$22,$3A,$EC
6A23 DEFB $B0,$22,$31,$30,$30,$30,$22,$0D
6A2B DEFB $04,$8D,$76,$00,$FA,$48,$3D,$55 Line 1165: IF H=U THEN LET IS=IS+U: LET CS=CS+10: LET MU=MU-H: PRINT : PRINT TAB 6;"ONE BEER COMING UP": PRINT : PRINT "THAT'S WORTH 10 STRENGTH POINTS": GO TO VAL "1175".
6A33 DEFB $CB,$F1,$49,$53,$3D,$49,$53,$2B
6A3B DEFB $55,$3A,$F1,$43,$53,$3D,$43,$53
6A43 DEFB $2B,$31,$30,$0E,$00,$00,$0A,$00
6A4B DEFB $00,$3A,$F1,$4D,$55,$3D,$4D,$55
6A53 DEFB $2D,$48,$3A,$F5,$3A,$F5,$AD,$36
6A5B DEFB $0E,$00,$00,$06,$00,$00,$3B,$22
6A63 DEFB $4F,$4E,$45,$20,$42,$45,$45,$52
6A6B DEFB $20,$43,$4F,$4D,$49,$4E,$47,$20
6A73 DEFB $55,$50,$22,$3A,$F5,$3A,$F5,$22
6A7B DEFB $54,$48,$41,$54,$27,$53,$20,$57
6A83 DEFB $4F,$52,$54,$48,$20,$31,$30,$20
6A8B DEFB $53,$54,$52,$45,$4E,$47,$54,$48
6A93 DEFB $20,$50,$4F,$49,$4E,$54,$53,$22
6A9B DEFB $3A,$EC,$B0,$22,$31,$31,$37,$35
6AA3 DEFB $22,$0D
6AA5 DEFB $04,$92,$71,$00,$FA,$48,$3D,$52 Line 1170: IF H=R THEN LET IS=IS+INT PI: LET CS=CS+25: LET MU=MU-H: PRINT : PRINT TAB 4;"ONE RED EYE COMING UP": PRINT : PRINT "THAT'S WORTH 25 STRENGTH POINTS".
6AAD DEFB $CB,$F1,$49,$53,$3D,$49,$53,$2B
6AB5 DEFB $BA,$A7,$3A,$F1,$43,$53,$3D,$43
6ABD DEFB $53,$2B,$32,$35,$0E,$00,$00,$19
6AC5 DEFB $00,$00,$3A,$F1,$4D,$55,$3D,$4D
6ACD DEFB $55,$2D,$48,$3A,$F5,$3A,$F5,$AD
6AD5 DEFB $34,$0E,$00,$00,$04,$00,$00,$3B
6ADD DEFB $22,$4F,$4E,$45,$20,$52,$45,$44
6AE5 DEFB $20,$45,$59,$45,$20,$43,$4F,$4D
6AED DEFB $49,$4E,$47,$20,$55,$50,$22,$3A
6AF5 DEFB $F5,$3A,$F5,$22,$54,$48,$41,$54
6AFD DEFB $27,$53,$20,$57,$4F,$52,$54,$48
6B05 DEFB $20,$32,$35,$20,$53,$54,$52,$45
6B0D DEFB $4E,$47,$54,$48,$20,$50,$4F,$49
6B15 DEFB $4E,$54,$53,$22,$0D
6B1A DEFB $04,$97,$33,$00,$EB,$4E,$3D,$2D Line 1175: FOR N=-10 TO 10: BEEP .1,N: BEEP .1,N+U: NEXT N.
6B22 DEFB $31,$30,$0E,$00,$00,$0A,$00,$00
6B2A DEFB $CC,$31,$30,$0E,$00,$00,$0A,$00
6B32 DEFB $00,$3A,$D7,$2E,$31,$0E,$7D,$4C
6B3A DEFB $CC,$CC,$CC,$2C,$4E,$3A,$D7,$2E
6B42 DEFB $31,$0E,$7D,$4C,$CC,$CC,$CC,$2C
6B4A DEFB $4E,$2B,$55,$3A,$F3,$4E,$0D
6B51 DEFB $04,$9C,$AA,$00,$FA,$49,$53,$3E Line 1180: IF IS>LM THEN CLS : LET CS=CS-IS*20: PRINT AT 6,INT PI;"YOU FEEL DIZZY AND STUMBLE": PRINT : PRINT " INTO A LONESOME COWBOY,WHO": PRINT : PRINT " HITS YOU VERY HARD,YOUR": PRINT : PRINT " STRENGTH IS ";CS: GO TO VAL "1190".
6B59 DEFB $4C,$4D,$CB,$FB,$3A,$F1,$43,$53
6B61 DEFB $3D,$43,$53,$2D,$49,$53,$2A,$32
6B69 DEFB $30,$0E,$00,$00,$14,$00,$00,$3A
6B71 DEFB $F5,$AC,$36,$0E,$00,$00,$06,$00
6B79 DEFB $00,$2C,$BA,$A7,$3B,$22,$59,$4F
6B81 DEFB $55,$20,$46,$45,$45,$4C,$20,$44
6B89 DEFB $49,$5A,$5A,$59,$20,$41,$4E,$44
6B91 DEFB $20,$53,$54,$55,$4D,$42,$4C,$45
6B99 DEFB $22,$3A,$F5,$3A,$F5,$22,$20,$20
6BA1 DEFB $20,$49,$4E,$54,$4F,$20,$41,$20
6BA9 DEFB $4C,$4F,$4E,$45,$53,$4F,$4D,$45
6BB1 DEFB $20,$43,$4F,$57,$42,$4F,$59,$2C
6BB9 DEFB $57,$48,$4F,$22,$3A,$F5,$3A,$F5
6BC1 DEFB $22,$20,$20,$20,$48,$49,$54,$53
6BC9 DEFB $20,$59,$4F,$55,$20,$56,$45,$52
6BD1 DEFB $59,$20,$48,$41,$52,$44,$2C,$59
6BD9 DEFB $4F,$55,$52,$22,$3A,$F5,$3A,$F5
6BE1 DEFB $22,$20,$20,$20,$53,$54,$52,$45
6BE9 DEFB $4E,$47,$54,$48,$20,$49,$53,$20
6BF1 DEFB $22,$3B,$43,$53,$3A,$EC,$B0,$22
6BF9 DEFB $31,$31,$39,$30,$22,$0D
6BFF DEFB $04,$A1,$09,$00,$EC,$B0,$22,$31 Line 1185: GO TO VAL "1000".
6C07 DEFB $30,$30,$30,$22,$0D
6C0C DEFB $04,$A6,$3B,$00,$EB,$4E,$3D,$55 Line 1190: FOR N=U TO 50: BEEP .1,RND*50: NEXT N: IF CS<=0 THEN GO TO VAL "2435".
6C14 DEFB $CC,$35,$30,$0E,$00,$00,$32,$00
6C1C DEFB $00,$3A,$D7,$2E,$31,$0E,$7D,$4C
6C24 DEFB $CC,$CC,$CC,$2C,$A5,$2A,$35,$30
6C2C DEFB $0E,$00,$00,$32,$00,$00,$3A,$F3
6C34 DEFB $4E,$3A,$FA,$43,$53,$C7,$30,$0E
6C3C DEFB $00,$00,$00,$00,$00,$CB,$EC,$B0
6C44 DEFB $22,$32,$34,$33,$35,$22,$0D
6C4B DEFB $04,$AB,$08,$00,$EC,$B0,$22,$35 Line 1195: GO TO VAL "500".
6C53 DEFB $30,$30,$22,$0D
6C57 DEFB $04,$B0,$68,$00,$D7,$2E,$31,$0E Line 1200: BEEP .1,5: BEEP .1,10: BEEP .1,15: INPUT " PRESS ENTER TO CONTINUE "; LINE H$: RETURN.
6C5F DEFB $7D,$4C,$CC,$CC,$CC,$2C,$35,$0E
6C67 DEFB $00,$00,$05,$00,$00,$3A,$D7,$2E
6C6F DEFB $31,$0E,$7D,$4C,$CC,$CC,$CC,$2C
6C77 DEFB $31,$30,$0E,$00,$00,$0A,$00,$00
6C7F DEFB $3A,$D7,$2E,$31,$0E,$7D,$4C,$CC
6C87 DEFB $CC,$CC,$2C,$31,$35,$0E,$00,$00
6C8F DEFB $0F,$00,$00,$3A,$EE,$22,$20,$11
6C97 DEFB $02,$12,$01,$12,$00,$10,$07,$20
6C9F DEFB $50,$52,$45,$53,$53,$20,$45,$4E
6CA7 DEFB $54,$45,$52,$20,$54,$4F,$20,$43
6CAF DEFB $4F,$4E,$54,$49,$4E,$55,$45,$20
6CB7 DEFB $10,$00,$11,$04,$22,$3B,$CA,$48
6CBF DEFB $24,$3A,$FE,$0D
6CC3 DEFB $04,$E2,$5B,$00,$E7,$34,$0E,$00 Line 1250: BORDER 4: PAPER 4: CLS : IF MU<3 THEN PRINT AT 11,5;"YOU CAN'T AFFORD IT": GO SUB VAL "9231": GO TO VAL "1000".
6CCB DEFB $00,$04,$00,$00,$3A,$DA,$34,$0E
6CD3 DEFB $00,$00,$04,$00,$00,$3A,$FB,$3A
6CDB DEFB $FA,$4D,$55,$3C,$33,$0E,$00,$00
6CE3 DEFB $03,$00,$00,$CB,$F5,$AC,$31,$31
6CEB DEFB $0E,$00,$00,$0B,$00,$00,$2C,$35
6CF3 DEFB $0E,$00,$00,$05,$00,$00,$3B,$22
6CFB DEFB $59,$4F,$55,$20,$43,$41,$4E,$27
6D03 DEFB $54,$20,$41,$46,$46,$4F,$52,$44
6D0B DEFB $20,$49,$54,$22,$3A,$ED,$B0,$22
6D13 DEFB $39,$32,$33,$31,$22,$3A,$EC,$B0
6D1B DEFB $22,$31,$30,$30,$30,$22,$0D
6D22 DEFB $04,$EC,$8B,$00,$FA,$4D,$55,$3E Line 1260: IF MU>120 THEN PRINT AT 7,8;"THERE IS NO ONE": PRINT : PRINT TAB 6;"TO PLAY POKER WITH.": FOR N=U TO 30: BEEP .05,N*-U: BEEP .02,N: NEXT N: GO TO VAL "1000".
6D2A DEFB $31,$32,$30,$0E,$00,$00,$78,$00
6D32 DEFB $00,$CB,$F5,$AC,$37,$0E,$00,$00
6D3A DEFB $07,$00,$00,$2C,$38,$0E,$00,$00
6D42 DEFB $08,$00,$00,$3B,$22,$54,$48,$45
6D4A DEFB $52,$45,$20,$49,$53,$20,$4E,$4F
6D52 DEFB $20,$4F,$4E,$45,$22,$3A,$F5,$3A
6D5A DEFB $F5,$AD,$36,$0E,$00,$00,$06,$00
6D62 DEFB $00,$3B,$22,$54,$4F,$20,$50,$4C
6D6A DEFB $41,$59,$20,$50,$4F,$4B,$45,$52
6D72 DEFB $20,$57,$49,$54,$48,$2E,$22,$3A
6D7A DEFB $EB,$4E,$3D,$55,$CC,$33,$30,$0E
6D82 DEFB $00,$00,$1E,$00,$00,$3A,$D7,$2E
6D8A DEFB $30,$35,$0E,$7C,$4C,$CC,$CC,$CC
6D92 DEFB $2C,$4E,$2A,$2D,$55,$3A,$D7,$2E
6D9A DEFB $30,$32,$0E,$7B,$23,$D7,$0A,$3D
6DA2 DEFB $2C,$4E,$3A,$F3,$4E,$3A,$EC,$B0
6DAA DEFB $22,$31,$30,$30,$30,$22,$0D
6DB1 DEFB $04,$F1,$73,$00,$F5,$AC,$36,$0E Line 1265: PRINT AT 6,4;"YOU PLAY POKER WITH": PRINT : PRINT TAB 4;"THE TOWN GAMBLER....": BEEP .2,U: BEEP .4,10: GO SUB VAL "1200".
6DB9 DEFB $00,$00,$06,$00,$00,$2C,$34,$0E
6DC1 DEFB $00,$00,$04,$00,$00,$3B,$22,$59
6DC9 DEFB $4F,$55,$20,$50,$4C,$41,$59,$20
6DD1 DEFB $50,$4F,$4B,$45,$52,$20,$57,$49
6DD9 DEFB $54,$48,$22,$3A,$F5,$3A,$F5,$AD
6DE1 DEFB $34,$0E,$00,$00,$04,$00,$00,$3B
6DE9 DEFB $22,$54,$48,$45,$20,$54,$4F,$57
6DF1 DEFB $4E,$20,$47,$41,$4D,$42,$4C,$45
6DF9 DEFB $52,$2E,$2E,$2E,$2E,$22,$3A,$D7
6E01 DEFB $2E,$32,$0E,$7E,$4C,$CC,$CC,$CC
6E09 DEFB $2C,$55,$3A,$D7,$2E,$34,$0E,$7F
6E11 DEFB $4C,$CC,$CC,$CC,$2C,$31,$30,$0E
6E19 DEFB $00,$00,$0A,$00,$00,$3A,$ED,$B0
6E21 DEFB $22,$31,$32,$30,$30,$22,$0D
6E28 DEFB $04,$F6,$38,$00,$F1,$53,$24,$3D Line 1270: LET S$=" ": LET C=INT (RND*3)+U.
6E30 DEFB $22,$20,$20,$20,$20,$20,$20,$20
6E38 DEFB $20,$20,$20,$20,$20,$20,$20,$20
6E40 DEFB $20,$20,$20,$20,$20,$20,$20,$20
6E48 DEFB $20,$20,$20,$20,$20,$20,$20,$20
6E50 DEFB $22,$3A,$F1,$43,$3D,$BA,$28,$A5
6E58 DEFB $2A,$33,$0E,$00,$00,$03,$00,$00
6E60 DEFB $29,$2B,$55,$0D
6E64 DEFB $04,$FB,$66,$00,$F1,$59,$48,$3D Line 1275: LET YH=INT (RND*16)+9060: LET GH=INT (RND*16)+9060: IF C=U THEN LET GH=GH+R: IF GH>9075 THEN LET GH=9075.
6E6C DEFB $BA,$28,$A5,$2A,$31,$36,$0E,$00
6E74 DEFB $00,$10,$00,$00,$29,$2B,$39,$30
6E7C DEFB $36,$30,$0E,$00,$00,$64,$23,$00
6E84 DEFB $3A,$F1,$47,$48,$3D,$BA,$28,$A5
6E8C DEFB $2A,$31,$36,$0E,$00,$00,$10,$00
6E94 DEFB $00,$29,$2B,$39,$30,$36,$30,$0E
6E9C DEFB $00,$00,$64,$23,$00,$3A,$FA,$43
6EA4 DEFB $3D,$55,$CB,$F1,$47,$48,$3D,$47
6EAC DEFB $48,$2B,$52,$3A,$FA,$47,$48,$3E
6EB4 DEFB $39,$30,$37,$35,$0E,$00,$00,$73
6EBC DEFB $23,$00,$CB,$F1,$47,$48,$3D,$39
6EC4 DEFB $30,$37,$35,$0E,$00,$00,$73,$23
6ECC DEFB $00,$0D
6ECE DEFB $05,$0A,$10,$00,$FA,$47,$48,$3D Line 1290: IF GH=YH THEN GO TO VAL "1275".
6ED6 DEFB $59,$48,$CB,$EC,$B0,$22,$31,$32
6EDE DEFB $37,$35,$22,$0D
6EE2 DEFB $05,$19,$21,$00,$F1,$50,$4F,$54 Line 1305: LET POT=R: LET MU=MU-U:: RESTORE YH: READ Y$: RESTORE GH: READ G$.
6EEA DEFB $3D,$52,$3A,$F1,$4D,$55,$3D,$4D
6EF2 DEFB $55,$2D,$55,$3A,$3A,$E5,$59,$48
6EFA DEFB $3A,$E3,$59,$24,$3A,$E5,$47,$48
6F02 DEFB $3A,$E3,$47,$24,$0D
6F07 DEFB $05,$1E,$40,$00,$FB,$3A,$F5,$AC Line 1310: CLS : PRINT AT R,7;"THE ANTE IS $1.00";AT 4,12;"POT=$";POT.
6F0F DEFB $52,$2C,$37,$0E,$00,$00,$07,$00
6F17 DEFB $00,$3B,$22,$54,$48,$45,$20,$41
6F1F DEFB $4E,$54,$45,$20,$49,$53,$20,$24
6F27 DEFB $31,$2E,$30,$30,$22,$3B,$AC,$34
6F2F DEFB $0E,$00,$00,$04,$00,$00,$2C,$31
6F37 DEFB $32,$0E,$00,$00,$0C,$00,$00,$3B
6F3F DEFB $22,$50,$4F,$54,$3D,$24,$22,$3B
6F47 DEFB $50,$4F,$54,$0D
6F4B DEFB $05,$23,$2E,$00,$F5,$AC,$36,$0E Line 1315: PRINT AT 6,R;"YOUR HAND:";AT 8,12;Y$.
6F53 DEFB $00,$00,$06,$00,$00,$2C,$52,$3B
6F5B DEFB $22,$59,$4F,$55,$52,$20,$48,$41
6F63 DEFB $4E,$44,$3A,$22,$3B,$AC,$38,$0E
6F6B DEFB $00,$00,$08,$00,$00,$2C,$31,$32
6F73 DEFB $0E,$00,$00,$0C,$00,$00,$3B,$59
6F7B DEFB $24,$0D
6F7D DEFB $05,$28,$39,$00,$F5,$AC,$31,$30 Line 1320: PRINT AT 10,R;"YOU HAVE $";INT MU;TAB 17;":LAST BET $0".
6F85 DEFB $0E,$00,$00,$0A,$00,$00,$2C,$52
6F8D DEFB $3B,$22,$11,$04,$59,$4F,$55,$20
6F95 DEFB $48,$41,$56,$45,$20,$24,$22,$3B
6F9D DEFB $BA,$4D,$55,$3B,$AD,$31,$37,$0E
6FA5 DEFB $00,$00,$11,$00,$00,$3B,$22,$3A
6FAD DEFB $4C,$41,$53,$54,$20,$42,$45,$54
6FB5 DEFB $20,$24,$30,$22,$0D
6FBA DEFB $05,$2D,$35,$00,$F1,$42,$4C,$3D Line 1325: LET BL=RND*10: IF GH>9063 OR BL>6 THEN GO TO 1350.
6FC2 DEFB $A5,$2A,$31,$30,$0E,$00,$00,$0A
6FCA DEFB $00,$00,$3A,$FA,$47,$48,$3E,$39
6FD2 DEFB $30,$36,$33,$0E,$00,$00,$67,$23
6FDA DEFB $00,$C5,$42,$4C,$3E,$36,$0E,$00
6FE2 DEFB $00,$06,$00,$00,$CB,$EC,$31,$33
6FEA DEFB $35,$30,$0E,$00,$00,$46,$05,$00
6FF2 DEFB $0D
6FF3 DEFB $05,$32,$51,$00,$F5,$AC,$31,$37 Line 1330: PRINT AT 17,R;"GAMBLER THROWS IN HIS CARDS": LET MU=MU+POT: GO SUB VAL "1200": GO SUB VAL "1500": GO TO VAL "1490".
6FFB DEFB $0E,$00,$00,$11,$00,$00,$2C,$52
7003 DEFB $3B,$22,$47,$41,$4D,$42,$4C,$45
700B DEFB $52,$20,$54,$48,$52,$4F,$57,$53
7013 DEFB $20,$49,$4E,$20,$48,$49,$53,$20
701B DEFB $43,$41,$52,$44,$53,$22,$3A,$F1
7023 DEFB $4D,$55,$3D,$4D,$55,$2B,$50,$4F
702B DEFB $54,$3A,$ED,$B0,$22,$31,$32,$30
7033 DEFB $30,$22,$3A,$ED,$B0,$22,$31,$35
703B DEFB $30,$30,$22,$3A,$EC,$B0,$22,$31
7043 DEFB $34,$39,$30,$22,$0D
7048 DEFB $05,$46,$2E,$00,$F1,$4E,$42,$3D Line 1350: LET NB=INT (RND*4)+R: IF GH>9073 THEN LET NB=5.
7050 DEFB $BA,$28,$A5,$2A,$34,$0E,$00,$00
7058 DEFB $04,$00,$00,$29,$2B,$52,$3A,$FA
7060 DEFB $47,$48,$3E,$39,$30,$37,$33,$0E
7068 DEFB $00,$00,$71,$23,$00,$CB,$F1,$4E
7070 DEFB $42,$3D,$35,$0E,$00,$00,$05,$00
7078 DEFB $00,$0D
707A DEFB $05,$4B,$08,$00,$EB,$4E,$3D,$55 Line 1355: FOR N=U TO NB.
7082 DEFB $CC,$4E,$42,$0D
7086 DEFB $05,$50,$74,$00,$FA,$4E,$3D,$55 Line 1360: IF N=U THEN LET BET=R: PAUSE 150: PRINT AT 13,4;"THE GAMBLER BETS $";BET: LET POT=POT+BET: GO SUB VAL "1510": GO SUB VAL "1200": GO SUB VAL "1500": GO TO VAL "1435".
708E DEFB $CB,$F1,$42,$45,$54,$3D,$52,$3A
7096 DEFB $F2,$31,$35,$30,$0E,$00,$00,$96
709E DEFB $00,$00,$3A,$F5,$AC,$31,$33,$0E
70A6 DEFB $00,$00,$0D,$00,$00,$2C,$34,$0E
70AE DEFB $00,$00,$04,$00,$00,$3B,$22,$54
70B6 DEFB $48,$45,$20,$47,$41,$4D,$42,$4C
70BE DEFB $45,$52,$20,$42,$45,$54,$53,$20
70C6 DEFB $24,$22,$3B,$42,$45,$54,$3A,$F1
70CE DEFB $50,$4F,$54,$3D,$50,$4F,$54,$2B
70D6 DEFB $42,$45,$54,$3A,$ED,$B0,$22,$31
70DE DEFB $35,$31,$30,$22,$3A,$ED,$B0,$22
70E6 DEFB $31,$32,$30,$30,$22,$3A,$ED,$B0
70EE DEFB $22,$31,$35,$30,$30,$22,$3A,$EC
70F6 DEFB $B0,$22,$31,$34,$33,$35,$22,$0D
70FE DEFB $05,$53,$1A,$00,$FA,$4E,$3D,$4E Line 1363: IF N=NB AND BL>6 THEN GO TO VAL "1330".
7106 DEFB $42,$C6,$42,$4C,$3E,$36,$0E,$00
710E DEFB $00,$06,$00,$00,$CB,$EC,$B0,$22
7116 DEFB $31,$33,$33,$30,$22,$0D
711C DEFB $05,$55,$52,$00,$FA,$4E,$3D,$4E Line 1365: IF N=NB THEN LET POT=POT+BET: PRINT AT 17,R;"THE GAMBLER SEES YOU": GO SUB VAL "1510": GO SUB VAL "1200": GO TO VAL "1475".
7124 DEFB $42,$CB,$F1,$50,$4F,$54,$3D,$50
712C DEFB $4F,$54,$2B,$42,$45,$54,$3A,$F5
7134 DEFB $AC,$31,$37,$0E,$00,$00,$11,$00
713C DEFB $00,$2C,$52,$3B,$22,$54,$48,$45
7144 DEFB $20,$47,$41,$4D,$42,$4C,$45,$52
714C DEFB $20,$53,$45,$45,$53,$20,$59,$4F
7154 DEFB $55,$22,$3A,$ED,$B0,$22,$31,$35
715C DEFB $31,$30,$22,$3A,$ED,$B0,$22,$31
7164 DEFB $32,$30,$30,$22,$3A,$EC,$B0,$22
716C DEFB $31,$34,$37,$35,$22,$0D
7172 DEFB $05,$5A,$15,$00,$FA,$42,$4C,$3E Line 1370: IF BL>6 THEN GO TO VAL "1380".
717A DEFB $36,$0E,$00,$00,$06,$00,$00,$CB
7182 DEFB $EC,$B0,$22,$31,$33,$38,$30,$22
718A DEFB $0D
718B DEFB $05,$5F,$5B,$00,$FA,$49,$24,$3D Line 1375: IF I$="C" THEN LET POT=POT+BET: PRINT AT 17,INT PI;"THE GAMBLER CALLS YOUR BET": GO SUB VAL "1510": GO SUB VAL "1200": GO TO VAL "1430".
7193 DEFB $22,$43,$22,$CB,$F1,$50,$4F,$54
719B DEFB $3D,$50,$4F,$54,$2B,$42,$45,$54
71A3 DEFB $3A,$F5,$AC,$31,$37,$0E,$00,$00
71AB DEFB $11,$00,$00,$2C,$BA,$A7,$3B,$22
71B3 DEFB $54,$48,$45,$20,$47,$41,$4D,$42
71BB DEFB $4C,$45,$52,$20,$43,$41,$4C,$4C
71C3 DEFB $53,$20,$59,$4F,$55,$52,$20,$42
71CB DEFB $45,$54,$22,$3A,$ED,$B0,$22,$31
71D3 DEFB $35,$31,$30,$22,$3A,$ED,$B0,$22
71DB DEFB $31,$32,$30,$30,$22,$3A,$EC,$B0
71E3 DEFB $22,$31,$34,$33,$30,$22,$0D
71EA DEFB $05,$64,$71,$00,$F1,$42,$45,$54 Line 1380: LET BET=BET+INT (RND*10)+U: LET POT=POT+BET: PRINT AT 17,4;"HE RAISES THE BET TO $";BET: GO SUB VAL "1510": GO SUB VAL "1200": GO TO VAL "1430".
71F2 DEFB $3D,$42,$45,$54,$2B,$BA,$28,$A5
71FA DEFB $2A,$31,$30,$0E,$00,$00,$0A,$00
7202 DEFB $00,$29,$2B,$55,$3A,$F1,$50,$4F
720A DEFB $54,$3D,$50,$4F,$54,$2B,$42,$45
7212 DEFB $54,$3A,$F5,$AC,$31,$37,$0E,$00
721A DEFB $00,$11,$00,$00,$2C,$34,$0E,$00
7222 DEFB $00,$04,$00,$00,$3B,$22,$48,$45
722A DEFB $20,$52,$41,$49,$53,$45,$53,$20
7232 DEFB $54,$48,$45,$20,$42,$45,$54,$20
723A DEFB $54,$4F,$20,$24,$22,$3B,$42,$45
7242 DEFB $54,$3A,$ED,$B0,$22,$31,$35,$31
724A DEFB $30,$22,$3A,$ED,$B0,$22,$31,$32
7252 DEFB $30,$30,$22,$3A,$EC,$B0,$22,$31
725A DEFB $34,$33,$30,$22,$0D
725F DEFB $05,$96,$14,$00,$FA,$BA,$4D,$55 Line 1430: IF INT MU-BET<O THEN GO TO VAL "1470".
7267 DEFB $2D,$42,$45,$54,$3C,$4F,$CB,$EC
726F DEFB $B0,$22,$31,$34,$37,$30,$22,$0D
7277 DEFB $05,$9B,$97,$00,$ED,$B0,$22,$31 Line 1435: GO SUB VAL "1500": PRINT AT 12,INT PI;"WHAT DO YOU WANT TO DO?";AT 14,8;"A)THROW IN HAND";TAB 8;"B)CALL HIS BET";TAB 8;"C)RAISE";TAB 8;"D)SEE HIM".
727F DEFB $35,$30,$30,$22,$3A,$F5,$AC,$31
7287 DEFB $32,$0E,$00,$00,$0C,$00,$00,$2C
728F DEFB $BA,$A7,$3B,$22,$57,$48,$41,$54
7297 DEFB $20,$44,$4F,$20,$59,$4F,$55,$20
729F DEFB $57,$41,$4E,$54,$20,$54,$4F,$20
72A7 DEFB $44,$4F,$3F,$22,$3B,$AC,$31,$34
72AF DEFB $0E,$00,$00,$0E,$00,$00,$2C,$38
72B7 DEFB $0E,$00,$00,$08,$00,$00,$3B,$22
72BF DEFB $41,$29,$54,$48,$52,$4F,$57,$20
72C7 DEFB $49,$4E,$20,$48,$41,$4E,$44,$22
72CF DEFB $3B,$AD,$38,$0E,$00,$00,$08,$00
72D7 DEFB $00,$3B,$22,$42,$29,$43,$41,$4C
72DF DEFB $4C,$20,$48,$49,$53,$20,$42,$45
72E7 DEFB $54,$22,$3B,$AD,$38,$0E,$00,$00
72EF DEFB $08,$00,$00,$3B,$22,$43,$29,$52
72F7 DEFB $41,$49,$53,$45,$22,$3B,$AD,$38
72FF DEFB $0E,$00,$00,$08,$00,$00,$3B,$22
7307 DEFB $44,$29,$53,$45,$45,$20,$48,$49
730F DEFB $4D,$22,$0D
7312 DEFB $05,$A0,$54,$00,$D7,$2E,$34,$0E Line 1440: BEEP .4,10: INPUT " ENTER LETTER "; LINE I$: BEEP .3,30: BEEP .2,20.
731A DEFB $7F,$4C,$CC,$CC,$CC,$2C,$31,$30
7322 DEFB $0E,$00,$00,$0A,$00,$00,$3A,$EE
732A DEFB $22,$20,$20,$20,$20,$20,$20,$45
7332 DEFB $4E,$54,$45,$52,$20,$4C,$45,$54
733A DEFB $54,$45,$52,$20,$22,$3B,$CA,$49
7342 DEFB $24,$3A,$D7,$2E,$33,$0E,$7F,$19
734A DEFB $99,$99,$99,$2C,$33,$30,$0E,$00
7352 DEFB $00,$1E,$00,$00,$3A,$D7,$2E,$32
735A DEFB $0E,$7E,$4C,$CC,$CC,$CC,$2C,$32
7362 DEFB $30,$0E,$00,$00,$14,$00,$00,$0D
736A DEFB $05,$A5,$1A,$00,$FA,$49,$24,$3D Line 1445: IF I$="A" THEN GO SUB VAL "1500": GO TO VAL "1490".
7372 DEFB $22,$41,$22,$CB,$ED,$B0,$22,$31
737A DEFB $35,$30,$30,$22,$3A,$EC,$B0,$22
7382 DEFB $31,$34,$39,$30,$22,$0D
7388 DEFB $05,$AA,$69,$00,$FA,$49,$24,$3D Line 1450: IF I$="B" THEN LET MU=MU-BET: LET POT=POT+BET: GO SUB VAL "1500": GO SUB VAL "1510": PRINT AT 17,10;"OK. YOU CALL": PAUSE 150: GO TO VAL "1469".
7390 DEFB $22,$42,$22,$CB,$F1,$4D,$55,$3D
7398 DEFB $4D,$55,$2D,$42,$45,$54,$3A,$F1
73A0 DEFB $50,$4F,$54,$3D,$50,$4F,$54,$2B
73A8 DEFB $42,$45,$54,$3A,$ED,$B0,$22,$31
73B0 DEFB $35,$30,$30,$22,$3A,$ED,$B0,$22
73B8 DEFB $31,$35,$31,$30,$22,$3A,$F5,$AC
73C0 DEFB $31,$37,$0E,$00,$00,$11,$00,$00
73C8 DEFB $2C,$31,$30,$0E,$00,$00,$0A,$00
73D0 DEFB $00,$3B,$22,$4F,$4B,$2E,$20,$59
73D8 DEFB $4F,$55,$20,$43,$41,$4C,$4C,$22
73E0 DEFB $3A,$F2,$31,$35,$30,$0E,$00,$00
73E8 DEFB $96,$00,$00,$3A,$EC,$B0,$22,$31
73F0 DEFB $34,$36,$39,$22,$0D
73F5 DEFB $05,$AF,$29,$00,$FA,$49,$24,$3D Line 1455: IF I$="D" THEN LET MU=MU-BET: LET POT=POT+BET: GO TO VAL "1475".
73FD DEFB $22,$44,$22,$CB,$F1,$4D,$55,$3D
7405 DEFB $4D,$55,$2D,$42,$45,$54,$3A,$F1
740D DEFB $50,$4F,$54,$3D,$50,$4F,$54,$2B
7415 DEFB $42,$45,$54,$3A,$EC,$B0,$22,$31
741D DEFB $34,$37,$35,$22,$0D
7422 DEFB $05,$B1,$91,$00,$FA,$49,$24,$3D Line 1457: IF I$="C" AND MU>=BET+U THEN PRINT AT 19,R;"WHAT DO YOU BET? (MIN.$";BET+U;")": INPUT " ENTER AMOUNT "; LINE E$: LET E$=E$+" ": IF CODE E$(U)<58 AND CODE E$(U)>48 THEN GO TO VAL "1462".
742A DEFB $22,$43,$22,$C6,$4D,$55,$C8,$42
7432 DEFB $45,$54,$2B,$55,$CB,$F5,$AC,$31
743A DEFB $39,$0E,$00,$00,$13,$00,$00,$2C
7442 DEFB $52,$3B,$22,$57,$48,$41,$54,$20
744A DEFB $44,$4F,$20,$59,$4F,$55,$20,$42
7452 DEFB $45,$54,$3F,$20,$28,$4D,$49,$4E
745A DEFB $2E,$24,$22,$3B,$42,$45,$54,$2B
7462 DEFB $55,$3B,$22,$29,$22,$3A,$EE,$22
746A DEFB $20,$20,$20,$20,$20,$45,$4E,$54
7472 DEFB $45,$52,$20,$41,$4D,$4F,$55,$4E
747A DEFB $54,$20,$22,$3B,$CA,$45,$24,$3A
7482 DEFB $F1,$45,$24,$3D,$45,$24,$2B,$22
748A DEFB $20,$22,$3A,$FA,$AF,$45,$24,$28
7492 DEFB $55,$29,$3C,$35,$38,$0E,$00,$00
749A DEFB $3A,$00,$00,$C6,$AF,$45,$24,$28
74A2 DEFB $55,$29,$3E,$34,$38,$0E,$00,$00
74AA DEFB $30,$00,$00,$CB,$EC,$B0,$22,$31
74B2 DEFB $34,$36,$32,$22,$0D
74B7 DEFB $05,$B4,$14,$00,$FA,$49,$24,$3D Line 1460: IF I$="C" THEN GO TO 1457.
74BF DEFB $22,$43,$22,$CB,$EC,$31,$34,$35
74C7 DEFB $37,$0E,$00,$00,$B1,$05,$00,$0D
74CF DEFB $05,$B5,$09,$00,$EC,$B0,$22,$31 Line 1461: GO TO VAL "1440".
74D7 DEFB $34,$34,$30,$22,$0D
74DC DEFB $05,$B6,$1B,$00,$F1,$52,$41,$3D Line 1462: LET RA=VAL E$: IF RA<BET+U THEN GO TO VAL "1460".
74E4 DEFB $B0,$45,$24,$3A,$FA,$52,$41,$3C
74EC DEFB $42,$45,$54,$2B,$55,$CB,$EC,$B0
74F4 DEFB $22,$31,$34,$36,$30,$22,$0D
74FB DEFB $05,$B7,$10,$00,$FA,$52,$41,$3E Line 1463: IF RA>MU THEN GO TO VAL "1460".
7503 DEFB $4D,$55,$CB,$EC,$B0,$22,$31,$34
750B DEFB $36,$30,$22,$0D
750F DEFB $05,$B8,$72,$00,$ED,$B0,$22,$31 Line 1464: GO SUB VAL "1500": LET MU=MU-RA: LET POT=POT+RA: LET BET=RA: PRINT AT 17,INT PI;"YOU RAISE THE BET TO $";BET: GO SUB VAL "1510": PAUSE 150: GO SUB VAL "1500": NEXT N.
7517 DEFB $35,$30,$30,$22,$3A,$F1,$4D,$55
751F DEFB $3D,$4D,$55,$2D,$52,$41,$3A,$F1
7527 DEFB $50,$4F,$54,$3D,$50,$4F,$54,$2B
752F DEFB $52,$41,$3A,$F1,$42,$45,$54,$3D
7537 DEFB $52,$41,$3A,$F5,$AC,$31,$37,$0E
753F DEFB $00,$00,$11,$00,$00,$2C,$BA,$A7
7547 DEFB $3B,$22,$59,$4F,$55,$20,$52,$41
754F DEFB $49,$53,$45,$20,$54,$48,$45,$20
7557 DEFB $42,$45,$54,$20,$54,$4F,$20,$24
755F DEFB $22,$3B,$42,$45,$54,$3A,$ED,$B0
7567 DEFB $22,$31,$35,$31,$30,$22,$3A,$F2
756F DEFB $31,$35,$30,$0E,$00,$00,$96,$00
7577 DEFB $00,$3A,$ED,$B0,$22,$31,$35,$30
757F DEFB $30,$22,$3A,$F3,$4E,$0D
7585 DEFB $05,$B9,$09,$00,$EC,$B0,$22,$31 Line 1465: GO TO VAL "1440".
758D DEFB $34,$34,$30,$22,$0D
7592 DEFB $05,$BB,$3C,$00,$F5,$AC,$31,$37 Line 1467: PRINT AT 17,R;"YOU CAN'T AFFORD TO RAISE.": GO SUB VAL "9230": GO TO VAL "1435".
759A DEFB $0E,$00,$00,$11,$00,$00,$2C,$52
75A2 DEFB $3B,$22,$59,$4F,$55,$20,$43,$41
75AA DEFB $4E,$27,$54,$20,$41,$46,$46,$4F
75B2 DEFB $52,$44,$20,$54,$4F,$20,$52,$41
75BA DEFB $49,$53,$45,$2E,$22,$3A,$ED,$B0
75C2 DEFB $22,$39,$32,$33,$30,$22,$3A,$EC
75CA DEFB $B0,$22,$31,$34,$33,$35,$22,$0D
75D2 DEFB $05,$BD,$03,$00,$F3,$4E,$0D Line 1469: NEXT N.
75D9 DEFB $05,$BE,$54,$00,$ED,$B0,$22,$31 Line 1470: GO SUB VAL "1500": PRINT AT 17,O;"YOU CAN'T AFFORD TO PLAY ANYMORE": GO SUB VAL "9230": GO SUB VAL "1200": GO TO VAL "1000".
75E1 DEFB $35,$30,$30,$22,$3A,$F5,$AC,$31
75E9 DEFB $37,$0E,$00,$00,$11,$00,$00,$2C
75F1 DEFB $4F,$3B,$22,$59,$4F,$55,$20,$43
75F9 DEFB $41,$4E,$27,$54,$20,$41,$46,$46
7601 DEFB $4F,$52,$44,$20,$54,$4F,$20,$50
7609 DEFB $4C,$41,$59,$20,$41,$4E,$59,$4D
7611 DEFB $4F,$52,$45,$22,$3A,$ED,$B0,$22
7619 DEFB $39,$32,$33,$30,$22,$3A,$ED,$B0
7621 DEFB $22,$31,$32,$30,$30,$22,$3A,$EC
7629 DEFB $B0,$22,$31,$30,$30,$30,$22,$0D
7631 DEFB $05,$C3,$97,$00,$ED,$B0,$22,$31 Line 1475: GO SUB VAL "1500": IF GH>YH THEN PRINT AT 12,R;"GAMBLER'S HAND:": PRINT : PRINT TAB 12;G$;AT 17,2;"THE GAMBLER WINS THAT ONE": GO SUB VAL "1510": GO SUB VAL "1200": GO SUB VAL "1500": GO TO VAL "1490".
7639 DEFB $35,$30,$30,$22,$3A,$FA,$47,$48
7641 DEFB $3E,$59,$48,$CB,$F5,$AC,$31,$32
7649 DEFB $0E,$00,$00,$0C,$00,$00,$2C,$52
7651 DEFB $3B,$22,$47,$41,$4D,$42,$4C,$45
7659 DEFB $52,$27,$53,$20,$48,$41,$4E,$44
7661 DEFB $3A,$22,$3A,$F5,$3A,$F5,$AD,$31
7669 DEFB $32,$0E,$00,$00,$0C,$00,$00,$3B
7671 DEFB $47,$24,$3B,$AC,$31,$37,$0E,$00
7679 DEFB $00,$11,$00,$00,$2C,$32,$0E,$00
7681 DEFB $00,$02,$00,$00,$3B,$22,$13,$00
7689 DEFB $11,$04,$10,$00,$54,$48,$45,$20
7691 DEFB $47,$41,$4D,$42,$4C,$45,$52,$20
7699 DEFB $57,$49,$4E,$53,$20,$54,$48,$41
76A1 DEFB $54,$20,$4F,$4E,$45,$22,$3A,$ED
76A9 DEFB $B0,$22,$31,$35,$31,$30,$22,$3A
76B1 DEFB $ED,$B0,$22,$31,$32,$30,$30,$22
76B9 DEFB $3A,$ED,$B0,$22,$31,$35,$30,$30
76C1 DEFB $22,$3A,$EC,$B0,$22,$31,$34,$39
76C9 DEFB $30,$22,$0D
76CC DEFB $05,$C8,$87,$00,$FA,$47,$48,$3C Line 1480: IF GH<YH THEN LET MU=MU+POT: GO SUB VAL "1510": PRINT AT 12,R;"GAMBLER'S HAND:": PRINT : PRINT TAB 12;G$;AT 17,8;"YOU WIN THAT ONE": GO SUB VAL "1200": GO SUB VAL "1500".
76D4 DEFB $59,$48,$CB,$F1,$4D,$55,$3D,$4D
76DC DEFB $55,$2B,$50,$4F,$54,$3A,$ED,$B0
76E4 DEFB $22,$31,$35,$31,$30,$22,$3A,$F5
76EC DEFB $AC,$31,$32,$0E,$00,$00,$0C,$00
76F4 DEFB $00,$2C,$52,$3B,$22,$47,$41,$4D
76FC DEFB $42,$4C,$45,$52,$27,$53,$20,$48
7704 DEFB $41,$4E,$44,$3A,$22,$3A,$F5,$3A
770C DEFB $F5,$AD,$31,$32,$0E,$00,$00,$0C
7714 DEFB $00,$00,$3B,$47,$24,$3B,$AC,$31
771C DEFB $37,$0E,$00,$00,$11,$00,$00,$2C
7724 DEFB $38,$0E,$00,$00,$08,$00,$00,$3B
772C DEFB $22,$10,$00,$13,$00,$11,$04,$59
7734 DEFB $4F,$55,$20,$57,$49,$4E,$20,$54
773C DEFB $48,$41,$54,$20,$4F,$4E,$45,$22
7744 DEFB $3A,$ED,$B0,$22,$31,$32,$30,$30
774C DEFB $22,$3A,$ED,$B0,$22,$31,$35,$30
7754 DEFB $30,$22,$0D
7757 DEFB $05,$D2,$4B,$00,$FA,$4D,$55,$3E Line 1490: IF MU>120 THEN CLS : PRINT AT 10,6;"THE GAMBLER QUITS!!": GO SUB VAL "1200": GO TO VAL "1000".
775F DEFB $31,$32,$30,$0E,$00,$00,$78,$00
7767 DEFB $00,$CB,$FB,$3A,$F5,$AC,$31,$30
776F DEFB $0E,$00,$00,$0A,$00,$00,$2C,$36
7777 DEFB $0E,$00,$00,$06,$00,$00,$3B,$22
777F DEFB $54,$48,$45,$20,$47,$41,$4D,$42
7787 DEFB $4C,$45,$52,$20,$51,$55,$49,$54
778F DEFB $53,$21,$21,$22,$3A,$ED,$B0,$22
7797 DEFB $31,$32,$30,$30,$22,$3A,$EC,$B0
779F DEFB $22,$31,$30,$30,$30,$22,$0D
77A6 DEFB $05,$D3,$41,$00,$F5,$AC,$31,$36 Line 1491: PRINT AT 16,R;"WOULD YOU LIKE ANOTHER HAND?": PRINT : PRINT TAB 13;"(Y/N)".
77AE DEFB $0E,$00,$00,$10,$00,$00,$2C,$52
77B6 DEFB $3B,$22,$57,$4F,$55,$4C,$44,$20
77BE DEFB $59,$4F,$55,$20,$4C,$49,$4B,$45
77C6 DEFB $20,$41,$4E,$4F,$54,$48,$45,$52
77CE DEFB $20,$48,$41,$4E,$44,$3F,$22,$3A
77D6 DEFB $F5,$3A,$F5,$AD,$31,$33,$0E,$00
77DE DEFB $00,$0D,$00,$00,$3B,$22,$28,$59
77E6 DEFB $2F,$4E,$29,$22,$0D
77EB DEFB $05,$D4,$1D,$00,$D7,$2E,$30,$33 Line 1492: BEEP .03,U: IF INKEY$="Y" THEN GO TO VAL "1498".
77F3 DEFB $0E,$7B,$75,$C2,$8F,$5C,$2C,$55
77FB DEFB $3A,$FA,$A6,$3D,$22,$59,$22,$CB
7803 DEFB $EC,$B0,$22,$31,$34,$39,$38,$22
780B DEFB $0D
780C DEFB $05,$D7,$10,$00,$FA,$A6,$3D,$22 Line 1495: IF INKEY$="N" THEN GO TO VAL "1000".
7814 DEFB $4E,$22,$CB,$EC,$B0,$22,$31,$30
781C DEFB $30,$30,$22,$0D
7820 DEFB $05,$D9,$16,$00,$D7,$2E,$30,$31 Line 1497: BEEP .01,O: GO TO VAL "1492".
7828 DEFB $0E,$7A,$23,$D7,$0A,$3D,$2C,$4F
7830 DEFB $3A,$EC,$B0,$22,$31,$34,$39,$32
7838 DEFB $22,$0D
783A DEFB $05,$DA,$10,$00,$FA,$4D,$55,$3C Line 1498: IF MU<INT PI THEN GO TO VAL "1250".
7842 DEFB $BA,$A7,$CB,$EC,$B0,$22,$31,$32
784A DEFB $35,$30,$22,$0D
784E DEFB $05,$DB,$09,$00,$EC,$B0,$22,$31 Line 1499: GO TO VAL "1275".
7856 DEFB $32,$37,$35,$22,$0D
785B DEFB $05,$DC,$29,$00,$EB,$4B,$3D,$31 Line 1500: FOR K=12 TO 21: PRINT AT K,0;S$: NEXT K: RETURN.
7863 DEFB $32,$0E,$00,$00,$0C,$00,$00,$CC
786B DEFB $32,$31,$0E,$00,$00,$15,$00,$00
7873 DEFB $3A,$F5,$AC,$4B,$2C,$30,$0E,$00
787B DEFB $00,$00,$00,$00,$3B,$53,$24,$3A
7883 DEFB $F3,$4B,$3A,$FE,$0D
7888 DEFB $05,$E6,$4B,$00,$F5,$AC,$34,$0E Line 1510: PRINT AT 4,17;POT;AT 10,12;INT MU;" ";AT 10,28;BET: RETURN.
7890 DEFB $00,$00,$04,$00,$00,$2C,$31,$37
7898 DEFB $0E,$00,$00,$11,$00,$00,$3B,$50
78A0 DEFB $4F,$54,$3B,$AC,$31,$30,$0E,$00
78A8 DEFB $00,$0A,$00,$00,$2C,$31,$32,$0E
78B0 DEFB $00,$00,$0C,$00,$00,$3B,$BA,$4D
78B8 DEFB $55,$3B,$22,$20,$22,$3B,$AC,$31
78C0 DEFB $30,$0E,$00,$00,$0A,$00,$00,$2C
78C8 DEFB $32,$38,$0E,$00,$00,$1C,$00,$00
78D0 DEFB $3B,$42,$45,$54,$3A,$FE,$0D
78D7 DEFB $07,$D1,$54,$00,$D9,$39,$0E,$00 Line 2001: INK 9: PAPER INT PI: CLS : IF DT=U THEN PRINT AT 10,R;"THERE'S NOBODY SPECIAL HERE": PAUSE 150: GO TO VAL "1000".
78DF DEFB $00,$09,$00,$00,$3A,$DA,$BA,$A7
78E7 DEFB $3A,$FB,$3A,$FA,$44,$54,$3D,$55
78EF DEFB $CB,$F5,$AC,$31,$30,$0E,$00,$00
78F7 DEFB $0A,$00,$00,$2C,$52,$3B,$22,$54
78FF DEFB $48,$45,$52,$45,$27,$53,$20,$4E
7907 DEFB $4F,$42,$4F,$44,$59,$20,$53,$50
790F DEFB $45,$43,$49,$41,$4C,$20,$48,$45
7917 DEFB $52,$45,$22,$3A,$F2,$31,$35,$30
791F DEFB $0E,$00,$00,$96,$00,$00,$3A,$EC
7927 DEFB $B0,$22,$31,$30,$30,$30,$22,$0D
792F DEFB $07,$DA,$11,$00,$FA,$A5,$2A,$4C Line 2010: IF RND*LV<U THEN GO TO VAL "2100".
7937 DEFB $56,$3C,$55,$CB,$EC,$B0,$22,$32
793F DEFB $31,$30,$30,$22,$0D
7944 DEFB $07,$DF,$20,$00,$E5,$39,$30,$30 Line 2015: RESTORE 9000+INT (RND*12)+U: READ J$.
794C DEFB $30,$0E,$00,$00,$28,$23,$00,$2B
7954 DEFB $BA,$28,$A5,$2A,$31,$32,$0E,$00
795C DEFB $00,$0C,$00,$00,$29,$2B,$55,$3A
7964 DEFB $E3,$4A,$24,$0D
7968 DEFB $07,$E9,$0D,$00,$EB,$4E,$3D,$55 Line 2025: FOR N=U TO 5.
7970 DEFB $CC,$35,$0E,$00,$00,$05,$00,$00
7978 DEFB $0D
7979 DEFB $07,$EE,$13,$00,$FA,$4A,$24,$3D Line 2030: IF J$=D$(N) THEN GO TO VAL "2015".
7981 DEFB $44,$24,$28,$4E,$29,$CB,$EC,$B0
7989 DEFB $22,$32,$30,$31,$35,$22,$0D
7990 DEFB $07,$F3,$09,$00,$F3,$4E,$3A,$F1 Line 2035: NEXT N: LET BG=U.
7998 DEFB $42,$47,$3D,$55,$0D
799D DEFB $07,$F8,$3E,$00,$F5,$AC,$35,$0E Line 2040: PRINT AT 5,O;"A MAN WALKS INTO THE SALOON WITH": PRINT : PRINT TAB 3;J$.
79A5 DEFB $00,$00,$05,$00,$00,$2C,$4F,$3B
79AD DEFB $22,$41,$20,$4D,$41,$4E,$20,$57
79B5 DEFB $41,$4C,$4B,$53,$20,$49,$4E,$54
79BD DEFB $4F,$20,$54,$48,$45,$20,$53,$41
79C5 DEFB $4C,$4F,$4F,$4E,$20,$57,$49,$54
79CD DEFB $48,$22,$3A,$F5,$3A,$F5,$AD,$33
79D5 DEFB $0E,$00,$00,$03,$00,$00,$3B,$4A
79DD DEFB $24,$0D
79DF DEFB $07,$FD,$12,$00,$F1,$44,$54,$3D Line 2045: LET DT=U: GO TO 2200.
79E7 DEFB $55,$3A,$EC,$32,$32,$30,$30,$0E
79EF DEFB $00,$00,$98,$08,$00,$0D
79F5 DEFB $08,$34,$18,$00,$F1,$42,$47,$3D Line 2100: LET BG=O: LET M=INT (RND*5)+U.
79FD DEFB $4F,$3A,$F1,$4D,$3D,$BA,$28,$A5
7A05 DEFB $2A,$35,$0E,$00,$00,$05,$00,$00
7A0D DEFB $29,$2B,$55,$0D
7A11 DEFB $08,$3E,$14,$00,$FA,$56,$28,$4D Line 2110: IF V(M)<R THEN GO TO 2100.
7A19 DEFB $29,$3C,$52,$CB,$EC,$32,$31,$30
7A21 DEFB $30,$0E,$00,$00,$34,$08,$00,$0D
7A29 DEFB $08,$40,$45,$00,$FA,$4D,$3D,$4D Line 2112: IF M=MB AND V(U)+V(R)+V(3)+V(4)+V(5)>6 THEN GO TO 2100.
7A31 DEFB $42,$C6,$56,$28,$55,$29,$2B,$56
7A39 DEFB $28,$52,$29,$2B,$56,$28,$33,$0E
7A41 DEFB $00,$00,$03,$00,$00,$29,$2B,$56
7A49 DEFB $28,$34,$0E,$00,$00,$04,$00,$00
7A51 DEFB $29,$2B,$56,$28,$35,$0E,$00,$00
7A59 DEFB $05,$00,$00,$29,$3E,$36,$0E,$00
7A61 DEFB $00,$06,$00,$00,$CB,$EC,$32,$31
7A69 DEFB $30,$30,$0E,$00,$00,$34,$08,$00
7A71 DEFB $0D
7A72 DEFB $08,$43,$16,$00,$F1,$4A,$24,$3D Line 2115: LET J$=D$(M): GO TO 2040.
7A7A DEFB $44,$24,$28,$4D,$29,$3A,$EC,$32
7A82 DEFB $30,$34,$30,$0E,$00,$00,$F8,$07
7A8A DEFB $00,$0D
7A8C DEFB $08,$98,$4C,$00,$F5,$D9,$36,$0E Line 2200: PRINT INK 6;AT 12,U;"DO YOU WANT TO CHALLENGE HIM ?": PRINT : PRINT TAB 13;"(Y/N)".
7A94 DEFB $00,$00,$06,$00,$00,$3B,$AC,$31
7A9C DEFB $32,$0E,$00,$00,$0C,$00,$00,$2C
7AA4 DEFB $55,$3B,$22,$44,$4F,$20,$59,$4F
7AAC DEFB $55,$20,$57,$41,$4E,$54,$20,$54
7AB4 DEFB $4F,$20,$43,$48,$41,$4C,$4C,$45
7ABC DEFB $4E,$47,$45,$20,$48,$49,$4D,$20
7AC4 DEFB $3F,$22,$3A,$F5,$3A,$F5,$AD,$31
7ACC DEFB $33,$0E,$00,$00,$0D,$00,$00,$3B
7AD4 DEFB $22,$28,$59,$2F,$4E,$29,$22,$0D
7ADC DEFB $08,$A2,$10,$00,$FA,$A6,$3D,$22 Line 2210: IF INKEY$="Y" THEN GO TO VAL "2300".
7AE4 DEFB $59,$22,$CB,$EC,$B0,$22,$32,$33
7AEC DEFB $30,$30,$22,$0D
7AF0 DEFB $08,$A7,$28,$00,$D7,$2E,$30,$31 Line 2215: BEEP .01,20: BEEP .01,30.
7AF8 DEFB $0E,$7A,$23,$D7,$0A,$3D,$2C,$32
7B00 DEFB $30,$0E,$00,$00,$14,$00,$00,$3A
7B08 DEFB $D7,$2E,$30,$31,$0E,$7A,$23,$D7
7B10 DEFB $0A,$3D,$2C,$33,$30,$0E,$00,$00
7B18 DEFB $1E,$00,$00,$0D
7B1C DEFB $08,$AC,$16,$00,$FA,$A6,$3D,$22 Line 2220: IF INKEY$="N" THEN LET DT=U: GO TO VAL "1000".
7B24 DEFB $4E,$22,$CB,$F1,$44,$54,$3D,$55
7B2C DEFB $3A,$EC,$B0,$22,$31,$30,$30,$30
7B34 DEFB $22,$0D
7B36 DEFB $08,$B6,$09,$00,$EC,$B0,$22,$32 Line 2230: GO TO VAL "2210".
7B3E DEFB $32,$31,$30,$22,$0D
7B43 DEFB $08,$FC,$B3,$00,$FB,$3A,$F5,$AC Line 2300: CLS : PRINT AT 4,INT PI;"DO YOU THINK HE IS :-": PRINT : PRINT " 1) ";B$(U): PRINT : PRINT " 2) ";B$(R): PRINT : PRINT " 3) ";B$(3): PRINT : PRINT " 4) ";B$(4): PRINT : PRINT " 5) ";B$(5): PRINT : PRINT " ENTER NUMBER OF CHOICE.".
7B4B DEFB $34,$0E,$00,$00,$04,$00,$00,$2C
7B53 DEFB $BA,$A7,$3B,$22,$44,$4F,$20,$59
7B5B DEFB $4F,$55,$20,$54,$48,$49,$4E,$4B
7B63 DEFB $20,$48,$45,$20,$49,$53,$20,$3A
7B6B DEFB $2D,$22,$3A,$F5,$3A,$F5,$22,$20
7B73 DEFB $20,$20,$31,$29,$20,$22,$3B,$42
7B7B DEFB $24,$28,$55,$29,$3A,$F5,$3A,$F5
7B83 DEFB $22,$20,$20,$20,$32,$29,$20,$22
7B8B DEFB $3B,$42,$24,$28,$52,$29,$3A,$F5
7B93 DEFB $3A,$F5,$22,$20,$20,$20,$33,$29
7B9B DEFB $20,$22,$3B,$42,$24,$28,$33,$0E
7BA3 DEFB $00,$00,$03,$00,$00,$29,$3A,$F5
7BAB DEFB $3A,$F5,$22,$20,$20,$20,$34,$29
7BB3 DEFB $20,$22,$3B,$42,$24,$28,$34,$0E
7BBB DEFB $00,$00,$04,$00,$00,$29,$3A,$F5
7BC3 DEFB $3A,$F5,$22,$20,$20,$20,$35,$29
7BCB DEFB $20,$22,$3B,$42,$24,$28,$35,$0E
7BD3 DEFB $00,$00,$05,$00,$00,$29,$3A,$F5
7BDB DEFB $3A,$F5,$22,$20,$20,$20,$45,$4E
7BE3 DEFB $54,$45,$52,$20,$4E,$55,$4D,$42
7BEB DEFB $45,$52,$20,$4F,$46,$20,$43,$48
7BF3 DEFB $4F,$49,$43,$45,$2E,$22,$0D
7BFA DEFB $09,$06,$61,$00,$D7,$2E,$32,$0E Line 2310: BEEP .2,10: BEEP .3,-10: INPUT LINE E$: LET E$=E$+" ": IF CODE E$(U)<49 OR CODE E$(U)>53 THEN GO TO VAL "2310".
7C02 DEFB $7E,$4C,$CC,$CC,$CC,$2C,$31,$30
7C0A DEFB $0E,$00,$00,$0A,$00,$00,$3A,$D7
7C12 DEFB $2E,$33,$0E,$7F,$19,$99,$99,$99
7C1A DEFB $2C,$2D,$31,$30,$0E,$00,$00,$0A
7C22 DEFB $00,$00,$3A,$EE,$CA,$45,$24,$3A
7C2A DEFB $F1,$45,$24,$3D,$45,$24,$2B,$22
7C32 DEFB $20,$22,$3A,$FA,$AF,$45,$24,$28
7C3A DEFB $55,$29,$3C,$34,$39,$0E,$00,$00
7C42 DEFB $31,$00,$00,$C5,$AF,$45,$24,$28
7C4A DEFB $55,$29,$3E,$35,$33,$0E,$00,$00
7C52 DEFB $35,$00,$00,$CB,$EC,$B0,$22,$32
7C5A DEFB $33,$31,$30,$22,$0D
7C5F DEFB $09,$0B,$15,$00,$F1,$41,$3D,$B0 Line 2315: LET A=VAL E$: IF A<U THEN GO TO VAL "2310".
7C67 DEFB $45,$24,$3A,$FA,$41,$3C,$55,$CB
7C6F DEFB $EC,$B0,$22,$32,$33,$31,$30,$22
7C77 DEFB $0D
7C78 DEFB $09,$10,$14,$00,$FA,$41,$3E,$35 Line 2320: IF A>5 THEN GO TO VAL "2310".
7C80 DEFB $0E,$00,$00,$05,$00,$00,$CB,$EC
7C88 DEFB $B0,$22,$32,$33,$31,$30,$22,$0D
7C90 DEFB $09,$1A,$8D,$00,$E7,$4F,$3A,$FB Line 2330: BORDER O: CLS : PRINT AT 6,4;"DO YOU WANT TO :-": PRINT : PRINT TAB 5;"1) TAKE HIM PRISONER": PRINT : PRINT TAB 5;"2) HAVE A GUN FIGHT": PRINT : PRINT : PRINT TAB 9;"PRESS 1 OR 2".
7C98 DEFB $3A,$F5,$AC,$36,$0E,$00,$00,$06
7CA0 DEFB $00,$00,$2C,$34,$0E,$00,$00,$04
7CA8 DEFB $00,$00,$3B,$22,$44,$4F,$20,$59
7CB0 DEFB $4F,$55,$20,$57,$41,$4E,$54,$20
7CB8 DEFB $54,$4F,$20,$3A,$2D,$22,$3A,$F5
7CC0 DEFB $3A,$F5,$AD,$35,$0E,$00,$00,$05
7CC8 DEFB $00,$00,$3B,$22,$31,$29,$20,$54
7CD0 DEFB $41,$4B,$45,$20,$48,$49,$4D,$20
7CD8 DEFB $50,$52,$49,$53,$4F,$4E,$45,$52
7CE0 DEFB $22,$3A,$F5,$3A,$F5,$AD,$35,$0E
7CE8 DEFB $00,$00,$05,$00,$00,$3B,$22,$32
7CF0 DEFB $29,$20,$48,$41,$56,$45,$20,$41
7CF8 DEFB $20,$47,$55,$4E,$20,$46,$49,$47
7D00 DEFB $48,$54,$22,$3A,$F5,$3A,$F5,$3A
7D08 DEFB $F5,$AD,$39,$0E,$00,$00,$09,$00
7D10 DEFB $00,$3B,$22,$50,$52,$45,$53,$53
7D18 DEFB $20,$31,$20,$4F,$52,$20,$32,$22
7D20 DEFB $0D
7D21 DEFB $09,$1F,$33,$00,$FA,$A6,$3D,$22 Line 2335: IF INKEY$="1" THEN LET E$="CAPTURED ": LET I$="LAUGHS": LET TP=U: GO TO VAL "2400".
7D29 DEFB $31,$22,$CB,$F1,$45,$24,$3D,$22
7D31 DEFB $43,$41,$50,$54,$55,$52,$45,$44
7D39 DEFB $20,$22,$3A,$F1,$49,$24,$3D,$22
7D41 DEFB $4C,$41,$55,$47,$48,$53,$22,$3A
7D49 DEFB $F1,$54,$50,$3D,$55,$3A,$EC,$B0
7D51 DEFB $22,$32,$34,$30,$30,$22,$0D
7D58 DEFB $09,$21,$1C,$00,$D7,$2E,$30,$31 Line 2337: BEEP .01,PI: BEEP .01,PI*PI.
7D60 DEFB $0E,$7A,$23,$D7,$0A,$3D,$2C,$A7
7D68 DEFB $3A,$D7,$2E,$30,$31,$0E,$7A,$23
7D70 DEFB $D7,$0A,$3D,$2C,$A7,$2A,$A7,$0D
7D78 DEFB $09,$24,$37,$00,$FA,$A6,$3D,$22 Line 2340: IF INKEY$="2" THEN LET E$="KILLED ": LET I$="FROWNS": LET TP=O: LET GF=U: GO TO VAL "5000".
7D80 DEFB $32,$22,$CB,$F1,$45,$24,$3D,$22
7D88 DEFB $4B,$49,$4C,$4C,$45,$44,$20,$22
7D90 DEFB $3A,$F1,$49,$24,$3D,$22,$46,$52
7D98 DEFB $4F,$57,$4E,$53,$22,$3A,$F1,$54
7DA0 DEFB $50,$3D,$4F,$3A,$F1,$47,$46,$3D
7DA8 DEFB $55,$3A,$EC,$B0,$22,$35,$30,$30
7DB0 DEFB $30,$22,$0D
7DB3 DEFB $09,$29,$09,$00,$EC,$B0,$22,$32 Line 2345: GO TO VAL "2335".
7DBB DEFB $33,$33,$35,$22,$0D
7DC0 DEFB $09,$60,$38,$00,$E7,$36,$0E,$00 Line 2400: BORDER 6: CLS : PRINT AT 7,R;"YOU SAY;""I'M TAKING YOU IN.""".
7DC8 DEFB $00,$06,$00,$00,$3A,$FB,$3A,$F5
7DD0 DEFB $AC,$37,$0E,$00,$00,$07,$00,$00
7DD8 DEFB $2C,$52,$3B,$22,$59,$4F,$55,$20
7DE0 DEFB $53,$41,$59,$3B,$22,$22,$49,$27
7DE8 DEFB $4D,$20,$54,$41,$4B,$49,$4E,$47
7DF0 DEFB $20,$59,$4F,$55,$20,$49,$4E,$2E
7DF8 DEFB $22,$22,$22,$0D
7DFC DEFB $09,$67,$84,$00,$FA,$49,$28,$34 Line 2407: IF I(4)+I(5)+I(7)<=O THEN PRINT AT 10,INT PI;"THE MAN SEES THAT YOU HAVE": PRINT : PRINT " NO GUN AND RUNS OFF": LET SC=SC-50: GO TO VAL "2422".
7E04 DEFB $0E,$00,$00,$04,$00,$00,$29,$2B
7E0C DEFB $49,$28,$35,$0E,$00,$00,$05,$00
7E14 DEFB $00,$29,$2B,$49,$28,$37,$0E,$00
7E1C DEFB $00,$07,$00,$00,$29,$C7,$4F,$CB
7E24 DEFB $F5,$AC,$31,$30,$0E,$00,$00,$0A
7E2C DEFB $00,$00,$2C,$BA,$A7,$3B,$22,$54
7E34 DEFB $48,$45,$20,$4D,$41,$4E,$20,$53
7E3C DEFB $45,$45,$53,$20,$54,$48,$41,$54
7E44 DEFB $20,$59,$4F,$55,$20,$48,$41,$56
7E4C DEFB $45,$22,$3A,$F5,$3A,$F5,$22,$20
7E54 DEFB $20,$20,$4E,$4F,$20,$47,$55,$4E
7E5C DEFB $20,$41,$4E,$44,$20,$52,$55,$4E
7E64 DEFB $53,$20,$4F,$46,$46,$22,$3A,$F1
7E6C DEFB $53,$43,$3D,$53,$43,$2D,$35,$30
7E74 DEFB $0E,$00,$00,$32,$00,$00,$3A,$EC
7E7C DEFB $B0,$22,$32,$34,$32,$32,$22,$0D
7E84 DEFB $09,$6A,$0F,$00,$FA,$42,$47,$3D Line 2410: IF BG=U THEN GO TO VAL "2450".
7E8C DEFB $55,$CB,$EC,$B0,$22,$32,$34,$35
7E94 DEFB $30,$22,$0D
7E97 DEFB $09,$6E,$1E,$00,$FA,$A5,$2A,$35 Line 2414: IF RND*5>1.7 THEN GO TO VAL "2450".
7E9F DEFB $0E,$00,$00,$05,$00,$00,$3E,$31
7EA7 DEFB $2E,$37,$0E,$81,$59,$99,$99,$9A
7EAF DEFB $CB,$EC,$B0,$22,$32,$34,$35,$30
7EB7 DEFB $22,$0D
7EB9 DEFB $09,$6F,$57,$00,$F5,$AC,$31,$30 Line 2415: PRINT AT 10,INT PI;"BUT,THE MAN THROWS A BOTTLE": PRINT : PRINT " AT YOU AND RUNS OFF.": LET CS=CS-50.
7EC1 DEFB $0E,$00,$00,$0A,$00,$00,$2C,$BA
7EC9 DEFB $A7,$3B,$22,$42,$55,$54,$2C,$54
7ED1 DEFB $48,$45,$20,$4D,$41,$4E,$20,$54
7ED9 DEFB $48,$52,$4F,$57,$53,$20,$41,$20
7EE1 DEFB $42,$4F,$54,$54,$4C,$45,$22,$3A
7EE9 DEFB $F5,$3A,$F5,$22,$20,$20,$20,$AC
7EF1 DEFB $59,$4F,$55,$20,$41,$4E,$44,$20
7EF9 DEFB $52,$55,$4E,$53,$20,$4F,$46,$46
7F01 DEFB $2E,$22,$3A,$F1,$43,$53,$3D,$43
7F09 DEFB $53,$2D,$35,$30,$0E,$00,$00,$32
7F11 DEFB $00,$00,$0D
7F14 DEFB $09,$76,$42,$00,$EB,$4E,$3D,$31 Line 2422: FOR N=18 TO 30: BEEP .3,N: BEEP .2,N*-U: NEXT N: IF CS<=O THEN GO TO VAL "2435".
7F1C DEFB $38,$0E,$00,$00,$12,$00,$00,$CC
7F24 DEFB $33,$30,$0E,$00,$00,$1E,$00,$00
7F2C DEFB $3A,$D7,$2E,$33,$0E,$7F,$19,$99
7F34 DEFB $99,$99,$2C,$4E,$3A,$D7,$2E,$32
7F3C DEFB $0E,$7E,$4C,$CC,$CC,$CC,$2C,$4E
7F44 DEFB $2A,$2D,$55,$3A,$F3,$4E,$3A,$FA
7F4C DEFB $43,$53,$C7,$4F,$CB,$EC,$B0,$22
7F54 DEFB $32,$34,$33,$35,$22,$0D
7F5A DEFB $09,$7E,$09,$00,$EC,$B0,$22,$31 Line 2430: GO TO VAL "1000".
7F62 DEFB $30,$30,$30,$22,$0D
7F67 DEFB $09,$83,$39,$00,$E7,$4F,$3A,$DA Line 2435: BORDER O: PAPER O: CLS : PRINT AT 10,O;"YOU HAVE DIED FROM YOUR INJURIES":.
7F6F DEFB $4F,$3A,$FB,$3A,$F5,$AC,$31,$30
7F77 DEFB $0E,$00,$00,$0A,$00,$00,$2C,$4F
7F7F DEFB $3B,$22,$59,$4F,$55,$20,$48,$41
7F87 DEFB $56,$45,$20,$44,$49,$45,$44,$20
7F8F DEFB $46,$52,$4F,$4D,$20,$59,$4F,$55
7F97 DEFB $52,$20,$49,$4E,$4A,$55,$52,$49
7F9F DEFB $45,$53,$22,$3A,$0D
7FA4 DEFB $09,$88,$55,$00,$E5,$B0,$22,$39 Line 2440: RESTORE VAL "9100": FOR N=U TO 11: READ M: READ W: BEEP M/3,W: NEXT N: LET M$="YOU RAN OUT OF STRENGTH!": GO TO VAL "8500".
7FAC DEFB $31,$30,$30,$22,$3A,$EB,$4E,$3D
7FB4 DEFB $55,$CC,$31,$31,$0E,$00,$00,$0B
7FBC DEFB $00,$00,$3A,$E3,$4D,$3A,$E3,$57
7FC4 DEFB $3A,$D7,$4D,$2F,$33,$0E,$00,$00
7FCC DEFB $03,$00,$00,$2C,$57,$3A,$F3,$4E
7FD4 DEFB $3A,$F1,$4D,$24,$3D,$22,$59,$4F
7FDC DEFB $55,$20,$52,$41,$4E,$20,$4F,$55
7FE4 DEFB $54,$20,$4F,$46,$20,$53,$54,$52
7FEC DEFB $45,$4E,$47,$54,$48,$21,$22,$3A
7FF4 DEFB $EC,$B0,$22,$38,$35,$30,$30,$22
7FFC DEFB $0D
7FFD DEFB $09,$92,$66,$00,$F5,$AC,$31,$31 Line 2450: PRINT AT 11,1;"YOU TAKE THE MAN,AT GUN POINT": PRINT : PRINT " TO THE SHERIFF'S OFFICE": GO SUB VAL "2455": GO TO VAL "2460".
8005 DEFB $0E,$00,$00,$0B,$00,$00,$2C,$31
800D DEFB $0E,$00,$00,$01,$00,$00,$3B,$22
8015 DEFB $59,$4F,$55,$20,$54,$41,$4B,$45
801D DEFB $20,$54,$48,$45,$20,$4D,$41,$4E
8025 DEFB $2C,$41,$54,$20,$47,$55,$4E,$20
802D DEFB $50,$4F,$49,$4E,$54,$22,$3A,$F5
8035 DEFB $3A,$F5,$22,$20,$20,$20,$20,$54
803D DEFB $4F,$20,$54,$48,$45,$20,$53,$48
8045 DEFB $45,$52,$49,$46,$46,$27,$53,$20
804D DEFB $4F,$46,$46,$49,$43,$45,$22,$3A
8055 DEFB $ED,$B0,$22,$32,$34,$35,$35,$22
805D DEFB $3A,$EC,$B0,$22,$32,$34,$36,$30
8065 DEFB $22,$0D
8067 DEFB $09,$97,$2F,$00,$E5,$B0,$22,$39 Line 2455: RESTORE VAL "9080": FOR N=U TO 10: READ K: READ G: BEEP K/3,G: NEXT N: RETURN.
806F DEFB $30,$38,$30,$22,$3A,$EB,$4E,$3D
8077 DEFB $55,$CC,$31,$30,$0E,$00,$00,$0A
807F DEFB $00,$00,$3A,$E3,$4B,$3A,$E3,$47
8087 DEFB $3A,$D7,$4B,$2F,$33,$0E,$00,$00
808F DEFB $03,$00,$00,$2C,$47,$3A,$F3,$4E
8097 DEFB $3A,$FE,$0D
809A DEFB $09,$9C,$4C,$00,$E7,$35,$0E,$00 Line 2460: BORDER 5: CLS : PRINT AT 4,U;"YOU TELL THE SHERIFF YOU HAVE": PRINT : PRINT TAB 4;E$;B$(A).
80A2 DEFB $00,$05,$00,$00,$3A,$FB,$3A,$F5
80AA DEFB $AC,$34,$0E,$00,$00,$04,$00,$00
80B2 DEFB $2C,$55,$3B,$22,$59,$4F,$55,$20
80BA DEFB $54,$45,$4C,$4C,$20,$54,$48,$45
80C2 DEFB $20,$53,$48,$45,$52,$49,$46,$46
80CA DEFB $20,$59,$4F,$55,$20,$48,$41,$56
80D2 DEFB $45,$22,$3A,$F5,$3A,$F5,$AD,$34
80DA DEFB $0E,$00,$00,$04,$00,$00,$3B,$45
80E2 DEFB $24,$3B,$42,$24,$28,$41,$29,$0D
80EA DEFB $09,$A1,$18,$00,$FA,$44,$24,$28 Line 2465: IF D$(A)=J$ AND TP=U THEN GO TO VAL "2495".
80F2 DEFB $41,$29,$3D,$4A,$24,$C6,$54,$50
80FA DEFB $3D,$55,$CB,$EC,$B0,$22,$32,$34
8102 DEFB $39,$35,$22,$0D
8106 DEFB $09,$A2,$18,$00,$FA,$44,$24,$28 Line 2466: IF D$(A)=J$ AND GF=U THEN GO TO VAL "2700".
810E DEFB $41,$29,$3D,$4A,$24,$C6,$47,$46
8116 DEFB $3D,$55,$CB,$EC,$B0,$22,$32,$37
811E DEFB $30,$30,$22,$0D
8122 DEFB $09,$A3,$4C,$00,$F5,$AC,$39,$0E Line 2467: PRINT AT 9,R;"THE SHERIFF ";I$;" AND SAYS;": PRINT : PRINT " ""THAT'S NOT ";B$(A);".""".
812A DEFB $00,$00,$09,$00,$00,$2C,$52,$3B
8132 DEFB $22,$54,$48,$45,$20,$53,$48,$45
813A DEFB $52,$49,$46,$46,$20,$22,$3B,$49
8142 DEFB $24,$3B,$22,$20,$41,$4E,$44,$20
814A DEFB $53,$41,$59,$53,$3B,$22,$3A,$F5
8152 DEFB $3A,$F5,$22,$20,$20,$22,$22,$54
815A DEFB $48,$41,$54,$27,$53,$20,$4E,$4F
8162 DEFB $54,$20,$22,$3B,$42,$24,$28,$41
816A DEFB $29,$3B,$22,$2E,$22,$22,$22,$0D
8172 DEFB $09,$A4,$26,$00,$FA,$56,$28,$41 Line 2468: IF V(A)=U THEN LET C$="HE HAS BEEN PUT IN JAIL".
817A DEFB $29,$3D,$55,$CB,$F1,$43,$24,$3D
8182 DEFB $22,$48,$45,$20,$48,$41,$53,$20
818A DEFB $42,$45,$45,$4E,$20,$50,$55,$54
8192 DEFB $20,$49,$4E,$20,$4A,$41,$49,$4C
819A DEFB $22,$0D
819C DEFB $09,$A5,$1C,$00,$FA,$56,$28,$41 Line 2469: IF V(A)=O THEN LET C$="HE WAS KILLED".
81A4 DEFB $29,$3D,$4F,$CB,$F1,$43,$24,$3D
81AC DEFB $22,$48,$45,$20,$57,$41,$53,$20
81B4 DEFB $4B,$49,$4C,$4C,$45,$44,$22,$0D
81BC DEFB $09,$A6,$2F,$00,$FA,$44,$24,$28 Line 2470: IF D$(A)<>J$ THEN LET C$="HE DOESN'T FIT THE DESCRIPTION".
81C4 DEFB $41,$29,$C9,$4A,$24,$CB,$F1,$43
81CC DEFB $24,$3D,$22,$48,$45,$20,$44,$4F
81D4 DEFB $45,$53,$4E,$27,$54,$20,$46,$49
81DC DEFB $54,$20,$54,$48,$45,$20,$44,$45
81E4 DEFB $53,$43,$52,$49,$50,$54,$49,$4F
81EC DEFB $4E,$22,$0D
81EF DEFB $09,$A7,$55,$00,$FA,$42,$47,$3D Line 2471: IF BG=U THEN RESTORE 9150+INT (RND*4)+U: READ Z$: PRINT AT 14,4;"""THAT'S ";Z$;"""": GO TO VAL "2480".
81F7 DEFB $55,$CB,$E5,$39,$31,$35,$30,$0E
81FF DEFB $00,$00,$BE,$23,$00,$2B,$BA,$28
8207 DEFB $A5,$2A,$34,$0E,$00,$00,$04,$00
820F DEFB $00,$29,$2B,$55,$3A,$E3,$5A,$24
8217 DEFB $3A,$F5,$AC,$31,$34,$0E,$00,$00
821F DEFB $0E,$00,$00,$2C,$34,$0E,$00,$00
8227 DEFB $04,$00,$00,$3B,$22,$22,$22,$54
822F DEFB $48,$41,$54,$27,$53,$20,$22,$3B
8237 DEFB $5A,$24,$3B,$22,$22,$22,$22,$3A
823F DEFB $EC,$B0,$22,$32,$34,$38,$30,$22
8247 DEFB $0D
8248 DEFB $09,$A8,$10,$00,$F5,$AC,$31,$34 Line 2472: PRINT AT 14,R;C$.
8250 DEFB $0E,$00,$00,$0E,$00,$00,$2C,$52
8258 DEFB $3B,$43,$24,$0D
825C DEFB $09,$B0,$40,$00,$FA,$54,$50,$3D Line 2480: IF TP=U THEN PRINT AT 17,7;"HE LETS THE MAN GO": GO SUB VAL "2482": GO TO VAL "2483".
8264 DEFB $55,$CB,$F5,$AC,$31,$37,$0E,$00
826C DEFB $00,$11,$00,$00,$2C,$37,$0E,$00
8274 DEFB $00,$07,$00,$00,$3B,$22,$48,$45
827C DEFB $20,$4C,$45,$54,$53,$20,$54,$48
8284 DEFB $45,$20,$4D,$41,$4E,$20,$47,$4F
828C DEFB $22,$3A,$ED,$B0,$22,$32,$34,$38
8294 DEFB $32,$22,$3A,$EC,$B0,$22,$32,$34
829C DEFB $38,$33,$22,$0D
82A0 DEFB $09,$B1,$3A,$00,$F5,$AC,$31,$37 Line 2481: PRINT AT 17,7;"HE COVERS THE BODY": GO SUB VAL "2482": GO TO VAL "2720".
82A8 DEFB $0E,$00,$00,$11,$00,$00,$2C,$37
82B0 DEFB $0E,$00,$00,$07,$00,$00,$3B,$22
82B8 DEFB $48,$45,$20,$43,$4F,$56,$45,$52
82C0 DEFB $53,$20,$54,$48,$45,$20,$42,$4F
82C8 DEFB $44,$59,$22,$3A,$ED,$B0,$22,$32
82D0 DEFB $34,$38,$32,$22,$3A,$EC,$B0,$22
82D8 DEFB $32,$37,$32,$30,$22,$0D
82DE DEFB $09,$B2,$3F,$00,$EB,$4E,$3D,$35 Line 2482: FOR N=50 TO -10 STEP -U: BEEP .1,N: BEEP .05,N/2: NEXT N: RETURN.
82E6 DEFB $30,$0E,$00,$00,$32,$00,$00,$CC
82EE DEFB $2D,$31,$30,$0E,$00,$00,$0A,$00
82F6 DEFB $00,$CD,$2D,$55,$3A,$D7,$2E,$31
82FE DEFB $0E,$7D,$4C,$CC,$CC,$CC,$2C,$4E
8306 DEFB $3A,$D7,$2E,$30,$35,$0E,$7C,$4C
830E DEFB $CC,$CC,$CC,$2C,$4E,$2F,$32,$0E
8316 DEFB $00,$00,$02,$00,$00,$3A,$F3,$4E
831E DEFB $3A,$FE,$0D
8321 DEFB $09,$B3,$23,$00,$FB,$3A,$FA,$4D Line 2483: CLS : IF MU<5 THEN LET W=MU: LET MU=O: GO TO VAL "2485".
8329 DEFB $55,$3C,$35,$0E,$00,$00,$05,$00
8331 DEFB $00,$CB,$F1,$57,$3D,$4D,$55,$3A
8339 DEFB $F1,$4D,$55,$3D,$4F,$3A,$EC,$B0
8341 DEFB $22,$32,$34,$38,$35,$22,$0D
8348 DEFB $09,$B4,$1B,$00,$F1,$57,$3D,$BA Line 2484: LET W=INT (MU/10): LET MU=MU-W.
8350 DEFB $28,$4D,$55,$2F,$31,$30,$0E,$00
8358 DEFB $00,$0A,$00,$00,$29,$3A,$F1,$4D
8360 DEFB $55,$3D,$4D,$55,$2D,$57,$0D
8367 DEFB $09,$B5,$73,$00,$F5,$AC,$36,$0E Line 2485: PRINT AT 6,4;"THE SHERIFF FINES YOU $";W: PRINT : PRINT TAB 4;"FOR WASTING HIS TIME THEN": PRINT : PRINT TAB 4;"THROWS YOU OUT".
836F DEFB $00,$00,$06,$00,$00,$2C,$34,$0E
8377 DEFB $00,$00,$04,$00,$00,$3B,$22,$54
837F DEFB $48,$45,$20,$53,$48,$45,$52,$49
8387 DEFB $46,$46,$20,$46,$49,$4E,$45,$53
838F DEFB $20,$59,$4F,$55,$20,$24,$22,$3B
8397 DEFB $57,$3A,$F5,$3A,$F5,$AD,$34,$0E
839F DEFB $00,$00,$04,$00,$00,$3B,$22,$46
83A7 DEFB $4F,$52,$20,$57,$41,$53,$54,$49
83AF DEFB $4E,$47,$20,$48,$49,$53,$20,$54
83B7 DEFB $49,$4D,$45,$20,$54,$48,$45,$4E
83BF DEFB $22,$3A,$F5,$3A,$F5,$AD,$34,$0E
83C7 DEFB $00,$00,$04,$00,$00,$3B,$22,$54
83CF DEFB $48,$52,$4F,$57,$53,$20,$59,$4F
83D7 DEFB $55,$20,$4F,$55,$54,$22,$0D
83DE DEFB $09,$B6,$40,$00,$EB,$4E,$3D,$33 Line 2486: FOR N=30 TO -30 STEP -U: BEEP .05,N: BEEP .05,N-R: NEXT N: GO TO VAL "500".
83E6 DEFB $30,$0E,$00,$00,$1E,$00,$00,$CC
83EE DEFB $2D,$33,$30,$0E,$00,$00,$1E,$00
83F6 DEFB $00,$CD,$2D,$55,$3A,$D7,$2E,$30
83FE DEFB $35,$0E,$7C,$4C,$CC,$CC,$CC,$2C
8406 DEFB $4E,$3A,$D7,$2E,$30,$35,$0E,$7C
840E DEFB $4C,$CC,$CC,$CC,$2C,$4E,$2D,$52
8416 DEFB $3A,$F3,$4E,$3A,$EC,$B0,$22,$35
841E DEFB $30,$30,$22,$0D
8422 DEFB $09,$BF,$9D,$00,$F5,$AC,$31,$32 Line 2495: PRINT AT 12,R;"THE SHERIFF AGREES AND PUTS": PRINT : PRINT TAB 4;"HIM BEHIND BARS.": PRINT : PRINT TAB R;"YOU RECEIVE $";R(A);" REWARD": LET V(A)=U: LET MU=MU+R(A): LET SC=SC+200: GO SUB VAL "2498".
842A DEFB $0E,$00,$00,$0C,$00,$00,$2C,$52
8432 DEFB $3B,$22,$54,$48,$45,$20,$53,$48
843A DEFB $45,$52,$49,$46,$46,$20,$41,$47
8442 DEFB $52,$45,$45,$53,$20,$41,$4E,$44
844A DEFB $20,$50,$55,$54,$53,$22,$3A,$F5
8452 DEFB $3A,$F5,$AD,$34,$0E,$00,$00,$04
845A DEFB $00,$00,$3B,$22,$48,$49,$4D,$20
8462 DEFB $42,$45,$48,$49,$4E,$44,$20,$42
846A DEFB $41,$52,$53,$2E,$22,$3A,$F5,$3A
8472 DEFB $F5,$AD,$52,$3B,$22,$59,$4F,$55
847A DEFB $20,$52,$45,$43,$45,$49,$56,$45
8482 DEFB $20,$24,$22,$3B,$52,$28,$41,$29
848A DEFB $3B,$22,$20,$52,$45,$57,$41,$52
8492 DEFB $44,$22,$3A,$F1,$56,$28,$41,$29
849A DEFB $3D,$55,$3A,$F1,$4D,$55,$3D,$4D
84A2 DEFB $55,$2B,$52,$28,$41,$29,$3A,$F1
84AA DEFB $53,$43,$3D,$53,$43,$2B,$32,$30
84B2 DEFB $30,$0E,$00,$00,$C8,$00,$00,$3A
84BA DEFB $ED,$B0,$22,$32,$34,$39,$38,$22
84C2 DEFB $0D
84C3 DEFB $09,$C0,$17,$00,$FA,$42,$24,$28 Line 2496: IF B$(A)=B$(MB) THEN GO TO VAL "9600".
84CB DEFB $41,$29,$3D,$42,$24,$28,$4D,$42
84D3 DEFB $29,$CB,$EC,$B0,$22,$39,$36,$30
84DB DEFB $30,$22,$0D
84DE DEFB $09,$C1,$08,$00,$EC,$B0,$22,$35 Line 2497: GO TO VAL "500".
84E6 DEFB $30,$30,$22,$0D
84EA DEFB $09,$C2,$2F,$00,$E5,$B0,$22,$39 Line 2498: RESTORE VAL "9085": FOR N=U TO 18: READ K: READ H: BEEP K/5,H: NEXT N: RETURN.
84F2 DEFB $30,$38,$35,$22,$3A,$EB,$4E,$3D
84FA DEFB $55,$CC,$31,$38,$0E,$00,$00,$12
8502 DEFB $00,$00,$3A,$E3,$4B,$3A,$E3,$48
850A DEFB $3A,$D7,$4B,$2F,$35,$0E,$00,$00
8512 DEFB $05,$00,$00,$2C,$48,$3A,$F3,$4E
851A DEFB $3A,$FE,$0D
851D DEFB $09,$C5,$24,$00,$FA,$4D,$55,$C7 Line 2501: IF MU<=100 THEN LET BB=20: GO TO VAL "2550".
8525 DEFB $31,$30,$30,$0E,$00,$00,$64,$00
852D DEFB $00,$CB,$F1,$42,$42,$3D,$32,$30
8535 DEFB $0E,$00,$00,$14,$00,$00,$3A,$EC
853D DEFB $B0,$22,$32,$35,$35,$30,$22,$0D
8545 DEFB $09,$C9,$1D,$00,$F1,$42,$42,$3D Line 2505: LET BB=20+INT (RND*50)+U.
854D DEFB $32,$30,$0E,$00,$00,$14,$00,$00
8555 DEFB $2B,$BA,$28,$A5,$2A,$35,$30,$0E
855D DEFB $00,$00,$32,$00,$00,$29,$2B,$55
8565 DEFB $0D
8566 DEFB $09,$F6,$B1,$00,$E7,$55,$3A,$DA Line 2550: BORDER U: PAPER 5: CLS : PRINT AT 6,U;"YOU GO TO THE TELEGRAPH OFFICE",,," THE CLERK SAYS HE WILL SHOW",,," YOU THE LATEST TELEGRAPHS",,," FOR $";BB;AT 16,6;"DO YOU AGREE ?(Y/N)".
856E DEFB $35,$0E,$00,$00,$05,$00,$00,$3A
8576 DEFB $FB,$3A,$F5,$AC,$36,$0E,$00,$00
857E DEFB $06,$00,$00,$2C,$55,$3B,$22,$59
8586 DEFB $4F,$55,$20,$47,$4F,$20,$54,$4F
858E DEFB $20,$54,$48,$45,$20,$54,$45,$4C
8596 DEFB $45,$47,$52,$41,$50,$48,$20,$4F
859E DEFB $46,$46,$49,$43,$45,$22,$2C,$2C
85A6 DEFB $2C,$22,$20,$54,$48,$45,$20,$43
85AE DEFB $4C,$45,$52,$4B,$20,$53,$41,$59
85B6 DEFB $53,$20,$48,$45,$20,$57,$49,$4C
85BE DEFB $4C,$20,$53,$48,$4F,$57,$22,$2C
85C6 DEFB $2C,$2C,$22,$20,$59,$4F,$55,$20
85CE DEFB $54,$48,$45,$20,$4C,$41,$54,$45
85D6 DEFB $53,$54,$20,$54,$45,$4C,$45,$47
85DE DEFB $52,$41,$50,$48,$53,$22,$2C,$2C
85E6 DEFB $2C,$22,$20,$46,$4F,$52,$20,$24
85EE DEFB $22,$3B,$42,$42,$3B,$AC,$31,$36
85F6 DEFB $0E,$00,$00,$10,$00,$00,$2C,$36
85FE DEFB $0E,$00,$00,$06,$00,$00,$3B,$22
8606 DEFB $44,$4F,$20,$59,$4F,$55,$20,$41
860E DEFB $47,$52,$45,$45,$20,$3F,$28,$59
8616 DEFB $2F,$4E,$29,$22,$0D
861B DEFB $09,$FB,$23,$00,$D7,$2E,$30,$32 Line 2555: BEEP .02,30: IF INKEY$="N" THEN GO TO VAL "500".
8623 DEFB $0E,$7B,$23,$D7,$0A,$3D,$2C,$33
862B DEFB $30,$0E,$00,$00,$1E,$00,$00,$3A
8633 DEFB $FA,$A6,$3D,$22,$4E,$22,$CB,$EC
863B DEFB $B0,$22,$35,$30,$30,$22,$0D
8642 DEFB $0A,$00,$10,$00,$FA,$A6,$3D,$22 Line 2560: IF INKEY$="Y" THEN GO TO VAL "2570".
864A DEFB $59,$22,$CB,$EC,$B0,$22,$32,$35
8652 DEFB $37,$30,$22,$0D
8656 DEFB $0A,$05,$1E,$00,$D7,$2E,$30,$32 Line 2565: BEEP .02,-20: GO TO VAL "2555".
865E DEFB $0E,$7B,$23,$D7,$0A,$3D,$2C,$2D
8666 DEFB $32,$30,$0E,$00,$00,$14,$00,$00
866E DEFB $3A,$EC,$B0,$22,$32,$35,$35,$35
8676 DEFB $22,$0D
8678 DEFB $0A,$0A,$9E,$00,$FA,$4D,$55,$3C Line 2570: IF MU<BB THEN CLS : PRINT AT 8,0;"YOUR INTENTIONS ARE BIGGER THAN",,,"YOUR WALLET.YOU DON'T HAVE $";BB: FOR N=-20 TO 25: BEEP .1,N: BEEP .05,N*-U: NEXT N: GO TO VAL "500".
8680 DEFB $42,$42,$CB,$FB,$3A,$F5,$AC,$38
8688 DEFB $0E,$00,$00,$08,$00,$00,$2C,$30
8690 DEFB $0E,$00,$00,$00,$00,$00,$3B,$22
8698 DEFB $59,$4F,$55,$52,$20,$49,$4E,$54
86A0 DEFB $45,$4E,$54,$49,$4F,$4E,$53,$20
86A8 DEFB $41,$52,$45,$20,$42,$49,$47,$47
86B0 DEFB $45,$52,$20,$54,$48,$41,$4E,$22
86B8 DEFB $2C,$2C,$2C,$22,$59,$4F,$55,$52
86C0 DEFB $20,$57,$41,$4C,$4C,$45,$54,$2E
86C8 DEFB $59,$4F,$55,$20,$44,$4F,$4E,$27
86D0 DEFB $54,$20,$48,$41,$56,$45,$20,$24
86D8 DEFB $22,$3B,$42,$42,$3A,$EB,$4E,$3D
86E0 DEFB $2D,$32,$30,$0E,$00,$00,$14,$00
86E8 DEFB $00,$CC,$32,$35,$0E,$00,$00,$19
86F0 DEFB $00,$00,$3A,$D7,$2E,$31,$0E,$7D
86F8 DEFB $4C,$CC,$CC,$CC,$2C,$4E,$3A,$D7
8700 DEFB $2E,$30,$35,$0E,$7C,$4C,$CC,$CC
8708 DEFB $CC,$2C,$4E,$2A,$2D,$55,$3A,$F3
8710 DEFB $4E,$3A,$EC,$B0,$22,$35,$30,$30
8718 DEFB $22,$0D
871A DEFB $0A,$0F,$0A,$00,$F1,$4D,$55,$3D Line 2575: LET MU=MU-BB.
8722 DEFB $4D,$55,$2D,$42,$42,$0D
8728 DEFB $0A,$19,$CA,$00,$E7,$4F,$3A,$DA Line 2585: BORDER O: PAPER 7: CLS : PRINT AT 4,U;"TELEGRAPH FROM ";T$(UM);AT 8,3;"PINKERTON AGENT CHARLES A.",,," SIRINGO ARRIVED TODAY IN",,," SEARCH OF FUGITIVE KNOWN",,," AS ";N$: INPUT " PRESS ENTER"; LINE H$.
8730 DEFB $37,$0E,$00,$00,$07,$00,$00,$3A
8738 DEFB $FB,$3A,$F5,$AC,$34,$0E,$00,$00
8740 DEFB $04,$00,$00,$2C,$55,$3B,$22,$54
8748 DEFB $45,$4C,$45,$47,$52,$41,$50,$48
8750 DEFB $20,$46,$52,$4F,$4D,$20,$22,$3B
8758 DEFB $54,$24,$28,$55,$4D,$29,$3B,$AC
8760 DEFB $38,$0E,$00,$00,$08,$00,$00,$2C
8768 DEFB $33,$0E,$00,$00,$03,$00,$00,$3B
8770 DEFB $22,$50,$49,$4E,$4B,$45,$52,$54
8778 DEFB $4F,$4E,$20,$41,$47,$45,$4E,$54
8780 DEFB $20,$43,$48,$41,$52,$4C,$45,$53
8788 DEFB $20,$41,$2E,$22,$2C,$2C,$2C,$22
8790 DEFB $20,$20,$20,$53,$49,$52,$49,$4E
8798 DEFB $47,$4F,$20,$41,$52,$52,$49,$56
87A0 DEFB $45,$44,$20,$54,$4F,$44,$41,$59
87A8 DEFB $20,$49,$4E,$22,$2C,$2C,$2C,$22
87B0 DEFB $20,$20,$20,$53,$45,$41,$52,$43
87B8 DEFB $48,$20,$4F,$46,$20,$46,$55,$47
87C0 DEFB $49,$54,$49,$56,$45,$20,$4B,$4E
87C8 DEFB $4F,$57,$4E,$22,$2C,$2C,$2C,$22
87D0 DEFB $20,$20,$20,$41,$53,$20,$22,$3B
87D8 DEFB $4E,$24,$3A,$EE,$22,$20,$20,$20
87E0 DEFB $20,$20,$20,$20,$20,$50,$52,$45
87E8 DEFB $53,$53,$20,$45,$4E,$54,$45,$52
87F0 DEFB $22,$3B,$CA,$48,$24,$0D
87F6 DEFB $0A,$1E,$0F,$00,$FA,$4A,$42,$C9 Line 2590: IF JB<>O THEN GO SUB VAL "2610".
87FE DEFB $4F,$CB,$ED,$B0,$22,$32,$36,$31
8806 DEFB $30,$22,$0D
8809 DEFB $0A,$23,$09,$00,$EC,$B0,$22,$32 Line 2595: GO TO VAL "2620".
8811 DEFB $36,$32,$30,$22,$0D
8816 DEFB $0A,$32,$C6,$00,$FB,$3A,$F5,$AC Line 2610: CLS : PRINT AT 4,4;"TELEGRAPH FROM KNOXVILLE";AT 8,R;"THE OUTLAW ";B$(JB),,," ESCAPED FROM KNOXVILLE COUNTY",,," JAIL.",,,," REWARD FOR RECAPTURE $";R(JB): INPUT " PRESS ENTER"; LINE H$: LET JB=O: RETURN.
881E DEFB $34,$0E,$00,$00,$04,$00,$00,$2C
8826 DEFB $34,$0E,$00,$00,$04,$00,$00,$3B
882E DEFB $22,$54,$45,$4C,$45,$47,$52,$41
8836 DEFB $50,$48,$20,$46,$52,$4F,$4D,$20
883E DEFB $4B,$4E,$4F,$58,$56,$49,$4C,$4C
8846 DEFB $45,$22,$3B,$AC,$38,$0E,$00,$00
884E DEFB $08,$00,$00,$2C,$52,$3B,$22,$54
8856 DEFB $48,$45,$20,$4F,$55,$54,$4C,$41
885E DEFB $57,$20,$22,$3B,$42,$24,$28,$4A
8866 DEFB $42,$29,$2C,$2C,$2C,$22,$20,$20
886E DEFB $45,$53,$43,$41,$50,$45,$44,$20
8876 DEFB $46,$52,$4F,$4D,$20,$4B,$4E,$4F
887E DEFB $58,$56,$49,$4C,$4C,$45,$20,$43
8886 DEFB $4F,$55,$4E,$54,$59,$22,$2C,$2C
888E DEFB $2C,$22,$20,$20,$4A,$41,$49,$4C
8896 DEFB $2E,$22,$2C,$2C,$2C,$2C,$22,$20
889E DEFB $20,$52,$45,$57,$41,$52,$44,$20
88A6 DEFB $46,$4F,$52,$20,$52,$45,$43,$41
88AE DEFB $50,$54,$55,$52,$45,$20,$24,$22
88B6 DEFB $3B,$52,$28,$4A,$42,$29,$3A,$EE
88BE DEFB $22,$20,$20,$20,$20,$20,$20,$20
88C6 DEFB $20,$50,$52,$45,$53,$53,$20,$45
88CE DEFB $4E,$54,$45,$52,$22,$3B,$CA,$48
88D6 DEFB $24,$3A,$F1,$4A,$42,$3D,$4F,$3A
88DE DEFB $FE,$0D
88E0 DEFB $0A,$3C,$13,$00,$F1,$58,$3D,$BA Line 2620: LET X=INT (RND*12)+U.
88E8 DEFB $28,$A5,$2A,$31,$32,$0E,$00,$00
88F0 DEFB $0C,$00,$00,$29,$2B,$55,$0D
88F7 DEFB $0A,$41,$13,$00,$FA,$58,$3C,$38 Line 2625: IF X<8 THEN GO TO VAL "500".
88FF DEFB $0E,$00,$00,$08,$00,$00,$CB,$EC
8907 DEFB $B0,$22,$35,$30,$30,$22,$0D
890E DEFB $0A,$46,$3C,$00,$FA,$58,$3D,$31 Line 2630: IF X=12 THEN LET W$="UNION PACIFIC RAILROAD CO.": LET X$="TRAIN".
8916 DEFB $32,$0E,$00,$00,$0C,$00,$00,$CB
891E DEFB $F1,$57,$24,$3D,$22,$55,$4E,$49
8926 DEFB $4F,$4E,$20,$50,$41,$43,$49,$46
892E DEFB $49,$43,$20,$20,$20,$20,$52,$41
8936 DEFB $49,$4C,$52,$4F,$41,$44,$20,$43
893E DEFB $4F,$2E,$22,$3A,$F1,$58,$24,$3D
8946 DEFB $22,$54,$52,$41,$49,$4E,$22,$0D
894E DEFB $0A,$47,$3C,$00,$FA,$58,$3D,$31 Line 2631: IF X=11 THEN LET W$="GREAT NORTHERN RAILROAD CO.": LET X$="TRAIN".
8956 DEFB $31,$0E,$00,$00,$0B,$00,$00,$CB
895E DEFB $F1,$57,$24,$3D,$22,$47,$52,$45
8966 DEFB $41,$54,$20,$4E,$4F,$52,$54,$48
896E DEFB $45,$52,$4E,$20,$20,$20,$52,$41
8976 DEFB $49,$4C,$52,$4F,$41,$44,$20,$43
897E DEFB $4F,$2E,$22,$3A,$F1,$58,$24,$3D
8986 DEFB $22,$54,$52,$41,$49,$4E,$22,$0D
898E DEFB $0A,$48,$33,$00,$FA,$58,$3D,$31 Line 2632: IF X=10 THEN LET W$="DENVER": LET X$="FIRST NATIONAL BANK".
8996 DEFB $30,$0E,$00,$00,$0A,$00,$00,$CB
899E DEFB $F1,$57,$24,$3D,$22,$44,$45,$4E
89A6 DEFB $56,$45,$52,$22,$3A,$F1,$58,$24
89AE DEFB $3D,$22,$46,$49,$52,$53,$54,$20
89B6 DEFB $4E,$41,$54,$49,$4F,$4E,$41,$4C
89BE DEFB $20,$42,$41,$4E,$4B,$22,$0D
89C5 DEFB $0A,$49,$3C,$00,$FA,$58,$3D,$39 Line 2633: IF X=9 THEN LET W$="MONTPELIER,IDAHO": LET X$="FIRST NATIONAL BANK".
89CD DEFB $0E,$00,$00,$09,$00,$00,$CB,$F1
89D5 DEFB $57,$24,$3D,$22,$4D,$4F,$4E,$54
89DD DEFB $50,$45,$4C,$49,$45,$52,$2C,$49
89E5 DEFB $44,$41,$48,$4F,$22,$3A,$F1,$58
89ED DEFB $24,$3D,$22,$46,$49,$52,$53,$54
89F5 DEFB $20,$4E,$41,$54,$49,$4F,$4E,$41
89FD DEFB $4C,$20,$42,$41,$4E,$4B,$22,$0D
8A05 DEFB $0A,$4A,$3D,$00,$FA,$58,$3D,$38 Line 2634: IF X=8 THEN LET W$="WINNEMUCCA,NEVADA": LET X$="FIRST NATIONAL BANK".
8A0D DEFB $0E,$00,$00,$08,$00,$00,$CB,$F1
8A15 DEFB $57,$24,$3D,$22,$57,$49,$4E,$4E
8A1D DEFB $45,$4D,$55,$43,$43,$41,$2C,$4E
8A25 DEFB $45,$56,$41,$44,$41,$22,$3A,$F1
8A2D DEFB $58,$24,$3D,$22,$46,$49,$52,$53
8A35 DEFB $54,$20,$4E,$41,$54,$49,$4F,$4E
8A3D DEFB $41,$4C,$20,$42,$41,$4E,$4B,$22
8A45 DEFB $0D
8A46 DEFB $0A,$4B,$C7,$00,$FB,$3A,$F5,$AC Line 2635: CLS : PRINT AT 4,O;"TELEGRAPH FROM ";W$;AT 8,R;"WILD BUNCH CARRIED OUT RAID",,," ON ";X$;AT 12,R;"REWARDS RAISED BY $50": FOR N=U TO 5: LET R(N)=R(N)+50: NEXT N: INPUT " PRESS ENTER"; LINE H$: GO TO 500.
8A4E DEFB $34,$0E,$00,$00,$04,$00,$00,$2C
8A56 DEFB $4F,$3B,$22,$54,$45,$4C,$45,$47
8A5E DEFB $52,$41,$50,$48,$20,$46,$52,$4F
8A66 DEFB $4D,$20,$22,$3B,$57,$24,$3B,$AC
8A6E DEFB $38,$0E,$00,$00,$08,$00,$00,$2C
8A76 DEFB $52,$3B,$22,$57,$49,$4C,$44,$20
8A7E DEFB $42,$55,$4E,$43,$48,$20,$43,$41
8A86 DEFB $52,$52,$49,$45,$44,$20,$4F,$55
8A8E DEFB $54,$20,$52,$41,$49,$44,$22,$2C
8A96 DEFB $2C,$2C,$22,$20,$20,$4F,$4E,$20
8A9E DEFB $22,$3B,$58,$24,$3B,$AC,$31,$32
8AA6 DEFB $0E,$00,$00,$0C,$00,$00,$2C,$52
8AAE DEFB $3B,$22,$52,$45,$57,$41,$52,$44
8AB6 DEFB $53,$20,$52,$41,$49,$53,$45,$44
8ABE DEFB $20,$42,$59,$20,$24,$35,$30,$22
8AC6 DEFB $3A,$EB,$4E,$3D,$55,$CC,$35,$0E
8ACE DEFB $00,$00,$05,$00,$00,$3A,$F1,$52
8AD6 DEFB $28,$4E,$29,$3D,$52,$28,$4E,$29
8ADE DEFB $2B,$35,$30,$0E,$00,$00,$32,$00
8AE6 DEFB $00,$3A,$F3,$4E,$3A,$EE,$22,$20
8AEE DEFB $20,$20,$20,$20,$20,$20,$20,$50
8AF6 DEFB $52,$45,$53,$53,$20,$45,$4E,$54
8AFE DEFB $45,$52,$22,$3B,$CA,$48,$24,$3A
8B06 DEFB $EC,$35,$30,$30,$0E,$00,$00,$F4
8B0E DEFB $01,$00,$0D
8B11 DEFB $0A,$8C,$D9,$00,$F5,$AC,$31,$32 Line 2700: PRINT AT 12,2;"THE SHERIFF AGREES AND CALLS": PRINT : PRINT " THE UNDERTAKER.": PRINT : PRINT " YOU RECEIVE $";R(A);" REWARD.": LET MU=MU+R(A): LET SC=SC+500: LET V(A)=O: IF I(4)>O AND I(6)>O THEN LET I(6)=I(6)-U: GO SUB VAL "2498": GO TO VAL "2710".
8B19 DEFB $0E,$00,$00,$0C,$00,$00,$2C,$32
8B21 DEFB $0E,$00,$00,$02,$00,$00,$3B,$22
8B29 DEFB $54,$48,$45,$20,$53,$48,$45,$52
8B31 DEFB $49,$46,$46,$20,$41,$47,$52,$45
8B39 DEFB $45,$53,$20,$41,$4E,$44,$20,$43
8B41 DEFB $41,$4C,$4C,$53,$22,$3A,$F5,$3A
8B49 DEFB $F5,$22,$20,$20,$54,$48,$45,$20
8B51 DEFB $55,$4E,$44,$45,$52,$54,$41,$4B
8B59 DEFB $45,$52,$2E,$22,$3A,$F5,$3A,$F5
8B61 DEFB $22,$20,$20,$59,$4F,$55,$20,$52
8B69 DEFB $45,$43,$45,$49,$56,$45,$20,$24
8B71 DEFB $22,$3B,$52,$28,$41,$29,$3B,$22
8B79 DEFB $20,$52,$45,$57,$41,$52,$44,$2E
8B81 DEFB $22,$3A,$F1,$4D,$55,$3D,$4D,$55
8B89 DEFB $2B,$52,$28,$41,$29,$3A,$F1,$53
8B91 DEFB $43,$3D,$53,$43,$2B,$35,$30,$30
8B99 DEFB $0E,$00,$00,$F4,$01,$00,$3A,$F1
8BA1 DEFB $56,$28,$41,$29,$3D,$4F,$3A,$FA
8BA9 DEFB $49,$28,$34,$0E,$00,$00,$04,$00
8BB1 DEFB $00,$29,$3E,$4F,$C6,$49,$28,$36
8BB9 DEFB $0E,$00,$00,$06,$00,$00,$29,$3E
8BC1 DEFB $4F,$CB,$F1,$49,$28,$36,$0E,$00
8BC9 DEFB $00,$06,$00,$00,$29,$3D,$49,$28
8BD1 DEFB $36,$0E,$00,$00,$06,$00,$00,$29
8BD9 DEFB $2D,$55,$3A,$ED,$B0,$22,$32,$34
8BE1 DEFB $39,$38,$22,$3A,$EC,$B0,$22,$32
8BE9 DEFB $37,$31,$30,$22,$0D
8BEE DEFB $0A,$91,$22,$00,$F1,$49,$28,$35 Line 2705: LET I(5)=I(5)-U: GO SUB VAL "2498".
8BF6 DEFB $0E,$00,$00,$05,$00,$00,$29,$3D
8BFE DEFB $49,$28,$35,$0E,$00,$00,$05,$00
8C06 DEFB $00,$29,$2D,$55,$3A,$ED,$B0,$22
8C0E DEFB $32,$34,$39,$38,$22,$0D
8C14 DEFB $0A,$96,$17,$00,$FA,$42,$24,$28 Line 2710: IF B$(A)=B$(MB) THEN GO TO VAL "9700".
8C1C DEFB $41,$29,$3D,$42,$24,$28,$4D,$42
8C24 DEFB $29,$CB,$EC,$B0,$22,$39,$37,$30
8C2C DEFB $30,$22,$0D
8C2F DEFB $0A,$9B,$08,$00,$EC,$B0,$22,$35 Line 2715: GO TO VAL "500".
8C37 DEFB $30,$30,$22,$0D
8C3B DEFB $0A,$A0,$79,$00,$E7,$30,$0E,$00 Line 2720: BORDER 0: PAPER 0: CLS : PRINT AT 7,O;"HE ARRESTS YOU FOR MANSLAUGHTER": PRINT : PRINT "YOU'LL BE IN JAIL FOR QUITE A": PRINT : PRINT "LONG TIME.....".
8C43 DEFB $00,$00,$00,$00,$3A,$DA,$30,$0E
8C4B DEFB $00,$00,$00,$00,$00,$3A,$FB,$3A
8C53 DEFB $F5,$AC,$37,$0E,$00,$00,$07,$00
8C5B DEFB $00,$2C,$4F,$3B,$22,$48,$45,$20
8C63 DEFB $41,$52,$52,$45,$53,$54,$53,$20
8C6B DEFB $59,$4F,$55,$20,$46,$4F,$52,$20
8C73 DEFB $4D,$41,$4E,$53,$4C,$41,$55,$47
8C7B DEFB $48,$54,$45,$52,$22,$3A,$F5,$3A
8C83 DEFB $F5,$22,$59,$4F,$55,$27,$4C,$4C
8C8B DEFB $20,$42,$45,$20,$49,$4E,$20,$4A
8C93 DEFB $41,$49,$4C,$20,$46,$4F,$52,$20
8C9B DEFB $51,$55,$49,$54,$45,$20,$41,$22
8CA3 DEFB $3A,$F5,$3A,$F5,$22,$4C,$4F,$4E
8CAB DEFB $47,$20,$54,$49,$4D,$45,$2E,$2E
8CB3 DEFB $2E,$2E,$2E,$22,$0D
8CB8 DEFB $0A,$A5,$4E,$00,$EB,$4E,$3D,$37 Line 2725: FOR N=7 TO -20 STEP -U: BEEP .2,N: BEEP .05,N+3: NEXT N: GO SUB VAL "9500": GO TO VAL "9870".
8CC0 DEFB $0E,$00,$00,$07,$00,$00,$CC,$2D
8CC8 DEFB $32,$30,$0E,$00,$00,$14,$00,$00
8CD0 DEFB $CD,$2D,$55,$3A,$D7,$2E,$32,$0E
8CD8 DEFB $7E,$4C,$CC,$CC,$CC,$2C,$4E,$3A
8CE0 DEFB $D7,$2E,$30,$35,$0E,$7C,$4C,$CC
8CE8 DEFB $CC,$CC,$2C,$4E,$2B,$33,$0E,$00
8CF0 DEFB $00,$03,$00,$00,$3A,$F3,$4E,$3A
8CF8 DEFB $ED,$B0,$22,$39,$35,$30,$30,$22
8D00 DEFB $3A,$EC,$B0,$22,$39,$38,$37,$30
8D08 DEFB $22,$0D
8D0A DEFB $0B,$B8,$12,$00,$E7,$52,$3A,$DA Line 3000: BORDER R: PAPER INT PI: INK 9: CLS.
8D12 DEFB $BA,$A7,$3A,$D9,$39,$0E,$00,$00
8D1A DEFB $09,$00,$00,$3A,$FB,$0D
8D20 DEFB $0B,$BD,$F8,$00,$D7,$2E,$32,$0E Line 3005: BEEP .2,15: BEEP .25,-15: PRINT AT 6,5;"YOU GO TO THE SHERIFFS": PRINT : PRINT TAB 5;"OFFICE TO LOOK AT THE": PRINT : PRINT TAB 5;"LATEST WANTED POSTERS": PRINT : PRINT TAB 5;"ON MEMBERS OF THE WILD": PRINT : PRINT TAB 5;"BUNCH."; FLASH U;AT 17,12;"ANY KEY": FLASH O.
8D28 DEFB $7E,$4C,$CC,$CC,$CC,$2C,$31,$35
8D30 DEFB $0E,$00,$00,$0F,$00,$00,$3A,$D7
8D38 DEFB $2E,$32,$35,$0E,$7E,$7F,$FF,$FF
8D40 DEFB $FF,$2C,$2D,$31,$35,$0E,$00,$00
8D48 DEFB $0F,$00,$00,$3A,$F5,$AC,$36,$0E
8D50 DEFB $00,$00,$06,$00,$00,$2C,$35,$0E
8D58 DEFB $00,$00,$05,$00,$00,$3B,$22,$59
8D60 DEFB $4F,$55,$20,$47,$4F,$20,$54,$4F
8D68 DEFB $20,$54,$48,$45,$20,$53,$48,$45
8D70 DEFB $52,$49,$46,$46,$53,$22,$3A,$F5
8D78 DEFB $3A,$F5,$AD,$35,$0E,$00,$00,$05
8D80 DEFB $00,$00,$3B,$22,$4F,$46,$46,$49
8D88 DEFB $43,$45,$20,$54,$4F,$20,$4C,$4F
8D90 DEFB $4F,$4B,$20,$41,$54,$20,$54,$48
8D98 DEFB $45,$22,$3A,$F5,$3A,$F5,$AD,$35
8DA0 DEFB $0E,$00,$00,$05,$00,$00,$3B,$22
8DA8 DEFB $4C,$41,$54,$45,$53,$54,$20,$57
8DB0 DEFB $41,$4E,$54,$45,$44,$20,$50,$4F
8DB8 DEFB $53,$54,$45,$52,$53,$22,$3A,$F5
8DC0 DEFB $3A,$F5,$AD,$35,$0E,$00,$00,$05
8DC8 DEFB $00,$00,$3B,$22,$4F,$4E,$20,$4D
8DD0 DEFB $45,$4D,$42,$45,$52,$53,$20,$4F
8DD8 DEFB $46,$20,$54,$48,$45,$20,$57,$49
8DE0 DEFB $4C,$44,$22,$3A,$F5,$3A,$F5,$AD
8DE8 DEFB $35,$0E,$00,$00,$05,$00,$00,$3B
8DF0 DEFB $22,$42,$55,$4E,$43,$48,$2E,$22
8DF8 DEFB $3B,$DB,$55,$3B,$AC,$31,$37,$0E
8E00 DEFB $00,$00,$11,$00,$00,$2C,$31,$32
8E08 DEFB $0E,$00,$00,$0C,$00,$00,$3B,$22
8E10 DEFB $41,$4E,$59,$20,$4B,$45,$59,$22
8E18 DEFB $3A,$DB,$4F,$0D
8E1C DEFB $0B,$C2,$0F,$00,$FA,$A6,$C9,$22 Line 3010: IF INKEY$<>"" THEN GO TO VAL "7000".
8E24 DEFB $22,$CB,$EC,$B0,$22,$37,$30,$30
8E2C DEFB $30,$22,$0D
8E2F DEFB $0B,$CC,$22,$00,$D7,$2E,$30,$31 Line 3020: BEEP .01,INT PI: BEEP .02,15.
8E37 DEFB $0E,$7A,$23,$D7,$0A,$3D,$2C,$BA
8E3F DEFB $A7,$3A,$D7,$2E,$30,$32,$0E,$7B
8E47 DEFB $23,$D7,$0A,$3D,$2C,$31,$35,$0E
8E4F DEFB $00,$00,$0F,$00,$00,$0D
8E55 DEFB $0B,$D1,$09,$00,$EC,$B0,$22,$33 Line 3025: GO TO VAL "3010".
8E5D DEFB $30,$31,$30,$22,$0D
8E62 DEFB $0F,$A5,$26,$00,$F1,$44,$54,$3D Line 4005: LET DT=O: LET JM=INT (RND*3)+U: LET UM=U(UM,JM).
8E6A DEFB $4F,$3A,$F1,$4A,$4D,$3D,$BA,$28
8E72 DEFB $A5,$2A,$33,$0E,$00,$00,$03,$00
8E7A DEFB $00,$29,$2B,$55,$3A,$F1,$55,$4D
8E82 DEFB $3D,$55,$28,$55,$4D,$2C,$4A,$4D
8E8A DEFB $29,$0D
8E8C DEFB $0F,$C3,$C7,$00,$F1,$52,$24,$3D Line 4035: LET R$="-------------------------------": LET HS=6: LET HL=O: BORDER 5: PAPER 5: CLS : PRINT "YOU START YOUR JOURNEY....": IF I(U)<=O THEN LET G=G*R: PRINT : PRINT "BUT YOU HAVE NO HORSE SO THE": PRINT "JOURNEY WILL TAKE ";G;" DAYS": GO TO 4080.
8E94 DEFB $22,$2D,$2D,$2D,$2D,$2D,$2D,$2D
8E9C DEFB $2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D
8EA4 DEFB $2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D
8EAC DEFB $2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D
8EB4 DEFB $22,$3A,$F1,$48,$53,$3D,$36,$0E
8EBC DEFB $00,$00,$06,$00,$00,$3A,$F1,$48
8EC4 DEFB $4C,$3D,$4F,$3A,$E7,$35,$0E,$00
8ECC DEFB $00,$05,$00,$00,$3A,$DA,$35,$0E
8ED4 DEFB $00,$00,$05,$00,$00,$3A,$FB,$3A
8EDC DEFB $F5,$22,$59,$4F,$55,$20,$53,$54
8EE4 DEFB $41,$52,$54,$20,$59,$4F,$55,$52
8EEC DEFB $20,$4A,$4F,$55,$52,$4E,$45,$59
8EF4 DEFB $2E,$2E,$2E,$2E,$22,$3A,$FA,$49
8EFC DEFB $28,$55,$29,$C7,$4F,$CB,$F1,$47
8F04 DEFB $3D,$47,$2A,$52,$3A,$F5,$3A,$F5
8F0C DEFB $22,$42,$55,$54,$20,$59,$4F,$55
8F14 DEFB $20,$48,$41,$56,$45,$20,$4E,$4F
8F1C DEFB $20,$48,$4F,$52,$53,$45,$20,$53
8F24 DEFB $4F,$20,$54,$48,$45,$22,$3A,$F5
8F2C DEFB $22,$4A,$4F,$55,$52,$4E,$45,$59
8F34 DEFB $20,$57,$49,$4C,$4C,$20,$54,$41
8F3C DEFB $4B,$45,$20,$22,$3B,$47,$3B,$22
8F44 DEFB $20,$44,$41,$59,$53,$22,$3A,$EC
8F4C DEFB $34,$30,$38,$30,$0E,$00,$00,$F0
8F54 DEFB $0F,$00,$0D
8F57 DEFB $0F,$C8,$56,$00,$FA,$49,$28,$52 Line 4040: IF I(R)<=O THEN LET G=G+R: PRINT : PRINT "BUT YOU HAVE NO SADDLE SO THE": PRINT "JOURNEY WILL TAKE ";G;" DAYS....".
8F5F DEFB $29,$C7,$4F,$CB,$F1,$47,$3D,$47
8F67 DEFB $2B,$52,$3A,$F5,$3A,$F5,$22,$42
8F6F DEFB $55,$54,$20,$59,$4F,$55,$20,$48
8F77 DEFB $41,$56,$45,$20,$4E,$4F,$20,$53
8F7F DEFB $41,$44,$44,$4C,$45,$20,$53,$4F
8F87 DEFB $20,$54,$48,$45,$22,$3A,$F5,$22
8F8F DEFB $4A,$4F,$55,$52,$4E,$45,$59,$20
8F97 DEFB $57,$49,$4C,$4C,$20,$54,$41,$4B
8F9F DEFB $45,$20,$22,$3B,$47,$3B,$22,$20
8FA7 DEFB $44,$41,$59,$53,$2E,$2E,$2E,$2E
8FAF DEFB $22,$0D
8FB1 DEFB $0F,$F0,$3D,$00,$F1,$4A,$59,$3D Line 4080: LET JY=O: FOR N=U TO G: LET JY=JY+U: PRINT : PRINT "DAY ";JY;" OF JOURNEY": GO SUB 4960.
8FB9 DEFB $4F,$3A,$EB,$4E,$3D,$55,$CC,$47
8FC1 DEFB $3A,$F1,$4A,$59,$3D,$4A,$59,$2B
8FC9 DEFB $55,$3A,$F5,$3A,$F5,$22,$44,$41
8FD1 DEFB $59,$20,$22,$3B,$4A,$59,$3B,$22
8FD9 DEFB $20,$4F,$46,$20,$4A,$4F,$55,$52
8FE1 DEFB $4E,$45,$59,$22,$3A,$ED,$34,$39
8FE9 DEFB $36,$30,$0E,$00,$00,$60,$13,$00
8FF1 DEFB $0D
8FF2 DEFB $0F,$FF,$2A,$00,$FA,$49,$28,$31 Line 4095: IF I(10)>=U THEN LET I(10)=I(10)-U.
8FFA DEFB $30,$0E,$00,$00,$0A,$00,$00,$29
9002 DEFB $C8,$55,$CB,$F1,$49,$28,$31,$30
900A DEFB $0E,$00,$00,$0A,$00,$00,$29,$3D
9012 DEFB $49,$28,$31,$30,$0E,$00,$00,$0A
901A DEFB $00,$00,$29,$2D,$55,$0D
9020 DEFB $10,$0E,$88,$00,$F1,$4E,$4E,$3D Line 4110: LET NN=INT (RND*R)+U: LET TS=O: LET DI=PI: LET OR=PI: LET MI=PI: FOR W=U TO NN: POKE 23692,255: LET FO=O: LET KK=INT (RND*12): IF KK=11 AND I(U)=U THEN GO SUB 4970: GO TO 4126.
9028 DEFB $BA,$28,$A5,$2A,$52,$29,$2B,$55
9030 DEFB $3A,$F1,$54,$53,$3D,$4F,$3A,$F1
9038 DEFB $44,$49,$3D,$A7,$3A,$F1,$4F,$52
9040 DEFB $3D,$A7,$3A,$F1,$4D,$49,$3D,$A7
9048 DEFB $3A,$EB,$57,$3D,$55,$CC,$4E,$4E
9050 DEFB $3A,$F4,$32,$33,$36,$39,$32,$0E
9058 DEFB $00,$00,$8C,$5C,$00,$2C,$32,$35
9060 DEFB $35,$0E,$00,$00,$FF,$00,$00,$3A
9068 DEFB $F1,$46,$4F,$3D,$4F,$3A,$F1,$4B
9070 DEFB $4B,$3D,$BA,$28,$A5,$2A,$31,$32
9078 DEFB $0E,$00,$00,$0C,$00,$00,$29,$3A
9080 DEFB $FA,$4B,$4B,$3D,$31,$31,$0E,$00
9088 DEFB $00,$0B,$00,$00,$C6,$49,$28,$55
9090 DEFB $29,$3D,$55,$CB,$ED,$34,$39,$37
9098 DEFB $30,$0E,$00,$00,$6A,$13,$00,$3A
90A0 DEFB $EC,$34,$31,$32,$36,$0E,$00,$00
90A8 DEFB $1E,$10,$00,$0D
90AC DEFB $10,$13,$22,$00,$FA,$44,$45,$3D Line 4115: IF DE=U AND N=R OR DE=U AND N<>U AND N<=G-U THEN GO TO VAL "4130".
90B4 DEFB $55,$C6,$4E,$3D,$52,$C5,$44,$45
90BC DEFB $3D,$55,$C6,$4E,$C9,$55,$C6,$4E
90C4 DEFB $C7,$47,$2D,$55,$CB,$EC,$B0,$22
90CC DEFB $34,$31,$33,$30,$22,$0D
90D2 DEFB $10,$14,$22,$00,$FA,$4D,$54,$3D Line 4116: IF MT=U AND N=R OR MT=U AND N<>U AND N<=G-U THEN GO TO VAL "4140".
90DA DEFB $55,$C6,$4E,$3D,$52,$C5,$4D,$54
90E2 DEFB $3D,$55,$C6,$4E,$C9,$55,$C6,$4E
90EA DEFB $C7,$47,$2D,$55,$CB,$EC,$B0,$22
90F2 DEFB $34,$31,$34,$30,$22,$0D
90F8 DEFB $10,$15,$34,$00,$F5,$3A,$F5,$22 Line 4117: PRINT : PRINT "YOU ARE ON THE OPEN RANGE": IF OR=PI THEN GO SUB VAL "4200": LET OR=O.
9100 DEFB $59,$4F,$55,$20,$41,$52,$45,$20
9108 DEFB $4F,$4E,$20,$54,$48,$45,$20,$4F
9110 DEFB $50,$45,$4E,$20,$52,$41,$4E,$47
9118 DEFB $45,$22,$3A,$FA,$4F,$52,$3D,$A7
9120 DEFB $CB,$ED,$B0,$22,$34,$32,$30,$30
9128 DEFB $22,$3A,$F1,$4F,$52,$3D,$4F,$0D
9130 DEFB $10,$16,$1E,$00,$ED,$B0,$22,$34 Line 4118: GO SUB VAL "4701": IF KK=INT PI THEN LET F$="BUFFALO".
9138 DEFB $37,$30,$31,$22,$3A,$FA,$4B,$4B
9140 DEFB $3D,$BA,$A7,$CB,$F1,$46,$24,$3D
9148 DEFB $22,$42,$55,$46,$46,$41,$4C,$4F
9150 DEFB $22,$0D
9152 DEFB $10,$17,$29,$00,$FA,$4B,$4B,$3D Line 4119: IF KK=5 OR KK=6 THEN GO SUB VAL "4870": GO TO VAL "4126".
915A DEFB $35,$0E,$00,$00,$05,$00,$00,$C5
9162 DEFB $4B,$4B,$3D,$36,$0E,$00,$00,$06
916A DEFB $00,$00,$CB,$ED,$B0,$22,$34,$38
9172 DEFB $37,$30,$22,$3A,$EC,$B0,$22,$34
917A DEFB $31,$32,$36,$22,$0D
917F DEFB $10,$18,$15,$00,$FA,$4B,$4B,$3D Line 4120: IF KK=U THEN LET F$="LONGHORN".
9187 DEFB $55,$CB,$F1,$46,$24,$3D,$22,$4C
918F DEFB $4F,$4E,$47,$48,$4F,$52,$4E,$22
9197 DEFB $0D
9198 DEFB $10,$19,$09,$00,$ED,$B0,$22,$34 Line 4121: GO SUB VAL "4700".
91A0 DEFB $37,$30,$30,$22,$0D
91A5 DEFB $10,$1A,$4C,$00,$F5,$3A,$F5,$22 Line 4122: PRINT : PRINT "A ";M$;",";U$;" ";F$: PRINT E$;" (STRENGTH ";BS;")": PRINT : PRINT "YOUR STRENGTH IS ";CS.
91AD DEFB $41,$20,$22,$3B,$4D,$24,$3B,$22
91B5 DEFB $2C,$22,$3B,$55,$24,$3B,$22,$20
91BD DEFB $22,$3B,$46,$24,$3A,$F5,$45,$24
91C5 DEFB $3B,$22,$20,$28,$53,$54,$52,$45
91CD DEFB $4E,$47,$54,$48,$20,$22,$3B,$42
91D5 DEFB $53,$3B,$22,$29,$22,$3A,$F5,$3A
91DD DEFB $F5,$22,$59,$4F,$55,$52,$20,$53
91E5 DEFB $54,$52,$45,$4E,$47,$54,$48,$20
91ED DEFB $49,$53,$20,$22,$3B,$43,$53,$0D
91F5 DEFB $10,$1B,$1A,$00,$ED,$B0,$22,$34 Line 4123: GO SUB VAL "4950": IF H$="F" THEN GO SUB VAL "4730".
91FD DEFB $39,$35,$30,$22,$3A,$FA,$48,$24
9205 DEFB $3D,$22,$46,$22,$CB,$ED,$B0,$22
920D DEFB $34,$37,$33,$30,$22,$0D
9213 DEFB $10,$1C,$11,$00,$FA,$48,$24,$3D Line 4124: IF H$="R" THEN GO SUB VAL "4780".
921B DEFB $22,$52,$22,$CB,$ED,$B0,$22,$34
9223 DEFB $37,$38,$30,$22,$0D
9228 DEFB $10,$1D,$20,$00,$FA,$48,$24,$3D Line 4125: IF H$="B" THEN GO SUB VAL "4795": IF TS=PI THEN GO TO VAL "4123".
9230 DEFB $22,$42,$22,$CB,$ED,$B0,$22,$34
9238 DEFB $37,$39,$35,$22,$3A,$FA,$54,$53
9240 DEFB $3D,$A7,$CB,$EC,$B0,$22,$34,$31
9248 DEFB $32,$33,$22,$0D
924C DEFB $10,$1E,$31,$00,$F1,$54,$53,$3D Line 4126: LET TS=O: BEEP .7,PI: PRINT : PRINT R$: NEXT W: PAUSE 100: NEXT N: GO TO VAL "480".
9254 DEFB $4F,$3A,$D7,$2E,$37,$0E,$80,$33
925C DEFB $33,$33,$33,$2C,$A7,$3A,$F5,$3A
9264 DEFB $F5,$52,$24,$3A,$F3,$57,$3A,$F2
926C DEFB $31,$30,$30,$0E,$00,$00,$64,$00
9274 DEFB $00,$3A,$F3,$4E,$3A,$EC,$B0,$22
927C DEFB $34,$38,$30,$22,$0D
9281 DEFB $10,$22,$4D,$00,$F5,$3A,$F5,$22 Line 4130: PRINT : PRINT "YOU'RE IN THE DESERT": IF DI=PI THEN GO SUB VAL "4200": GO SUB VAL "4850": GO SUB VAL "4845": GO SUB VAL "4855": GO SUB VAL "4990".
9289 DEFB $59,$4F,$55,$27,$52,$45,$20,$49
9291 DEFB $4E,$20,$54,$48,$45,$20,$44,$45
9299 DEFB $53,$45,$52,$54,$22,$3A,$FA,$44
92A1 DEFB $49,$3D,$A7,$CB,$ED,$B0,$22,$34
92A9 DEFB $32,$30,$30,$22,$3A,$ED,$B0,$22
92B1 DEFB $34,$38,$35,$30,$22,$3A,$ED,$B0
92B9 DEFB $22,$34,$38,$34,$35,$22,$3A,$ED
92C1 DEFB $B0,$22,$34,$38,$35,$35,$22,$3A
92C9 DEFB $ED,$B0,$22,$34,$39,$39,$30,$22
92D1 DEFB $0D
92D2 DEFB $10,$23,$09,$00,$ED,$B0,$22,$34 Line 4131: GO SUB VAL "4701".
92DA DEFB $37,$30,$31,$22,$0D
92DF DEFB $10,$25,$16,$00,$FA,$4B,$4B,$3D Line 4133: IF KK=INT PI THEN LET F$="SCORPION".
92E7 DEFB $BA,$A7,$CB,$F1,$46,$24,$3D,$22
92EF DEFB $53,$43,$4F,$52,$50,$49,$4F,$4E
92F7 DEFB $22,$0D
92F9 DEFB $10,$26,$19,$00,$FA,$4B,$4B,$3D Line 4134: IF KK=U THEN LET F$="RATTLE SNAKE".
9301 DEFB $55,$CB,$F1,$46,$24,$3D,$22,$52
9309 DEFB $41,$54,$54,$4C,$45,$20,$53,$4E
9311 DEFB $41,$4B,$45,$22,$0D
9316 DEFB $10,$27,$4C,$00,$FA,$4B,$4B,$3D Line 4135: IF KK=O THEN LET N=N-2: PRINT : PRINT "A SANDSTORM ADDS 2 DAYS": PRINT "TO YOUR JOURNEY": GO TO VAL "4126".
931E DEFB $4F,$CB,$F1,$4E,$3D,$4E,$2D,$32
9326 DEFB $0E,$00,$00,$02,$00,$00,$3A,$F5
932E DEFB $3A,$F5,$22,$41,$20,$53,$41,$4E
9336 DEFB $44,$53,$54,$4F,$52,$4D,$20,$41
933E DEFB $44,$44,$53,$20,$32,$20,$44,$41
9346 DEFB $59,$53,$22,$3A,$F5,$22,$54,$4F
934E DEFB $20,$59,$4F,$55,$52,$20,$4A,$4F
9356 DEFB $55,$52,$4E,$45,$59,$22,$3A,$EC
935E DEFB $B0,$22,$34,$31,$32,$36,$22,$0D
9366 DEFB $10,$28,$29,$00,$FA,$4B,$4B,$3D Line 4136: IF KK=5 OR KK=6 THEN GO SUB VAL "4870": GO TO VAL "4126".
936E DEFB $35,$0E,$00,$00,$05,$00,$00,$C5
9376 DEFB $4B,$4B,$3D,$36,$0E,$00,$00,$06
937E DEFB $00,$00,$CB,$ED,$B0,$22,$34,$38
9386 DEFB $37,$30,$22,$3A,$EC,$B0,$22,$34
938E DEFB $31,$32,$36,$22,$0D
9393 DEFB $10,$29,$09,$00,$EC,$B0,$22,$34 Line 4137: GO TO VAL "4121".
939B DEFB $31,$32,$31,$22,$0D
93A0 DEFB $10,$2C,$7F,$00,$F5,$3A,$F5,$22 Line 4140: PRINT : PRINT "YOU'RE IN THE MOUNTAINS": IF MI=PI THEN GO SUB VAL "4200": GO SUB VAL "4850": GO SUB VAL "4845": GO SUB VAL "4855": GO SUB VAL "4975": IF I(13)<=O OR I(15)<=O THEN GO SUB VAL "4860": GO SUB VAL "4990".
93A8 DEFB $59,$4F,$55,$27,$52,$45,$20,$49
93B0 DEFB $4E,$20,$54,$48,$45,$20,$4D,$4F
93B8 DEFB $55,$4E,$54,$41,$49,$4E,$53,$22
93C0 DEFB $3A,$FA,$4D,$49,$3D,$A7,$CB,$ED
93C8 DEFB $B0,$22,$34,$32,$30,$30,$22,$3A
93D0 DEFB $ED,$B0,$22,$34,$38,$35,$30,$22
93D8 DEFB $3A,$ED,$B0,$22,$34,$38,$34,$35
93E0 DEFB $22,$3A,$ED,$B0,$22,$34,$38,$35
93E8 DEFB $35,$22,$3A,$ED,$B0,$22,$34,$39
93F0 DEFB $37,$35,$22,$3A,$FA,$49,$28,$31
93F8 DEFB $33,$0E,$00,$00,$0D,$00,$00,$29
9400 DEFB $C7,$4F,$C5,$49,$28,$31,$35,$0E
9408 DEFB $00,$00,$0F,$00,$00,$29,$C7,$4F
9410 DEFB $CB,$ED,$B0,$22,$34,$38,$36,$30
9418 DEFB $22,$3A,$ED,$B0,$22,$34,$39,$39
9420 DEFB $30,$22,$0D
9423 DEFB $10,$2E,$45,$00,$FA,$4B,$4B,$3D Line 4142: IF KK=O THEN PRINT : PRINT "A ROCKFALL ADDS 2 DAYS": PRINT "TO YOUR JOURNEY": LET N=N-R: GO TO VAL "4126".
942B DEFB $4F,$CB,$F5,$3A,$F5,$22,$41,$20
9433 DEFB $52,$4F,$43,$4B,$46,$41,$4C,$4C
943B DEFB $20,$41,$44,$44,$53,$20,$32,$20
9443 DEFB $44,$41,$59,$53,$22,$3A,$F5,$22
944B DEFB $54,$4F,$20,$59,$4F,$55,$52,$20
9453 DEFB $4A,$4F,$55,$52,$4E,$45,$59,$22
945B DEFB $3A,$F1,$4E,$3D,$4E,$2D,$52,$3A
9463 DEFB $EC,$B0,$22,$34,$31,$32,$36,$22
946B DEFB $0D
946C DEFB $10,$2F,$29,$00,$FA,$4B,$4B,$3D Line 4143: IF KK=5 OR KK=6 THEN GO SUB VAL "4870": GO TO VAL "4126".
9474 DEFB $35,$0E,$00,$00,$05,$00,$00,$C5
947C DEFB $4B,$4B,$3D,$36,$0E,$00,$00,$06
9484 DEFB $00,$00,$CB,$ED,$B0,$22,$34,$38
948C DEFB $37,$30,$22,$3A,$EC,$B0,$22,$34
9494 DEFB $31,$32,$36,$22,$0D
9499 DEFB $10,$31,$09,$00,$ED,$B0,$22,$34 Line 4145: GO SUB VAL "4701".
94A1 DEFB $37,$30,$31,$22,$0D
94A6 DEFB $10,$33,$1B,$00,$FA,$4B,$4B,$3D Line 4147: IF KK=INT PI THEN LET F$="MOUNTAIN LION".
94AE DEFB $BA,$A7,$CB,$F1,$46,$24,$3D,$22
94B6 DEFB $4D,$4F,$55,$4E,$54,$41,$49,$4E
94BE DEFB $20,$4C,$49,$4F,$4E,$22,$0D
94C5 DEFB $10,$34,$19,$00,$FA,$4B,$4B,$3D Line 4148: IF KK=U THEN LET F$="GRIZZLY BEAR".
94CD DEFB $55,$CB,$F1,$46,$24,$3D,$22,$47
94D5 DEFB $52,$49,$5A,$5A,$4C,$59,$20,$42
94DD DEFB $45,$41,$52,$22,$0D
94E2 DEFB $10,$35,$09,$00,$EC,$B0,$22,$34 Line 4149: GO TO VAL "4121".
94EA DEFB $31,$32,$31,$22,$0D
94EF DEFB $10,$68,$45,$00,$FA,$49,$28,$31 Line 4200: IF I(10)<=O THEN LET CS=CS-20: PRINT : PRINT "YOU'RE VERY HUNGRY": GO SUB 4990: RETURN.
94F7 DEFB $30,$0E,$00,$00,$0A,$00,$00,$29
94FF DEFB $C7,$4F,$CB,$F1,$43,$53,$3D,$43
9507 DEFB $53,$2D,$32,$30,$0E,$00,$00,$14
950F DEFB $00,$00,$3A,$F5,$3A,$F5,$22,$59
9517 DEFB $4F,$55,$27,$52,$45,$20,$56,$45
951F DEFB $52,$59,$20,$48,$55,$4E,$47,$52
9527 DEFB $59,$22,$3A,$ED,$34,$39,$39,$30
952F DEFB $0E,$00,$00,$7E,$13,$00,$3A,$FE
9537 DEFB $0D
9538 DEFB $12,$5C,$A1,$00,$E5,$39,$32,$30 Line 4700: RESTORE 9200: LET PK=INT (RND*5): FOR K=O TO PK: READ M$: NEXT K: RESTORE 9205: LET PK=INT (RND*5): FOR K=O TO PK: READ U$: NEXT K: RESTORE 9210: LET PK=INT (RND*6): FOR K=O TO PK: READ E$: NEXT K: LET BS=INT (RND*90)+11: RETURN.
9540 DEFB $30,$0E,$00,$00,$F0,$23,$00,$3A
9548 DEFB $F1,$50,$4B,$3D,$BA,$28,$A5,$2A
9550 DEFB $35,$0E,$00,$00,$05,$00,$00,$29
9558 DEFB $3A,$EB,$4B,$3D,$4F,$CC,$50,$4B
9560 DEFB $3A,$E3,$4D,$24,$3A,$F3,$4B,$3A
9568 DEFB $E5,$39,$32,$30,$35,$0E,$00,$00
9570 DEFB $F5,$23,$00,$3A,$F1,$50,$4B,$3D
9578 DEFB $BA,$28,$A5,$2A,$35,$0E,$00,$00
9580 DEFB $05,$00,$00,$29,$3A,$EB,$4B,$3D
9588 DEFB $4F,$CC,$50,$4B,$3A,$E3,$55,$24
9590 DEFB $3A,$F3,$4B,$3A,$E5,$39,$32,$31
9598 DEFB $30,$0E,$00,$00,$FA,$23,$00,$3A
95A0 DEFB $F1,$50,$4B,$3D,$BA,$28,$A5,$2A
95A8 DEFB $36,$0E,$00,$00,$06,$00,$00,$29
95B0 DEFB $3A,$EB,$4B,$3D,$4F,$CC,$50,$4B
95B8 DEFB $3A,$E3,$45,$24,$3A,$F3,$4B,$3A
95C0 DEFB $F1,$42,$53,$3D,$BA,$28,$A5,$2A
95C8 DEFB $39,$30,$0E,$00,$00,$5A,$00,$00
95D0 DEFB $29,$2B,$31,$31,$0E,$00,$00,$0B
95D8 DEFB $00,$00,$3A,$FE,$0D
95DD DEFB $12,$5D,$2B,$00,$E5,$B0,$22,$39 Line 4701: RESTORE VAL "9215": LET PK=INT (RND*7): FOR K=O TO PK: READ F$: NEXT K: RETURN.
95E5 DEFB $32,$31,$35,$22,$3A,$F1,$50,$4B
95ED DEFB $3D,$BA,$28,$A5,$2A,$37,$0E,$00
95F5 DEFB $00,$07,$00,$00,$29,$3A,$EB,$4B
95FD DEFB $3D,$4F,$CC,$50,$4B,$3A,$E3,$46
9605 DEFB $24,$3A,$F3,$4B,$3A,$FE,$0D
960C DEFB $12,$66,$43,$00,$F1,$4A,$3D,$4F Line 4710: LET J=O: LET JI=O: LET IJ=O: IF I(INT PI)=U AND I(5)>=U THEN LET J=INT (RND*20)+U: GO TO VAL "4712".
9614 DEFB $3A,$F1,$4A,$49,$3D,$4F,$3A,$F1
961C DEFB $49,$4A,$3D,$4F,$3A,$FA,$49,$28
9624 DEFB $BA,$A7,$29,$3D,$55,$C6,$49,$28
962C DEFB $35,$0E,$00,$00,$05,$00,$00,$29
9634 DEFB $C8,$55,$CB,$F1,$4A,$3D,$BA,$28
963C DEFB $A5,$2A,$32,$30,$0E,$00,$00,$14
9644 DEFB $00,$00,$29,$2B,$55,$3A,$EC,$B0
964C DEFB $22,$34,$37,$31,$32,$22,$0D
9653 DEFB $12,$67,$09,$00,$EC,$B0,$22,$34 Line 4711: GO TO VAL "4714".
965B DEFB $37,$31,$34,$22,$0D
9660 DEFB $12,$68,$1C,$00,$FA,$4A,$3E,$49 Line 4712: IF J>I(5) THEN LET J=I(5).
9668 DEFB $28,$35,$0E,$00,$00,$05,$00,$00
9670 DEFB $29,$CB,$F1,$4A,$3D,$49,$28,$35
9678 DEFB $0E,$00,$00,$05,$00,$00,$29,$0D
9680 DEFB $12,$69,$19,$00,$F1,$49,$28,$35 Line 4713: LET I(5)=I(5)-J.
9688 DEFB $0E,$00,$00,$05,$00,$00,$29,$3D
9690 DEFB $49,$28,$35,$0E,$00,$00,$05,$00
9698 DEFB $00,$29,$2D,$4A,$0D
969D DEFB $12,$6A,$38,$00,$FA,$49,$28,$34 Line 4714: IF I(4)=U AND I(6)>=U THEN LET JI=INT (RND*20)+U: GO TO VAL "4716".
96A5 DEFB $0E,$00,$00,$04,$00,$00,$29,$3D
96AD DEFB $55,$C6,$49,$28,$36,$0E,$00,$00
96B5 DEFB $06,$00,$00,$29,$C8,$55,$CB,$F1
96BD DEFB $4A,$49,$3D,$BA,$28,$A5,$2A,$32
96C5 DEFB $30,$0E,$00,$00,$14,$00,$00,$29
96CD DEFB $2B,$55,$3A,$EC,$B0,$22,$34,$37
96D5 DEFB $31,$36,$22,$0D
96D9 DEFB $12,$6B,$09,$00,$EC,$B0,$22,$34 Line 4715: GO TO VAL "4718".
96E1 DEFB $37,$31,$38,$22,$0D
96E6 DEFB $12,$6C,$1E,$00,$FA,$4A,$49,$3E Line 4716: IF JI>I(6) THEN LET JI=I(6).
96EE DEFB $49,$28,$36,$0E,$00,$00,$06,$00
96F6 DEFB $00,$29,$CB,$F1,$4A,$49,$3D,$49
96FE DEFB $28,$36,$0E,$00,$00,$06,$00,$00
9706 DEFB $29,$0D
9708 DEFB $12,$6D,$1A,$00,$F1,$49,$28,$36 Line 4717: LET I(6)=I(6)-JI.
9710 DEFB $0E,$00,$00,$06,$00,$00,$29,$3D
9718 DEFB $49,$28,$36,$0E,$00,$00,$06,$00
9720 DEFB $00,$29,$2D,$4A,$49,$0D
9726 DEFB $12,$6E,$38,$00,$FA,$49,$28,$37 Line 4718: IF I(7)=U AND I(8)>=U THEN LET IJ=INT (RND*20)+U: GO TO VAL "4720".
972E DEFB $0E,$00,$00,$07,$00,$00,$29,$3D
9736 DEFB $55,$C6,$49,$28,$38,$0E,$00,$00
973E DEFB $08,$00,$00,$29,$C8,$55,$CB,$F1
9746 DEFB $49,$4A,$3D,$BA,$28,$A5,$2A,$32
974E DEFB $30,$0E,$00,$00,$14,$00,$00,$29
9756 DEFB $2B,$55,$3A,$EC,$B0,$22,$34,$37
975E DEFB $32,$30,$22,$0D
9762 DEFB $12,$6F,$09,$00,$EC,$B0,$22,$34 Line 4719: GO TO VAL "4722".
976A DEFB $37,$32,$32,$22,$0D
976F DEFB $12,$70,$1E,$00,$FA,$49,$4A,$3E Line 4720: IF IJ>I(8) THEN LET IJ=I(8).
9777 DEFB $49,$28,$38,$0E,$00,$00,$08,$00
977F DEFB $00,$29,$CB,$F1,$49,$4A,$3D,$49
9787 DEFB $28,$38,$0E,$00,$00,$08,$00,$00
978F DEFB $29,$0D
9791 DEFB $12,$71,$1A,$00,$F1,$49,$28,$38 Line 4721: LET I(8)=I(8)-IJ.
9799 DEFB $0E,$00,$00,$08,$00,$00,$29,$3D
97A1 DEFB $49,$28,$38,$0E,$00,$00,$08,$00
97A9 DEFB $00,$29,$2D,$49,$4A,$0D
97AF DEFB $12,$72,$34,$00,$F1,$42,$55,$3D Line 4722: LET BU=IJ+JI+J: PRINT : PRINT "YOU USED ";BU;" BULLETS": GO SUB VAL "4960": RETURN.
97B7 DEFB $49,$4A,$2B,$4A,$49,$2B,$4A,$3A
97BF DEFB $F5,$3A,$F5,$22,$59,$4F,$55,$20
97C7 DEFB $55,$53,$45,$44,$20,$22,$3B,$42
97CF DEFB $55,$3B,$22,$20,$42,$55,$4C,$4C
97D7 DEFB $45,$54,$53,$22,$3A,$ED,$B0,$22
97DF DEFB $34,$39,$36,$30,$22,$3A,$FE,$0D
97E7 DEFB $12,$7A,$3C,$00,$F1,$47,$53,$3D Line 4730: LET GS=O: IF I(3)=U THEN LET GS=GS+(INT (I(5)/20)*2).
97EF DEFB $4F,$3A,$FA,$49,$28,$33,$0E,$00
97F7 DEFB $00,$03,$00,$00,$29,$3D,$55,$CB
97FF DEFB $F1,$47,$53,$3D,$47,$53,$2B,$28
9807 DEFB $BA,$28,$49,$28,$35,$0E,$00,$00
980F DEFB $05,$00,$00,$29,$2F,$32,$30,$0E
9817 DEFB $00,$00,$14,$00,$00,$29,$2A,$32
981F DEFB $0E,$00,$00,$02,$00,$00,$29,$0D
9827 DEFB $12,$7C,$36,$00,$FA,$49,$28,$34 Line 4732: IF I(4)=U THEN LET GS=GS+(INT (I(6)/30)*5).
982F DEFB $0E,$00,$00,$04,$00,$00,$29,$3D
9837 DEFB $55,$CB,$F1,$47,$53,$3D,$47,$53
983F DEFB $2B,$28,$BA,$28,$49,$28,$36,$0E
9847 DEFB $00,$00,$06,$00,$00,$29,$2F,$33
984F DEFB $30,$0E,$00,$00,$1E,$00,$00,$29
9857 DEFB $2A,$35,$0E,$00,$00,$05,$00,$00
985F DEFB $29,$0D
9861 DEFB $12,$7E,$36,$00,$FA,$49,$28,$37 Line 4734: IF I(7)=U THEN LET GS=GS+(INT (I(8)/30)*8).
9869 DEFB $0E,$00,$00,$07,$00,$00,$29,$3D
9871 DEFB $55,$CB,$F1,$47,$53,$3D,$47,$53
9879 DEFB $2B,$28,$BA,$28,$49,$28,$38,$0E
9881 DEFB $00,$00,$08,$00,$00,$29,$2F,$33
9889 DEFB $30,$0E,$00,$00,$1E,$00,$00,$29
9891 DEFB $2A,$38,$0E,$00,$00,$08,$00,$00
9899 DEFB $29,$0D
989B DEFB $12,$80,$17,$00,$FA,$49,$28,$39 Line 4736: IF I(9)=U THEN LET GS=GS+R.
98A3 DEFB $0E,$00,$00,$09,$00,$00,$29,$3D
98AB DEFB $55,$CB,$F1,$47,$53,$3D,$47,$53
98B3 DEFB $2B,$52,$0D
98B6 DEFB $12,$82,$8C,$00,$F5,$3A,$F5,$22 Line 4738: PRINT : PRINT "YOU HAVE ";CS;" STRENGTH": PRINT "HOW MUCH WILL YOU USE ?": GO SUB VAL "4960": INPUT "ENTER AMOUNT "; LINE E$: LET E$=E$+" ": IF CODE E$(U)>47 AND CODE E$(U)<58 THEN GO TO VAL "4740".
98BE DEFB $59,$4F,$55,$20,$48,$41,$56,$45
98C6 DEFB $20,$22,$3B,$43,$53,$3B,$22,$20
98CE DEFB $53,$54,$52,$45,$4E,$47,$54,$48
98D6 DEFB $22,$3A,$F5,$22,$48,$4F,$57,$20
98DE DEFB $4D,$55,$43,$48,$20,$57,$49,$4C
98E6 DEFB $4C,$20,$59,$4F,$55,$20,$55,$53
98EE DEFB $45,$20,$3F,$22,$3A,$ED,$B0,$22
98F6 DEFB $34,$39,$36,$30,$22,$3A,$EE,$22
98FE DEFB $45,$4E,$54,$45,$52,$20,$41,$4D
9906 DEFB $4F,$55,$4E,$54,$20,$22,$3B,$CA
990E DEFB $45,$24,$3A,$F1,$45,$24,$3D,$45
9916 DEFB $24,$2B,$22,$20,$22,$3A,$FA,$AF
991E DEFB $45,$24,$28,$55,$29,$3E,$34,$37
9926 DEFB $0E,$00,$00,$2F,$00,$00,$C6,$AF
992E DEFB $45,$24,$28,$55,$29,$3C,$35,$38
9936 DEFB $0E,$00,$00,$3A,$00,$00,$CB,$EC
993E DEFB $B0,$22,$34,$37,$34,$30,$22,$0D
9946 DEFB $12,$83,$09,$00,$EC,$B0,$22,$34 Line 4739: GO TO VAL "4738".
994E DEFB $37,$33,$38,$22,$0D
9953 DEFB $12,$84,$34,$00,$F1,$4B,$3D,$B0 Line 4740: LET K=VAL E$: IF K>CS THEN PRINT : PRINT "YOU DON'T HAVE THAT MUCH": GO TO VAL "4738".
995B DEFB $45,$24,$3A,$FA,$4B,$3E,$43,$53
9963 DEFB $CB,$F5,$3A,$F5,$22,$59,$4F,$55
996B DEFB $20,$44,$4F,$4E,$27,$54,$20,$48
9973 DEFB $41,$56,$45,$20,$54,$48,$41,$54
997B DEFB $20,$4D,$55,$43,$48,$22,$3A,$EC
9983 DEFB $B0,$22,$34,$37,$33,$38,$22,$0D
998B DEFB $12,$86,$12,$00,$FA,$4B,$3C,$31 Line 4742: IF K<10 THEN LET GS=O.
9993 DEFB $30,$0E,$00,$00,$0A,$00,$00,$CB
999B DEFB $F1,$47,$53,$3D,$4F,$0D
99A1 DEFB $12,$88,$5E,$00,$F1,$43,$53,$3D Line 4744: LET CS=CS-K: LET K=K+GS: IF K>=BS*1.5 THEN PRINT : PRINT "YOU ANNIHILATED THAT ONE!": LET SC=SC+BS: GO SUB VAL "4710": GO SUB VAL "4990": RETURN.
99A9 DEFB $43,$53,$2D,$4B,$3A,$F1,$4B,$3D
99B1 DEFB $4B,$2B,$47,$53,$3A,$FA,$4B,$C8
99B9 DEFB $42,$53,$2A,$31,$2E,$35,$0E,$81
99C1 DEFB $40,$00,$00,$00,$CB,$F5,$3A,$F5
99C9 DEFB $22,$59,$4F,$55,$20,$41,$4E,$4E
99D1 DEFB $49,$48,$49,$4C,$41,$54,$45,$44
99D9 DEFB $20,$54,$48,$41,$54,$20,$4F,$4E
99E1 DEFB $45,$21,$22,$3A,$F1,$53,$43,$3D
99E9 DEFB $53,$43,$2B,$42,$53,$3A,$ED,$B0
99F1 DEFB $22,$34,$37,$31,$30,$22,$3A,$ED
99F9 DEFB $B0,$22,$34,$39,$39,$30,$22,$3A
9A01 DEFB $FE,$0D
9A03 DEFB $12,$8A,$0F,$00,$FA,$4B,$3C,$42 Line 4746: IF K<BS THEN GO TO VAL "4750".
9A0B DEFB $53,$CB,$EC,$B0,$22,$34,$37,$35
9A13 DEFB $30,$22,$0D
9A16 DEFB $12,$8C,$48,$00,$FA,$A5,$2A,$39 Line 4748: IF RND*9>PI THEN PRINT : PRINT "YOU MADE A MESS OF HIM!": LET SC=SC+BS: GO SUB VAL "4710": GO SUB VAL "4990": RETURN.
9A1E DEFB $0E,$00,$00,$09,$00,$00,$3E,$A7
9A26 DEFB $CB,$F5,$3A,$F5,$22,$59,$4F,$55
9A2E DEFB $20,$4D,$41,$44,$45,$20,$41,$20
9A36 DEFB $4D,$45,$53,$53,$20,$4F,$46,$20
9A3E DEFB $48,$49,$4D,$21,$22,$3A,$F1,$53
9A46 DEFB $43,$3D,$53,$43,$2B,$42,$53,$3A
9A4E DEFB $ED,$B0,$22,$34,$37,$31,$30,$22
9A56 DEFB $3A,$ED,$B0,$22,$34,$39,$39,$30
9A5E DEFB $22,$3A,$FE,$0D
9A62 DEFB $12,$8E,$30,$00,$FA,$46,$4F,$3E Line 4750: IF FO>O THEN PRINT : PRINT "YOU GOT HAMMERED THAT TIME!": GO TO VAL "4760".
9A6A DEFB $4F,$CB,$F5,$3A,$F5,$22,$59,$4F
9A72 DEFB $55,$20,$47,$4F,$54,$20,$48,$41
9A7A DEFB $4D,$4D,$45,$52,$45,$44,$20,$54
9A82 DEFB $48,$41,$54,$20,$54,$49,$4D,$45
9A8A DEFB $21,$22,$3A,$EC,$B0,$22,$34,$37
9A92 DEFB $36,$30,$22,$0D
9A96 DEFB $12,$90,$40,$00,$F5,$3A,$F5,$22 Line 4752: PRINT : PRINT "NOW THE ";F$;" IS ANNOYED": LET FO=PI: GO SUB VAL "4710": GO SUB VAL "4990": GO TO VAL "4123".
9A9E DEFB $4E,$4F,$57,$20,$54,$48,$45,$20
9AA6 DEFB $22,$3B,$46,$24,$3B,$22,$20,$49
9AAE DEFB $53,$20,$41,$4E,$4E,$4F,$59,$45
9AB6 DEFB $44,$22,$3A,$F1,$46,$4F,$3D,$A7
9ABE DEFB $3A,$ED,$B0,$22,$34,$37,$31,$30
9AC6 DEFB $22,$3A,$ED,$B0,$22,$34,$39,$39
9ACE DEFB $30,$22,$3A,$EC,$B0,$22,$34,$31
9AD6 DEFB $32,$33,$22,$0D
9ADA DEFB $12,$98,$77,$00,$FA,$46,$24,$3D Line 4760: IF F$="BUFFALO" OR F$="RATTLE SNAKE" OR F$="SCORPION" OR F$="VULTURE" OR F$="LONGHORN" OR F$="GRIZZLY BEAR" OR F$="MOUNTAIN LION" THEN GO TO VAL "4790".
9AE2 DEFB $22,$42,$55,$46,$46,$41,$4C,$4F
9AEA DEFB $22,$C5,$46,$24,$3D,$22,$52,$41
9AF2 DEFB $54,$54,$4C,$45,$20,$53,$4E,$41
9AFA DEFB $4B,$45,$22,$C5,$46,$24,$3D,$22
9B02 DEFB $53,$43,$4F,$52,$50,$49,$4F,$4E
9B0A DEFB $22,$C5,$46,$24,$3D,$22,$56,$55
9B12 DEFB $4C,$54,$55,$52,$45,$22,$C5,$46
9B1A DEFB $24,$3D,$22,$4C,$4F,$4E,$47,$48
9B22 DEFB $4F,$52,$4E,$22,$C5,$46,$24,$3D
9B2A DEFB $22,$47,$52,$49,$5A,$5A,$4C,$59
9B32 DEFB $20,$42,$45,$41,$52,$22,$C5,$46
9B3A DEFB $24,$3D,$22,$4D,$4F,$55,$4E,$54
9B42 DEFB $41,$49,$4E,$20,$4C,$49,$4F,$4E
9B4A DEFB $22,$CB,$EC,$B0,$22,$34,$37,$39
9B52 DEFB $30,$22,$0D
9B55 DEFB $12,$99,$3D,$00,$F1,$43,$55,$3D Line 4761: LET CU=O: FOR T=U TO 16: LET CU=CU+I(T): NEXT T: IF CU<=O AND MU<=4 THEN GO TO VAL "4770".
9B5D DEFB $4F,$3A,$EB,$54,$3D,$55,$CC,$31
9B65 DEFB $36,$0E,$00,$00,$10,$00,$00,$3A
9B6D DEFB $F1,$43,$55,$3D,$43,$55,$2B,$49
9B75 DEFB $28,$54,$29,$3A,$F3,$54,$3A,$FA
9B7D DEFB $43,$55,$C7,$4F,$C6,$4D,$55,$C7
9B85 DEFB $34,$0E,$00,$00,$04,$00,$00,$CB
9B8D DEFB $EC,$B0,$22,$34,$37,$37,$30,$22
9B95 DEFB $0D
9B96 DEFB $12,$9A,$61,$00,$FA,$4D,$55,$C8 Line 4762: IF MU>=4 AND RND*5>4 THEN PRINT : PRINT "THE ";F$;" TAKES $";INT (MU/2): LET MU=INT (MU/2): GO SUB VAL "4960": RETURN.
9B9E DEFB $34,$0E,$00,$00,$04,$00,$00,$C6
9BA6 DEFB $A5,$2A,$35,$0E,$00,$00,$05,$00
9BAE DEFB $00,$3E,$34,$0E,$00,$00,$04,$00
9BB6 DEFB $00,$CB,$F5,$3A,$F5,$22,$54,$48
9BBE DEFB $45,$20,$22,$3B,$46,$24,$3B,$22
9BC6 DEFB $20,$54,$41,$4B,$45,$53,$20,$24
9BCE DEFB $22,$3B,$BA,$28,$4D,$55,$2F,$32
9BD6 DEFB $0E,$00,$00,$02,$00,$00,$29,$3A
9BDE DEFB $F1,$4D,$55,$3D,$BA,$28,$4D,$55
9BE6 DEFB $2F,$32,$0E,$00,$00,$02,$00,$00
9BEE DEFB $29,$3A,$ED,$B0,$22,$34,$39,$36
9BF6 DEFB $30,$22,$3A,$FE,$0D
9BFB DEFB $12,$9C,$0F,$00,$FA,$43,$55,$C7 Line 4764: IF CU<=O THEN GO TO VAL "4762".
9C03 DEFB $4F,$CB,$EC,$B0,$22,$34,$37,$36
9C0B DEFB $32,$22,$0D
9C0E DEFB $12,$9D,$26,$00,$F1,$43,$55,$3D Line 4765: LET CU=INT (RND*16)+U: IF I(CU)<=O THEN GO TO VAL "4765".
9C16 DEFB $BA,$28,$A5,$2A,$31,$36,$0E,$00
9C1E DEFB $00,$10,$00,$00,$29,$2B,$55,$3A
9C26 DEFB $FA,$49,$28,$43,$55,$29,$C7,$4F
9C2E DEFB $CB,$EC,$B0,$22,$34,$37,$36,$35
9C36 DEFB $22,$0D
9C38 DEFB $12,$9F,$37,$00,$F1,$49,$28,$43 Line 4767: LET I(CU)=O: PRINT : PRINT "THE ";F$;" TAKES YOUR": PRINT K$(CU): GO SUB VAL "4960": RETURN.
9C40 DEFB $55,$29,$3D,$4F,$3A,$F5,$3A,$F5
9C48 DEFB $22,$54,$48,$45,$20,$22,$3B,$46
9C50 DEFB $24,$3B,$22,$20,$54,$41,$4B,$45
9C58 DEFB $53,$20,$59,$4F,$55,$52,$22,$3A
9C60 DEFB $F5,$4B,$24,$28,$43,$55,$29,$3A
9C68 DEFB $ED,$B0,$22,$34,$39,$36,$30,$22
9C70 DEFB $3A,$FE,$0D
9C73 DEFB $12,$A2,$22,$00,$F5,$3A,$F5,$22 Line 4770: PRINT : PRINT "THE ";F$;" LEAVES": GO SUB VAL "4960": RETURN.
9C7B DEFB $54,$48,$45,$20,$22,$3B,$46,$24
9C83 DEFB $3B,$22,$20,$4C,$45,$41,$56,$45
9C8B DEFB $53,$22,$3A,$ED,$B0,$22,$34,$39
9C93 DEFB $36,$30,$22,$3A,$FE,$0D
9C99 DEFB $12,$AC,$5A,$00,$F1,$53,$43,$3D Line 4780: LET SC=SC-10: LET CS=CS-10: GO SUB VAL "4990": IF I(U)>=U AND RND*8>5 THEN PRINT : PRINT "O.K YOU MADE IT": RETURN.
9CA1 DEFB $53,$43,$2D,$31,$30,$0E,$00,$00
9CA9 DEFB $0A,$00,$00,$3A,$F1,$43,$53,$3D
9CB1 DEFB $43,$53,$2D,$31,$30,$0E,$00,$00
9CB9 DEFB $0A,$00,$00,$3A,$ED,$B0,$22,$34
9CC1 DEFB $39,$39,$30,$22,$3A,$FA,$49,$28
9CC9 DEFB $55,$29,$C8,$55,$C6,$A5,$2A,$38
9CD1 DEFB $0E,$00,$00,$08,$00,$00,$3E,$35
9CD9 DEFB $0E,$00,$00,$05,$00,$00,$CB,$F5
9CE1 DEFB $3A,$F5,$22,$4F,$2E,$4B,$20,$59
9CE9 DEFB $4F,$55,$20,$4D,$41,$44,$45,$20
9CF1 DEFB $49,$54,$22,$3A,$FE,$0D
9CF7 DEFB $12,$AD,$3B,$00,$F5,$3A,$F5,$22 Line 4781: PRINT : PRINT "UNFORTUNATELY HE'S A QUICK": PRINT M$;",";U$;" ";F$: GO TO VAL "4123".
9CFF DEFB $55,$4E,$46,$4F,$52,$54,$55,$4E
9D07 DEFB $41,$54,$45,$4C,$59,$20,$48,$45
9D0F DEFB $27,$53,$20,$41,$20,$51,$55,$49
9D17 DEFB $43,$4B,$22,$3A,$F5,$4D,$24,$3B
9D1F DEFB $22,$2C,$22,$3B,$55,$24,$3B,$22
9D27 DEFB $20,$22,$3B,$46,$24,$3A,$EC,$B0
9D2F DEFB $22,$34,$31,$32,$33,$22,$0D
9D36 DEFB $12,$B6,$4C,$00,$FA,$49,$28,$31 Line 4790: IF I(10)>O THEN LET I(10)=O: PRINT : PRINT "THE ";F$;"TAKES ": PRINT "YOUR FOOD": GO SUB VAL "4960": RETURN.
9D3E DEFB $30,$0E,$00,$00,$0A,$00,$00,$29
9D46 DEFB $3E,$4F,$CB,$F1,$49,$28,$31,$30
9D4E DEFB $0E,$00,$00,$0A,$00,$00,$29,$3D
9D56 DEFB $4F,$3A,$F5,$3A,$F5,$22,$54,$48
9D5E DEFB $45,$20,$22,$3B,$46,$24,$3B,$22
9D66 DEFB $54,$41,$4B,$45,$53,$20,$22,$3A
9D6E DEFB $F5,$22,$59,$4F,$55,$52,$20,$46
9D76 DEFB $4F,$4F,$44,$22,$3A,$ED,$B0,$22
9D7E DEFB $34,$39,$36,$30,$22,$3A,$FE,$0D
9D86 DEFB $12,$B7,$51,$00,$FA,$49,$28,$31 Line 4791: IF I(11)>O THEN LET I(11)=O: PRINT "THE ";F$;" TAKES": PRINT "YOUR HORSES FOOD": GO SUB VAL "4960": RETURN.
9D8E DEFB $31,$0E,$00,$00,$0B,$00,$00,$29
9D96 DEFB $3E,$4F,$CB,$F1,$49,$28,$31,$31
9D9E DEFB $0E,$00,$00,$0B,$00,$00,$29,$3D
9DA6 DEFB $4F,$3A,$F5,$22,$54,$48,$45,$20
9DAE DEFB $22,$3B,$46,$24,$3B,$22,$20,$54
9DB6 DEFB $41,$4B,$45,$53,$22,$3A,$F5,$22
9DBE DEFB $59,$4F,$55,$52,$20,$48,$4F,$52
9DC6 DEFB $53,$45,$53,$20,$46,$4F,$4F,$44
9DCE DEFB $22,$3A,$ED,$B0,$22,$34,$39,$36
9DD6 DEFB $30,$22,$3A,$FE,$0D
9DDB DEFB $12,$B8,$52,$00,$FA,$49,$28,$31 Line 4792: IF I(12)>O AND DE=U THEN LET I(12)=O: PRINT : PRINT "THE ";F$;" TAKES": PRINT "YOUR WATER": GO SUB VAL "4960": RETURN.
9DE3 DEFB $32,$0E,$00,$00,$0C,$00,$00,$29
9DEB DEFB $3E,$4F,$C6,$44,$45,$3D,$55,$CB
9DF3 DEFB $F1,$49,$28,$31,$32,$0E,$00,$00
9DFB DEFB $0C,$00,$00,$29,$3D,$4F,$3A,$F5
9E03 DEFB $3A,$F5,$22,$54,$48,$45,$20,$22
9E0B DEFB $3B,$46,$24,$3B,$22,$20,$54,$41
9E13 DEFB $4B,$45,$53,$22,$3A,$F5,$22,$59
9E1B DEFB $4F,$55,$52,$20,$57,$41,$54,$45
9E23 DEFB $52,$22,$3A,$ED,$B0,$22,$34,$39
9E2B DEFB $36,$30,$22,$3A,$FE,$0D
9E31 DEFB $12,$B9,$31,$00,$ED,$B0,$22,$34 Line 4793: GO SUB VAL "4990": PRINT : PRINT "THE ";F$;" ATTACKS AGAIN": GO TO VAL "4123".
9E39 DEFB $39,$39,$30,$22,$3A,$F5,$3A,$20
9E41 DEFB $F5,$22,$54,$48,$45,$20,$22,$3B
9E49 DEFB $46,$24,$3B,$22,$20,$41,$54,$54
9E51 DEFB $41,$43,$4B,$53,$20,$41,$47,$41
9E59 DEFB $49,$4E,$22,$3A,$EC,$B0,$22,$34
9E61 DEFB $31,$32,$33,$22,$0D
9E66 DEFB $12,$BB,$0F,$00,$FA,$54,$53,$3D Line 4795: IF TS=PI THEN GO TO VAL "4805".
9E6E DEFB $A7,$CB,$EC,$B0,$22,$34,$38,$30
9E76 DEFB $35,$22,$0D
9E79 DEFB $12,$BC,$39,$00,$F1,$42,$42,$3D Line 4796: LET BB=INT (RND*50)+U: LET BF=O: FOR T=16 TO U STEP -U: LET BF=I(T)*K(T).
9E81 DEFB $BA,$28,$A5,$2A,$35,$30,$0E,$00
9E89 DEFB $00,$32,$00,$00,$29,$2B,$55,$3A
9E91 DEFB $F1,$42,$46,$3D,$4F,$3A,$EB,$54
9E99 DEFB $3D,$31,$36,$0E,$00,$00,$10,$00
9EA1 DEFB $00,$CC,$55,$CD,$2D,$55,$3A,$F1
9EA9 DEFB $42,$46,$3D,$49,$28,$54,$29,$2A
9EB1 DEFB $4B,$28,$54,$29,$0D
9EB6 DEFB $12,$BD,$2F,$00,$FA,$54,$3D,$35 Line 4797: IF T=5 OR T=6 OR T=8 THEN LET BF=BF/50.
9EBE DEFB $0E,$00,$00,$05,$00,$00,$C5,$54
9EC6 DEFB $3D,$36,$0E,$00,$00,$06,$00,$00
9ECE DEFB $C5,$54,$3D,$38,$0E,$00,$00,$08
9ED6 DEFB $00,$00,$CB,$F1,$42,$46,$3D,$42
9EDE DEFB $46,$2F,$35,$30,$0E,$00,$00,$32
9EE6 DEFB $00,$00,$0D
9EE9 DEFB $12,$BE,$16,$00,$FA,$42,$46,$C8 Line 4798: IF BF>=BB THEN LET BF=T: GO TO VAL "4805".
9EF1 DEFB $42,$42,$CB,$F1,$42,$46,$3D,$54
9EF9 DEFB $3A,$EC,$B0,$22,$34,$38,$30,$35
9F01 DEFB $22,$0D
9F03 DEFB $12,$BF,$06,$00,$F1,$42,$46,$3D Line 4799: LET BF=T.
9F0B DEFB $54,$0D
9F0D DEFB $12,$C0,$03,$00,$F3,$54,$0D Line 4800: NEXT T.
9F14 DEFB $12,$C5,$25,$00,$FA,$4D,$55,$C7 Line 4805: IF MU<=O THEN PRINT : PRINT "YOU HAVE NO MONEY": LET TS=PI: RETURN.
9F1C DEFB $4F,$CB,$F5,$3A,$F5,$22,$59,$4F
9F24 DEFB $55,$20,$48,$41,$56,$45,$20,$4E
9F2C DEFB $4F,$20,$4D,$4F,$4E,$45,$59,$22
9F34 DEFB $3A,$F1,$54,$53,$3D,$A7,$3A,$FE
9F3C DEFB $0D
9F3D DEFB $12,$C8,$8A,$00,$F5,$3A,$F5,$22 Line 4808: PRINT : PRINT "YOU HAVE $";MU: PRINT "HOW MUCH DO YOU OFFER?": BEEP .5,20: INPUT "ENTER AMOUNT "; LINE E$: LET E$=E$+" ": IF CODE E$(U)>47 AND CODE E$(U)<57 THEN GO TO VAL "4810".
9F45 DEFB $59,$4F,$55,$20,$48,$41,$56,$45
9F4D DEFB $20,$24,$22,$3B,$4D,$55,$3A,$F5
9F55 DEFB $22,$48,$4F,$57,$20,$4D,$55,$43
9F5D DEFB $48,$20,$44,$4F,$20,$59,$4F,$55
9F65 DEFB $20,$4F,$46,$46,$45,$52,$3F,$22
9F6D DEFB $3A,$D7,$2E,$35,$0E,$7F,$7F,$FF
9F75 DEFB $FF,$FF,$2C,$32,$30,$0E,$00,$00
9F7D DEFB $14,$00,$00,$3A,$EE,$22,$45,$4E
9F85 DEFB $54,$45,$52,$20,$41,$4D,$4F,$55
9F8D DEFB $4E,$54,$20,$22,$3B,$CA,$45,$24
9F95 DEFB $3A,$F1,$45,$24,$3D,$45,$24,$2B
9F9D DEFB $22,$20,$22,$3A,$FA,$AF,$45,$24
9FA5 DEFB $28,$55,$29,$3E,$34,$37,$0E,$00
9FAD DEFB $00,$2F,$00,$00,$C6,$AF,$45,$24
9FB5 DEFB $28,$55,$29,$3C,$35,$37,$0E,$00
9FBD DEFB $00,$39,$00,$00,$CB,$EC,$B0,$22
9FC5 DEFB $34,$38,$31,$30,$22,$0D
9FCB DEFB $12,$C9,$09,$00,$EC,$B0,$22,$34 Line 4809: GO TO VAL "4808".
9FD3 DEFB $38,$30,$38,$22,$0D
9FD8 DEFB $12,$CA,$18,$00,$F1,$59,$42,$3D Line 4810: LET YB=VAL E$: IF YB>MU THEN GO TO VAL "4808".
9FE0 DEFB $B0,$45,$24,$3A,$FA,$59,$42,$3E
9FE8 DEFB $4D,$55,$CB,$EC,$B0,$22,$34,$38
9FF0 DEFB $30,$38,$22,$0D
9FF4 DEFB $12,$CC,$AA,$00,$FA,$46,$24,$3D Line 4812: IF F$="BUFFALO" OR F$="RATTLE SNAKE" OR F$="SCORPION" OR F$="VULTURE" OR F$="LONGHORN" OR F$="GRIZZLY BEAR" OR F$="MOUNTAIN LION" THEN PRINT : PRINT "WHAT IS A ";F$;" GOING": PRINT "TO DO WITH $";YB;" ?": LET TS=PI: RETURN.
9FFC DEFB $22,$42,$55,$46,$46,$41,$4C,$4F
A004 DEFB $22,$C5,$46,$24,$3D,$22,$52,$41
A00C DEFB $54,$54,$4C,$45,$20,$53,$4E,$41
A014 DEFB $4B,$45,$22,$C5,$46,$24,$3D,$22
A01C DEFB $53,$43,$4F,$52,$50,$49,$4F,$4E
A024 DEFB $22,$C5,$46,$24,$3D,$22,$56,$55
A02C DEFB $4C,$54,$55,$52,$45,$22,$C5,$46
A034 DEFB $24,$3D,$22,$4C,$4F,$4E,$47,$48
A03C DEFB $4F,$52,$4E,$22,$C5,$46,$24,$3D
A044 DEFB $22,$47,$52,$49,$5A,$5A,$4C,$59
A04C DEFB $20,$42,$45,$41,$52,$22,$C5,$46
A054 DEFB $24,$3D,$22,$4D,$4F,$55,$4E,$54
A05C DEFB $41,$49,$4E,$20,$4C,$49,$4F,$4E
A064 DEFB $22,$CB,$F5,$3A,$F5,$22,$57,$48
A06C DEFB $41,$54,$20,$49,$53,$20,$41,$20
A074 DEFB $22,$3B,$46,$24,$3B,$22,$20,$47
A07C DEFB $4F,$49,$4E,$47,$22,$3A,$F5,$22
A084 DEFB $54,$4F,$20,$44,$4F,$20,$57,$49
A08C DEFB $54,$48,$20,$24,$22,$3B,$59,$42
A094 DEFB $3B,$22,$20,$3F,$22,$3A,$F1,$54
A09C DEFB $53,$3D,$A7,$3A,$FE,$0D
A0A2 DEFB $12,$CF,$37,$00,$FA,$59,$42,$C8 Line 4815: IF YB>=BB THEN PRINT : PRINT "THE ";F$;" ACCEPTS": LET MU=MU-YB: LET TS=0: RETURN.
A0AA DEFB $42,$42,$CB,$F5,$3A,$F5,$22,$54
A0B2 DEFB $48,$45,$20,$22,$3B,$46,$24,$3B
A0BA DEFB $22,$20,$41,$43,$43,$45,$50,$54
A0C2 DEFB $53,$22,$3A,$F1,$4D,$55,$3D,$4D
A0CA DEFB $55,$2D,$59,$42,$3A,$F1,$54,$53
A0D2 DEFB $3D,$30,$0E,$00,$00,$00,$00,$00
A0DA DEFB $3A,$FE,$0D
A0DD DEFB $12,$D4,$63,$00,$FA,$49,$28,$42 Line 4820: IF I(BF)*K(BF)>=BB THEN PRINT : PRINT "THE ";F$;" IS DISGUSTED": PRINT "HE TAKES YOUR ";K$(BF): LET I(BF)=0: LET TS=O: LET BF=O: RETURN.
A0E5 DEFB $46,$29,$2A,$4B,$28,$42,$46,$29
A0ED DEFB $C8,$42,$42,$CB,$F5,$3A,$F5,$22
A0F5 DEFB $54,$48,$45,$20,$22,$3B,$46,$24
A0FD DEFB $3B,$22,$20,$49,$53,$20,$44,$49
A105 DEFB $53,$47,$55,$53,$54,$45,$44,$22
A10D DEFB $3A,$F5,$22,$48,$45,$20,$54,$41
A115 DEFB $4B,$45,$53,$20,$59,$4F,$55,$52
A11D DEFB $20,$22,$3B,$4B,$24,$28,$42,$46
A125 DEFB $29,$3A,$F1,$49,$28,$42,$46,$29
A12D DEFB $3D,$30,$0E,$00,$00,$00,$00,$00
A135 DEFB $3A,$F1,$54,$53,$3D,$4F,$3A,$F1
A13D DEFB $42,$46,$3D,$4F,$3A,$FE,$0D
A144 DEFB $12,$D9,$24,$00,$F5,$3A,$F5,$22 Line 4825: PRINT : PRINT "THE ";F$;" ATTACKS YOU": LET TS=PI: RETURN.
A14C DEFB $54,$48,$45,$20,$22,$3B,$46,$24
A154 DEFB $3B,$22,$20,$41,$54,$54,$41,$43
A15C DEFB $4B,$53,$20,$59,$4F,$55,$22,$3A
A164 DEFB $F1,$54,$53,$3D,$A7,$3A,$FE,$0D
A16C DEFB $12,$ED,$41,$00,$F1,$44,$49,$3D Line 4845: LET DI=O: IF I(12)<U THEN LET CS=CS-30: PRINT : PRINT "YOU ARE VERY THIRSTY": RETURN.
A174 DEFB $4F,$3A,$FA,$49,$28,$31,$32,$0E
A17C DEFB $00,$00,$0C,$00,$00,$29,$3C,$55
A184 DEFB $CB,$F1,$43,$53,$3D,$43,$53,$2D
A18C DEFB $33,$30,$0E,$00,$00,$1E,$00,$00
A194 DEFB $3A,$F5,$3A,$F5,$22,$59,$4F,$55
A19C DEFB $20,$41,$52,$45,$20,$56,$45,$52
A1A4 DEFB $59,$20,$54,$48,$49,$52,$53,$54
A1AC DEFB $59,$22,$3A,$FE,$0D
A1B1 DEFB $12,$EE,$2D,$00,$F1,$49,$28,$31 Line 4846: LET I(12)=I(12)-U: LET CS=CS+10: RETURN.
A1B9 DEFB $32,$0E,$00,$00,$0C,$00,$00,$29
A1C1 DEFB $3D,$49,$28,$31,$32,$0E,$00,$00
A1C9 DEFB $0C,$00,$00,$29,$2D,$55,$3A,$F1
A1D1 DEFB $43,$53,$3D,$43,$53,$2B,$31,$30
A1D9 DEFB $0E,$00,$00,$0A,$00,$00,$3A,$FE
A1E1 DEFB $0D
A1E2 DEFB $12,$F2,$49,$00,$FA,$49,$28,$55 Line 4850: IF I(U)=U AND I(12)<1 THEN PRINT : PRINT "YOUR HORSE NEEDS WATER": LET HS=HS-2: RETURN.
A1EA DEFB $29,$3D,$55,$C6,$49,$28,$31,$32
A1F2 DEFB $0E,$00,$00,$0C,$00,$00,$29,$3C
A1FA DEFB $31,$0E,$00,$00,$01,$00,$00,$CB
A202 DEFB $F5,$3A,$F5,$22,$59,$4F,$55,$52
A20A DEFB $20,$48,$4F,$52,$53,$45,$20,$4E
A212 DEFB $45,$45,$44,$53,$20,$57,$41,$54
A21A DEFB $45,$52,$22,$3A,$F1,$48,$53,$3D
A222 DEFB $48,$53,$2D,$32,$0E,$00,$00,$02
A22A DEFB $00,$00,$3A,$FE,$0D
A22F DEFB $12,$F3,$2D,$00,$F1,$49,$28,$31 Line 4851: LET I(12)=I(12)-U: LET CS=CS+10: RETURN.
A237 DEFB $32,$0E,$00,$00,$0C,$00,$00,$29
A23F DEFB $3D,$49,$28,$31,$32,$0E,$00,$00
A247 DEFB $0C,$00,$00,$29,$2D,$55,$3A,$F1
A24F DEFB $43,$53,$3D,$43,$53,$2B,$31,$30
A257 DEFB $0E,$00,$00,$0A,$00,$00,$3A,$FE
A25F DEFB $0D
A260 DEFB $12,$F7,$0A,$00,$FA,$49,$28,$55 Line 4855: IF I(U)=O THEN RETURN.
A268 DEFB $29,$3D,$4F,$CB,$FE,$0D
A26E DEFB $12,$F8,$38,$00,$FA,$49,$28,$31 Line 4856: IF I(11)<=O AND DE=U THEN PRINT : PRINT "HORSES DON'T EAT SAND": LET HS=HS-U.
A276 DEFB $31,$0E,$00,$00,$0B,$00,$00,$29
A27E DEFB $C7,$4F,$C6,$44,$45,$3D,$55,$CB
A286 DEFB $F5,$3A,$F5,$22,$48,$4F,$52,$53
A28E DEFB $45,$53,$20,$44,$4F,$4E,$27,$54
A296 DEFB $20,$45,$41,$54,$20,$53,$41,$4E
A29E DEFB $44,$22,$3A,$F1,$48,$53,$3D,$48
A2A6 DEFB $53,$2D,$55,$0D
A2AA DEFB $12,$F9,$39,$00,$FA,$49,$28,$31 Line 4857: IF I(11)<=O AND MT=U THEN PRINT : PRINT "HORSES DON'T EAT ROCKS": LET HS=HS-U.
A2B2 DEFB $31,$0E,$00,$00,$0B,$00,$00,$29
A2BA DEFB $C7,$4F,$C6,$4D,$54,$3D,$55,$CB
A2C2 DEFB $F5,$3A,$F5,$22,$48,$4F,$52,$53
A2CA DEFB $45,$53,$20,$44,$4F,$4E,$27,$54
A2D2 DEFB $20,$45,$41,$54,$20,$52,$4F,$43
A2DA DEFB $4B,$53,$22,$3A,$F1,$48,$53,$3D
A2E2 DEFB $48,$53,$2D,$55,$0D
A2E7 DEFB $12,$FA,$2A,$00,$FA,$49,$28,$31 Line 4858: IF I(11)>O THEN LET I(11)=I(11)-U.
A2EF DEFB $31,$0E,$00,$00,$0B,$00,$00,$29
A2F7 DEFB $3E,$4F,$CB,$F1,$49,$28,$31,$31
A2FF DEFB $0E,$00,$00,$0B,$00,$00,$29,$3D
A307 DEFB $49,$28,$31,$31,$0E,$00,$00,$0B
A30F DEFB $00,$00,$29,$2D,$55,$0D
A315 DEFB $12,$FB,$0B,$00,$ED,$B0,$22,$34 Line 4859: GO SUB VAL "4975": RETURN.
A31D DEFB $39,$37,$35,$22,$3A,$FE,$0D
A324 DEFB $12,$FC,$25,$00,$F1,$4D,$49,$3D Line 4860: LET MI=O: IF I(13)<U THEN LET CS=CS-10.
A32C DEFB $4F,$3A,$FA,$49,$28,$31,$33,$0E
A334 DEFB $00,$00,$0D,$00,$00,$29,$3C,$55
A33C DEFB $CB,$F1,$43,$53,$3D,$43,$53,$2D
A344 DEFB $31,$30,$0E,$00,$00,$0A,$00,$00
A34C DEFB $0D
A34D DEFB $12,$FD,$1F,$00,$FA,$49,$28,$31 Line 4861: IF I(15)<U THEN LET CS=CS-15.
A355 DEFB $35,$0E,$00,$00,$0F,$00,$00,$29
A35D DEFB $3C,$55,$CB,$F1,$43,$53,$3D,$43
A365 DEFB $53,$2D,$31,$35,$0E,$00,$00,$0F
A36D DEFB $00,$00,$0D
A370 DEFB $12,$FE,$19,$00,$F5,$3A,$F5,$22 Line 4862: PRINT : PRINT "YOU ARE VERY COLD": RETURN.
A378 DEFB $59,$4F,$55,$20,$41,$52,$45,$20
A380 DEFB $56,$45,$52,$59,$20,$43,$4F,$4C
A388 DEFB $44,$22,$3A,$FE,$0D
A38D DEFB $13,$06,$6A,$00,$ED,$B0,$22,$34 Line 4870: GO SUB VAL "4960": IF INT (RND*18)+U>8 THEN LET GN=INT (RND*100)+U: PRINT : PRINT "YOU FIND A GOLD NUGGET WORTH $";GN: LET MU=MU+GN: RETURN.
A395 DEFB $39,$36,$30,$22,$3A,$FA,$BA,$28
A39D DEFB $A5,$2A,$31,$38,$0E,$00,$00,$12
A3A5 DEFB $00,$00,$29,$2B,$55,$3E,$38,$0E
A3AD DEFB $00,$00,$08,$00,$00,$CB,$F1,$47
A3B5 DEFB $4E,$3D,$BA,$28,$A5,$2A,$31,$30
A3BD DEFB $30,$0E,$00,$00,$64,$00,$00,$29
A3C5 DEFB $2B,$55,$3A,$F5,$3A,$F5,$22,$59
A3CD DEFB $4F,$55,$20,$46,$49,$4E,$44,$20
A3D5 DEFB $41,$20,$47,$4F,$4C,$44,$20,$4E
A3DD DEFB $55,$47,$47,$45,$54,$20,$57,$4F
A3E5 DEFB $52,$54,$48,$20,$24,$22,$3B,$47
A3ED DEFB $4E,$3A,$F1,$4D,$55,$3D,$4D,$55
A3F5 DEFB $2B,$47,$4E,$3A,$FE,$0D
A3FB DEFB $13,$07,$41,$00,$F1,$47,$4E,$3D Line 4871: LET GN=INT (RND*7)+10: LET I(GN)=I(GN)+U: PRINT : PRINT "YOU FIND ";K$(GN): RETURN.
A403 DEFB $BA,$28,$A5,$2A,$37,$0E,$00,$00
A40B DEFB $07,$00,$00,$29,$2B,$31,$30,$0E
A413 DEFB $00,$00,$0A,$00,$00,$3A,$F1,$49
A41B DEFB $28,$47,$4E,$29,$3D,$49,$28,$47
A423 DEFB $4E,$29,$2B,$55,$3A,$F5,$3A,$F5
A42B DEFB $22,$59,$4F,$55,$20,$46,$49,$4E
A433 DEFB $44,$20,$22,$3B,$4B,$24,$28,$47
A43B DEFB $4E,$29,$3A,$FE,$0D
A440 DEFB $13,$56,$65,$00,$F5,$3A,$F5,$22 Line 4950: PRINT : PRINT "WILL YOU RUN,FIGHT OR BRIBE ?": BEEP .5,20: INPUT "ENTER R,F OR B "; LINE H$: IF H$="R" OR H$="F" OR H$="B" THEN RETURN.
A448 DEFB $57,$49,$4C,$4C,$20,$59,$4F,$55
A450 DEFB $20,$52,$55,$4E,$2C,$46,$49,$47
A458 DEFB $48,$54,$20,$4F,$52,$20,$42,$52
A460 DEFB $49,$42,$45,$20,$3F,$22,$3A,$D7
A468 DEFB $2E,$35,$0E,$7F,$7F,$FF,$FF,$FF
A470 DEFB $2C,$32,$30,$0E,$00,$00,$14,$00
A478 DEFB $00,$3A,$EE,$22,$45,$4E,$54,$45
A480 DEFB $52,$20,$52,$2C,$46,$20,$4F,$52
A488 DEFB $20,$42,$20,$22,$3B,$CA,$48,$24
A490 DEFB $3A,$FA,$48,$24,$3D,$22,$52,$22
A498 DEFB $C5,$48,$24,$3D,$22,$46,$22,$C5
A4A0 DEFB $48,$24,$3D,$22,$42,$22,$CB,$FE
A4A8 DEFB $0D
A4A9 DEFB $13,$5B,$09,$00,$EC,$B0,$22,$34 Line 4955: GO TO VAL "4950".
A4B1 DEFB $39,$35,$30,$22,$0D
A4B6 DEFB $13,$60,$3B,$00,$D7,$2E,$32,$0E Line 4960: BEEP .2,20: BEEP .2,10: BEEP .2,15: RETURN.
A4BE DEFB $7E,$4C,$CC,$CC,$CC,$2C,$32,$30
A4C6 DEFB $0E,$00,$00,$14,$00,$00,$3A,$D7
A4CE DEFB $2E,$32,$0E,$7E,$4C,$CC,$CC,$CC
A4D6 DEFB $2C,$31,$30,$0E,$00,$00,$0A,$00
A4DE DEFB $00,$3A,$D7,$2E,$32,$0E,$7E,$4C
A4E6 DEFB $CC,$CC,$CC,$2C,$31,$35,$0E,$00
A4EE DEFB $00,$0F,$00,$00,$3A,$FE,$0D
A4F5 DEFB $13,$6A,$11,$00,$FA,$48,$4C,$3D Line 4970: IF HL=U THEN LET KK=KK-U: RETURN.
A4FD DEFB $55,$CB,$F1,$4B,$4B,$3D,$4B,$4B
A505 DEFB $2D,$55,$3A,$FE,$0D
A50A DEFB $13,$6B,$54,$00,$F5,$3A,$F5,$22 Line 4971: PRINT : PRINT "YOUR HORSE GOES LAME": LET HS=HS-U: LET HL=U: PRINT "THIS ADDS 2 DAYS TO YOUR JOURNEY": LET N=N-R.
A512 DEFB $59,$4F,$55,$52,$20,$48,$4F,$52
A51A DEFB $53,$45,$20,$47,$4F,$45,$53,$20
A522 DEFB $4C,$41,$4D,$45,$22,$3A,$F1,$48
A52A DEFB $53,$3D,$48,$53,$2D,$55,$3A,$F1
A532 DEFB $48,$4C,$3D,$55,$3A,$F5,$22,$54
A53A DEFB $48,$49,$53,$20,$41,$44,$44,$53
A542 DEFB $20,$32,$20,$44,$41,$59,$53,$20
A54A DEFB $54,$4F,$20,$59,$4F,$55,$52,$20
A552 DEFB $4A,$4F,$55,$52,$4E,$45,$59,$22
A55A DEFB $3A,$F1,$4E,$3D,$4E,$2D,$52,$0D
A562 DEFB $13,$6F,$0A,$00,$FA,$49,$28,$55 Line 4975: IF I(U)=O THEN RETURN.
A56A DEFB $29,$3D,$4F,$CB,$FE,$0D
A570 DEFB $13,$70,$31,$00,$FA,$48,$53,$C7 Line 4976: IF HS<=U THEN LET I(U)=O: PRINT : PRINT "YOUR HORSE IS DEAD": GO SUB VAL "9226": RETURN.
A578 DEFB $55,$CB,$F1,$49,$28,$55,$29,$3D
A580 DEFB $4F,$3A,$F5,$3A,$F5,$22,$59,$4F
A588 DEFB $55,$52,$20,$48,$4F,$52,$53,$45
A590 DEFB $20,$49,$53,$20,$44,$45,$41,$44
A598 DEFB $22,$3A,$ED,$B0,$22,$39,$32,$32
A5A0 DEFB $36,$22,$3A,$FE,$0D
A5A5 DEFB $13,$7E,$44,$00,$FA,$43,$53,$C7 Line 4990: IF CS<=O THEN PRINT : PRINT "YOU'RE DEAD.....": LET M$="YOU RAN OUT OF STRENGTH!": GO TO VAL "5270".
A5AD DEFB $4F,$CB,$F5,$3A,$F5,$22,$59,$4F
A5B5 DEFB $55,$27,$52,$45,$20,$44,$45,$41
A5BD DEFB $44,$2E,$2E,$2E,$2E,$2E,$22,$3A
A5C5 DEFB $F1,$4D,$24,$3D,$22,$59,$4F,$55
A5CD DEFB $20,$52,$41,$4E,$20,$4F,$55,$54
A5D5 DEFB $20,$4F,$46,$20,$53,$54,$52,$45
A5DD DEFB $4E,$47,$54,$48,$21,$22,$3A,$EC
A5E5 DEFB $B0,$22,$35,$32,$37,$30,$22,$0D
A5ED DEFB $13,$7F,$02,$00,$FE,$0D Line 4991: RETURN.
A5F3 DEFB $13,$8A,$51,$00,$E7,$55,$3A,$FB Line 5002: BORDER U: CLS : PRINT AT 9,U;"YOU BOTH WALK INTO THE STREET ",,," FOR A FIGHT TO THE DEATH.".
A5FB DEFB $3A,$F5,$AC,$39,$0E,$00,$00,$09
A603 DEFB $00,$00,$2C,$55,$3B,$22,$59,$4F
A60B DEFB $55,$20,$42,$4F,$54,$48,$20,$57
A613 DEFB $41,$4C,$4B,$20,$49,$4E,$54,$4F
A61B DEFB $20,$54,$48,$45,$20,$53,$54,$52
A623 DEFB $45,$45,$54,$20,$22,$2C,$2C,$2C
A62B DEFB $22,$20,$46,$4F,$52,$20,$41,$20
A633 DEFB $46,$49,$47,$48,$54,$20,$54,$4F
A63B DEFB $20,$54,$48,$45,$20,$44,$45,$41
A643 DEFB $54,$48,$2E,$22,$0D
A648 DEFB $13,$8B,$2D,$00,$E5,$B0,$22,$39 Line 5003: RESTORE VAL "9080": FOR N=U TO 10: READ K: READ G: BEEP K/3,G: NEXT N.
A650 DEFB $30,$38,$30,$22,$3A,$EB,$4E,$3D
A658 DEFB $55,$CC,$31,$30,$0E,$00,$00,$0A
A660 DEFB $00,$00,$3A,$E3,$4B,$3A,$E3,$47
A668 DEFB $3A,$D7,$4B,$2F,$33,$0E,$00,$00
A670 DEFB $03,$00,$00,$2C,$47,$3A,$F3,$4E
A678 DEFB $0D
A679 DEFB $13,$8C,$0F,$00,$F1,$53,$46,$3D Line 5004: LET SF=O: PAPER O: BORDER INT PI: CLS.
A681 DEFB $4F,$3A,$DA,$4F,$3A,$E7,$BA,$A7
A689 DEFB $3A,$FB,$0D
A68C DEFB $13,$8E,$3A,$00,$FA,$49,$28,$BA Line 5006: IF I(INT PI)+I(4)<=O THEN LET M$="YOU DIDN'T HAVE A GUN!": GO TO VAL "5012".
A694 DEFB $A7,$29,$2B,$49,$28,$34,$0E,$00
A69C DEFB $00,$04,$00,$00,$29,$C7,$4F,$CB
A6A4 DEFB $F1,$4D,$24,$3D,$22,$59,$4F,$55
A6AC DEFB $20,$44,$49,$44,$4E,$27,$54,$20
A6B4 DEFB $48,$41,$56,$45,$20,$41,$20,$47
A6BC DEFB $55,$4E,$21,$22,$3A,$EC,$B0,$22
A6C4 DEFB $35,$30,$31,$32,$22,$0D
A6CA DEFB $13,$8F,$45,$00,$FA,$49,$28,$35 Line 5007: IF I(5)+I(6)<=O THEN LET M$="YOU DIDN'T HAVE ANY BULLETS!": GO TO VAL "5012".
A6D2 DEFB $0E,$00,$00,$05,$00,$00,$29,$2B
A6DA DEFB $49,$28,$36,$0E,$00,$00,$06,$00
A6E2 DEFB $00,$29,$C7,$4F,$CB,$F1,$4D,$24
A6EA DEFB $3D,$22,$59,$4F,$55,$20,$44,$49
A6F2 DEFB $44,$4E,$27,$54,$20,$48,$41,$56
A6FA DEFB $45,$20,$41,$4E,$59,$20,$42,$55
A702 DEFB $4C,$4C,$45,$54,$53,$21,$22,$3A
A70A DEFB $EC,$B0,$22,$35,$30,$31,$32,$22
A712 DEFB $0D
A713 DEFB $13,$90,$7A,$00,$FA,$49,$28,$BA Line 5008: IF I(INT PI)>O AND I(5)<=O AND I(6)>=O OR I(4)>O AND I(5)>O AND I(6)<=O THEN LET M$="YOUR BULLETS DIDN'T FIT YOUR GUN": GO TO VAL "5012".
A71B DEFB $A7,$29,$3E,$4F,$C6,$49,$28,$35
A723 DEFB $0E,$00,$00,$05,$00,$00,$29,$C7
A72B DEFB $4F,$C6,$49,$28,$36,$0E,$00,$00
A733 DEFB $06,$00,$00,$29,$C8,$4F,$C5,$49
A73B DEFB $28,$34,$0E,$00,$00,$04,$00,$00
A743 DEFB $29,$3E,$4F,$C6,$49,$28,$35,$0E
A74B DEFB $00,$00,$05,$00,$00,$29,$3E,$4F
A753 DEFB $C6,$49,$28,$36,$0E,$00,$00,$06
A75B DEFB $00,$00,$29,$C7,$4F,$CB,$F1,$4D
A763 DEFB $24,$3D,$22,$59,$4F,$55,$52,$20
A76B DEFB $42,$55,$4C,$4C,$45,$54,$53,$20
A773 DEFB $44,$49,$44,$4E,$27,$54,$20,$46
A77B DEFB $49,$54,$20,$59,$4F,$55,$52,$20
A783 DEFB $47,$55,$4E,$22,$3A,$EC,$B0,$22
A78B DEFB $35,$30,$31,$32,$22,$0D
A791 DEFB $13,$92,$2E,$00,$F1,$59,$3D,$4F Line 5010: LET Y=O: LET M$="YOU WERE NOT FAST ENOUGH!": GO TO VAL "5018".
A799 DEFB $3A,$F1,$4D,$24,$3D,$22,$59,$4F
A7A1 DEFB $55,$20,$57,$45,$52,$45,$20,$4E
A7A9 DEFB $4F,$54,$20,$46,$41,$53,$54,$20
A7B1 DEFB $45,$4E,$4F,$55,$47,$48,$21,$22
A7B9 DEFB $3A,$EC,$B0,$22,$35,$30,$31,$38
A7C1 DEFB $22,$0D
A7C3 DEFB $13,$94,$05,$00,$F1,$59,$3D,$55 Line 5012: LET Y=U.
A7CB DEFB $0D
A7CC DEFB $13,$9B,$A3,$01,$F4,$32,$33,$36 Line 5019: POKE 23606,247: POKE 23607,242: PRINT " !""#$ %",," &'()* +";TAB 25;",-. /0123 4";TAB 25;"567 89:;<= >";TAB 25;"?@A BCDEF G";TAB 0;"HIJKL MN",,"OP QRSTU VW";TAB 21;"XYZ\] ↑_£abcdefghijklm";TAB 20;"no pqrst uvwxyz {|}~©".
A7D4 DEFB $30,$36,$0E,$00,$00,$36,$5C,$00
A7DC DEFB $2C,$32,$34,$37,$0E,$00,$00,$F7
A7E4 DEFB $00,$00,$3A,$F4,$32,$33,$36,$30
A7EC DEFB $37,$0E,$00,$00,$37,$5C,$00,$2C
A7F4 DEFB $32,$34,$32,$0E,$00,$00,$F2,$00
A7FC DEFB $00,$3A,$F5,$22,$10,$00,$11,$07
A804 DEFB $20,$21,$11,$01,$10,$07,$22,$22
A80C DEFB $23,$24,$10,$00,$11,$07,$20,$10
A814 DEFB $05,$25,$11,$05,$10,$00,$22,$2C
A81C DEFB $2C,$22,$11,$07,$20,$26,$10,$07
A824 DEFB $11,$01,$27,$28,$29,$2A,$10,$00
A82C DEFB $11,$07,$20,$10,$05,$2B,$10,$00
A834 DEFB $11,$05,$22,$3B,$AD,$32,$35,$0E
A83C DEFB $00,$00,$19,$00,$00,$3B,$22,$10
A844 DEFB $06,$2C,$2D,$2E,$20,$20,$20,$20
A84C DEFB $10,$00,$11,$07,$20,$2F,$10,$07
A854 DEFB $11,$01,$30,$31,$32,$33,$10,$00
A85C DEFB $11,$07,$20,$34,$11,$05,$22,$3B
A864 DEFB $AD,$32,$35,$0E,$00,$00,$19,$00
A86C DEFB $00,$3B,$22,$10,$06,$35,$36,$37
A874 DEFB $20,$20,$20,$20,$10,$00,$11,$07
A87C DEFB $38,$39,$3A,$10,$07,$11,$01,$3B
A884 DEFB $3C,$3D,$10,$00,$11,$07,$20,$3E
A88C DEFB $11,$05,$22,$3B,$AD,$32,$35,$0E
A894 DEFB $00,$00,$19,$00,$00,$3B,$22,$10
A89C DEFB $06,$3F,$40,$41,$10,$00,$20,$20
A8A4 DEFB $20,$20,$11,$07,$42,$8F,$43,$44
A8AC DEFB $11,$01,$10,$07,$45,$46,$11,$07
A8B4 DEFB $10,$00,$20,$47,$11,$05,$22,$3B
A8BC DEFB $AD,$30,$0E,$00,$00,$00,$00,$00
A8C4 DEFB $3B,$22,$11,$07,$48,$49,$4A,$8F
A8CC DEFB $4B,$4C,$20,$4D,$10,$05,$4E,$8F
A8D4 DEFB $8F,$8F,$8F,$10,$00,$11,$05,$22
A8DC DEFB $2C,$2C,$22,$11,$07,$10,$02,$4F
A8E4 DEFB $50,$10,$00,$20,$51,$52,$53,$54
A8EC DEFB $55,$20,$10,$05,$56,$57,$11,$07
A8F4 DEFB $8F,$8F,$10,$00,$11,$05,$22,$3B
A8FC DEFB $AD,$32,$31,$0E,$00,$00,$15,$00
A904 DEFB $00,$3B,$22,$11,$07,$11,$05,$10
A90C DEFB $05,$58,$59,$5A,$5C,$5D,$10,$00
A914 DEFB $20,$10,$05,$5E,$07,$11,$07,$5F
A91C DEFB $60,$10,$00,$61,$10,$02,$62,$63
A924 DEFB $64,$65,$66,$10,$00,$67,$68,$69
A92C DEFB $6A,$6B,$10,$05,$6C,$6D,$8F,$10
A934 DEFB $00,$11,$05,$22,$3B,$AD,$32,$30
A93C DEFB $0E,$00,$00,$14,$00,$00,$3B,$22
A944 DEFB $10,$07,$6E,$10,$00,$11,$07,$6F
A94C DEFB $20,$20,$20,$70,$10,$05,$71,$72
A954 DEFB $73,$10,$00,$74,$20,$75,$10,$02
A95C DEFB $76,$77,$78,$79,$7A,$10,$00,$20
A964 DEFB $20,$20,$7B,$7C,$7D,$7E,$10,$05
A96C DEFB $7F,$22,$10,$00,$11,$07,$0D
A973 DEFB $13,$A6,$FB,$00,$F4,$32,$33,$36 Line 5030: POKE 23607,245: PRINT AT 8,13;"! ""# $%&'()* +,-./0123456789 :;< = >?@AB C DEFGHIJKLMNO PQR STUVWXYZ[\]↑_£abcdefghij klmno pqrstuv wxyz{|}~ ©".
A97B DEFB $30,$37,$0E,$00,$00,$37,$5C,$00
A983 DEFB $2C,$32,$34,$35,$0E,$00,$00,$F5
A98B DEFB $00,$00,$3A,$20,$F5,$AC,$38,$0E
A993 DEFB $00,$00,$08,$00,$00,$2C,$31,$33
A99B DEFB $0E,$00,$00,$0D,$00,$00,$3B,$22
A9A3 DEFB $11,$05,$21,$20,$20,$20,$20,$20
A9AB DEFB $20,$11,$07,$22,$22,$23,$20,$24
A9B3 DEFB $25,$26,$27,$28,$29,$2A,$20,$2B
A9BB DEFB $2C,$2D,$2E,$2F,$30,$11,$01,$10
A9C3 DEFB $07,$31,$32,$33,$10,$00,$11,$07
A9CB DEFB $34,$10,$07,$11,$01,$35,$11,$07
A9D3 DEFB $36,$11,$07,$10,$00,$37,$38,$11
A9DB DEFB $05,$39,$20,$20,$20,$20,$20,$3A
A9E3 DEFB $11,$07,$10,$00,$3B,$11,$07,$3C
A9EB DEFB $20,$3D,$20,$3E,$3F,$40,$41,$42
A9F3 DEFB $20,$43,$20,$20,$20,$44,$45,$11
A9FB DEFB $01,$10,$07,$46,$47,$48,$10,$00
AA03 DEFB $11,$07,$49,$11,$01,$10,$07,$4A
AA0B DEFB $4B,$10,$00,$11,$07,$4C,$4D,$11
AA13 DEFB $05,$4E,$4F,$20,$20,$20,$20,$50
AA1B DEFB $11,$07,$51,$52,$20,$53,$54,$55
AA23 DEFB $56,$57,$58,$59,$5A,$5B,$5C,$5D
AA2B DEFB $5E,$5F,$60,$11,$01,$10,$07,$61
AA33 DEFB $62,$63,$10,$00,$11,$07,$64,$11
AA3B DEFB $01,$10,$07,$65,$66,$10,$00,$11
AA43 DEFB $07,$67,$68,$11,$06,$69,$6A,$20
AA4B DEFB $20,$20,$20,$6B,$11,$07,$6C,$6D
AA53 DEFB $6E,$6F,$20,$70,$71,$72,$73,$74
AA5B DEFB $75,$76,$20,$77,$78,$79,$7A,$11
AA63 DEFB $01,$10,$07,$7B,$7C,$7D,$10,$00
AA6B DEFB $11,$07,$7E,$20,$7F,$22,$0D
AA72 DEFB $13,$BA,$26,$01,$F4,$32,$33,$36 Line 5050: POKE 23607,248: PRINT AT 12,11;"!""#$ %&'()* +,-./012345 6789: ;<=>?@ABC D EFGHIJKLMNOP";TAB 21;"QRSTUVW X YZ[\]↑_";TAB 24;"£abcdefghi";TAB 25;"jklmnop";TAB 26;"qrstuvwxy";TAB 28;"z {|}~©";TAB 32.
AA7A DEFB $30,$37,$0E,$00,$00,$37,$5C,$00
AA82 DEFB $2C,$32,$34,$38,$0E,$00,$00,$F8
AA8A DEFB $00,$00,$3A,$F5,$AC,$31,$32,$0E
AA92 DEFB $00,$00,$0C,$00,$00,$2C,$31,$31
AA9A DEFB $0E,$00,$00,$0B,$00,$00,$3B,$10
AAA2 DEFB $00,$22,$11,$07,$21,$22,$22,$11
AAAA DEFB $06,$23,$24,$20,$20,$20,$25,$26
AAB2 DEFB $27,$11,$07,$28,$29,$2A,$11,$07
AABA DEFB $20,$20,$2B,$2C,$2D,$2E,$2F,$30
AAC2 DEFB $31,$32,$33,$34,$35,$20,$20,$20
AACA DEFB $36,$37,$38,$11,$06,$39,$3A,$20
AAD2 DEFB $20,$20,$20,$20,$20,$3B,$3C,$3D
AADA DEFB $3E,$3F,$11,$07,$40,$41,$11,$07
AAE2 DEFB $42,$43,$20,$44,$20,$45,$46,$47
AAEA DEFB $48,$49,$4A,$4B,$4C,$4D,$11,$06
AAF2 DEFB $8F,$4E,$4F,$50,$22,$3B,$AD,$32
AAFA DEFB $31,$0E,$00,$00,$15,$00,$00,$3B
AB02 DEFB $22,$51,$52,$53,$8F,$8F,$11,$07
AB0A DEFB $54,$55,$56,$57,$20,$58,$20,$20
AB12 DEFB $59,$5A,$5B,$5C,$11,$06,$8F,$8F
AB1A DEFB $5D,$5E,$5F,$22,$3B,$AD,$32,$34
AB22 DEFB $0E,$00,$00,$18,$00,$00,$3B,$22
AB2A DEFB $60,$61,$8F,$8F,$8F,$11,$07,$62
AB32 DEFB $63,$64,$65,$66,$67,$8F,$11,$06
AB3A DEFB $8F,$8F,$68,$69,$22,$3B,$AD,$32
AB42 DEFB $35,$0E,$00,$00,$19,$00,$00,$3B
AB4A DEFB $22,$6A,$6B,$6C,$8F,$8F,$8F,$8F
AB52 DEFB $11,$07,$8F,$8F,$8F,$8F,$11,$06
AB5A DEFB $6D,$6E,$6F,$70,$22,$3B,$AD,$32
AB62 DEFB $36,$0E,$00,$00,$1A,$00,$00,$3B
AB6A DEFB $22,$71,$72,$73,$74,$75,$76,$11
AB72 DEFB $07,$11,$06,$8F,$8F,$8F,$77,$78
AB7A DEFB $79,$22,$3B,$AD,$32,$38,$0E,$00
AB82 DEFB $00,$1C,$00,$00,$3B,$22,$7A,$20
AB8A DEFB $7B,$7C,$8F,$7D,$7E,$7F,$22,$3B
AB92 DEFB $AD,$33,$32,$0E,$00,$00,$20,$00
AB9A DEFB $00,$0D
AB9C DEFB $13,$CE,$45,$00,$F4,$B0,$22,$32 Line 5070: POKE VAL "23606",VAL "254": POKE VAL "23607",VAL "251": PRINT "£[]{";TAB 0;"}";TAB 32.
ABA4 DEFB $33,$36,$30,$36,$22,$2C,$B0,$22
ABAC DEFB $32,$35,$34,$22,$3A,$F4,$B0,$22
ABB4 DEFB $32,$33,$36,$30,$37,$22,$2C,$B0
ABBC DEFB $22,$32,$35,$31,$22,$3A,$F5,$22
ABC4 DEFB $11,$06,$60,$5B,$5D,$7B,$22,$3B
ABCC DEFB $AD,$30,$0E,$00,$00,$00,$00,$00
ABD4 DEFB $3B,$22,$7D,$22,$3B,$AD,$33,$32
ABDC DEFB $11,$07,$0E,$00,$00,$20,$00,$00
ABE4 DEFB $0D
ABE5 DEFB $14,$00,$90,$00,$F5,$DA,$35,$0E Line 5120: PRINT PAPER 5;AT 10,15;"abc";AT 11,15; PAPER 6;"def";AT 12,15;"ghi";AT 13,15;"jkl";AT 14,15;"m n".
ABED DEFB $00,$00,$05,$00,$00,$3B,$AC,$31
ABF5 DEFB $30,$0E,$00,$00,$0A,$00,$00,$2C
ABFD DEFB $31,$35,$0E,$00,$00,$0F,$00,$00
AC05 DEFB $3B,$22,$61,$62,$63,$22,$3B,$AC
AC0D DEFB $31,$31,$0E,$00,$00,$0B,$00,$00
AC15 DEFB $2C,$31,$35,$0E,$00,$00,$0F,$00
AC1D DEFB $00,$3B,$DA,$36,$0E,$00,$00,$06
AC25 DEFB $00,$00,$3B,$22,$64,$65,$66,$22
AC2D DEFB $3B,$AC,$31,$32,$0E,$00,$00,$0C
AC35 DEFB $00,$00,$2C,$31,$35,$0E,$00,$00
AC3D DEFB $0F,$00,$00,$3B,$22,$67,$68,$69
AC45 DEFB $22,$3B,$AC,$31,$33,$0E,$00,$00
AC4D DEFB $0D,$00,$00,$2C,$31,$35,$0E,$00
AC55 DEFB $00,$0F,$00,$00,$3B,$22,$6A,$6B
AC5D DEFB $6C,$22,$3B,$AC,$31,$34,$0E,$00
AC65 DEFB $00,$0E,$00,$00,$2C,$31,$35,$0E
AC6D DEFB $00,$00,$0F,$00,$00,$3B,$22,$6D
AC75 DEFB $20,$6E,$22,$0D
AC79 DEFB $14,$05,$49,$00,$F1,$4B,$3D,$BA Line 5125: LET K=INT (RND*4)+2: FOR D=U TO K: RESTORE VAL "9035": FOR N=U TO 20: READ H: READ F: BEEP H/3,F.
AC81 DEFB $28,$A5,$2A,$34,$0E,$00,$00,$04
AC89 DEFB $00,$00,$29,$2B,$32,$0E,$00,$00
AC91 DEFB $02,$00,$00,$3A,$EB,$44,$3D,$55
AC99 DEFB $CC,$4B,$3A,$E5,$B0,$22,$39,$30
ACA1 DEFB $33,$35,$22,$3A,$EB,$4E,$3D,$55
ACA9 DEFB $CC,$32,$30,$0E,$00,$00,$14,$00
ACB1 DEFB $00,$3A,$E3,$48,$3A,$E3,$46,$3A
ACB9 DEFB $D7,$48,$2F,$33,$0E,$00,$00,$03
ACC1 DEFB $00,$00,$2C,$46,$0D
ACC6 DEFB $14,$0A,$25,$00,$FA,$A6,$C9,$22 Line 5130: IF INKEY$<>"" AND Y=0 THEN LET SF=1: GO TO VAL "5300".
ACCE DEFB $22,$C6,$59,$3D,$30,$0E,$00,$00
ACD6 DEFB $00,$00,$00,$CB,$F1,$53,$46,$3D
ACDE DEFB $31,$0E,$00,$00,$01,$00,$00,$3A
ACE6 DEFB $EC,$B0,$22,$35,$33,$30,$30,$22
ACEE DEFB $0D
ACEF DEFB $14,$0F,$06,$00,$F3,$4E,$3A,$F3 Line 5135: NEXT N: NEXT D.
ACF7 DEFB $44,$0D
ACF9 DEFB $14,$50,$3C,$00,$F5,$DA,$36,$0E Line 5200: PRINT PAPER 6;AT 11,15;"oep";AT 12,15;"qhr".
AD01 DEFB $00,$00,$06,$00,$00,$3B,$AC,$31
AD09 DEFB $31,$0E,$00,$00,$0B,$00,$00,$2C
AD11 DEFB $31,$35,$0E,$00,$00,$0F,$00,$00
AD19 DEFB $3B,$22,$6F,$65,$70,$22,$3B,$AC
AD21 DEFB $31,$32,$0E,$00,$00,$0C,$00,$00
AD29 DEFB $2C,$31,$35,$0E,$00,$00,$0F,$00
AD31 DEFB $00,$3B,$22,$71,$68,$72,$22,$0D
AD39 DEFB $14,$5A,$25,$00,$F1,$4D,$3D,$BA Line 5210: LET M=INT (RND*5)+5: FOR N=1 TO M.
AD41 DEFB $28,$A5,$2A,$35,$0E,$00,$00,$05
AD49 DEFB $00,$00,$29,$2B,$35,$0E,$00,$00
AD51 DEFB $05,$00,$00,$3A,$EB,$4E,$3D,$31
AD59 DEFB $0E,$00,$00,$01,$00,$00,$CC,$4D
AD61 DEFB $0D
AD62 DEFB $14,$5F,$19,$00,$FA,$A6,$C9,$22 Line 5215: IF INKEY$<>"" AND Y=0 THEN GO TO VAL "5300".
AD6A DEFB $22,$C6,$59,$3D,$30,$0E,$00,$00
AD72 DEFB $00,$00,$00,$CB,$EC,$B0,$22,$35
AD7A DEFB $33,$30,$30,$22,$0D
AD7F DEFB $14,$64,$03,$00,$F3,$4E,$0D Line 5220: NEXT N.
AD86 DEFB $14,$82,$5E,$00,$F5,$DA,$36,$0E Line 5250: PRINT PAPER 6;AT 11,15;"set";AT 12,15;"uhv".
AD8E DEFB $00,$00,$06,$00,$00,$3B,$AC,$31
AD96 DEFB $31,$0E,$00,$00,$0B,$00,$00,$2C
AD9E DEFB $31,$35,$0E,$00,$00,$0F,$00,$00
ADA6 DEFB $3B,$22,$73,$65,$74,$22,$3B,$AC
ADAE DEFB $31,$32,$0E,$00,$00,$0C,$00,$00
ADB6 DEFB $2C,$31,$35,$0E,$00,$00,$0F,$00
ADBE DEFB $00,$3B,$22,$12,$01,$13,$01,$10
ADC6 DEFB $06,$11,$02,$75,$12,$00,$13,$00
ADCE DEFB $11,$06,$10,$00,$68,$12,$01,$13
ADD6 DEFB $01,$11,$02,$10,$07,$10,$06,$76
ADDE DEFB $11,$00,$12,$00,$11,$07,$10,$00
ADE6 DEFB $22,$0D
ADE8 DEFB $14,$87,$3D,$00,$EB,$4E,$3D,$2D Line 5255: FOR N=-20 TO 20: BEEP .05,N: BEEP .1,N*-1.5: NEXT N.
ADF0 DEFB $32,$30,$0E,$00,$00,$14,$00,$00
ADF8 DEFB $CC,$32,$30,$0E,$00,$00,$14,$00
AE00 DEFB $00,$3A,$D7,$2E,$30,$35,$0E,$7C
AE08 DEFB $4C,$CC,$CC,$CC,$2C,$4E,$3A,$D7
AE10 DEFB $2E,$31,$0E,$7D,$4C,$CC,$CC,$CC
AE18 DEFB $2C,$4E,$2A,$2D,$31,$2E,$35,$0E
AE20 DEFB $81,$40,$00,$00,$00,$3A,$F3,$4E
AE28 DEFB $0D
AE29 DEFB $14,$8C,$0E,$00,$DA,$4F,$3A,$D9 Line 5260: PAPER O: INK VAL "9": BORDER O: CLS.
AE31 DEFB $B0,$22,$39,$22,$3A,$E7,$4F,$3A
AE39 DEFB $FB,$0D
AE3B DEFB $14,$91,$23,$00,$F5,$AC,$31,$30 Line 5265: PRINT AT 10,10;"HE SHOT YOU!".
AE43 DEFB $0E,$00,$00,$0A,$00,$00,$2C,$31
AE4B DEFB $30,$0E,$00,$00,$0A,$00,$00,$3B
AE53 DEFB $22,$48,$45,$20,$53,$48,$4F,$54
AE5B DEFB $20,$59,$4F,$55,$21,$22,$0D
AE62 DEFB $14,$96,$2D,$00,$E5,$B0,$22,$39 Line 5270: RESTORE VAL "9100": FOR N=U TO 11: READ M: READ W: BEEP M/3,W: NEXT N.
AE6A DEFB $31,$30,$30,$22,$3A,$EB,$4E,$3D
AE72 DEFB $55,$CC,$31,$31,$0E,$00,$00,$0B
AE7A DEFB $00,$00,$3A,$E3,$4D,$3A,$E3,$57
AE82 DEFB $3A,$D7,$4D,$2F,$33,$0E,$00,$00
AE8A DEFB $03,$00,$00,$2C,$57,$3A,$F3,$4E
AE92 DEFB $0D
AE93 DEFB $14,$A0,$09,$00,$EC,$B0,$22,$38 Line 5280: GO TO VAL "8500".
AE9B DEFB $35,$30,$30,$22,$0D
AEA0 DEFB $14,$B4,$4A,$00,$F5,$DA,$36,$0E Line 5300: PRINT PAPER 6;AT 11,15;"wex";AT 12,15;"yz\".
AEA8 DEFB $00,$00,$06,$00,$00,$3B,$AC,$31
AEB0 DEFB $31,$0E,$00,$00,$0B,$00,$00,$2C
AEB8 DEFB $31,$35,$0E,$00,$00,$0F,$00,$00
AEC0 DEFB $3B,$22,$77,$65,$78,$22,$3B,$AC
AEC8 DEFB $31,$32,$0E,$00,$00,$0C,$00,$00
AED0 DEFB $2C,$31,$35,$0E,$00,$00,$0F,$00
AED8 DEFB $00,$3B,$22,$11,$06,$79,$10,$02
AEE0 DEFB $11,$02,$7A,$10,$00,$11,$06,$5C
AEE8 DEFB $11,$07,$10,$00,$22,$0D
AEEE DEFB $14,$B9,$4B,$00,$F6,$31,$32,$38 Line 5305: PLOT 128,100: DRAW -9,18: PRINT PAPER VAL "5";AT 6,12;"AAAGGH!".
AEF6 DEFB $0E,$00,$00,$80,$00,$00,$2C,$31
AEFE DEFB $30,$30,$0E,$00,$00,$64,$00,$00
AF06 DEFB $3A,$FC,$2D,$39,$0E,$00,$00,$09
AF0E DEFB $00,$00,$2C,$31,$38,$0E,$00,$00
AF16 DEFB $12,$00,$00,$3A,$F5,$DA,$B0,$22
AF1E DEFB $35,$22,$3B,$AC,$36,$0E,$00,$00
AF26 DEFB $06,$00,$00,$2C,$31,$32,$0E,$00
AF2E DEFB $00,$0C,$00,$00,$3B,$22,$41,$41
AF36 DEFB $41,$47,$47,$48,$21,$22,$0D
AF3D DEFB $14,$BE,$1F,$00,$EB,$4E,$3D,$4F Line 5310: FOR N=O TO 40: BEEP .002,N: NEXT N.
AF45 DEFB $CC,$34,$30,$0E,$00,$00,$28,$00
AF4D DEFB $00,$3A,$D7,$2E,$30,$30,$32,$0E
AF55 DEFB $78,$03,$12,$6E,$97,$2C,$4E,$3A
AF5D DEFB $F3,$4E,$0D
AF60 DEFB $14,$C3,$2D,$00,$E5,$B0,$22,$39 Line 5315: RESTORE VAL "9080": FOR N=U TO 10: READ M: READ W: BEEP M/3,W: NEXT N.
AF68 DEFB $30,$38,$30,$22,$3A,$EB,$4E,$3D
AF70 DEFB $55,$CC,$31,$30,$0E,$00,$00,$0A
AF78 DEFB $00,$00,$3A,$E3,$4D,$3A,$E3,$57
AF80 DEFB $3A,$D7,$4D,$2F,$33,$0E,$00,$00
AF88 DEFB $03,$00,$00,$2C,$57,$3A,$F3,$4E
AF90 DEFB $0D
AF91 DEFB $14,$C8,$0F,$00,$FA,$53,$46,$3D Line 5320: IF SF=U THEN GO TO VAL "5405".
AF99 DEFB $55,$CB,$EC,$B0,$22,$35,$34,$30
AFA1 DEFB $35,$22,$0D
AFA4 DEFB $14,$CD,$73,$00,$DA,$34,$0E,$00 Line 5325: PAPER 4: INK 9: BORDER U: CLS : PRINT AT 6,2;"YOU CARRY THE BODY TO THE": PRINT : PRINT " SHERIFFS OFFICE.....": GO SUB VAL "2455": GO TO VAL "2460".
AFAC DEFB $00,$04,$00,$00,$3A,$D9,$39,$0E
AFB4 DEFB $00,$00,$09,$00,$00,$3A,$E7,$55
AFBC DEFB $3A,$FB,$3A,$F5,$AC,$36,$0E,$00
AFC4 DEFB $00,$06,$00,$00,$2C,$32,$0E,$00
AFCC DEFB $00,$02,$00,$00,$3B,$22,$59,$4F
AFD4 DEFB $55,$20,$43,$41,$52,$52,$59,$20
AFDC DEFB $54,$48,$45,$20,$42,$4F,$44,$59
AFE4 DEFB $20,$54,$4F,$20,$54,$48,$45,$22
AFEC DEFB $3A,$F5,$3A,$F5,$22,$20,$20,$53
AFF4 DEFB $48,$45,$52,$49,$46,$46,$53,$20
AFFC DEFB $4F,$46,$46,$49,$43,$45,$2E,$2E
B004 DEFB $2E,$2E,$2E,$22,$3A,$ED,$B0,$22
B00C DEFB $32,$34,$35,$35,$22,$3A,$EC,$B0
B014 DEFB $22,$32,$34,$36,$30,$22,$0D
B01B DEFB $15,$1D,$0E,$00,$DA,$4F,$3A,$D9 Line 5405: PAPER O: INK VAL "9": BORDER O: CLS.
B023 DEFB $B0,$22,$39,$22,$3A,$E7,$4F,$3A
B02B DEFB $FB,$0D
B02D DEFB $15,$22,$B5,$00,$F5,$AC,$37,$0E Line 5410: PRINT AT 7,9;"YOU DREW FIRST!": PRINT : PRINT TAB 9;"THAT'S MURDER.": PRINT : PRINT : PRINT TAB 5;"THE SHERIFF ARRESTS YOU": PRINT : PRINT TAB 8;"YOU'LL BE IN JAIL": PRINT : PRINT TAB 8;"FOR QUITE A WHILE": GO TO 2725.
B035 DEFB $00,$00,$07,$00,$00,$2C,$39,$0E
B03D DEFB $00,$00,$09,$00,$00,$3B,$22,$59
B045 DEFB $4F,$55,$20,$44,$52,$45,$57,$20
B04D DEFB $46,$49,$52,$53,$54,$21,$22,$3A
B055 DEFB $F5,$3A,$F5,$AD,$39,$0E,$00,$00
B05D DEFB $09,$00,$00,$3B,$22,$54,$48,$41
B065 DEFB $54,$27,$53,$20,$4D,$55,$52,$44
B06D DEFB $45,$52,$2E,$22,$3A,$F5,$3A,$F5
B075 DEFB $3A,$F5,$AD,$35,$0E,$00,$00,$05
B07D DEFB $00,$00,$3B,$22,$54,$48,$45,$20
B085 DEFB $53,$48,$45,$52,$49,$46,$46,$20
B08D DEFB $41,$52,$52,$45,$53,$54,$53,$20
B095 DEFB $59,$4F,$55,$22,$3A,$F5,$3A,$F5
B09D DEFB $AD,$38,$0E,$00,$00,$08,$00,$00
B0A5 DEFB $3B,$22,$59,$4F,$55,$27,$4C,$4C
B0AD DEFB $20,$42,$45,$20,$49,$4E,$20,$4A
B0B5 DEFB $41,$49,$4C,$22,$3A,$F5,$3A,$F5
B0BD DEFB $AD,$38,$0E,$00,$00,$08,$00,$00
B0C5 DEFB $3B,$22,$46,$4F,$52,$20,$51,$55
B0CD DEFB $49,$54,$45,$20,$41,$20,$57,$48
B0D5 DEFB $49,$4C,$45,$22,$3A,$EC,$32,$37
B0DD DEFB $32,$35,$0E,$00,$00,$A5,$0A,$00
B0E5 DEFB $0D
B0E6 DEFB $17,$70,$5F,$00,$ED,$B0,$22,$33 Line 6000: GO SUB VAL "300": PRINT AT 17,1;"YOU ARE IN (";TN;")";T$(TN): PRINT : PRINT TAB 4;"WHERE DO YOU WANT TO GO?".
B0EE DEFB $30,$30,$22,$3A,$F5,$AC,$31,$37
B0F6 DEFB $0E,$00,$00,$11,$00,$00,$2C,$31
B0FE DEFB $0E,$00,$00,$01,$00,$00,$3B,$22
B106 DEFB $59,$4F,$55,$20,$41,$52,$45,$20
B10E DEFB $49,$4E,$20,$28,$22,$3B,$54,$4E
B116 DEFB $3B,$22,$29,$22,$3B,$54,$24,$28
B11E DEFB $54,$4E,$29,$3A,$F5,$3A,$F5,$AD
B126 DEFB $34,$0E,$00,$00,$04,$00,$00,$3B
B12E DEFB $22,$57,$48,$45,$52,$45,$20,$44
B136 DEFB $4F,$20,$59,$4F,$55,$20,$57,$41
B13E DEFB $4E,$54,$20,$54,$4F,$20,$47,$4F
B146 DEFB $3F,$22,$0D
B149 DEFB $17,$75,$59,$00,$EE,$22,$45,$4E Line 6005: INPUT "ENTER NUMBER OF DESTINATION "; LINE E$: LET E$=E$+" ": IF CODE E$(U)<49 OR CODE E$(U)>53 THEN GO TO VAL "6005".
B151 DEFB $54,$45,$52,$20,$4E,$55,$4D,$42
B159 DEFB $45,$52,$20,$4F,$46,$20,$44,$45
B161 DEFB $53,$54,$49,$4E,$41,$54,$49,$4F
B169 DEFB $4E,$20,$22,$3B,$CA,$45,$24,$3A
B171 DEFB $F1,$45,$24,$3D,$45,$24,$2B,$22
B179 DEFB $20,$22,$3A,$FA,$AF,$45,$24,$28
B181 DEFB $55,$29,$3C,$34,$39,$0E,$00,$00
B189 DEFB $31,$00,$00,$C5,$AF,$45,$24,$28
B191 DEFB $55,$29,$3E,$35,$33,$0E,$00,$00
B199 DEFB $35,$00,$00,$CB,$EC,$B0,$22,$36
B1A1 DEFB $30,$30,$35,$22,$0D
B1A6 DEFB $17,$89,$28,$00,$F1,$46,$4C,$3D Line 6025: LET FL=VAL E$: IF FL<U OR FL>5 OR FL=TN THEN GO TO VAL "6005".
B1AE DEFB $B0,$45,$24,$3A,$FA,$46,$4C,$3C
B1B6 DEFB $55,$C5,$46,$4C,$3E,$35,$0E,$00
B1BE DEFB $00,$05,$00,$00,$C5,$46,$4C,$3D
B1C6 DEFB $54,$4E,$CB,$EC,$B0,$22,$36,$30
B1CE DEFB $30,$35,$22,$0D
B1D2 DEFB $17,$8C,$0C,$00,$F1,$47,$3D,$54 Line 6028: LET G=T(TN,FL).
B1DA DEFB $28,$54,$4E,$2C,$46,$4C,$29,$0D
B1E2 DEFB $17,$8E,$40,$00,$FA,$47,$3C,$2D Line 6030: IF G<-10 THEN LET DE=O: LET MT=U: LET G=G/-3: LET P$="MOUNTAINS": GO TO VAL "6045".
B1EA DEFB $31,$30,$0E,$00,$00,$0A,$00,$00
B1F2 DEFB $CB,$F1,$44,$45,$3D,$4F,$3A,$F1
B1FA DEFB $4D,$54,$3D,$55,$3A,$F1,$47,$3D
B202 DEFB $47,$2F,$2D,$33,$0E,$00,$00,$03
B20A DEFB $00,$00,$3A,$F1,$50,$24,$3D,$22
B212 DEFB $4D,$4F,$55,$4E,$54,$41,$49,$4E
B21A DEFB $53,$22,$3A,$EC,$B0,$22,$36,$30
B222 DEFB $34,$35,$22,$0D
B226 DEFB $17,$93,$2F,$00,$FA,$47,$3C,$4F Line 6035: IF G<O THEN LET DE=U: LET MT=O: LET G=G*-U: LET P$="DESERT": GO TO VAL "6045".
B22E DEFB $CB,$F1,$44,$45,$3D,$55,$3A,$F1
B236 DEFB $4D,$54,$3D,$4F,$3A,$F1,$47,$3D
B23E DEFB $47,$2A,$2D,$55,$3A,$F1,$50,$24
B246 DEFB $3D,$22,$44,$45,$53,$45,$52,$54
B24E DEFB $22,$3A,$EC,$B0,$22,$36,$30,$34
B256 DEFB $35,$22,$0D
B259 DEFB $17,$98,$1D,$00,$F1,$50,$24,$3D Line 6040: LET P$="OPEN RANGE": LET MT=O: LET DE=O.
B261 DEFB $22,$4F,$50,$45,$4E,$20,$52,$41
B269 DEFB $4E,$47,$45,$22,$3A,$F1,$4D,$54
B271 DEFB $3D,$4F,$3A,$F1,$44,$45,$3D,$4F
B279 DEFB $0D
B27A DEFB $17,$9D,$74,$00,$F5,$AC,$31,$39 Line 6045: PRINT AT 19,U;T$(FL);" IS ";G;" DAYS RIDE"," ACROSS THE ";P$: BEEP .3,7: BEEP .2,14: BEEP .3,-7.
B282 DEFB $0E,$00,$00,$13,$00,$00,$2C,$55
B28A DEFB $3B,$54,$24,$28,$46,$4C,$29,$3B
B292 DEFB $22,$20,$49,$53,$20,$22,$3B,$47
B29A DEFB $3B,$22,$20,$44,$41,$59,$53,$20
B2A2 DEFB $52,$49,$44,$45,$22,$2C,$22,$20
B2AA DEFB $41,$43,$52,$4F,$53,$53,$20,$54
B2B2 DEFB $48,$45,$20,$22,$3B,$50,$24,$3A
B2BA DEFB $D7,$2E,$33,$0E,$7F,$19,$99,$99
B2C2 DEFB $99,$2C,$37,$0E,$00,$00,$07,$00
B2CA DEFB $00,$3A,$D7,$2E,$32,$0E,$7E,$4C
B2D2 DEFB $CC,$CC,$CC,$2C,$31,$34,$0E,$00
B2DA DEFB $00,$0E,$00,$00,$3A,$D7,$2E,$33
B2E2 DEFB $0E,$7F,$19,$99,$99,$99,$2C,$2D
B2EA DEFB $37,$0E,$00,$00,$07,$00,$00,$0D
B2F2 DEFB $17,$A2,$23,$00,$EE,$22,$20,$20 Line 6050: INPUT " PRESS ENTER TO CONTINUE"; LINE H$.
B2FA DEFB $20,$20,$50,$52,$45,$53,$53,$20
B302 DEFB $45,$4E,$54,$45,$52,$20,$54,$4F
B30A DEFB $20,$43,$4F,$4E,$54,$49,$4E,$55
B312 DEFB $45,$22,$3B,$CA,$48,$24,$0D
B319 DEFB $17,$AC,$C9,$00,$DA,$34,$0E,$00 Line 6060: PAPER 4: BORDER U: CLS : PRINT AT 4,4;"DO YOU WANT TO:": PRINT : PRINT TAB 5;"A) START YOUR JOURNEY": PRINT : PRINT TAB 5;"B) BUY PROVISIONS": PRINT : PRINT TAB 5;"C) LOOK AT MAP AGAIN";AT 14,3;"PRESS LETTER OF YOUR CHOICE".
B321 DEFB $00,$04,$00,$00,$3A,$E7,$55,$3A
B329 DEFB $FB,$3A,$F5,$AC,$34,$0E,$00,$00
B331 DEFB $04,$00,$00,$2C,$34,$0E,$00,$00
B339 DEFB $04,$00,$00,$3B,$22,$44,$4F,$20
B341 DEFB $59,$4F,$55,$20,$57,$41,$4E,$54
B349 DEFB $20,$54,$4F,$3A,$22,$3A,$F5,$3A
B351 DEFB $F5,$AD,$35,$0E,$00,$00,$05,$00
B359 DEFB $00,$3B,$22,$41,$29,$20,$53,$54
B361 DEFB $41,$52,$54,$20,$59,$4F,$55,$52
B369 DEFB $20,$4A,$4F,$55,$52,$4E,$45,$59
B371 DEFB $22,$3A,$F5,$3A,$F5,$AD,$35,$0E
B379 DEFB $00,$00,$05,$00,$00,$3B,$22,$42
B381 DEFB $29,$20,$42,$55,$59,$20,$50,$52
B389 DEFB $4F,$56,$49,$53,$49,$4F,$4E,$53
B391 DEFB $22,$3A,$F5,$3A,$F5,$AD,$35,$0E
B399 DEFB $00,$00,$05,$00,$00,$3B,$22,$43
B3A1 DEFB $29,$20,$4C,$4F,$4F,$4B,$20,$41
B3A9 DEFB $54,$20,$4D,$41,$50,$20,$41,$47
B3B1 DEFB $41,$49,$4E,$22,$3B,$AC,$31,$34
B3B9 DEFB $0E,$00,$00,$0E,$00,$00,$2C,$33
B3C1 DEFB $0E,$00,$00,$03,$00,$00,$3B,$22
B3C9 DEFB $50,$52,$45,$53,$53,$20,$4C,$45
B3D1 DEFB $54,$54,$45,$52,$20,$4F,$46,$20
B3D9 DEFB $59,$4F,$55,$52,$20,$43,$48,$4F
B3E1 DEFB $49,$43,$45,$22,$0D
B3E6 DEFB $17,$B1,$23,$00,$D7,$2E,$30,$31 Line 6065: BEEP .01,5: IF INKEY$="A" THEN GO TO VAL "4000".
B3EE DEFB $0E,$7A,$23,$D7,$0A,$3D,$2C,$35
B3F6 DEFB $0E,$00,$00,$05,$00,$00,$3A,$FA
B3FE DEFB $A6,$3D,$22,$41,$22,$CB,$EC,$B0
B406 DEFB $22,$34,$30,$30,$30,$22,$0D
B40D DEFB $17,$B6,$10,$00,$FA,$A6,$3D,$22 Line 6070: IF INKEY$="B" THEN GO TO VAL "7660".
B415 DEFB $42,$22,$CB,$EC,$B0,$22,$37,$36
B41D DEFB $36,$30,$22,$0D
B421 DEFB $17,$BB,$10,$00,$FA,$A6,$3D,$22 Line 6075: IF INKEY$="C" THEN GO TO VAL "6000".
B429 DEFB $43,$22,$CB,$EC,$B0,$22,$36,$30
B431 DEFB $30,$30,$22,$0D
B435 DEFB $17,$C0,$1D,$00,$D7,$2E,$30,$32 Line 6080: BEEP .02,29: GO TO VAL "6065".
B43D DEFB $0E,$7B,$23,$D7,$0A,$3D,$2C,$32
B445 DEFB $39,$0E,$00,$00,$1D,$00,$00,$3A
B44D DEFB $EC,$B0,$22,$36,$30,$36,$35,$22
B455 DEFB $0D
B456 DEFB $1B,$58,$0E,$00,$DA,$B0,$22,$37 Line 7000: PAPER VAL "7": INK VAL "9": CLS.
B45E DEFB $22,$3A,$D9,$B0,$22,$39,$22,$3A
B466 DEFB $FB,$0D
B468 DEFB $1B,$59,$83,$00,$F5,$22,$20,$20 Line 7001: PRINT " ": PRINT " ": PRINT " ": PRINT " ".
B470 DEFB $20,$8C,$88,$8C,$88,$20,$84,$8C
B478 DEFB $20,$20,$8C,$20,$8C,$88,$84,$8C
B480 DEFB $8C,$8C,$20,$8C,$8C,$8C,$88,$84
B488 DEFB $8C,$8C,$22,$3A,$F5,$22,$20,$20
B490 DEFB $20,$85,$84,$85,$20,$20,$8A,$20
B498 DEFB $8A,$20,$85,$86,$85,$20,$85,$20
B4A0 DEFB $8A,$85,$20,$85,$20,$20,$8A,$20
B4A8 DEFB $8A,$20,$86,$22,$3A,$F5,$22,$20
B4B0 DEFB $20,$20,$85,$85,$85,$20,$20,$8B
B4B8 DEFB $83,$8A,$20,$85,$85,$85,$20,$20
B4C0 DEFB $20,$8A,$20,$20,$85,$83,$82,$88
B4C8 DEFB $20,$8A,$20,$85,$22,$3A,$F5,$22
B4D0 DEFB $20,$20,$20,$85,$82,$87,$20,$84
B4D8 DEFB $8E,$84,$8E,$20,$8D,$88,$87,$20
B4E0 DEFB $20,$84,$8E,$20,$20,$8D,$8C,$8C
B4E8 DEFB $8A,$84,$8E,$8C,$82,$22,$0D
B4EF DEFB $1B,$5D,$CB,$00,$F5,$AC,$37,$0E Line 7005: PRINT AT 7,4;"DEAD";AT 7,23;"DEAD";AT 9,5;"OR";AT 9,24;"OR";AT 11,4;"ALIVE";AT 11,23;"ALIVE";AT 13,4;"$";R(L);AT 13,23;"$";R(L).
B4F7 DEFB $00,$00,$07,$00,$00,$2C,$34,$0E
B4FF DEFB $00,$00,$04,$00,$00,$3B,$22,$44
B507 DEFB $45,$41,$44,$22,$3B,$AC,$37,$0E
B50F DEFB $00,$00,$07,$00,$00,$2C,$32,$33
B517 DEFB $0E,$00,$00,$17,$00,$00,$3B,$22
B51F DEFB $44,$45,$41,$44,$22,$3B,$AC,$39
B527 DEFB $0E,$00,$00,$09,$00,$00,$2C,$35
B52F DEFB $0E,$00,$00,$05,$00,$00,$3B,$22
B537 DEFB $4F,$52,$22,$3B,$AC,$39,$0E,$00
B53F DEFB $00,$09,$00,$00,$2C,$32,$34,$0E
B547 DEFB $00,$00,$18,$00,$00,$3B,$22,$4F
B54F DEFB $52,$22,$3B,$AC,$31,$31,$0E,$00
B557 DEFB $00,$0B,$00,$00,$2C,$34,$0E,$00
B55F DEFB $00,$04,$00,$00,$3B,$22,$41,$4C
B567 DEFB $49,$56,$45,$22,$3B,$AC,$31,$31
B56F DEFB $0E,$00,$00,$0B,$00,$00,$2C,$32
B577 DEFB $33,$0E,$00,$00,$17,$00,$00,$3B
B57F DEFB $22,$41,$4C,$49,$56,$45,$22,$3B
B587 DEFB $AC,$31,$33,$0E,$00,$00,$0D,$00
B58F DEFB $00,$2C,$34,$0E,$00,$00,$04,$00
B597 DEFB $00,$3B,$22,$24,$22,$3B,$52,$28
B59F DEFB $4C,$29,$3B,$AC,$31,$33,$0E,$00
B5A7 DEFB $00,$0D,$00,$00,$2C,$32,$33,$0E
B5AF DEFB $00,$00,$17,$00,$00,$3B,$22,$24
B5B7 DEFB $22,$3B,$52,$28,$4C,$29,$0D
B5BE DEFB $1B,$62,$3E,$01,$F6,$31,$31,$37 Line 7010: PLOT 117,135: DRAW -7,-17: DRAW 18,-10: DRAW O,15: DRAW 10,12: DRAW 8,-17: DRAW -18,-10: PLOT 127,123: DRAW -10,12: DRAW 10,-9: DRAW 11,9: PLOT 145,120: DRAW 15,-R: DRAW -32,-12: PLOT 127,106: DRAW -32,12: DRAW 15,R.
B5C6 DEFB $0E,$00,$00,$75,$00,$00,$2C,$31
B5CE DEFB $33,$35,$0E,$00,$00,$87,$00,$00
B5D6 DEFB $3A,$FC,$2D,$37,$0E,$00,$00,$07
B5DE DEFB $00,$00,$2C,$2D,$31,$37,$0E,$00
B5E6 DEFB $00,$11,$00,$00,$3A,$FC,$31,$38
B5EE DEFB $0E,$00,$00,$12,$00,$00,$2C,$2D
B5F6 DEFB $31,$30,$0E,$00,$00,$0A,$00,$00
B5FE DEFB $3A,$FC,$4F,$2C,$31,$35,$0E,$00
B606 DEFB $00,$0F,$00,$00,$3A,$FC,$31,$30
B60E DEFB $0E,$00,$00,$0A,$00,$00,$2C,$31
B616 DEFB $32,$0E,$00,$00,$0C,$00,$00,$3A
B61E DEFB $FC,$38,$0E,$00,$00,$08,$00,$00
B626 DEFB $2C,$2D,$31,$37,$0E,$00,$00,$11
B62E DEFB $00,$00,$3A,$FC,$2D,$31,$38,$0E
B636 DEFB $00,$00,$12,$00,$00,$2C,$2D,$31
B63E DEFB $30,$0E,$00,$00,$0A,$00,$00,$3A
B646 DEFB $F6,$31,$32,$37,$0E,$00,$00,$7F
B64E DEFB $00,$00,$2C,$31,$32,$33,$0E,$00
B656 DEFB $00,$7B,$00,$00,$3A,$FC,$2D,$31
B65E DEFB $30,$0E,$00,$00,$0A,$00,$00,$2C
B666 DEFB $31,$32,$0E,$00,$00,$0C,$00,$00
B66E DEFB $3A,$FC,$31,$30,$0E,$00,$00,$0A
B676 DEFB $00,$00,$2C,$2D,$39,$0E,$00,$00
B67E DEFB $09,$00,$00,$3A,$FC,$31,$31,$0E
B686 DEFB $00,$00,$0B,$00,$00,$2C,$39,$0E
B68E DEFB $00,$00,$09,$00,$00,$3A,$F6,$31
B696 DEFB $34,$35,$0E,$00,$00,$91,$00,$00
B69E DEFB $2C,$31,$32,$30,$0E,$00,$00,$78
B6A6 DEFB $00,$00,$3A,$FC,$31,$35,$0E,$00
B6AE DEFB $00,$0F,$00,$00,$2C,$2D,$52,$3A
B6B6 DEFB $FC,$2D,$33,$32,$0E,$00,$00,$20
B6BE DEFB $00,$00,$2C,$2D,$31,$32,$0E,$00
B6C6 DEFB $00,$0C,$00,$00,$3A,$F6,$31,$32
B6CE DEFB $37,$0E,$00,$00,$7F,$00,$00,$2C
B6D6 DEFB $31,$30,$36,$0E,$00,$00,$6A,$00
B6DE DEFB $00,$3A,$FC,$2D,$33,$32,$0E,$00
B6E6 DEFB $00,$20,$00,$00,$2C,$31,$32,$0E
B6EE DEFB $00,$00,$0C,$00,$00,$3A,$FC,$31
B6F6 DEFB $35,$0E,$00,$00,$0F,$00,$00,$2C
B6FE DEFB $52,$0D
B700 DEFB $1B,$67,$46,$00,$F6,$B0,$22,$31 Line 7015: PLOT VAL "111",VAL "112": DRAW VAL "6",VAL "-30": PLOT VAL "145",VAL "112": DRAW VAL "-6",VAL "-30": DRAW VAL "-22",O,-PI.
B708 DEFB $31,$31,$22,$2C,$B0,$22,$31,$31
B710 DEFB $32,$22,$3A,$FC,$B0,$22,$36,$22
B718 DEFB $2C,$B0,$22,$2D,$33,$30,$22,$3A
B720 DEFB $F6,$B0,$22,$31,$34,$35,$22,$2C
B728 DEFB $B0,$22,$31,$31,$32,$22,$3A,$FC
B730 DEFB $B0,$22,$2D,$36,$22,$2C,$B0,$22
B738 DEFB $2D,$33,$30,$22,$3A,$FC,$B0,$22
B740 DEFB $2D,$32,$32,$22,$2C,$4F,$2C,$2D
B748 DEFB $A7,$0D
B74A DEFB $1B,$6C,$44,$00,$FA,$44,$24,$28 Line 7020: IF D$(L)<>"NO RIGHT EAR......." THEN PLOT VAL "112",VAL "108": DRAW VAL "-4",O,PI: DRAW VAL "6",VAL "-13".
B752 DEFB $4C,$29,$C9,$22,$4E,$4F,$20,$52
B75A DEFB $49,$47,$48,$54,$20,$45,$41,$52
B762 DEFB $2E,$2E,$2E,$2E,$2E,$2E,$2E,$22
B76A DEFB $CB,$F6,$B0,$22,$31,$31,$32,$22
B772 DEFB $2C,$B0,$22,$31,$30,$38,$22,$3A
B77A DEFB $FC,$B0,$22,$2D,$34,$22,$2C,$4F
B782 DEFB $2C,$A7,$3A,$FC,$B0,$22,$36,$22
B78A DEFB $2C,$B0,$22,$2D,$31,$33,$22,$0D
B792 DEFB $1B,$71,$45,$00,$FA,$44,$24,$28 Line 7025: IF D$(L)<>"NO LEFT EAR........" THEN PLOT VAL "144",VAL "108": DRAW VAL "4",O,-PI: DRAW VAL "-6",VAL "-13".
B79A DEFB $4C,$29,$C9,$22,$4E,$4F,$20,$4C
B7A2 DEFB $45,$46,$54,$20,$45,$41,$52,$2E
B7AA DEFB $2E,$2E,$2E,$2E,$2E,$2E,$2E,$22
B7B2 DEFB $CB,$F6,$B0,$22,$31,$34,$34,$22
B7BA DEFB $2C,$B0,$22,$31,$30,$38,$22,$3A
B7C2 DEFB $FC,$B0,$22,$34,$22,$2C,$4F,$2C
B7CA DEFB $2D,$A7,$3A,$FC,$B0,$22,$2D,$36
B7D2 DEFB $22,$2C,$B0,$22,$2D,$31,$33,$22
B7DA DEFB $0D
B7DB DEFB $1B,$76,$33,$00,$F6,$B0,$22,$31 Line 7030: PLOT VAL "132",VAL "82": PLOT VAL "131",VAL "83": DRAW VAL "-7",O: PLOT VAL "123",VAL "82".
B7E3 DEFB $33,$32,$22,$2C,$B0,$22,$38,$32
B7EB DEFB $22,$3A,$F6,$B0,$22,$31,$33,$31
B7F3 DEFB $22,$2C,$B0,$22,$38,$33,$22,$3A
B7FB DEFB $FC,$B0,$22,$2D,$37,$22,$2C,$4F
B803 DEFB $3A,$F6,$B0,$22,$31,$32,$33,$22
B80B DEFB $2C,$B0,$22,$38,$32,$22,$0D
B812 DEFB $1B,$7B,$63,$00,$F6,$B0,$22,$31 Line 7035: PLOT VAL "126",VAL "90": PLOT VAL "128",VAL "90": PLOT VAL "127",VAL "92": PLOT VAL "127",VAL "95": PLOT VAL "127",VAL "97": PLOT VAL "127",VAL "98": PLOT VAL "127",VAL "101".
B81A DEFB $32,$36,$22,$2C,$B0,$22,$39,$30
B822 DEFB $22,$3A,$F6,$B0,$22,$31,$32,$38
B82A DEFB $22,$2C,$B0,$22,$39,$30,$22,$3A
B832 DEFB $F6,$B0,$22,$31,$32,$37,$22,$2C
B83A DEFB $B0,$22,$39,$32,$22,$3A,$F6,$B0
B842 DEFB $22,$31,$32,$37,$22,$2C,$B0,$22
B84A DEFB $39,$35,$22,$3A,$F6,$B0,$22,$31
B852 DEFB $32,$37,$22,$2C,$B0,$22,$39,$37
B85A DEFB $22,$3A,$F6,$B0,$22,$31,$32,$37
B862 DEFB $22,$2C,$B0,$22,$39,$38,$22,$3A
B86A DEFB $F6,$B0,$22,$31,$32,$37,$22,$2C
B872 DEFB $B0,$22,$31,$30,$31,$22,$0D
B879 DEFB $1B,$80,$53,$00,$F6,$B0,$22,$31 Line 7040: PLOT VAL "116",VAL "104": PLOT VAL "116",VAL "105": DRAW VAL "3",O: PLOT VAL "119",VAL "104": PLOT VAL "120",VAL "104": PLOT VAL "119",VAL "105".
B881 DEFB $31,$36,$22,$2C,$B0,$22,$31,$30
B889 DEFB $34,$22,$3A,$F6,$B0,$22,$31,$31
B891 DEFB $36,$22,$2C,$B0,$22,$31,$30,$35
B899 DEFB $22,$3A,$FC,$B0,$22,$33,$22,$2C
B8A1 DEFB $4F,$3A,$F6,$B0,$22,$31,$31,$39
B8A9 DEFB $22,$2C,$B0,$22,$31,$30,$34,$22
B8B1 DEFB $3A,$F6,$B0,$22,$31,$32,$30,$22
B8B9 DEFB $2C,$B0,$22,$31,$30,$34,$22,$3A
B8C1 DEFB $F6,$B0,$22,$31,$31,$39,$22,$2C
B8C9 DEFB $B0,$22,$31,$30,$35,$22,$0D
B8D0 DEFB $1B,$85,$54,$00,$F6,$B0,$22,$31 Line 7045: PLOT VAL "138",VAL "105": DRAW VAL "-3",O: PLOT VAL "136",VAL "104": DRAW VAL "-3",0: PLOT VAL "135",VAL "106": PLOT VAL "139",VAL "104".
B8D8 DEFB $33,$38,$22,$2C,$B0,$22,$31,$30
B8E0 DEFB $35,$22,$3A,$FC,$B0,$22,$2D,$33
B8E8 DEFB $22,$2C,$4F,$3A,$F6,$B0,$22,$31
B8F0 DEFB $33,$36,$22,$2C,$B0,$22,$31,$30
B8F8 DEFB $34,$22,$3A,$FC,$B0,$22,$2D,$33
B900 DEFB $22,$2C,$30,$0E,$00,$00,$00,$00
B908 DEFB $00,$3A,$F6,$B0,$22,$31,$33,$35
B910 DEFB $22,$2C,$B0,$22,$31,$30,$36,$22
B918 DEFB $3A,$F6,$B0,$22,$31,$33,$39,$22
B920 DEFB $2C,$B0,$22,$31,$30,$34,$22,$0D
B928 DEFB $1B,$8A,$4C,$00,$F6,$B0,$22,$31 Line 7050: PLOT VAL "134",VAL "101": DRAW VAL "3",O: PLOT VAL "133",VAL "102": PLOT VAL "123",VAL "102": PLOT VAL "119",VAL "101": DRAW VAL "3",O.
B930 DEFB $33,$34,$22,$2C,$B0,$22,$31,$30
B938 DEFB $31,$22,$3A,$FC,$B0,$22,$33,$22
B940 DEFB $2C,$4F,$3A,$F6,$B0,$22,$31,$33
B948 DEFB $33,$22,$2C,$B0,$22,$31,$30,$32
B950 DEFB $22,$3A,$F6,$B0,$22,$31,$32,$33
B958 DEFB $22,$2C,$B0,$22,$31,$30,$32,$22
B960 DEFB $3A,$F6,$B0,$22,$31,$31,$39,$22
B968 DEFB $2C,$B0,$22,$31,$30,$31,$22,$3A
B970 DEFB $FC,$B0,$22,$33,$22,$2C,$4F,$0D
B978 DEFB $1B,$8F,$D3,$00,$FA,$44,$24,$28 Line 7055: IF D$(L)<>"NO EYEBROWS........" THEN PLOT VAL "132",VAL "105": PLOT VAL "131",VAL "105": PLOT VAL "131",VAL "104": PLOT VAL "135",VAL "107": DRAW VAL "4",O: PLOT VAL "132",VAL "106": DRAW VAL "4",O: PLOT VAL "123",VAL "104": PLOT VAL "123",VAL "105": PLOT VAL "122",VAL "105": PLOT VAL "119",VAL "106": DRAW VAL "4",O: PLOT VAL "116",VAL "107": DRAW VAL "5",O.
B980 DEFB $4C,$29,$C9,$22,$4E,$4F,$20,$45
B988 DEFB $59,$45,$42,$52,$4F,$57,$53,$2E
B990 DEFB $2E,$2E,$2E,$2E,$2E,$2E,$2E,$22
B998 DEFB $CB,$F6,$B0,$22,$31,$33,$32,$22
B9A0 DEFB $2C,$B0,$22,$31,$30,$35,$22,$3A
B9A8 DEFB $F6,$B0,$22,$31,$33,$31,$22,$2C
B9B0 DEFB $B0,$22,$31,$30,$35,$22,$3A,$F6
B9B8 DEFB $B0,$22,$31,$33,$31,$22,$2C,$B0
B9C0 DEFB $22,$31,$30,$34,$22,$3A,$F6,$B0
B9C8 DEFB $22,$31,$33,$35,$22,$2C,$B0,$22
B9D0 DEFB $31,$30,$37,$22,$3A,$FC,$B0,$22
B9D8 DEFB $34,$22,$2C,$4F,$3A,$F6,$B0,$22
B9E0 DEFB $31,$33,$32,$22,$2C,$B0,$22,$31
B9E8 DEFB $30,$36,$22,$3A,$FC,$B0,$22,$34
B9F0 DEFB $22,$2C,$4F,$3A,$F6,$B0,$22,$31
B9F8 DEFB $32,$33,$22,$2C,$B0,$22,$31,$30
BA00 DEFB $34,$22,$3A,$F6,$B0,$22,$31,$32
BA08 DEFB $33,$22,$2C,$B0,$22,$31,$30,$35
BA10 DEFB $22,$3A,$F6,$B0,$22,$31,$32,$32
BA18 DEFB $22,$2C,$B0,$22,$31,$30,$35,$22
BA20 DEFB $3A,$F6,$B0,$22,$31,$31,$39,$22
BA28 DEFB $2C,$B0,$22,$31,$30,$36,$22,$3A
BA30 DEFB $FC,$B0,$22,$34,$22,$2C,$4F,$3A
BA38 DEFB $F6,$B0,$22,$31,$31,$36,$22,$2C
BA40 DEFB $B0,$22,$31,$30,$37,$22,$3A,$FC
BA48 DEFB $B0,$22,$35,$22,$2C,$4F,$0D
BA4F DEFB $1B,$94,$8A,$00,$F6,$B0,$22,$31 Line 7060: PLOT VAL "114",VAL "95": DRAW O,VAL "16": PLOT VAL "113",VAL "98": DRAW O,VAL "13": PLOT VAL "112",VAL "105": DRAW O,VAL "7": PLOT VAL "142",VAL "96": DRAW O,VAL "15": PLOT VAL "143",VAL "98": DRAW O,VAL "13": PLOT VAL "144",VAL "105": DRAW O,VAL "7".
BA57 DEFB $31,$34,$22,$2C,$B0,$22,$39,$35
BA5F DEFB $22,$3A,$FC,$4F,$2C,$B0,$22,$31
BA67 DEFB $36,$22,$3A,$F6,$B0,$22,$31,$31
BA6F DEFB $33,$22,$2C,$B0,$22,$39,$38,$22
BA77 DEFB $3A,$FC,$4F,$2C,$B0,$22,$31,$33
BA7F DEFB $22,$3A,$F6,$B0,$22,$31,$31,$32
BA87 DEFB $22,$2C,$B0,$22,$31,$30,$35,$22
BA8F DEFB $3A,$FC,$4F,$2C,$B0,$22,$37,$22
BA97 DEFB $3A,$F6,$B0,$22,$31,$34,$32,$22
BA9F DEFB $2C,$B0,$22,$39,$36,$22,$3A,$FC
BAA7 DEFB $4F,$2C,$B0,$22,$31,$35,$22,$3A
BAAF DEFB $F6,$B0,$22,$31,$34,$33,$22,$2C
BAB7 DEFB $B0,$22,$39,$38,$22,$3A,$FC,$4F
BABF DEFB $2C,$B0,$22,$31,$33,$22,$3A,$F6
BAC7 DEFB $B0,$22,$31,$34,$34,$22,$2C,$B0
BACF DEFB $22,$31,$30,$35,$22,$3A,$FC,$4F
BAD7 DEFB $2C,$B0,$22,$37,$22,$0D
BADD DEFB $1B,$99,$B1,$01,$F6,$31,$33,$38 Line 7065: PLOT 138,70: DRAW O,10: PLOT 117,70: DRAW O,11: PLOT 100,64: DRAW 14,O: DRAW O,6: PLOT 116,71: PLOT 115,71: DRAW 8,-4: DRAW O,-9: PLOT 121,66: PLOT 120,65: DRAW O,-3: PLOT 119,61: PLOT 118,61: DRAW -3,3: PLOT 132,58: DRAW O,9: DRAW 7,3: PLOT 133,67: DRAW 3,-6: DRAW 4,3: DRAW O,5: PLOT 140,64: DRAW 12,O.
BAE5 DEFB $0E,$00,$00,$8A,$00,$00,$2C,$37
BAED DEFB $30,$0E,$00,$00,$46,$00,$00,$3A
BAF5 DEFB $FC,$4F,$2C,$31,$30,$0E,$00,$00
BAFD DEFB $0A,$00,$00,$3A,$F6,$31,$31,$37
BB05 DEFB $0E,$00,$00,$75,$00,$00,$2C,$37
BB0D DEFB $30,$0E,$00,$00,$46,$00,$00,$3A
BB15 DEFB $FC,$4F,$2C,$31,$31,$0E,$00,$00
BB1D DEFB $0B,$00,$00,$3A,$F6,$31,$30,$30
BB25 DEFB $0E,$00,$00,$64,$00,$00,$2C,$36
BB2D DEFB $34,$0E,$00,$00,$40,$00,$00,$3A
BB35 DEFB $FC,$31,$34,$0E,$00,$00,$0E,$00
BB3D DEFB $00,$2C,$4F,$3A,$FC,$4F,$2C,$36
BB45 DEFB $0E,$00,$00,$06,$00,$00,$3A,$F6
BB4D DEFB $31,$31,$36,$0E,$00,$00,$74,$00
BB55 DEFB $00,$2C,$37,$31,$0E,$00,$00,$47
BB5D DEFB $00,$00,$3A,$F6,$31,$31,$35,$0E
BB65 DEFB $00,$00,$73,$00,$00,$2C,$37,$31
BB6D DEFB $0E,$00,$00,$47,$00,$00,$3A,$FC
BB75 DEFB $38,$0E,$00,$00,$08,$00,$00,$2C
BB7D DEFB $2D,$34,$0E,$00,$00,$04,$00,$00
BB85 DEFB $3A,$FC,$4F,$2C,$2D,$39,$0E,$00
BB8D DEFB $00,$09,$00,$00,$3A,$F6,$31,$32
BB95 DEFB $31,$0E,$00,$00,$79,$00,$00,$2C
BB9D DEFB $36,$36,$0E,$00,$00,$42,$00,$00
BBA5 DEFB $3A,$F6,$31,$32,$30,$0E,$00,$00
BBAD DEFB $78,$00,$00,$2C,$36,$35,$0E,$00
BBB5 DEFB $00,$41,$00,$00,$3A,$FC,$4F,$2C
BBBD DEFB $2D,$33,$0E,$00,$00,$03,$00,$00
BBC5 DEFB $3A,$F6,$31,$31,$39,$0E,$00,$00
BBCD DEFB $77,$00,$00,$2C,$36,$31,$0E,$00
BBD5 DEFB $00,$3D,$00,$00,$3A,$F6,$31,$31
BBDD DEFB $38,$0E,$00,$00,$76,$00,$00,$2C
BBE5 DEFB $36,$31,$0E,$00,$00,$3D,$00,$00
BBED DEFB $3A,$FC,$2D,$33,$0E,$00,$00,$03
BBF5 DEFB $00,$00,$2C,$33,$0E,$00,$00,$03
BBFD DEFB $00,$00,$3A,$F6,$31,$33,$32,$0E
BC05 DEFB $00,$00,$84,$00,$00,$2C,$35,$38
BC0D DEFB $0E,$00,$00,$3A,$00,$00,$3A,$FC
BC15 DEFB $4F,$2C,$39,$0E,$00,$00,$09,$00
BC1D DEFB $00,$3A,$FC,$37,$0E,$00,$00,$07
BC25 DEFB $00,$00,$2C,$33,$0E,$00,$00,$03
BC2D DEFB $00,$00,$3A,$F6,$31,$33,$33,$0E
BC35 DEFB $00,$00,$85,$00,$00,$2C,$36,$37
BC3D DEFB $0E,$00,$00,$43,$00,$00,$3A,$FC
BC45 DEFB $33,$0E,$00,$00,$03,$00,$00,$2C
BC4D DEFB $2D,$36,$0E,$00,$00,$06,$00,$00
BC55 DEFB $3A,$FC,$34,$0E,$00,$00,$04,$00
BC5D DEFB $00,$2C,$33,$0E,$00,$00,$03,$00
BC65 DEFB $00,$3A,$FC,$4F,$2C,$35,$0E,$00
BC6D DEFB $00,$05,$00,$00,$3A,$F6,$31,$34
BC75 DEFB $30,$0E,$00,$00,$8C,$00,$00,$2C
BC7D DEFB $36,$34,$0E,$00,$00,$40,$00,$00
BC85 DEFB $3A,$FC,$31,$32,$0E,$00,$00,$0C
BC8D DEFB $00,$00,$2C,$4F,$0D
BC92 DEFB $1B,$9E,$42,$00,$FA,$44,$24,$28 Line 7070: IF D$(L)="SCAR ON RIGHT CHEEK" THEN PLOT 119,89: DRAW 3,7.
BC9A DEFB $4C,$29,$3D,$22,$53,$43,$41,$52
BCA2 DEFB $20,$4F,$4E,$20,$52,$49,$47,$48
BCAA DEFB $54,$20,$43,$48,$45,$45,$4B,$22
BCB2 DEFB $CB,$F6,$31,$31,$39,$0E,$00,$00
BCBA DEFB $77,$00,$00,$2C,$38,$39,$0E,$00
BCC2 DEFB $00,$59,$00,$00,$3A,$FC,$33,$0E
BCCA DEFB $00,$00,$03,$00,$00,$2C,$37,$0E
BCD2 DEFB $00,$00,$07,$00,$00,$0D
BCD8 DEFB $1B,$A3,$43,$00,$FA,$44,$24,$28 Line 7075: IF D$(L)="SCAR ON LEFT CHEEK." THEN PLOT 136,89: DRAW -3,7.
BCE0 DEFB $4C,$29,$3D,$22,$53,$43,$41,$52
BCE8 DEFB $20,$4F,$4E,$20,$4C,$45,$46,$54
BCF0 DEFB $20,$43,$48,$45,$45,$4B,$2E,$22
BCF8 DEFB $CB,$F6,$31,$33,$36,$0E,$00,$00
BD00 DEFB $88,$00,$00,$2C,$38,$39,$0E,$00
BD08 DEFB $00,$59,$00,$00,$3A,$FC,$2D,$33
BD10 DEFB $0E,$00,$00,$03,$00,$00,$2C,$37
BD18 DEFB $0E,$00,$00,$07,$00,$00,$0D
BD1F DEFB $1B,$A8,$71,$00,$FA,$44,$24,$28 Line 7080: IF D$(L)="A LEFT EARING......" THEN PLOT 147,104: PLOT 148,103: PLOT 148,102: PLOT 147,101.
BD27 DEFB $4C,$29,$3D,$22,$41,$20,$4C,$45
BD2F DEFB $46,$54,$20,$45,$41,$52,$49,$4E
BD37 DEFB $47,$2E,$2E,$2E,$2E,$2E,$2E,$22
BD3F DEFB $CB,$F6,$31,$34,$37,$0E,$00,$00
BD47 DEFB $93,$00,$00,$2C,$31,$30,$34,$0E
BD4F DEFB $00,$00,$68,$00,$00,$3A,$F6,$31
BD57 DEFB $34,$38,$0E,$00,$00,$94,$00,$00
BD5F DEFB $2C,$31,$30,$33,$0E,$00,$00,$67
BD67 DEFB $00,$00,$3A,$F6,$31,$34,$38,$0E
BD6F DEFB $00,$00,$94,$00,$00,$2C,$31,$30
BD77 DEFB $32,$0E,$00,$00,$66,$00,$00,$3A
BD7F DEFB $F6,$31,$34,$37,$0E,$00,$00,$93
BD87 DEFB $00,$00,$2C,$31,$30,$31,$0E,$00
BD8F DEFB $00,$65,$00,$00,$0D
BD94 DEFB $1B,$AD,$71,$00,$FA,$44,$24,$28 Line 7085: IF D$(L)="A RIGHT EARING....." THEN PLOT 109,103: PLOT 109,101: PLOT 108,102: PLOT 108,103.
BD9C DEFB $4C,$29,$3D,$22,$41,$20,$52,$49
BDA4 DEFB $47,$48,$54,$20,$45,$41,$52,$49
BDAC DEFB $4E,$47,$2E,$2E,$2E,$2E,$2E,$22
BDB4 DEFB $CB,$F6,$31,$30,$39,$0E,$00,$00
BDBC DEFB $6D,$00,$00,$2C,$31,$30,$33,$0E
BDC4 DEFB $00,$00,$67,$00,$00,$3A,$F6,$31
BDCC DEFB $30,$39,$0E,$00,$00,$6D,$00,$00
BDD4 DEFB $2C,$31,$30,$31,$0E,$00,$00,$65
BDDC DEFB $00,$00,$3A,$F6,$31,$30,$38,$0E
BDE4 DEFB $00,$00,$6C,$00,$00,$2C,$31,$30
BDEC DEFB $32,$0E,$00,$00,$66,$00,$00,$3A
BDF4 DEFB $F6,$31,$30,$38,$0E,$00,$00,$6C
BDFC DEFB $00,$00,$2C,$31,$30,$33,$0E,$00
BE04 DEFB $00,$67,$00,$00,$0D
BE09 DEFB $1B,$B2,$2A,$01,$FA,$44,$24,$28 Line 7090: IF D$(L)="A MOUSTACHE........" THEN PLOT 128,87: DRAW 4,O: PLOT 128,86: DRAW 4,O: PLOT 128,85: DRAW 5,O: PLOT 134,84: PLOT 133,84: PLOT 126,87: DRAW -3,O: PLOT 126,86: DRAW -4,O: PLOT 126,85: DRAW -4,O: PLOT 121,84: PLOT 122,84.
BE11 DEFB $4C,$29,$3D,$22,$41,$20,$4D,$4F
BE19 DEFB $55,$53,$54,$41,$43,$48,$45,$2E
BE21 DEFB $2E,$2E,$2E,$2E,$2E,$2E,$2E,$22
BE29 DEFB $CB,$F6,$31,$32,$38,$0E,$00,$00
BE31 DEFB $80,$00,$00,$2C,$38,$37,$0E,$00
BE39 DEFB $00,$57,$00,$00,$3A,$FC,$34,$0E
BE41 DEFB $00,$00,$04,$00,$00,$2C,$4F,$3A
BE49 DEFB $F6,$31,$32,$38,$0E,$00,$00,$80
BE51 DEFB $00,$00,$2C,$38,$36,$0E,$00,$00
BE59 DEFB $56,$00,$00,$3A,$FC,$34,$0E,$00
BE61 DEFB $00,$04,$00,$00,$2C,$4F,$3A,$F6
BE69 DEFB $31,$32,$38,$0E,$00,$00,$80,$00
BE71 DEFB $00,$2C,$38,$35,$0E,$00,$00,$55
BE79 DEFB $00,$00,$3A,$FC,$35,$0E,$00,$00
BE81 DEFB $05,$00,$00,$2C,$4F,$3A,$F6,$31
BE89 DEFB $33,$34,$0E,$00,$00,$86,$00,$00
BE91 DEFB $2C,$38,$34,$0E,$00,$00,$54,$00
BE99 DEFB $00,$3A,$F6,$31,$33,$33,$0E,$00
BEA1 DEFB $00,$85,$00,$00,$2C,$38,$34,$0E
BEA9 DEFB $00,$00,$54,$00,$00,$3A,$F6,$31
BEB1 DEFB $32,$36,$0E,$00,$00,$7E,$00,$00
BEB9 DEFB $2C,$38,$37,$0E,$00,$00,$57,$00
BEC1 DEFB $00,$3A,$FC,$2D,$33,$0E,$00,$00
BEC9 DEFB $03,$00,$00,$2C,$4F,$3A,$F6,$31
BED1 DEFB $32,$36,$0E,$00,$00,$7E,$00,$00
BED9 DEFB $2C,$38,$36,$0E,$00,$00,$56,$00
BEE1 DEFB $00,$3A,$FC,$2D,$34,$0E,$00,$00
BEE9 DEFB $04,$00,$00,$2C,$4F,$3A,$F6,$31
BEF1 DEFB $32,$36,$0E,$00,$00,$7E,$00,$00
BEF9 DEFB $2C,$38,$35,$0E,$00,$00,$55,$00
BF01 DEFB $00,$3A,$FC,$2D,$34,$0E,$00,$00
BF09 DEFB $04,$00,$00,$2C,$4F,$3A,$F6,$31
BF11 DEFB $32,$31,$0E,$00,$00,$79,$00,$00
BF19 DEFB $2C,$38,$34,$0E,$00,$00,$54,$00
BF21 DEFB $00,$3A,$F6,$31,$32,$32,$0E,$00
BF29 DEFB $00,$7A,$00,$00,$2C,$38,$34,$0E
BF31 DEFB $00,$00,$54,$00,$00,$0D
BF37 DEFB $1B,$B7,$28,$01,$FA,$44,$24,$28 Line 7095: IF D$(L)="PATCH ON LEFT EYE.." THEN PLOT 132,101: DRAW 5,O: PLOT 132,102: DRAW 6,O: PLOT 132,103: DRAW 7,O: PLOT 132,104: DRAW 7,O: PLOT 129,105: DRAW 10,O: PLOT 133,106: DRAW 6,O: PLOT 135,107: DRAW 4,O: PLOT 140,108: PLOT 141,108.
BF3F DEFB $4C,$29,$3D,$22,$50,$41,$54,$43
BF47 DEFB $48,$20,$4F,$4E,$20,$4C,$45,$46
BF4F DEFB $54,$20,$45,$59,$45,$2E,$2E,$22
BF57 DEFB $CB,$F6,$31,$33,$32,$0E,$00,$00
BF5F DEFB $84,$00,$00,$2C,$31,$30,$31,$0E
BF67 DEFB $00,$00,$65,$00,$00,$3A,$FC,$35
BF6F DEFB $0E,$00,$00,$05,$00,$00,$2C,$4F
BF77 DEFB $3A,$F6,$31,$33,$32,$0E,$00,$00
BF7F DEFB $84,$00,$00,$2C,$31,$30,$32,$0E
BF87 DEFB $00,$00,$66,$00,$00,$3A,$FC,$36
BF8F DEFB $0E,$00,$00,$06,$00,$00,$2C,$4F
BF97 DEFB $3A,$F6,$31,$33,$32,$0E,$00,$00
BF9F DEFB $84,$00,$00,$2C,$31,$30,$33,$0E
BFA7 DEFB $00,$00,$67,$00,$00,$3A,$FC,$37
BFAF DEFB $0E,$00,$00,$07,$00,$00,$2C,$4F
BFB7 DEFB $3A,$F6,$31,$33,$32,$0E,$00,$00
BFBF DEFB $84,$00,$00,$2C,$31,$30,$34,$0E
BFC7 DEFB $00,$00,$68,$00,$00,$3A,$FC,$37
BFCF DEFB $0E,$00,$00,$07,$00,$00,$2C,$4F
BFD7 DEFB $3A,$F6,$31,$32,$39,$0E,$00,$00
BFDF DEFB $81,$00,$00,$2C,$31,$30,$35,$0E
BFE7 DEFB $00,$00,$69,$00,$00,$3A,$FC,$31
BFEF DEFB $30,$0E,$00,$00,$0A,$00,$00,$2C
BFF7 DEFB $4F,$3A,$F6,$31,$33,$33,$0E,$00
BFFF DEFB $00,$85,$00,$00,$2C,$31,$30,$36
C007 DEFB $0E,$00,$00,$6A,$00,$00,$3A,$FC
C00F DEFB $36,$0E,$00,$00,$06,$00,$00,$2C
C017 DEFB $4F,$3A,$F6,$31,$33,$35,$0E,$00
C01F DEFB $00,$87,$00,$00,$2C,$31,$30,$37
C027 DEFB $0E,$00,$00,$6B,$00,$00,$3A,$FC
C02F DEFB $34,$0E,$00,$00,$04,$00,$00,$2C
C037 DEFB $4F,$3A,$F6,$31,$34,$30,$0E,$00
C03F DEFB $00,$8C,$00,$00,$2C,$31,$30,$38
C047 DEFB $0E,$00,$00,$6C,$00,$00,$3A,$F6
C04F DEFB $31,$34,$31,$0E,$00,$00,$8D,$00
C057 DEFB $00,$2C,$31,$30,$38,$0E,$00,$00
C05F DEFB $6C,$00,$00,$0D
C063 DEFB $1B,$BC,$FE,$00,$FA,$44,$24,$28 Line 7100: IF D$(L)="PATCH ON RIGHT EYE." THEN PLOT 115,107: DRAW 6,O: PLOT 116,106: DRAW 10,O: PLOT 116,105: DRAW 7,O: PLOT 116,104: DRAW 7,O: PLOT 116,103: DRAW 7,O: PLOT 116,102: DRAW 7,O: PLOT 117,101: DRAW 5,O.
C06B DEFB $4C,$29,$3D,$22,$50,$41,$54,$43
C073 DEFB $48,$20,$4F,$4E,$20,$52,$49,$47
C07B DEFB $48,$54,$20,$45,$59,$45,$2E,$22
C083 DEFB $CB,$F6,$31,$31,$35,$0E,$00,$00
C08B DEFB $73,$00,$00,$2C,$31,$30,$37,$0E
C093 DEFB $00,$00,$6B,$00,$00,$3A,$FC,$36
C09B DEFB $0E,$00,$00,$06,$00,$00,$2C,$4F
C0A3 DEFB $3A,$F6,$31,$31,$36,$0E,$00,$00
C0AB DEFB $74,$00,$00,$2C,$31,$30,$36,$0E
C0B3 DEFB $00,$00,$6A,$00,$00,$3A,$FC,$31
C0BB DEFB $30,$0E,$00,$00,$0A,$00,$00,$2C
C0C3 DEFB $4F,$3A,$F6,$31,$31,$36,$0E,$00
C0CB DEFB $00,$74,$00,$00,$2C,$31,$30,$35
C0D3 DEFB $0E,$00,$00,$69,$00,$00,$3A,$FC
C0DB DEFB $37,$0E,$00,$00,$07,$00,$00,$2C
C0E3 DEFB $4F,$3A,$F6,$31,$31,$36,$0E,$00
C0EB DEFB $00,$74,$00,$00,$2C,$31,$30,$34
C0F3 DEFB $0E,$00,$00,$68,$00,$00,$3A,$FC
C0FB DEFB $37,$0E,$00,$00,$07,$00,$00,$2C
C103 DEFB $4F,$3A,$F6,$31,$31,$36,$0E,$00
C10B DEFB $00,$74,$00,$00,$2C,$31,$30,$33
C113 DEFB $0E,$00,$00,$67,$00,$00,$3A,$FC
C11B DEFB $37,$0E,$00,$00,$07,$00,$00,$2C
C123 DEFB $4F,$3A,$F6,$31,$31,$36,$0E,$00
C12B DEFB $00,$74,$00,$00,$2C,$31,$30,$32
C133 DEFB $0E,$00,$00,$66,$00,$00,$3A,$FC
C13B DEFB $37,$0E,$00,$00,$07,$00,$00,$2C
C143 DEFB $4F,$3A,$F6,$31,$31,$37,$0E,$00
C14B DEFB $00,$75,$00,$00,$2C,$31,$30,$31
C153 DEFB $0E,$00,$00,$65,$00,$00,$3A,$FC
C15B DEFB $35,$0E,$00,$00,$05,$00,$00,$2C
C163 DEFB $4F,$0D
C165 DEFB $1B,$C1,$49,$00,$F1,$4C,$24,$3D Line 7105: LET L$="SEE PICTURE": IF D$(L)="A LIMP IN LEFT LEG." THEN LET L$="LIMPS WITH LEFT LEG".
C16D DEFB $22,$53,$45,$45,$20,$50,$49,$43
C175 DEFB $54,$55,$52,$45,$22,$3A,$FA,$44
C17D DEFB $24,$28,$4C,$29,$3D,$22,$41,$20
C185 DEFB $4C,$49,$4D,$50,$20,$49,$4E,$20
C18D DEFB $4C,$45,$46,$54,$20,$4C,$45,$47
C195 DEFB $2E,$22,$CB,$F1,$4C,$24,$3D,$22
C19D DEFB $4C,$49,$4D,$50,$53,$20,$57,$49
C1A5 DEFB $54,$48,$20,$4C,$45,$46,$54,$20
C1AD DEFB $4C,$45,$47,$22,$0D
C1B2 DEFB $1B,$C3,$38,$00,$FA,$44,$24,$28 Line 7107: IF D$(L)="A LIMP IN RIGHT LEG" THEN LET L$="LIMPS WITH RIGHT LEG".
C1BA DEFB $4C,$29,$3D,$22,$41,$20,$4C,$49
C1C2 DEFB $4D,$50,$20,$49,$4E,$20,$52,$49
C1CA DEFB $47,$48,$54,$20,$4C,$45,$47,$22
C1D2 DEFB $CB,$F1,$4C,$24,$3D,$22,$4C,$49
C1DA DEFB $4D,$50,$53,$20,$57,$49,$54,$48
C1E2 DEFB $20,$52,$49,$47,$48,$54,$20,$4C
C1EA DEFB $45,$47,$22,$0D
C1EE DEFB $1B,$C6,$96,$00,$FA,$4C,$3D,$52 Line 7110: IF L=R THEN PRINT AT 15,9;B$(L);TAB 6;"ALIAS-THE SUNDANCE KID"," FOR-MURDER:HORSE AND CATTLE RUSTLING:BANK AND TRAIN ROBBERY",,,"DESCRIPTION-";L$.
C1F6 DEFB $CB,$F5,$AC,$31,$35,$0E,$00,$00
C1FE DEFB $0F,$00,$00,$2C,$39,$0E,$00,$00
C206 DEFB $09,$00,$00,$3B,$42,$24,$28,$4C
C20E DEFB $29,$3B,$AD,$36,$0E,$00,$00,$06
C216 DEFB $00,$00,$3B,$22,$41,$4C,$49,$41
C21E DEFB $53,$2D,$54,$48,$45,$20,$53,$55
C226 DEFB $4E,$44,$41,$4E,$43,$45,$20,$4B
C22E DEFB $49,$44,$22,$2C,$22,$20,$20,$46
C236 DEFB $4F,$52,$2D,$4D,$55,$52,$44,$45
C23E DEFB $52,$3A,$48,$4F,$52,$53,$45,$20
C246 DEFB $41,$4E,$44,$20,$43,$41,$54,$54
C24E DEFB $4C,$45,$20,$20,$20,$52,$55,$53
C256 DEFB $54,$4C,$49,$4E,$47,$3A,$42,$41
C25E DEFB $4E,$4B,$20,$41,$4E,$44,$20,$54
C266 DEFB $52,$41,$49,$4E,$20,$52,$4F,$42
C26E DEFB $42,$45,$52,$59,$22,$2C,$2C,$2C
C276 DEFB $22,$44,$45,$53,$43,$52,$49,$50
C27E DEFB $54,$49,$4F,$4E,$2D,$22,$3B,$4C
C286 DEFB $24,$0D
C288 DEFB $1B,$CB,$94,$00,$FA,$4C,$3D,$33 Line 7115: IF L=3 THEN PRINT AT 15,10;B$(L);TAB 2;"ALIAS-KID CURRY:TOM CAPEHART: BOB NEVILLES";TAB 3;"FOR-MURDER:TRAIN ROBBERY",,,"DESCRIPTION-";L$.
C290 DEFB $0E,$00,$00,$03,$00,$00,$CB,$F5
C298 DEFB $AC,$31,$35,$0E,$00,$00,$0F,$00
C2A0 DEFB $00,$2C,$31,$30,$0E,$00,$00,$0A
C2A8 DEFB $00,$00,$3B,$42,$24,$28,$4C,$29
C2B0 DEFB $3B,$AD,$32,$0E,$00,$00,$02,$00
C2B8 DEFB $00,$3B,$22,$41,$4C,$49,$41,$53
C2C0 DEFB $2D,$4B,$49,$44,$20,$43,$55,$52
C2C8 DEFB $52,$59,$3A,$54,$4F,$4D,$20,$43
C2D0 DEFB $41,$50,$45,$48,$41,$52,$54,$3A
C2D8 DEFB $20,$20,$42,$4F,$42,$20,$4E,$45
C2E0 DEFB $56,$49,$4C,$4C,$45,$53,$22,$3B
C2E8 DEFB $AD,$33,$0E,$00,$00,$03,$00,$00
C2F0 DEFB $3B,$22,$46,$4F,$52,$2D,$4D,$55
C2F8 DEFB $52,$44,$45,$52,$3A,$54,$52,$41
C300 DEFB $49,$4E,$20,$52,$4F,$42,$42,$45
C308 DEFB $52,$59,$22,$2C,$2C,$2C,$22,$44
C310 DEFB $45,$53,$43,$52,$49,$50,$54,$49
C318 DEFB $4F,$4E,$2D,$22,$3B,$4C,$24,$0D
C320 DEFB $1B,$D0,$94,$00,$FA,$4C,$3D,$35 Line 7120: IF L=5 THEN PRINT AT 15,9;B$(L): PRINT " ALIAS-THE TALL TEXAN:J.D.ROSE:","FOR:CATTLE RUSTLING:MURDER:FRAUDBANK AND TRAIN ROBBERY",,,"DESCRIPTION-";L$.
C328 DEFB $0E,$00,$00,$05,$00,$00,$CB,$F5
C330 DEFB $AC,$31,$35,$0E,$00,$00,$0F,$00
C338 DEFB $00,$2C,$39,$0E,$00,$00,$09,$00
C340 DEFB $00,$3B,$42,$24,$28,$4C,$29,$3A
C348 DEFB $F5,$22,$20,$41,$4C,$49,$41,$53
C350 DEFB $2D,$54,$48,$45,$20,$54,$41,$4C
C358 DEFB $4C,$20,$54,$45,$58,$41,$4E,$3A
C360 DEFB $4A,$2E,$44,$2E,$52,$4F,$53,$45
C368 DEFB $3A,$22,$2C,$22,$46,$4F,$52,$3A
C370 DEFB $43,$41,$54,$54,$4C,$45,$20,$52
C378 DEFB $55,$53,$54,$4C,$49,$4E,$47,$3A
C380 DEFB $4D,$55,$52,$44,$45,$52,$3A,$46
C388 DEFB $52,$41,$55,$44,$42,$41,$4E,$4B
C390 DEFB $20,$41,$4E,$44,$20,$54,$52,$41
C398 DEFB $49,$4E,$20,$52,$4F,$42,$42,$45
C3A0 DEFB $52,$59,$22,$2C,$2C,$2C,$22,$44
C3A8 DEFB $45,$53,$43,$52,$49,$50,$54,$49
C3B0 DEFB $4F,$4E,$2D,$22,$3B,$4C,$24,$0D
C3B8 DEFB $1B,$D5,$97,$00,$FA,$4C,$3D,$55 Line 7125: IF L=U THEN PRINT AT 15,10;B$(L)," ALIAS-BUTCH CASSIDY:JIM LOWE"," FOR-HORSE AND CATTLE RUSTLING"," TRAIN,BANK AND PAYROLL ROBBERY",,,"DESCRIPTION-";L$.
C3C0 DEFB $CB,$F5,$AC,$31,$35,$0E,$00,$00
C3C8 DEFB $0F,$00,$00,$2C,$31,$30,$0E,$00
C3D0 DEFB $00,$0A,$00,$00,$3B,$42,$24,$28
C3D8 DEFB $4C,$29,$2C,$22,$20,$20,$41,$4C
C3E0 DEFB $49,$41,$53,$2D,$42,$55,$54,$43
C3E8 DEFB $48,$20,$43,$41,$53,$53,$49,$44
C3F0 DEFB $59,$3A,$4A,$49,$4D,$20,$4C,$4F
C3F8 DEFB $57,$45,$22,$2C,$22,$20,$46,$4F
C400 DEFB $52,$2D,$48,$4F,$52,$53,$45,$20
C408 DEFB $41,$4E,$44,$20,$43,$41,$54,$54
C410 DEFB $4C,$45,$20,$52,$55,$53,$54,$4C
C418 DEFB $49,$4E,$47,$22,$2C,$22,$20,$54
C420 DEFB $52,$41,$49,$4E,$2C,$42,$41,$4E
C428 DEFB $4B,$20,$41,$4E,$44,$20,$50,$41
C430 DEFB $59,$52,$4F,$4C,$4C,$20,$52,$4F
C438 DEFB $42,$42,$45,$52,$59,$22,$2C,$2C
C440 DEFB $2C,$22,$44,$45,$53,$43,$52,$49
C448 DEFB $50,$54,$49,$4F,$4E,$2D,$22,$3B
C450 DEFB $4C,$24,$0D
C453 DEFB $1B,$DA,$99,$00,$FA,$4C,$3D,$34 Line 7130: IF L=4 THEN PRINT AT 15,12;B$(L)," ALIAS-WILLIAM MCGUINNNESS"," FOR-MURDER:PAYROLL ROBBERY"," HORSE AND CATTLE RUSTLING",,,"DESCRIPTION-";L$.
C45B DEFB $0E,$00,$00,$04,$00,$00,$CB,$F5
C463 DEFB $AC,$31,$35,$0E,$00,$00,$0F,$00
C46B DEFB $00,$2C,$31,$32,$0E,$00,$00,$0C
C473 DEFB $00,$00,$3B,$42,$24,$28,$4C,$29
C47B DEFB $2C,$22,$20,$20,$20,$20,$41,$4C
C483 DEFB $49,$41,$53,$2D,$57,$49,$4C,$4C
C48B DEFB $49,$41,$4D,$20,$4D,$43,$47,$55
C493 DEFB $49,$4E,$4E,$4E,$45,$53,$53,$22
C49B DEFB $2C,$22,$20,$20,$20,$46,$4F,$52
C4A3 DEFB $2D,$4D,$55,$52,$44,$45,$52,$3A
C4AB DEFB $50,$41,$59,$52,$4F,$4C,$4C,$20
C4B3 DEFB $52,$4F,$42,$42,$45,$52,$59,$22
C4BB DEFB $2C,$22,$20,$20,$20,$20,$48,$4F
C4C3 DEFB $52,$53,$45,$20,$41,$4E,$44,$20
C4CB DEFB $43,$41,$54,$54,$4C,$45,$20,$52
C4D3 DEFB $55,$53,$54,$4C,$49,$4E,$47,$22
C4DB DEFB $2C,$2C,$2C,$22,$44,$45,$53,$43
C4E3 DEFB $52,$49,$50,$54,$49,$4F,$4E,$2D
C4EB DEFB $22,$3B,$4C,$24,$0D
C4F0 DEFB $1B,$E4,$22,$00,$EE,$22,$20,$20 Line 7140: INPUT " PRESS ENTER TO CONTINUE"; LINE H$.
C4F8 DEFB $20,$50,$52,$45,$53,$53,$20,$45
C500 DEFB $4E,$54,$45,$52,$20,$54,$4F,$20
C508 DEFB $43,$4F,$4E,$54,$49,$4E,$55,$45
C510 DEFB $22,$3B,$CA,$48,$24,$0D
C516 DEFB $1B,$E9,$0B,$00,$EC,$35,$30,$31 Line 7145: GO TO 501.
C51E DEFB $0E,$00,$00,$F5,$01,$00,$0D
C525 DEFB $1D,$4C,$1F,$00,$F1,$43,$53,$3D Line 7500: LET CS=CS+VAL "50": LET TP=O: LET GF=O: LET L1=L.
C52D DEFB $43,$53,$2B,$B0,$22,$35,$30,$22
C535 DEFB $3A,$F1,$54,$50,$3D,$4F,$3A,$F1
C53D DEFB $47,$46,$3D,$4F,$3A,$F1,$4C,$31
C545 DEFB $3D,$4C,$0D
C548 DEFB $1D,$56,$24,$00,$F1,$4C,$3D,$BA Line 7510: LET L=INT (RND*5)+U: IF L=L1 THEN GO TO 7510.
C550 DEFB $28,$A5,$2A,$35,$0E,$00,$00,$05
C558 DEFB $00,$00,$29,$2B,$55,$3A,$FA,$4C
C560 DEFB $3D,$4C,$31,$CB,$EC,$37,$35,$31
C568 DEFB $30,$0E,$00,$00,$56,$1D,$00,$0D
C570 DEFB $1D,$5B,$14,$00,$FA,$56,$28,$4C Line 7515: IF V(L)<R THEN GO TO 7510.
C578 DEFB $29,$3C,$52,$CB,$EC,$37,$35,$31
C580 DEFB $30,$0E,$00,$00,$56,$1D,$00,$0D
C588 DEFB $1D,$60,$40,$00,$FA,$4C,$3D,$4D Line 7520: IF L=MB AND V(U)+V(R)+V(INT PI)+V(4)+V(5)>6 THEN GO TO 7510.
C590 DEFB $42,$C6,$56,$28,$55,$29,$2B,$56
C598 DEFB $28,$52,$29,$2B,$56,$28,$BA,$A7
C5A0 DEFB $29,$2B,$56,$28,$34,$0E,$00,$00
C5A8 DEFB $04,$00,$00,$29,$2B,$56,$28,$35
C5B0 DEFB $0E,$00,$00,$05,$00,$00,$29,$3E
C5B8 DEFB $36,$0E,$00,$00,$06,$00,$00,$CB
C5C0 DEFB $EC,$37,$35,$31,$30,$0E,$00,$00
C5C8 DEFB $56,$1D,$00,$0D
C5CC DEFB $1D,$65,$07,$00,$F1,$54,$4E,$3D Line 7525: LET TN=FL.
C5D4 DEFB $46,$4C,$0D
C5D7 DEFB $1D,$6A,$24,$00,$FA,$4A,$42,$3D Line 7530: IF JB=O AND RND*5>4 THEN GO TO 7540.
C5DF DEFB $4F,$C6,$A5,$2A,$35,$0E,$00,$00
C5E7 DEFB $05,$00,$00,$3E,$34,$0E,$00,$00
C5EF DEFB $04,$00,$00,$CB,$EC,$37,$35,$34
C5F7 DEFB $30,$0E,$00,$00,$74,$1D,$00,$0D
C5FF DEFB $1D,$6C,$22,$00,$F1,$49,$53,$3D Line 7532: LET IS=0: LET LM=LM+INT (RND*2)+U.
C607 DEFB $30,$0E,$00,$00,$00,$00,$00,$3A
C60F DEFB $F1,$4C,$4D,$3D,$4C,$4D,$2B,$BA
C617 DEFB $28,$A5,$2A,$32,$0E,$00,$00,$02
C61F DEFB $00,$00,$29,$2B,$55,$0D
C625 DEFB $1D,$6F,$02,$00,$FE,$0D Line 7535: RETURN.
C62B DEFB $1D,$74,$43,$00,$EB,$4E,$3D,$55 Line 7540: FOR N=U TO 5: IF V(N)=U THEN LET JB=N: LET R(N)=R(N)+50: LET V(N)=R: GO TO 7650.
C633 DEFB $CC,$35,$0E,$00,$00,$05,$00,$00
C63B DEFB $3A,$FA,$56,$28,$4E,$29,$3D,$55
C643 DEFB $CB,$F1,$4A,$42,$3D,$4E,$3A,$F1
C64B DEFB $52,$28,$4E,$29,$3D,$52,$28,$4E
C653 DEFB $29,$2B,$35,$30,$0E,$00,$00,$32
C65B DEFB $00,$00,$3A,$F1,$56,$28,$4E,$29
C663 DEFB $3D,$52,$3A,$EC,$37,$36,$35,$30
C66B DEFB $0E,$00,$00,$E2,$1D,$00,$0D
C672 DEFB $1D,$79,$03,$00,$F3,$4E,$0D Line 7545: NEXT N.
C679 DEFB $1D,$E2,$02,$00,$FE,$0D Line 7650: RETURN.
C67F DEFB $1D,$F2,$54,$00,$F1,$5A,$3D,$33 Line 7666: LET Z=3: BORDER U: PAPER U: CLS : PRINT TAB 6;"YOU ARE IN THE STORE": PRINT : FOR N=U TO 16: IF N>9 THEN LET Z=R.
C687 DEFB $0E,$00,$00,$03,$00,$00,$3A,$E7
C68F DEFB $55,$3A,$DA,$55,$3A,$FB,$3A,$F5
C697 DEFB $AD,$36,$0E,$00,$00,$06,$00,$00
C69F DEFB $3B,$22,$59,$4F,$55,$20,$41,$52
C6A7 DEFB $45,$20,$49,$4E,$20,$54,$48,$45
C6AF DEFB $20,$53,$54,$4F,$52,$45,$22,$3A
C6B7 DEFB $F5,$3A,$EB,$4E,$3D,$55,$CC,$31
C6BF DEFB $36,$0E,$00,$00,$10,$00,$00,$3A
C6C7 DEFB $FA,$4E,$3E,$39,$0E,$00,$00,$09
C6CF DEFB $00,$00,$CB,$F1,$5A,$3D,$52,$0D
C6D7 DEFB $1D,$F3,$29,$00,$D7,$2E,$31,$0E Line 7667: BEEP .1,N: PRINT TAB Z;N;") ";K$(N);"$";K(N): NEXT N.
C6DF DEFB $7D,$4C,$CC,$CC,$CC,$2C,$4E,$3A
C6E7 DEFB $F5,$AD,$5A,$3B,$4E,$3B,$22,$29
C6EF DEFB $20,$22,$3B,$4B,$24,$28,$4E,$29
C6F7 DEFB $3B,$22,$24,$22,$3B,$4B,$28,$4E
C6FF DEFB $29,$3A,$F3,$4E,$0D
C704 DEFB $1D,$F4,$2A,$00,$F5,$AC,$31,$39 Line 7668: PRINT AT 19,9;"YOU HAVE $";MU;" ": PRINT.
C70C DEFB $0E,$00,$00,$13,$00,$00,$2C,$39
C714 DEFB $0E,$00,$00,$09,$00,$00,$3B,$22
C71C DEFB $59,$4F,$55,$20,$48,$41,$56,$45
C724 DEFB $20,$24,$22,$3B,$4D,$55,$3B,$22
C72C DEFB $20,$20,$22,$3A,$F5,$0D
C732 DEFB $1D,$F5,$2D,$00,$F5,$DA,$32,$0E Line 7669: PRINT PAPER 2;" WHICH ITEMS DO YOU REQUIRE? ".
C73A DEFB $00,$00,$02,$00,$00,$3B,$22,$20
C742 DEFB $20,$57,$48,$49,$43,$48,$20,$49
C74A DEFB $54,$45,$4D,$53,$20,$44,$4F,$20
C752 DEFB $59,$4F,$55,$20,$52,$45,$51,$55
C75A DEFB $49,$52,$45,$3F,$20,$20,$20,$22
C762 DEFB $0D
C763 DEFB $1D,$F6,$59,$00,$EE,$22,$20,$20 Line 7670: INPUT " ENTER NUMBER (0 TO LEAVE) "; LINE E$: LET E$=E$+" ": IF CODE E$(U)>57 OR CODE E$(U)<48 THEN GO TO VAL "7670".
C76B DEFB $45,$4E,$54,$45,$52,$20,$4E,$55
C773 DEFB $4D,$42,$45,$52,$20,$28,$30,$20
C77B DEFB $54,$4F,$20,$4C,$45,$41,$56,$45
C783 DEFB $29,$20,$22,$3B,$CA,$45,$24,$3A
C78B DEFB $F1,$45,$24,$3D,$45,$24,$2B,$22
C793 DEFB $20,$22,$3A,$FA,$AF,$45,$24,$28
C79B DEFB $55,$29,$3E,$35,$37,$0E,$00,$00
C7A3 DEFB $39,$00,$00,$C5,$AF,$45,$24,$28
C7AB DEFB $55,$29,$3C,$34,$38,$0E,$00,$00
C7B3 DEFB $30,$00,$00,$CB,$EC,$B0,$22,$37
C7BB DEFB $36,$37,$30,$22,$0D
C7C0 DEFB $1D,$F8,$14,$00,$F1,$5A,$3D,$B0 Line 7672: LET Z=VAL E$: IF Z=O THEN GO TO VAL "500".
C7C8 DEFB $45,$24,$3A,$FA,$5A,$3D,$4F,$CB
C7D0 DEFB $EC,$B0,$22,$35,$30,$30,$22,$0D
C7D8 DEFB $1D,$FB,$15,$00,$FA,$5A,$3E,$31 Line 7675: IF Z>16 THEN GO TO VAL "7670".
C7E0 DEFB $36,$0E,$00,$00,$10,$00,$00,$CB
C7E8 DEFB $EC,$B0,$22,$37,$36,$37,$30,$22
C7F0 DEFB $0D
C7F1 DEFB $1E,$00,$34,$00,$D7,$2E,$32,$0E Line 7680: BEEP .2,Z: BEEP .1,Z*-U: PRINT PAPER 1;AT 21,U;S$.
C7F9 DEFB $7E,$4C,$CC,$CC,$CC,$2C,$5A,$3A
C801 DEFB $D7,$2E,$31,$0E,$7D,$4C,$CC,$CC
C809 DEFB $CC,$2C,$5A,$2A,$2D,$55,$3A,$F5
C811 DEFB $DA,$31,$0E,$00,$00,$01,$00,$00
C819 DEFB $3B,$AC,$32,$31,$0E,$00,$00,$15
C821 DEFB $00,$00,$2C,$55,$3B,$53,$24,$0D
C829 DEFB $1E,$01,$1B,$00,$FA,$5A,$3C,$35 Line 7681: IF Z<5 AND I(Z)=U THEN GO TO VAL "7685".
C831 DEFB $0E,$00,$00,$05,$00,$00,$C6,$49
C839 DEFB $28,$5A,$29,$3D,$55,$CB,$EC,$B0
C841 DEFB $22,$37,$36,$38,$35,$22,$0D
C848 DEFB $1E,$02,$1B,$00,$FA,$5A,$3D,$37 Line 7682: IF Z=7 AND I(Z)=U THEN GO TO VAL "7685".
C850 DEFB $0E,$00,$00,$07,$00,$00,$C6,$49
C858 DEFB $28,$5A,$29,$3D,$55,$CB,$EC,$B0
C860 DEFB $22,$37,$36,$38,$35,$22,$0D
C867 DEFB $1E,$03,$1B,$00,$FA,$5A,$3D,$39 Line 7683: IF Z=9 AND I(Z)=U THEN GO TO VAL "7685".
C86F DEFB $0E,$00,$00,$09,$00,$00,$C6,$49
C877 DEFB $28,$5A,$29,$3D,$55,$CB,$EC,$B0
C87F DEFB $22,$37,$36,$38,$35,$22,$0D
C886 DEFB $1E,$04,$09,$00,$EC,$B0,$22,$37 Line 7684: GO TO VAL "7686".
C88E DEFB $36,$38,$36,$22,$0D
C893 DEFB $1E,$05,$81,$00,$F5,$AC,$32,$31 Line 7685: PRINT AT 21,O;" YOU ALREADY HAVE ONE ": FOR N=-10 TO 30: BEEP .05,N: BEEP .05,N+R: NEXT N: PRINT AT 21,U;S$: GO TO 7668.
C89B DEFB $0E,$00,$00,$15,$00,$00,$2C,$4F
C8A3 DEFB $3B,$22,$20,$20,$20,$20,$20,$59
C8AB DEFB $4F,$55,$20,$41,$4C,$52,$45,$41
C8B3 DEFB $44,$59,$20,$48,$41,$56,$45,$20
C8BB DEFB $4F,$4E,$45,$20,$20,$20,$20,$20
C8C3 DEFB $20,$20,$22,$3A,$EB,$4E,$3D,$2D
C8CB DEFB $31,$30,$0E,$00,$00,$0A,$00,$00
C8D3 DEFB $CC,$33,$30,$0E,$00,$00,$1E,$00
C8DB DEFB $00,$3A,$D7,$2E,$30,$35,$0E,$7C
C8E3 DEFB $4C,$CC,$CC,$CC,$2C,$4E,$3A,$D7
C8EB DEFB $2E,$30,$35,$0E,$7C,$4C,$CC,$CC
C8F3 DEFB $CC,$2C,$4E,$2B,$52,$3A,$F3,$4E
C8FB DEFB $3A,$F5,$AC,$32,$31,$0E,$00,$00
C903 DEFB $15,$00,$00,$2C,$55,$3B,$53,$24
C90B DEFB $3A,$EC,$37,$36,$36,$38,$0E,$00
C913 DEFB $00,$F4,$1D,$00,$0D
C918 DEFB $1E,$06,$39,$00,$F5,$DA,$35,$0E Line 7686: PRINT PAPER 5;AT 21,O;" HOW MANY WOULD YOU LIKE? ".
C920 DEFB $00,$00,$05,$00,$00,$3B,$AC,$32
C928 DEFB $31,$0E,$00,$00,$15,$00,$00,$2C
C930 DEFB $4F,$3B,$22,$20,$20,$20,$20,$48
C938 DEFB $4F,$57,$20,$4D,$41,$4E,$59,$20
C940 DEFB $57,$4F,$55,$4C,$44,$20,$59,$4F
C948 DEFB $55,$20,$4C,$49,$4B,$45,$3F,$20
C950 DEFB $20,$20,$20,$22,$0D
C955 DEFB $1E,$07,$57,$00,$EE,$22,$20,$20 Line 7687: INPUT " ENTER QUANTITY REQUIRED "; LINE E$: LET E$=E$+" ": IF CODE E$(U)<47 OR CODE E$(U)>57 THEN GO TO VAL "7687".
C95D DEFB $45,$4E,$54,$45,$52,$20,$51,$55
C965 DEFB $41,$4E,$54,$49,$54,$59,$20,$52
C96D DEFB $45,$51,$55,$49,$52,$45,$44,$20
C975 DEFB $22,$3B,$CA,$45,$24,$3A,$F1,$45
C97D DEFB $24,$3D,$45,$24,$2B,$22,$20,$22
C985 DEFB $3A,$FA,$AF,$45,$24,$28,$55,$29
C98D DEFB $3C,$34,$37,$0E,$00,$00,$2F,$00
C995 DEFB $00,$C5,$AF,$45,$24,$28,$55,$29
C99D DEFB $3E,$35,$37,$0E,$00,$00,$39,$00
C9A5 DEFB $00,$CB,$EC,$B0,$22,$37,$36,$38
C9AD DEFB $37,$22,$0D
C9B0 DEFB $1E,$0A,$15,$00,$F1,$51,$3D,$B0 Line 7690: LET Q=VAL E$: IF Q<=O THEN GO TO VAL "7668".
C9B8 DEFB $45,$24,$3A,$FA,$51,$C7,$4F,$CB
C9C0 DEFB $EC,$B0,$22,$37,$36,$36,$38,$22
C9C8 DEFB $0D
C9C9 DEFB $1E,$0B,$18,$00,$FA,$5A,$3C,$35 Line 7691: IF Z<5 AND Q>U THEN GO TO VAL "7695".
C9D1 DEFB $0E,$00,$00,$05,$00,$00,$C6,$51
C9D9 DEFB $3E,$55,$CB,$EC,$B0,$22,$37,$36
C9E1 DEFB $39,$35,$22,$0D
C9E5 DEFB $1E,$0C,$18,$00,$FA,$5A,$3D,$37 Line 7692: IF Z=7 AND Q>U THEN GO TO VAL "7695".
C9ED DEFB $0E,$00,$00,$07,$00,$00,$C6,$51
C9F5 DEFB $3E,$55,$CB,$EC,$B0,$22,$37,$36
C9FD DEFB $39,$35,$22,$0D
CA01 DEFB $1E,$0D,$18,$00,$FA,$5A,$3D,$39 Line 7693: IF Z=9 AND Q>U THEN GO TO VAL "7695".
CA09 DEFB $0E,$00,$00,$09,$00,$00,$C6,$51
CA11 DEFB $3E,$55,$CB,$EC,$B0,$22,$37,$36
CA19 DEFB $39,$35,$22,$0D
CA1D DEFB $1E,$0E,$09,$00,$EC,$B0,$22,$37 Line 7694: GO TO VAL "7696".
CA25 DEFB $36,$39,$36,$22,$0D
CA2A DEFB $1E,$0F,$81,$00,$F5,$AC,$32,$31 Line 7695: PRINT AT 21,O;" YOU CAN ONLY HAVE ONE ": FOR N=-10 TO 30: BEEP .05,N: BEEP .05,N+R: NEXT N: PRINT AT 21,U;S$: GO TO 7668.
CA32 DEFB $0E,$00,$00,$15,$00,$00,$2C,$4F
CA3A DEFB $3B,$22,$20,$20,$20,$20,$20,$59
CA42 DEFB $4F,$55,$20,$43,$41,$4E,$20,$4F
CA4A DEFB $4E,$4C,$59,$20,$48,$41,$56,$45
CA52 DEFB $20,$4F,$4E,$45,$20,$20,$20,$20
CA5A DEFB $20,$20,$22,$3A,$EB,$4E,$3D,$2D
CA62 DEFB $31,$30,$0E,$00,$00,$0A,$00,$00
CA6A DEFB $CC,$33,$30,$0E,$00,$00,$1E,$00
CA72 DEFB $00,$3A,$D7,$2E,$30,$35,$0E,$7C
CA7A DEFB $4C,$CC,$CC,$CC,$2C,$4E,$3A,$D7
CA82 DEFB $2E,$30,$35,$0E,$7C,$4C,$CC,$CC
CA8A DEFB $CC,$2C,$4E,$2B,$52,$3A,$F3,$4E
CA92 DEFB $3A,$F5,$AC,$32,$31,$0E,$00,$00
CA9A DEFB $15,$00,$00,$2C,$55,$3B,$53,$24
CAA2 DEFB $3A,$EC,$37,$36,$36,$38,$0E,$00
CAAA DEFB $00,$F4,$1D,$00,$0D
CAAF DEFB $1E,$10,$54,$00,$FA,$4D,$55,$3C Line 7696: IF MU<Q*K(Z) THEN PRINT FLASH U;AT 21,U;" YOU CAN'T AFFORD IT! ": GO SUB 9231: GO TO 7668.
CAB7 DEFB $51,$2A,$4B,$28,$5A,$29,$CB,$F5
CABF DEFB $DB,$55,$3B,$AC,$32,$31,$0E,$00
CAC7 DEFB $00,$15,$00,$00,$2C,$55,$3B,$22
CACF DEFB $20,$20,$20,$20,$20,$20,$59,$4F
CAD7 DEFB $55,$20,$43,$41,$4E,$27,$54,$20
CADF DEFB $41,$46,$46,$4F,$52,$44,$20,$49
CAE7 DEFB $54,$21,$20,$20,$20,$20,$22,$3A
CAEF DEFB $ED,$39,$32,$33,$31,$0E,$00,$00
CAF7 DEFB $0F,$24,$00,$3A,$EC,$37,$36,$36
CAFF DEFB $38,$0E,$00,$00,$F4,$1D,$00,$0D
CB07 DEFB $1E,$14,$4C,$00,$FA,$5A,$3D,$38 Line 7700: IF Z=8 OR Z=6 OR Z=5 THEN LET I(Z)=I(Z)+Q*50: LET MU=MU-Q*K(Z): GO TO VAL "7710".
CB0F DEFB $0E,$00,$00,$08,$00,$00,$C5,$5A
CB17 DEFB $3D,$36,$0E,$00,$00,$06,$00,$00
CB1F DEFB $C5,$5A,$3D,$35,$0E,$00,$00,$05
CB27 DEFB $00,$00,$CB,$F1,$49,$28,$5A,$29
CB2F DEFB $3D,$49,$28,$5A,$29,$2B,$51,$2A
CB37 DEFB $35,$30,$0E,$00,$00,$32,$00,$00
CB3F DEFB $3A,$F1,$4D,$55,$3D,$4D,$55,$2D
CB47 DEFB $51,$2A,$4B,$28,$5A,$29,$3A,$EC
CB4F DEFB $B0,$22,$37,$37,$31,$30,$22,$0D
CB57 DEFB $1E,$19,$1B,$00,$F1,$4D,$55,$3D Line 7705: LET MU=MU-Q*K(Z): LET I(Z)=I(Z)+Q.
CB5F DEFB $4D,$55,$2D,$51,$2A,$4B,$28,$5A
CB67 DEFB $29,$3A,$F1,$49,$28,$5A,$29,$3D
CB6F DEFB $49,$28,$5A,$29,$2B,$51,$0D
CB76 DEFB $1E,$1E,$2F,$00,$D7,$2E,$33,$0E Line 7710: BEEP .3,20: BEEP .3,30: GO TO VAL "7668".
CB7E DEFB $7F,$19,$99,$99,$99,$2C,$32,$30
CB86 DEFB $0E,$00,$00,$14,$00,$00,$3A,$D7
CB8E DEFB $2E,$33,$0E,$7F,$19,$99,$99,$99
CB96 DEFB $2C,$33,$30,$0E,$00,$00,$1E,$00
CB9E DEFB $00,$3A,$EC,$B0,$22,$37,$36,$36
CBA6 DEFB $38,$22,$0D
CBA9 DEFB $1E,$82,$93,$00,$DA,$4F,$3A,$E7 Line 7810: PAPER O: BORDER O: CLS : PRINT PAPER 2;"STATUS OF ";N$: PRINT : PRINT "YOU HAVE $";MU: PRINT "YOUR COMBAT STRENGTH IS ";CS: PRINT : PRINT "YOU HAVE THE FOLLOWING:": FOR N=U TO 16: IF I(N)>O THEN PRINT K$(N);I(N).
CBB1 DEFB $4F,$3A,$FB,$3A,$F5,$DA,$32,$0E
CBB9 DEFB $00,$00,$02,$00,$00,$3B,$22,$53
CBC1 DEFB $54,$41,$54,$55,$53,$20,$4F,$46
CBC9 DEFB $20,$22,$3B,$4E,$24,$3A,$F5,$3A
CBD1 DEFB $F5,$22,$59,$4F,$55,$20,$48,$41
CBD9 DEFB $56,$45,$20,$24,$22,$3B,$4D,$55
CBE1 DEFB $3A,$F5,$22,$59,$4F,$55,$52,$20
CBE9 DEFB $43,$4F,$4D,$42,$41,$54,$20,$53
CBF1 DEFB $54,$52,$45,$4E,$47,$54,$48,$20
CBF9 DEFB $49,$53,$20,$22,$3B,$43,$53,$3A
CC01 DEFB $F5,$3A,$F5,$22,$59,$4F,$55,$20
CC09 DEFB $48,$41,$56,$45,$20,$54,$48,$45
CC11 DEFB $20,$46,$4F,$4C,$4C,$4F,$57,$49
CC19 DEFB $4E,$47,$3A,$22,$3A,$EB,$4E,$3D
CC21 DEFB $55,$CC,$31,$36,$0E,$00,$00,$10
CC29 DEFB $00,$00,$3A,$FA,$49,$28,$4E,$29
CC31 DEFB $3E,$4F,$CB,$F5,$4B,$24,$28,$4E
CC39 DEFB $29,$3B,$49,$28,$4E,$29,$0D
CC40 DEFB $1E,$8C,$50,$00,$F3,$4E,$3A,$D7 Line 7820: NEXT N: BEEP .5,6: BEEP .4,-6: INPUT "PRESS ENTER TO CONTINUE "; LINE H$: GO TO VAL "500".
CC48 DEFB $2E,$35,$0E,$7F,$7F,$FF,$FF,$FF
CC50 DEFB $2C,$36,$0E,$00,$00,$06,$00,$00
CC58 DEFB $3A,$D7,$2E,$34,$0E,$7F,$4C,$CC
CC60 DEFB $CC,$CC,$2C,$2D,$36,$0E,$00,$00
CC68 DEFB $06,$00,$00,$3A,$EE,$22,$50,$52
CC70 DEFB $45,$53,$53,$20,$45,$4E,$54,$45
CC78 DEFB $52,$20,$54,$4F,$20,$43,$4F,$4E
CC80 DEFB $54,$49,$4E,$55,$45,$20,$22,$3B
CC88 DEFB $CA,$48,$24,$3A,$EC,$B0,$22,$35
CC90 DEFB $30,$30,$22,$0D
CC94 DEFB $21,$34,$85,$00,$FB,$3A,$F5,$AC Line 8500: CLS : PRINT AT 6,O;"YOU WENT TO THE GREAT RANCH IN": PRINT : PRINT "THE SKY BECAUSE :": PRINT : PRINT M$: FOR N=O TO -30 STEP -U: BEEP .2,N: NEXT N: GO SUB 9500: GO TO 9850.
CC9C DEFB $36,$0E,$00,$00,$06,$00,$00,$2C
CCA4 DEFB $4F,$3B,$22,$59,$4F,$55,$20,$57
CCAC DEFB $45,$4E,$54,$20,$54,$4F,$20,$54
CCB4 DEFB $48,$45,$20,$47,$52,$45,$41,$54
CCBC DEFB $20,$52,$41,$4E,$43,$48,$20,$49
CCC4 DEFB $4E,$22,$3A,$F5,$3A,$F5,$22,$54
CCCC DEFB $48,$45,$20,$53,$4B,$59,$20,$42
CCD4 DEFB $45,$43,$41,$55,$53,$45,$20,$3A
CCDC DEFB $22,$3A,$F5,$3A,$F5,$4D,$24,$3A
CCE4 DEFB $EB,$4E,$3D,$4F,$CC,$2D,$33,$30
CCEC DEFB $0E,$00,$00,$1E,$00,$00,$CD,$2D
CCF4 DEFB $55,$3A,$D7,$2E,$32,$0E,$7E,$4C
CCFC DEFB $CC,$CC,$CC,$2C,$4E,$3A,$F3,$4E
CD04 DEFB $3A,$ED,$39,$35,$30,$30,$0E,$00
CD0C DEFB $00,$1C,$25,$00,$3A,$EC,$39,$38
CD14 DEFB $35,$30,$0E,$00,$00,$7A,$26,$00
CD1C DEFB $0D
CD1D DEFB $22,$C4,$08,$00,$E7,$4F,$3A,$DA Line 8900: BORDER O: PAPER O: CLS.
CD25 DEFB $4F,$3A,$FB,$0D
CD29 DEFB $22,$C9,$CB,$00,$F5,$AC,$31,$0E Line 8905: PRINT AT 1,6;"THE STORY SO FAR....",,," YOU ARE WALKING HOME ONE NIGHT WHEN YOU HEAR A GUNSHOT."," YOU FIND A DYING MAN LYING IN"," THE ROAD.HE MUTTERS THE WORDS; ""THE WILD BUNCH...THE MAN WITH".
CD31 DEFB $00,$00,$01,$00,$00,$2C,$36,$0E
CD39 DEFB $00,$00,$06,$00,$00,$3B,$22,$54
CD41 DEFB $48,$45,$20,$53,$54,$4F,$52,$59
CD49 DEFB $20,$53,$4F,$20,$46,$41,$52,$2E
CD51 DEFB $2E,$2E,$2E,$22,$2C,$2C,$2C,$22
CD59 DEFB $20,$59,$4F,$55,$20,$41,$52,$45
CD61 DEFB $20,$57,$41,$4C,$4B,$49,$4E,$47
CD69 DEFB $20,$48,$4F,$4D,$45,$20,$4F,$4E
CD71 DEFB $45,$20,$4E,$49,$47,$48,$54,$20
CD79 DEFB $20,$57,$48,$45,$4E,$20,$59,$4F
CD81 DEFB $55,$20,$48,$45,$41,$52,$20,$41
CD89 DEFB $20,$47,$55,$4E,$53,$48,$4F,$54
CD91 DEFB $2E,$22,$2C,$22,$20,$59,$4F,$55
CD99 DEFB $20,$46,$49,$4E,$44,$20,$41,$20
CDA1 DEFB $44,$59,$49,$4E,$47,$20,$4D,$41
CDA9 DEFB $4E,$20,$4C,$59,$49,$4E,$47,$20
CDB1 DEFB $49,$4E,$22,$2C,$22,$20,$54,$48
CDB9 DEFB $45,$20,$52,$4F,$41,$44,$2E,$48
CDC1 DEFB $45,$20,$4D,$55,$54,$54,$45,$52
CDC9 DEFB $53,$20,$54,$48,$45,$20,$57,$4F
CDD1 DEFB $52,$44,$53,$3B,$20,$20,$22,$22
CDD9 DEFB $54,$48,$45,$20,$57,$49,$4C,$44
CDE1 DEFB $20,$42,$55,$4E,$43,$48,$2E,$2E
CDE9 DEFB $2E,$54,$48,$45,$20,$4D,$41,$4E
CDF1 DEFB $20,$57,$49,$54,$48,$22,$0D
CDF8 DEFB $22,$CE,$11,$00,$F5,$22,$20,$22 Line 8910: PRINT " ";D$(MB);"""".
CE00 DEFB $3B,$44,$24,$28,$4D,$42,$29,$3B
CE08 DEFB $22,$22,$22,$22,$0D
CE0D DEFB $22,$D3,$41,$01,$F5,$AC,$31,$30 Line 8915: PRINT AT 10,R;"THE MAN COUGHS AND DIES."," YOU PICK UP A COLT 45 THAT MUST BELONG TO THE MURDERER."," AT THAT MOMENT THE SHERIFF"," RIDES UP.HE SEES YOU WITH THE BODY AND THE GUN IN YOUR HAND. HE SHOUTS;""DON'T MOVE OR I'LL FILL YOU FULL OF LEAD!"""," YOU RUN OFF INTO THE NIGHT WITH BULLETS FLYING PAST YOUR HEAD.".
CE15 DEFB $0E,$00,$00,$0A,$00,$00,$2C,$52
CE1D DEFB $3B,$22,$54,$48,$45,$20,$4D,$41
CE25 DEFB $4E,$20,$43,$4F,$55,$47,$48,$53
CE2D DEFB $20,$41,$4E,$44,$20,$44,$49,$45
CE35 DEFB $53,$2E,$22,$2C,$22,$20,$59,$4F
CE3D DEFB $55,$20,$50,$49,$43,$4B,$20,$55
CE45 DEFB $50,$20,$41,$20,$43,$4F,$4C,$54
CE4D DEFB $20,$34,$35,$20,$54,$48,$41,$54
CE55 DEFB $20,$4D,$55,$53,$54,$20,$42,$45
CE5D DEFB $4C,$4F,$4E,$47,$20,$54,$4F,$20
CE65 DEFB $54,$48,$45,$20,$4D,$55,$52,$44
CE6D DEFB $45,$52,$45,$52,$2E,$22,$2C,$22
CE75 DEFB $20,$20,$41,$54,$20,$54,$48,$41
CE7D DEFB $54,$20,$4D,$4F,$4D,$45,$4E,$54
CE85 DEFB $20,$54,$48,$45,$20,$53,$48,$45
CE8D DEFB $52,$49,$46,$46,$22,$2C,$22,$20
CE95 DEFB $52,$49,$44,$45,$53,$20,$55,$50
CE9D DEFB $2E,$48,$45,$20,$53,$45,$45,$53
CEA5 DEFB $20,$59,$4F,$55,$20,$57,$49,$54
CEAD DEFB $48,$20,$54,$48,$45,$20,$20,$20
CEB5 DEFB $42,$4F,$44,$59,$20,$41,$4E,$44
CEBD DEFB $20,$54,$48,$45,$20,$47,$55,$4E
CEC5 DEFB $20,$49,$4E,$20,$59,$4F,$55,$52
CECD DEFB $20,$48,$41,$4E,$44,$2E,$20,$20
CED5 DEFB $48,$45,$20,$53,$48,$4F,$55,$54
CEDD DEFB $53,$3B,$22,$22,$44,$4F,$4E,$27
CEE5 DEFB $54,$20,$4D,$4F,$56,$45,$20,$4F
CEED DEFB $52,$20,$49,$27,$4C,$4C,$20,$20
CEF5 DEFB $20,$46,$49,$4C,$4C,$20,$59,$4F
CEFD DEFB $55,$20,$46,$55,$4C,$4C,$20,$4F
CF05 DEFB $46,$20,$4C,$45,$41,$44,$21,$22
CF0D DEFB $22,$22,$2C,$22,$20,$59,$4F,$55
CF15 DEFB $20,$52,$55,$4E,$20,$4F,$46,$46
CF1D DEFB $20,$49,$4E,$54,$4F,$20,$54,$48
CF25 DEFB $45,$20,$4E,$49,$47,$48,$54,$20
CF2D DEFB $57,$49,$54,$48,$20,$42,$55,$4C
CF35 DEFB $4C,$45,$54,$53,$20,$46,$4C,$59
CF3D DEFB $49,$4E,$47,$20,$50,$41,$53,$54
CF45 DEFB $20,$59,$4F,$55,$52,$20,$48,$45
CF4D DEFB $41,$44,$2E,$22,$0D
CF52 DEFB $22,$D8,$3C,$00,$F5,$AC,$32,$31 Line 8920: PRINT AT 21,12; PAPER 6;"ANY KEY": GO SUB 8925: GO TO VAL "8950".
CF5A DEFB $0E,$00,$00,$15,$00,$00,$2C,$31
CF62 DEFB $32,$0E,$00,$00,$0C,$00,$00,$3B
CF6A DEFB $DA,$36,$0E,$00,$00,$06,$00,$00
CF72 DEFB $3B,$22,$41,$4E,$59,$20,$4B,$45
CF7A DEFB $59,$22,$3A,$ED,$38,$39,$32,$35
CF82 DEFB $0E,$00,$00,$DD,$22,$00,$3A,$EC
CF8A DEFB $B0,$22,$38,$39,$35,$30,$22,$0D
CF92 DEFB $22,$DD,$05,$00,$F1,$59,$3D,$55 Line 8925: LET Y=U.
CF9A DEFB $0D
CF9B DEFB $22,$E0,$10,$00,$EB,$4C,$3D,$55 Line 8928: FOR L=U TO R: RESTORE VAL "9020".
CFA3 DEFB $CC,$52,$3A,$E5,$B0,$22,$39,$30
CFAB DEFB $32,$30,$22,$0D
CFAF DEFB $22,$E2,$2A,$00,$EB,$4E,$3D,$59 Line 8930: FOR N=Y TO 26: IF L=R AND N=24 THEN RESTORE 9025.
CFB7 DEFB $CC,$32,$36,$0E,$00,$00,$1A,$00
CFBF DEFB $00,$3A,$FA,$4C,$3D,$52,$C6,$4E
CFC7 DEFB $3D,$32,$34,$0E,$00,$00,$18,$00
CFCF DEFB $00,$CB,$E5,$39,$30,$32,$35,$0E
CFD7 DEFB $00,$00,$41,$23,$00,$0D
CFDD DEFB $22,$E4,$1D,$00,$E3,$7A,$3A,$E3 Line 8932: READ z: READ x: BEEP z/2.5,x: IF INKEY$<>"" THEN RETURN.
CFE5 DEFB $78,$3A,$D7,$7A,$2F,$32,$2E,$35
CFED DEFB $0E,$82,$20,$00,$00,$00,$2C,$78
CFF5 DEFB $3A,$FA,$A6,$C9,$22,$22,$CB,$FE
CFFD DEFB $0D
CFFE DEFB $22,$E7,$06,$00,$F3,$4E,$3A,$F3 Line 8935: NEXT N: NEXT L.
D006 DEFB $4C,$0D
D008 DEFB $22,$EC,$13,$00,$F2,$33,$30,$0E Line 8940: PAUSE 30: GO TO VAL "8925".
D010 DEFB $00,$00,$1E,$00,$00,$3A,$EC,$B0
D018 DEFB $22,$38,$39,$32,$35,$22,$0D
D01F DEFB $22,$F6,$D0,$00,$FB,$3A,$F5,$AC Line 8950: CLS : PRINT AT 7,6;"YOU ARE A WANTED MAN",,," YOUR ONLY CHANCE TO PROVE YOUR INNOCENCE IS TO FIND THE REAL KILLER A MEMBER OF THE DREADED": PRINT : PRINT TAB 10;"""WILD BUNCH!""": PRINT : PRINT : PRINT TAB 12; PAPER 6;"ANY KEY".
D027 DEFB $37,$0E,$00,$00,$07,$00,$00,$2C
D02F DEFB $36,$0E,$00,$00,$06,$00,$00,$3B
D037 DEFB $22,$59,$4F,$55,$20,$41,$52,$45
D03F DEFB $20,$41,$20,$57,$41,$4E,$54,$45
D047 DEFB $44,$20,$4D,$41,$4E,$22,$2C,$2C
D04F DEFB $2C,$22,$20,$59,$4F,$55,$52,$20
D057 DEFB $4F,$4E,$4C,$59,$20,$43,$48,$41
D05F DEFB $4E,$43,$45,$20,$54,$4F,$20,$50
D067 DEFB $52,$4F,$56,$45,$20,$59,$4F,$55
D06F DEFB $52,$20,$20,$49,$4E,$4E,$4F,$43
D077 DEFB $45,$4E,$43,$45,$20,$49,$53,$20
D07F DEFB $54,$4F,$20,$46,$49,$4E,$44,$20
D087 DEFB $54,$48,$45,$20,$52,$45,$41,$4C
D08F DEFB $20,$20,$20,$4B,$49,$4C,$4C,$45
D097 DEFB $52,$20,$41,$20,$4D,$45,$4D,$42
D09F DEFB $45,$52,$20,$4F,$46,$20,$54,$48
D0A7 DEFB $45,$20,$44,$52,$45,$41,$44,$45
D0AF DEFB $44,$22,$3A,$F5,$3A,$F5,$AD,$31
D0B7 DEFB $30,$0E,$00,$00,$0A,$00,$00,$3B
D0BF DEFB $22,$22,$22,$57,$49,$4C,$44,$20
D0C7 DEFB $42,$55,$4E,$43,$48,$21,$22,$22
D0CF DEFB $22,$3A,$F5,$3A,$F5,$3A,$F5,$AD
D0D7 DEFB $31,$32,$0E,$00,$00,$0C,$00,$00
D0DF DEFB $3B,$DA,$36,$0E,$00,$00,$06,$00
D0E7 DEFB $00,$3B,$22,$41,$4E,$59,$20,$4B
D0EF DEFB $45,$59,$22,$0D
D0F3 DEFB $23,$00,$10,$00,$F1,$59,$3D,$4E Line 8960: LET Y=N+U: GO SUB VAL "8930".
D0FB DEFB $2B,$55,$3A,$ED,$B0,$22,$38,$39
D103 DEFB $33,$30,$22,$0D
D107 DEFB $23,$05,$08,$00,$ED,$B0,$22,$33 Line 8965: GO SUB VAL "300".
D10F DEFB $30,$30,$22,$0D
D113 DEFB $23,$0A,$64,$00,$F5,$AC,$31,$38 Line 8970: PRINT AT 18,U;"YOU HAVE $50.YOU MAY CATCH THE STAGE TO ANY OF THE ABOVE TOWNS TO START YOUR SEARCH.".
D11B DEFB $0E,$00,$00,$12,$00,$00,$2C,$55
D123 DEFB $3B,$22,$59,$4F,$55,$20,$48,$41
D12B DEFB $56,$45,$20,$24,$35,$30,$2E,$59
D133 DEFB $4F,$55,$20,$4D,$41,$59,$20,$43
D13B DEFB $41,$54,$43,$48,$20,$54,$48,$45
D143 DEFB $20,$53,$54,$41,$47,$45,$20,$54
D14B DEFB $4F,$20,$41,$4E,$59,$20,$4F,$46
D153 DEFB $20,$54,$48,$45,$20,$41,$42,$4F
D15B DEFB $56,$45,$20,$54,$4F,$57,$4E,$53
D163 DEFB $20,$54,$4F,$20,$53,$54,$41,$52
D16B DEFB $54,$20,$59,$4F,$55,$52,$20,$53
D173 DEFB $45,$41,$52,$43,$48,$2E,$22,$0D
D17B DEFB $23,$0F,$62,$00,$EE,$22,$20,$20 Line 8975: INPUT " ENTER TOWN NUMBER "; LINE E$: LET E$=E$+" ": IF CODE E$(1)>53 OR CODE E$(1)<49 THEN GO TO 8975.
D183 DEFB $20,$20,$45,$4E,$54,$45,$52,$20
D18B DEFB $54,$4F,$57,$4E,$20,$4E,$55,$4D
D193 DEFB $42,$45,$52,$20,$22,$3B,$CA,$45
D19B DEFB $24,$3A,$F1,$45,$24,$3D,$45,$24
D1A3 DEFB $2B,$22,$20,$22,$3A,$FA,$AF,$45
D1AB DEFB $24,$28,$31,$0E,$00,$00,$01,$00
D1B3 DEFB $00,$29,$3E,$35,$33,$0E,$00,$00
D1BB DEFB $35,$00,$00,$C5,$AF,$45,$24,$28
D1C3 DEFB $31,$0E,$00,$00,$01,$00,$00,$29
D1CB DEFB $3C,$34,$39,$0E,$00,$00,$31,$00
D1D3 DEFB $00,$CB,$EC,$38,$39,$37,$35,$0E
D1DB DEFB $00,$00,$0F,$23,$00,$0D
D1E1 DEFB $23,$10,$1D,$00,$F1,$54,$4E,$3D Line 8976: LET TN=VAL E$: IF TN>5 THEN GO TO VAL "8975".
D1E9 DEFB $B0,$45,$24,$3A,$FA,$54,$4E,$3E
D1F1 DEFB $35,$0E,$00,$00,$05,$00,$00,$CB
D1F9 DEFB $EC,$B0,$22,$38,$39,$37,$35,$22
D201 DEFB $0D
D202 DEFB $23,$11,$23,$00,$F1,$55,$4D,$3D Line 8977: LET UM=INT (RND*5)+U: IF UM=TN THEN GO TO VAL "8977".
D20A DEFB $BA,$28,$A5,$2A,$35,$0E,$00,$00
D212 DEFB $05,$00,$00,$29,$2B,$55,$3A,$FA
D21A DEFB $55,$4D,$3D,$54,$4E,$CB,$EC,$B0
D222 DEFB $22,$38,$39,$37,$37,$22,$0D
D229 DEFB $23,$14,$1C,$00,$F1,$46,$4C,$3D Line 8980: LET FL=TN: LET MU=50: GO TO VAL "480".
D231 DEFB $54,$4E,$3A,$F1,$4D,$55,$3D,$35
D239 DEFB $30,$0E,$00,$00,$32,$00,$00,$3A
D241 DEFB $EC,$B0,$22,$34,$38,$30,$22,$0D
D249 DEFB $23,$29,$17,$00,$E4,$22,$50,$41 Line 9001: DATA "PATCH ON RIGHT EYE.".
D251 DEFB $54,$43,$48,$20,$4F,$4E,$20,$52
D259 DEFB $49,$47,$48,$54,$20,$45,$59,$45
D261 DEFB $2E,$22,$0D
D264 DEFB $23,$2A,$17,$00,$E4,$22,$53,$43 Line 9002: DATA "SCAR ON LEFT CHEEK.".
D26C DEFB $41,$52,$20,$4F,$4E,$20,$4C,$45
D274 DEFB $46,$54,$20,$43,$48,$45,$45,$4B
D27C DEFB $2E,$22,$0D
D27F DEFB $23,$2B,$17,$00,$E4,$22,$4E,$4F Line 9003: DATA "NO LEFT EAR........".
D287 DEFB $20,$4C,$45,$46,$54,$20,$45,$41
D28F DEFB $52,$2E,$2E,$2E,$2E,$2E,$2E,$2E
D297 DEFB $2E,$22,$0D
D29A DEFB $23,$2C,$17,$00,$E4,$22,$50,$41 Line 9004: DATA "PATCH ON LEFT EYE..".
D2A2 DEFB $54,$43,$48,$20,$4F,$4E,$20,$4C
D2AA DEFB $45,$46,$54,$20,$45,$59,$45,$2E
D2B2 DEFB $2E,$22,$0D
D2B5 DEFB $23,$2D,$17,$00,$E4,$22,$53,$43 Line 9005: DATA "SCAR ON RIGHT CHEEK".
D2BD DEFB $41,$52,$20,$4F,$4E,$20,$52,$49
D2C5 DEFB $47,$48,$54,$20,$43,$48,$45,$45
D2CD DEFB $4B,$22,$0D
D2D0 DEFB $23,$2E,$17,$00,$E4,$22,$41,$20 Line 9006: DATA "A LEFT EARING......".
D2D8 DEFB $4C,$45,$46,$54,$20,$45,$41,$52
D2E0 DEFB $49,$4E,$47,$2E,$2E,$2E,$2E,$2E
D2E8 DEFB $2E,$22,$0D
D2EB DEFB $23,$2F,$17,$00,$E4,$22,$41,$20 Line 9007: DATA "A LIMP IN LEFT LEG.".
D2F3 DEFB $4C,$49,$4D,$50,$20,$49,$4E,$20
D2FB DEFB $4C,$45,$46,$54,$20,$4C,$45,$47
D303 DEFB $2E,$22,$0D
D306 DEFB $23,$30,$17,$00,$E4,$22,$4E,$4F Line 9008: DATA "NO EYEBROWS........".
D30E DEFB $20,$45,$59,$45,$42,$52,$4F,$57
D316 DEFB $53,$2E,$2E,$2E,$2E,$2E,$2E,$2E
D31E DEFB $2E,$22,$0D
D321 DEFB $23,$31,$17,$00,$E4,$22,$4E,$4F Line 9009: DATA "NO RIGHT EAR.......".
D329 DEFB $20,$52,$49,$47,$48,$54,$20,$45
D331 DEFB $41,$52,$2E,$2E,$2E,$2E,$2E,$2E
D339 DEFB $2E,$22,$0D
D33C DEFB $23,$32,$17,$00,$E4,$22,$41,$20 Line 9010: DATA "A LIMP IN RIGHT LEG".
D344 DEFB $4C,$49,$4D,$50,$20,$49,$4E,$20
D34C DEFB $52,$49,$47,$48,$54,$20,$4C,$45
D354 DEFB $47,$22,$0D
D357 DEFB $23,$33,$17,$00,$E4,$22,$41,$20 Line 9011: DATA "A MOUSTACHE........".
D35F DEFB $4D,$4F,$55,$53,$54,$41,$43,$48
D367 DEFB $45,$2E,$2E,$2E,$2E,$2E,$2E,$2E
D36F DEFB $2E,$22,$0D
D372 DEFB $23,$34,$17,$00,$E4,$22,$41,$20 Line 9012: DATA "A RIGHT EARING.....".
D37A DEFB $52,$49,$47,$48,$54,$20,$45,$41
D382 DEFB $52,$49,$4E,$47,$2E,$2E,$2E,$2E
D38A DEFB $2E,$22,$0D
D38D DEFB $23,$37,$4E,$00,$E4,$22,$47,$45 Line 9015: DATA "GEORGE PARKER","HARRY LONGBOUGH","HARVEY LOGAN","ELZA LAY","BEN KILPATRICK".
D395 DEFB $4F,$52,$47,$45,$20,$50,$41,$52
D39D DEFB $4B,$45,$52,$22,$2C,$22,$48,$41
D3A5 DEFB $52,$52,$59,$20,$4C,$4F,$4E,$47
D3AD DEFB $42,$4F,$55,$47,$48,$22,$2C,$22
D3B5 DEFB $48,$41,$52,$56,$45,$59,$20,$4C
D3BD DEFB $4F,$47,$41,$4E,$22,$2C,$22,$45
D3C5 DEFB $4C,$5A,$41,$20,$4C,$41,$59,$22
D3CD DEFB $2C,$22,$42,$45,$4E,$20,$4B,$49
D3D5 DEFB $4C,$50,$41,$54,$52,$49,$43,$4B
D3DD DEFB $22,$0D
D3DF DEFB $23,$3C,$63,$01,$E4,$55,$2C,$31 Line 9020: DATA U,15,1.5,15,.5,13,.75,12,U,13,U,15,U,13,U,12,.5,10,U,8,U,7,1.5,3,.1,-60,.1,-60 ,.1,-60,.5,3,U,8,.5,8,U,8,U,10,U,12,U,13,U,12,U,10,U,8,R,10.
D3E7 DEFB $35,$0E,$00,$00,$0F,$00,$00,$2C
D3EF DEFB $31,$2E,$35,$0E,$81,$40,$00,$00
D3F7 DEFB $00,$2C,$31,$35,$0E,$00,$00,$0F
D3FF DEFB $00,$00,$2C,$2E,$35,$0E,$7F,$7F
D407 DEFB $FF,$FF,$FF,$2C,$31,$33,$0E,$00
D40F DEFB $00,$0D,$00,$00,$2C,$2E,$37,$35
D417 DEFB $0E,$80,$40,$00,$00,$00,$2C,$31
D41F DEFB $32,$0E,$00,$00,$0C,$00,$00,$2C
D427 DEFB $55,$2C,$31,$33,$0E,$00,$00,$0D
D42F DEFB $00,$00,$2C,$55,$2C,$31,$35,$0E
D437 DEFB $00,$00,$0F,$00,$00,$2C,$55,$2C
D43F DEFB $31,$33,$0E,$00,$00,$0D,$00,$00
D447 DEFB $2C,$55,$2C,$31,$32,$0E,$00,$00
D44F DEFB $0C,$00,$00,$2C,$2E,$35,$0E,$7F
D457 DEFB $7F,$FF,$FF,$FF,$2C,$31,$30,$0E
D45F DEFB $00,$00,$0A,$00,$00,$2C,$55,$2C
D467 DEFB $38,$0E,$00,$00,$08,$00,$00,$2C
D46F DEFB $55,$2C,$37,$0E,$00,$00,$07,$00
D477 DEFB $00,$2C,$31,$2E,$35,$0E,$81,$40
D47F DEFB $00,$00,$00,$2C,$33,$0E,$00,$00
D487 DEFB $03,$00,$00,$2C,$2E,$31,$0E,$7D
D48F DEFB $4C,$CC,$CC,$CC,$2C,$2D,$36,$30
D497 DEFB $0E,$00,$00,$3C,$00,$00,$2C,$2E
D49F DEFB $31,$0E,$7D,$4C,$CC,$CC,$CC,$2C
D4A7 DEFB $2D,$36,$30,$0E,$00,$00,$3C,$00
D4AF DEFB $00,$2C,$2E,$31,$0E,$7D,$4C,$CC
D4B7 DEFB $CC,$CC,$2C,$2D,$36,$30,$0E,$00
D4BF DEFB $00,$3C,$00,$00,$2C,$2E,$35,$0E
D4C7 DEFB $7F,$7F,$FF,$FF,$FF,$2C,$33,$0E
D4CF DEFB $00,$00,$03,$00,$00,$2C,$55,$2C
D4D7 DEFB $38,$0E,$00,$00,$08,$00,$00,$2C
D4DF DEFB $2E,$35,$0E,$7F,$7F,$FF,$FF,$FF
D4E7 DEFB $2C,$38,$0E,$00,$00,$08,$00,$00
D4EF DEFB $2C,$55,$2C,$38,$0E,$00,$00,$08
D4F7 DEFB $00,$00,$2C,$55,$2C,$31,$30,$0E
D4FF DEFB $00,$00,$0A,$00,$00,$2C,$55,$2C
D507 DEFB $31,$32,$0E,$00,$00,$0C,$00,$00
D50F DEFB $2C,$55,$2C,$31,$33,$0E,$00,$00
D517 DEFB $0D,$00,$00,$2C,$55,$2C,$31,$32
D51F DEFB $0E,$00,$00,$0C,$00,$00,$2C,$55
D527 DEFB $2C,$31,$30,$0E,$00,$00,$0A,$00
D52F DEFB $00,$2C,$55,$2C,$38,$0E,$00,$00
D537 DEFB $08,$00,$00,$2C,$52,$2C,$31,$30
D53F DEFB $0E,$00,$00,$0A,$00,$00,$0D
D546 DEFB $23,$41,$20,$00,$E4,$55,$2C,$38 Line 9025: DATA U,8,U,10,R,8.
D54E DEFB $0E,$00,$00,$08,$00,$00,$2C,$55
D556 DEFB $2C,$31,$30,$0E,$00,$00,$0A,$00
D55E DEFB $00,$2C,$52,$2C,$38,$0E,$00,$00
D566 DEFB $08,$00,$00,$0D
D56A DEFB $23,$4B,$39,$01,$E4,$31,$2E,$35 Line 9035: DATA 1.5,7,.75,14,U,10,1.5,12,U,10,U,12,1.5,14,1.5,19,1.5,17,U,19,.1,-60,.1,-60,.1, -60,1.25,7,.75,14,U,10,1.5,12,U,9,U,5,R,7.
D572 DEFB $0E,$81,$40,$00,$00,$00,$2C,$37
D57A DEFB $0E,$00,$00,$07,$00,$00,$2C,$2E
D582 DEFB $37,$35,$0E,$80,$40,$00,$00,$00
D58A DEFB $2C,$31,$34,$0E,$00,$00,$0E,$00
D592 DEFB $00,$2C,$55,$2C,$31,$30,$0E,$00
D59A DEFB $00,$0A,$00,$00,$2C,$31,$2E,$35
D5A2 DEFB $0E,$81,$40,$00,$00,$00,$2C,$31
D5AA DEFB $32,$0E,$00,$00,$0C,$00,$00,$2C
D5B2 DEFB $55,$2C,$31,$30,$0E,$00,$00,$0A
D5BA DEFB $00,$00,$2C,$55,$2C,$31,$32,$0E
D5C2 DEFB $00,$00,$0C,$00,$00,$2C,$31,$2E
D5CA DEFB $35,$0E,$81,$40,$00,$00,$00,$2C
D5D2 DEFB $31,$34,$0E,$00,$00,$0E,$00,$00
D5DA DEFB $2C,$31,$2E,$35,$0E,$81,$40,$00
D5E2 DEFB $00,$00,$2C,$31,$39,$0E,$00,$00
D5EA DEFB $13,$00,$00,$2C,$31,$2E,$35,$0E
D5F2 DEFB $81,$40,$00,$00,$00,$2C,$31,$37
D5FA DEFB $0E,$00,$00,$11,$00,$00,$2C,$55
D602 DEFB $2C,$31,$39,$0E,$00,$00,$13,$00
D60A DEFB $00,$2C,$2E,$31,$0E,$7D,$4C,$CC
D612 DEFB $CC,$CC,$2C,$2D,$36,$30,$0E,$00
D61A DEFB $00,$3C,$00,$00,$2C,$2E,$31,$0E
D622 DEFB $7D,$4C,$CC,$CC,$CC,$2C,$2D,$36
D62A DEFB $30,$0E,$00,$00,$3C,$00,$00,$2C
D632 DEFB $2E,$31,$0E,$7D,$4C,$CC,$CC,$CC
D63A DEFB $2C,$2D,$36,$30,$0E,$00,$00,$3C
D642 DEFB $00,$00,$2C,$31,$2E,$32,$35,$0E
D64A DEFB $81,$20,$00,$00,$00,$2C,$37,$0E
D652 DEFB $00,$00,$07,$00,$00,$2C,$2E,$37
D65A DEFB $35,$0E,$80,$40,$00,$00,$00,$2C
D662 DEFB $31,$34,$0E,$00,$00,$0E,$00,$00
D66A DEFB $2C,$55,$2C,$31,$30,$0E,$00,$00
D672 DEFB $0A,$00,$00,$2C,$31,$2E,$35,$0E
D67A DEFB $81,$40,$00,$00,$00,$2C,$31,$32
D682 DEFB $0E,$00,$00,$0C,$00,$00,$2C,$55
D68A DEFB $2C,$39,$0E,$00,$00,$09,$00,$00
D692 DEFB $2C,$55,$2C,$35,$0E,$00,$00,$05
D69A DEFB $00,$00,$2C,$52,$2C,$37,$0E,$00
D6A2 DEFB $00,$07,$00,$00,$0D
D6A7 DEFB $23,$55,$47,$00,$E4,$22,$44,$52 Line 9045: DATA "DRY GULCH","DODGE CITY","NUGGET CITY","BULLETVILLE","DEADMANS CREEK".
D6AF DEFB $59,$20,$47,$55,$4C,$43,$48,$22
D6B7 DEFB $2C,$22,$44,$4F,$44,$47,$45,$20
D6BF DEFB $43,$49,$54,$59,$22,$2C,$22,$4E
D6C7 DEFB $55,$47,$47,$45,$54,$20,$43,$49
D6CF DEFB $54,$59,$22,$2C,$22,$42,$55,$4C
D6D7 DEFB $4C,$45,$54,$56,$49,$4C,$4C,$45
D6DF DEFB $22,$2C,$22,$44,$45,$41,$44,$4D
D6E7 DEFB $41,$4E,$53,$20,$43,$52,$45,$45
D6EF DEFB $4B,$22,$0D
D6F2 DEFB $23,$5A,$53,$00,$E4,$33,$0E,$00 Line 9050: DATA 3,12,1,10,1,9,1,7,2,9.
D6FA DEFB $00,$03,$00,$00,$2C,$31,$32,$0E
D702 DEFB $00,$00,$0C,$00,$00,$2C,$31,$0E
D70A DEFB $00,$00,$01,$00,$00,$2C,$31,$30
D712 DEFB $0E,$00,$00,$0A,$00,$00,$2C,$31
D71A DEFB $0E,$00,$00,$01,$00,$00,$2C,$39
D722 DEFB $0E,$00,$00,$09,$00,$00,$2C,$31
D72A DEFB $0E,$00,$00,$01,$00,$00,$2C,$37
D732 DEFB $0E,$00,$00,$07,$00,$00,$2C,$32
D73A DEFB $0E,$00,$00,$02,$00,$00,$2C,$39
D742 DEFB $0E,$00,$00,$09,$00,$00,$0D
D749 DEFB $23,$64,$0E,$00,$E4,$22,$13,$01 Line 9060: DATA "8%".
D751 DEFB $11,$07,$10,$00,$38,$25,$13,$00
D759 DEFB $22,$0D
D75B DEFB $23,$65,$0C,$00,$E4,$22,$13,$01 Line 9061: DATA "9&".
D763 DEFB $11,$07,$10,$02,$39,$26,$22,$0D
D76B DEFB $23,$66,$0C,$00,$E4,$22,$13,$01 Line 9062: DATA "K&".
D773 DEFB $11,$07,$10,$02,$4B,$26,$22,$0D
D77B DEFB $23,$67,$17,$00,$E4,$22,$11,$07 Line 9063: DATA "7@ 7&".
D783 DEFB $13,$01,$10,$02,$37,$40,$11,$04
D78B DEFB $13,$00,$20,$13,$01,$11,$07,$37
D793 DEFB $26,$22,$0D
D796 DEFB $23,$68,$17,$00,$E4,$22,$11,$07 Line 9064: DATA "8& 8@".
D79E DEFB $13,$01,$10,$02,$38,$26,$11,$04
D7A6 DEFB $13,$00,$20,$11,$07,$13,$01,$38
D7AE DEFB $40,$22,$0D
D7B1 DEFB $23,$69,$19,$00,$E4,$22,$11,$07 Line 9065: DATA "A@ A&".
D7B9 DEFB $13,$01,$10,$02,$41,$40,$11,$04
D7C1 DEFB $13,$00,$20,$10,$02,$11,$07,$13
D7C9 DEFB $01,$41,$26,$22,$0D
D7CE DEFB $23,$6A,$31,$00,$E4,$22,$11,$07 Line 9066: DATA "K# K@ 9@ 9%".
D7D6 DEFB $10,$00,$13,$01,$4B,$23,$13,$00
D7DE DEFB $11,$04,$20,$11,$07,$13,$01,$10
D7E6 DEFB $02,$4B,$40,$11,$04,$13,$00,$20
D7EE DEFB $13,$01,$11,$07,$39,$40,$13,$00
D7F6 DEFB $11,$04,$20,$13,$01,$11,$07,$10
D7FE DEFB $00,$39,$25,$22,$0D
D803 DEFB $23,$6B,$2F,$00,$E4,$22,$11,$07 Line 9067: DATA "10# 10@ 10&".
D80B DEFB $10,$00,$13,$00,$13,$01,$13,$01
D813 DEFB $31,$30,$23,$13,$00,$11,$04,$20
D81B DEFB $13,$01,$11,$07,$10,$02,$31,$30
D823 DEFB $40,$11,$04,$13,$00,$20,$13,$01
D82B DEFB $11,$07,$31,$30,$26,$13,$00,$10
D833 DEFB $00,$22,$0D
D836 DEFB $23,$6C,$26,$00,$E4,$22,$11,$07 Line 9068: DATA "Q@ Q& Q#".
D83E DEFB $10,$02,$13,$01,$51,$40,$11,$04
D846 DEFB $13,$00,$20,$13,$01,$11,$07,$51
D84E DEFB $26,$13,$00,$11,$04,$20,$13,$01
D856 DEFB $11,$07,$10,$00,$51,$23,$13,$00
D85E DEFB $22,$0D
D860 DEFB $23,$6D,$3E,$00,$E4,$22,$11,$07 Line 9069: DATA "4@ 5@ 6& 7% 8#".
D868 DEFB $13,$01,$10,$02,$34,$40,$13,$00
D870 DEFB $11,$04,$20,$11,$07,$13,$01,$35
D878 DEFB $40,$13,$00,$11,$04,$20,$11,$07
D880 DEFB $13,$00,$13,$01,$36,$26,$11,$04
D888 DEFB $13,$00,$20,$11,$07,$13,$01,$10
D890 DEFB $00,$37,$25,$13,$00,$11,$04,$20
D898 DEFB $13,$01,$11,$07,$38,$23,$13,$00
D8A0 DEFB $22,$0D
D8A2 DEFB $23,$6E,$3A,$00,$E4,$22,$11,$07 Line 9070: DATA "5# 6# 7# 9# A#".
D8AA DEFB $10,$00,$13,$01,$35,$23,$13,$00
D8B2 DEFB $11,$04,$20,$11,$07,$13,$01,$36
D8BA DEFB $23,$13,$00,$11,$04,$20,$11,$07
D8C2 DEFB $13,$01,$37,$23,$11,$04,$13,$00
D8CA DEFB $20,$13,$01,$11,$07,$39,$23,$13
D8D2 DEFB $00,$11,$04,$20,$11,$07,$13,$01
D8DA DEFB $41,$23,$13,$00,$22,$0D
D8E0 DEFB $23,$6F,$3E,$00,$E4,$22,$13,$01 Line 9071: DATA "4% 4# 4& 5& 5%".
D8E8 DEFB $11,$07,$10,$00,$34,$25,$13,$00
D8F0 DEFB $11,$04,$20,$11,$07,$13,$01,$34
D8F8 DEFB $23,$11,$04,$13,$00,$20,$13,$01
D900 DEFB $11,$07,$10,$02,$34,$26,$11,$04
D908 DEFB $13,$00,$20,$13,$01,$11,$07,$35
D910 DEFB $26,$11,$04,$13,$00,$20,$13,$01
D918 DEFB $11,$07,$10,$00,$35,$25,$13,$00
D920 DEFB $22,$0D
D922 DEFB $23,$70,$3E,$00,$E4,$22,$11,$07 Line 9072: DATA "J# J& J@ 6@ 6#".
D92A DEFB $10,$00,$13,$01,$4A,$23,$13,$00
D932 DEFB $11,$04,$20,$11,$07,$13,$01,$10
D93A DEFB $02,$4A,$26,$13,$00,$11,$04,$20
D942 DEFB $11,$07,$13,$01,$4A,$40,$11,$04
D94A DEFB $13,$00,$20,$13,$01,$11,$07,$36
D952 DEFB $40,$11,$04,$13,$00,$20,$13,$01
D95A DEFB $11,$07,$10,$00,$36,$23,$13,$00
D962 DEFB $22,$0D
D964 DEFB $23,$71,$33,$00,$E4,$22,$10,$00 Line 9073: DATA "2# 2% 2& 2@".
D96C DEFB $11,$07,$13,$01,$32,$23,$11,$04
D974 DEFB $13,$00,$20,$13,$01,$11,$07,$32
D97C DEFB $25,$13,$00,$11,$04,$20,$13,$01
D984 DEFB $11,$07,$10,$02,$32,$26,$13,$00
D98C DEFB $11,$04,$20,$13,$01,$11,$07,$32
D994 DEFB $40,$13,$00,$10,$00,$22,$0D
D99B DEFB $23,$72,$33,$00,$E4,$22,$11,$07 Line 9074: DATA "3% 3& 3@ 3#".
D9A3 DEFB $10,$00,$13,$01,$33,$25,$13,$00
D9AB DEFB $11,$04,$20,$13,$01,$10,$02,$11
D9B3 DEFB $07,$33,$26,$13,$00,$11,$04,$20
D9BB DEFB $13,$01,$11,$07,$33,$40,$13,$00
D9C3 DEFB $11,$04,$20,$13,$01,$11,$07,$10
D9CB DEFB $00,$33,$23,$13,$00,$22,$0D
D9D2 DEFB $23,$73,$43,$00,$E4,$22,$11,$07 Line 9075: DATA "10% J% Q% K% A%".
D9DA DEFB $12,$01,$10,$00,$13,$00,$12,$00
D9E2 DEFB $13,$01,$31,$30,$25,$13,$00,$11
D9EA DEFB $04,$20,$13,$01,$11,$07,$4A,$25
D9F2 DEFB $13,$00,$11,$04,$20,$13,$01,$11
D9FA DEFB $07,$51,$25,$13,$00,$11,$04,$20
DA02 DEFB $13,$01,$11,$07,$4B,$25,$13,$00
DA0A DEFB $11,$04,$20,$13,$01,$11,$07,$41
DA12 DEFB $25,$22,$13,$00,$13,$01,$0D
DA19 DEFB $23,$78,$5F,$00,$E4,$55,$2C,$39 Line 9080: DATA U,9,U,7,R,9,R,R,U,4,U,5,U,9,U,9,U,7,R,4.
DA21 DEFB $0E,$00,$00,$09,$00,$00,$2C,$55
DA29 DEFB $2C,$37,$0E,$00,$00,$07,$00,$00
DA31 DEFB $2C,$52,$2C,$39,$0E,$00,$00,$09
DA39 DEFB $00,$00,$2C,$52,$2C,$52,$2C,$55
DA41 DEFB $2C,$34,$0E,$00,$00,$04,$00,$00
DA49 DEFB $2C,$55,$2C,$35,$0E,$00,$00,$05
DA51 DEFB $00,$00,$2C,$55,$2C,$39,$0E,$00
DA59 DEFB $00,$09,$00,$00,$2C,$55,$2C,$39
DA61 DEFB $0E,$00,$00,$09,$00,$00,$2C,$55
DA69 DEFB $2C,$37,$0E,$00,$00,$07,$00,$00
DA71 DEFB $2C,$52,$2C,$34,$0E,$00,$00,$04
DA79 DEFB $00,$00,$0D
DA7C DEFB $23,$7D,$53,$00,$E4,$55,$2C,$31 Line 9085: DATA U,11,U,11,U,9,U,8,U,8,U,7,U,8,R,8.
DA84 DEFB $31,$0E,$00,$00,$0B,$00,$00,$2C
DA8C DEFB $55,$2C,$31,$31,$0E,$00,$00,$0B
DA94 DEFB $00,$00,$2C,$55,$2C,$39,$0E,$00
DA9C DEFB $00,$09,$00,$00,$2C,$55,$2C,$38
DAA4 DEFB $0E,$00,$00,$08,$00,$00,$2C,$55
DAAC DEFB $2C,$38,$0E,$00,$00,$08,$00,$00
DAB4 DEFB $2C,$55,$2C,$37,$0E,$00,$00,$07
DABC DEFB $00,$00,$2C,$55,$2C,$38,$0E,$00
DAC4 DEFB $00,$08,$00,$00,$2C,$52,$2C,$38
DACC DEFB $0E,$00,$00,$08,$00,$00,$0D
DAD3 DEFB $23,$82,$67,$00,$E4,$55,$2C,$37 Line 9090: DATA U,7,U,8,U,8,U,7,U,8,U,11,U,8,U,11,R,9,R,6.
DADB DEFB $0E,$00,$00,$07,$00,$00,$2C,$55
DAE3 DEFB $2C,$38,$0E,$00,$00,$08,$00,$00
DAEB DEFB $2C,$55,$2C,$38,$0E,$00,$00,$08
DAF3 DEFB $00,$00,$2C,$55,$2C,$37,$0E,$00
DAFB DEFB $00,$07,$00,$00,$2C,$55,$2C,$38
DB03 DEFB $0E,$00,$00,$08,$00,$00,$2C,$55
DB0B DEFB $2C,$31,$31,$0E,$00,$00,$0B,$00
DB13 DEFB $00,$2C,$55,$2C,$38,$0E,$00,$00
DB1B DEFB $08,$00,$00,$2C,$55,$2C,$31,$31
DB23 DEFB $0E,$00,$00,$0B,$00,$00,$2C,$52
DB2B DEFB $2C,$39,$0E,$00,$00,$09,$00,$00
DB33 DEFB $2C,$52,$2C,$36,$0E,$00,$00,$06
DB3B DEFB $00,$00,$0D
DB3E DEFB $23,$87,$33,$00,$E4,$32,$30,$30 Line 9095: DATA 200,100,100,250,125.
DB46 DEFB $0E,$00,$00,$C8,$00,$00,$2C,$31
DB4E DEFB $30,$30,$0E,$00,$00,$64,$00,$00
DB56 DEFB $2C,$31,$30,$30,$0E,$00,$00,$64
DB5E DEFB $00,$00,$2C,$32,$35,$30,$0E,$00
DB66 DEFB $00,$FA,$00,$00,$2C,$31,$32,$35
DB6E DEFB $0E,$00,$00,$7D,$00,$00,$0D
DB75 DEFB $23,$8C,$3F,$00,$E4,$52,$2C,$52 Line 9100: DATA R,R,R,R,U,R,R,R,R,5,U,4,R,4,U,R,R,R,U,U,R,R.
DB7D DEFB $2C,$52,$2C,$52,$2C,$55,$2C,$52
DB85 DEFB $2C,$52,$2C,$52,$2C,$52,$2C,$35
DB8D DEFB $0E,$00,$00,$05,$00,$00,$2C,$55
DB95 DEFB $2C,$34,$0E,$00,$00,$04,$00,$00
DB9D DEFB $2C,$52,$2C,$34,$0E,$00,$00,$04
DBA5 DEFB $00,$00,$2C,$55,$2C,$52,$2C,$52
DBAD DEFB $2C,$52,$2C,$55,$2C,$55,$2C,$52
DBB5 DEFB $2C,$52,$0D
DBB8 DEFB $23,$96,$A9,$00,$E4,$4F,$2C,$35 Line 9110: DATA O,5,3,-21,-10,5,O,2,5,-6,3,R,O,-15,-7,-21,5,-15,O,R,-10,-6,-7,R,O.
DBC0 DEFB $0E,$00,$00,$05,$00,$00,$2C,$33
DBC8 DEFB $0E,$00,$00,$03,$00,$00,$2C,$2D
DBD0 DEFB $32,$31,$0E,$00,$00,$15,$00,$00
DBD8 DEFB $2C,$2D,$31,$30,$0E,$00,$00,$0A
DBE0 DEFB $00,$00,$2C,$35,$0E,$00,$00,$05
DBE8 DEFB $00,$00,$2C,$4F,$2C,$32,$0E,$00
DBF0 DEFB $00,$02,$00,$00,$2C,$35,$0E,$00
DBF8 DEFB $00,$05,$00,$00,$2C,$2D,$36,$0E
DC00 DEFB $00,$00,$06,$00,$00,$2C,$33,$0E
DC08 DEFB $00,$00,$03,$00,$00,$2C,$52,$2C
DC10 DEFB $4F,$2C,$2D,$31,$35,$0E,$00,$00
DC18 DEFB $0F,$00,$00,$2C,$2D,$37,$0E,$00
DC20 DEFB $00,$07,$00,$00,$2C,$2D,$32,$31
DC28 DEFB $0E,$00,$00,$15,$00,$00,$2C,$35
DC30 DEFB $0E,$00,$00,$05,$00,$00,$2C,$2D
DC38 DEFB $31,$35,$0E,$00,$00,$0F,$00,$00
DC40 DEFB $2C,$4F,$2C,$52,$2C,$2D,$31,$30
DC48 DEFB $0E,$00,$00,$0A,$00,$00,$2C,$2D
DC50 DEFB $36,$0E,$00,$00,$06,$00,$00,$2C
DC58 DEFB $2D,$37,$0E,$00,$00,$07,$00,$00
DC60 DEFB $2C,$52,$2C,$4F,$0D
DC65 DEFB $23,$A0,$4F,$00,$E4,$52,$2C,$33 Line 9120: DATA R,3,U,4,3,R,U,R,3,R,5,4,R,4,5.
DC6D DEFB $0E,$00,$00,$03,$00,$00,$2C,$55
DC75 DEFB $2C,$34,$0E,$00,$00,$04,$00,$00
DC7D DEFB $2C,$33,$0E,$00,$00,$03,$00,$00
DC85 DEFB $2C,$52,$2C,$55,$2C,$52,$2C,$33
DC8D DEFB $0E,$00,$00,$03,$00,$00,$2C,$52
DC95 DEFB $2C,$35,$0E,$00,$00,$05,$00,$00
DC9D DEFB $2C,$34,$0E,$00,$00,$04,$00,$00
DCA5 DEFB $2C,$52,$2C,$34,$0E,$00,$00,$04
DCAD DEFB $00,$00,$2C,$35,$0E,$00,$00,$05
DCB5 DEFB $00,$00,$0D
DCB8 DEFB $23,$B4,$71,$01,$E4,$22,$48,$4F Line 9140: DATA "HORSE---------------","SADDLE--------------",".44 COLT------------",".45 COLT------------","COLT .44 BULLETS----","COLT .45 BULLETS----","WINCHESTER RIFLE----","WINCHESTER BULLETS--","KNIFE---------------","FOOD FOR 1 DAY------","HORSE FOOD FOR 1 DAY","CANTEEN OF WATER----","GREAT COAT----------","WHISKEY-------------","BLANKET-------------","SNAKEBITE MEDICINE--".
DCC0 DEFB $52,$53,$45,$2D,$2D,$2D,$2D,$2D
DCC8 DEFB $2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D
DCD0 DEFB $2D,$2D,$22,$2C,$22,$53,$41,$44
DCD8 DEFB $44,$4C,$45,$2D,$2D,$2D,$2D,$2D
DCE0 DEFB $2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D
DCE8 DEFB $2D,$22,$2C,$22,$2E,$34,$34,$20
DCF0 DEFB $43,$4F,$4C,$54,$2D,$2D,$2D,$2D
DCF8 DEFB $2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D
DD00 DEFB $22,$2C,$22,$2E,$34,$35,$20,$43
DD08 DEFB $4F,$4C,$54,$2D,$2D,$2D,$2D,$2D
DD10 DEFB $2D,$2D,$2D,$2D,$2D,$2D,$2D,$22
DD18 DEFB $2C,$22,$43,$4F,$4C,$54,$20,$2E
DD20 DEFB $34,$34,$20,$42,$55,$4C,$4C,$45
DD28 DEFB $54,$53,$2D,$2D,$2D,$2D,$22,$2C
DD30 DEFB $22,$43,$4F,$4C,$54,$20,$2E,$34
DD38 DEFB $35,$20,$42,$55,$4C,$4C,$45,$54
DD40 DEFB $53,$2D,$2D,$2D,$2D,$22,$2C,$22
DD48 DEFB $57,$49,$4E,$43,$48,$45,$53,$54
DD50 DEFB $45,$52,$20,$52,$49,$46,$4C,$45
DD58 DEFB $2D,$2D,$2D,$2D,$22,$2C,$22,$57
DD60 DEFB $49,$4E,$43,$48,$45,$53,$54,$45
DD68 DEFB $52,$20,$42,$55,$4C,$4C,$45,$54
DD70 DEFB $53,$2D,$2D,$22,$2C,$22,$4B,$4E
DD78 DEFB $49,$46,$45,$2D,$2D,$2D,$2D,$2D
DD80 DEFB $2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D
DD88 DEFB $2D,$2D,$22,$2C,$22,$46,$4F,$4F
DD90 DEFB $44,$20,$46,$4F,$52,$20,$31,$20
DD98 DEFB $44,$41,$59,$2D,$2D,$2D,$2D,$2D
DDA0 DEFB $2D,$22,$2C,$22,$48,$4F,$52,$53
DDA8 DEFB $45,$20,$46,$4F,$4F,$44,$20,$46
DDB0 DEFB $4F,$52,$20,$31,$20,$44,$41,$59
DDB8 DEFB $22,$2C,$22,$43,$41,$4E,$54,$45
DDC0 DEFB $45,$4E,$20,$4F,$46,$20,$57,$41
DDC8 DEFB $54,$45,$52,$2D,$2D,$2D,$2D,$22
DDD0 DEFB $2C,$22,$47,$52,$45,$41,$54,$20
DDD8 DEFB $43,$4F,$41,$54,$2D,$2D,$2D,$2D
DDE0 DEFB $2D,$2D,$2D,$2D,$2D,$2D,$22,$2C
DDE8 DEFB $22,$57,$48,$49,$53,$4B,$45,$59
DDF0 DEFB $2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D
DDF8 DEFB $2D,$2D,$2D,$2D,$2D,$22,$2C,$22
DE00 DEFB $42,$4C,$41,$4E,$4B,$45,$54,$2D
DE08 DEFB $2D,$2D,$2D,$2D,$2D,$2D,$2D,$2D
DE10 DEFB $2D,$2D,$2D,$2D,$22,$2C,$22,$53
DE18 DEFB $4E,$41,$4B,$45,$42,$49,$54,$45
DE20 DEFB $20,$4D,$45,$44,$49,$43,$49,$4E
DE28 DEFB $45,$2D,$2D,$22,$0D
DE2D DEFB $23,$B9,$7E,$00,$E4,$35,$35,$0E Line 9145: DATA 55,28,35,35,5,10,40,15,10,R,3,3,15,R,8,4.
DE35 DEFB $00,$00,$37,$00,$00,$2C,$32,$38
DE3D DEFB $0E,$00,$00,$1C,$00,$00,$2C,$33
DE45 DEFB $35,$0E,$00,$00,$23,$00,$00,$2C
DE4D DEFB $33,$35,$0E,$00,$00,$23,$00,$00
DE55 DEFB $2C,$35,$0E,$00,$00,$05,$00,$00
DE5D DEFB $2C,$31,$30,$0E,$00,$00,$0A,$00
DE65 DEFB $00,$2C,$34,$30,$0E,$00,$00,$28
DE6D DEFB $00,$00,$2C,$31,$35,$0E,$00,$00
DE75 DEFB $0F,$00,$00,$2C,$31,$30,$0E,$00
DE7D DEFB $00,$0A,$00,$00,$2C,$52,$2C,$33
DE85 DEFB $0E,$00,$00,$03,$00,$00,$2C,$33
DE8D DEFB $0E,$00,$00,$03,$00,$00,$2C,$31
DE95 DEFB $35,$0E,$00,$00,$0F,$00,$00,$2C
DE9D DEFB $52,$2C,$38,$0E,$00,$00,$08,$00
DEA5 DEFB $00,$2C,$34,$0E,$00,$00,$04,$00
DEAD DEFB $00,$0D
DEAF DEFB $23,$BF,$12,$00,$E4,$22,$54,$48 Line 9151: DATA "THE BLACKSMITH".
DEB7 DEFB $45,$20,$42,$4C,$41,$43,$4B,$53
DEBF DEFB $4D,$49,$54,$48,$22,$0D
DEC5 DEFB $23,$C0,$12,$00,$E4,$22,$54,$48 Line 9152: DATA "THE TOWN MAYOR".
DECD DEFB $45,$20,$54,$4F,$57,$4E,$20,$4D
DED5 DEFB $41,$59,$4F,$52,$22,$0D
DEDB DEFB $23,$C1,$0E,$00,$E4,$22,$54,$48 Line 9153: DATA "THE DOCTOR".
DEE3 DEFB $45,$20,$44,$4F,$43,$54,$4F,$52
DEEB DEFB $22,$0D
DEED DEFB $23,$C2,$0D,$00,$E4,$22,$4D,$59 Line 9154: DATA "MY DEPUTY".
DEF5 DEFB $20,$44,$45,$50,$55,$54,$59,$22
DEFD DEFB $0D
DEFE DEFB $23,$F0,$24,$00,$E4,$22,$4D,$45 Line 9200: DATA "MEAN","TOUGH","BIG","CRUEL","MAD".
DF06 DEFB $41,$4E,$22,$2C,$22,$54,$4F,$55
DF0E DEFB $47,$48,$22,$2C,$22,$42,$49,$47
DF16 DEFB $22,$2C,$22,$43,$52,$55,$45,$4C
DF1E DEFB $22,$2C,$22,$4D,$41,$44,$22,$0D
DF26 DEFB $23,$F5,$2E,$00,$E4,$22,$4E,$41 Line 9205: DATA "NASTY","UGLY","VICIOUS","ANGRY","DESPERATE".
DF2E DEFB $53,$54,$59,$22,$2C,$22,$55,$47
DF36 DEFB $4C,$59,$22,$2C,$22,$56,$49,$43
DF3E DEFB $49,$4F,$55,$53,$22,$2C,$22,$41
DF46 DEFB $4E,$47,$52,$59,$22,$2C,$22,$44
DF4E DEFB $45,$53,$50,$45,$52,$41,$54,$45
DF56 DEFB $22,$0D
DF58 DEFB $23,$FA,$6C,$00,$E4,$22,$4A,$55 Line 9210: DATA "JUMPS OUT ON YOU","SPRINGS OUT","WANDERS UP TO YOU","ATTACKS YOU","CHARGES TOWARD YOU","SNEAKS UP TO YOU".
DF60 DEFB $4D,$50,$53,$20,$4F,$55,$54,$20
DF68 DEFB $4F,$4E,$20,$59,$4F,$55,$22,$2C
DF70 DEFB $22,$53,$50,$52,$49,$4E,$47,$53
DF78 DEFB $20,$4F,$55,$54,$22,$2C,$22,$57
DF80 DEFB $41,$4E,$44,$45,$52,$53,$20,$55
DF88 DEFB $50,$20,$54,$4F,$20,$59,$4F,$55
DF90 DEFB $22,$2C,$22,$41,$54,$54,$41,$43
DF98 DEFB $4B,$53,$20,$59,$4F,$55,$22,$2C
DFA0 DEFB $22,$43,$48,$41,$52,$47,$45,$53
DFA8 DEFB $20,$54,$4F,$57,$41,$52,$44,$20
DFB0 DEFB $59,$4F,$55,$22,$2C,$22,$53,$4E
DFB8 DEFB $45,$41,$4B,$53,$20,$55,$50,$20
DFC0 DEFB $54,$4F,$20,$59,$4F,$55,$22,$0D
DFC8 DEFB $23,$FF,$54,$00,$E4,$22,$52,$45 Line 9215: DATA "RED INDIAN","BANDIT","GUNSLINGER","BOUNTY HUNTER","TRAPPER","DESPERADO","VULTURE".
DFD0 DEFB $44,$20,$49,$4E,$44,$49,$41,$4E
DFD8 DEFB $22,$2C,$22,$42,$41,$4E,$44,$49
DFE0 DEFB $54,$22,$2C,$22,$47,$55,$4E,$53
DFE8 DEFB $4C,$49,$4E,$47,$45,$52,$22,$2C
DFF0 DEFB $22,$42,$4F,$55,$4E,$54,$59,$20
DFF8 DEFB $48,$55,$4E,$54,$45,$52,$22,$2C
E000 DEFB $22,$54,$52,$41,$50,$50,$45,$52
E008 DEFB $22,$2C,$22,$44,$45,$53,$50,$45
E010 DEFB $52,$41,$44,$4F,$22,$2C,$22,$56
E018 DEFB $55,$4C,$54,$55,$52,$45,$22,$0D
E020 DEFB $24,$09,$AB,$00,$E4,$52,$2C,$35 Line 9225: DATA R,5,R,10,U,10,R,10,R,14,R,12,U,10,R,12,U,14,U,12,R,10,U,10,R,14,R,17,3,19.
E028 DEFB $0E,$00,$00,$05,$00,$00,$2C,$52
E030 DEFB $2C,$31,$30,$0E,$00,$00,$0A,$00
E038 DEFB $00,$2C,$55,$2C,$31,$30,$0E,$00
E040 DEFB $00,$0A,$00,$00,$2C,$52,$2C,$31
E048 DEFB $30,$0E,$00,$00,$0A,$00,$00,$2C
E050 DEFB $52,$2C,$31,$34,$0E,$00,$00,$0E
E058 DEFB $00,$00,$2C,$52,$2C,$31,$32,$0E
E060 DEFB $00,$00,$0C,$00,$00,$2C,$55,$2C
E068 DEFB $31,$30,$0E,$00,$00,$0A,$00,$00
E070 DEFB $2C,$52,$2C,$31,$32,$0E,$00,$00
E078 DEFB $0C,$00,$00,$2C,$55,$2C,$31,$34
E080 DEFB $0E,$00,$00,$0E,$00,$00,$2C,$55
E088 DEFB $2C,$31,$32,$0E,$00,$00,$0C,$00
E090 DEFB $00,$2C,$52,$2C,$31,$30,$0E,$00
E098 DEFB $00,$0A,$00,$00,$2C,$55,$2C,$31
E0A0 DEFB $30,$0E,$00,$00,$0A,$00,$00,$2C
E0A8 DEFB $52,$2C,$31,$34,$0E,$00,$00,$0E
E0B0 DEFB $00,$00,$2C,$52,$2C,$31,$37,$0E
E0B8 DEFB $00,$00,$11,$00,$00,$2C,$33,$0E
E0C0 DEFB $00,$00,$03,$00,$00,$2C,$31,$39
E0C8 DEFB $0E,$00,$00,$13,$00,$00,$0D
E0CF DEFB $24,$0A,$3A,$00,$E5,$B0,$22,$39 Line 9226: RESTORE VAL "9225": FOR W=U TO 15: READ X: READ E: BEEP X/5,E: NEXT W: PAUSE 100: RETURN.
E0D7 DEFB $32,$32,$35,$22,$3A,$EB,$57,$3D
E0DF DEFB $55,$CC,$31,$35,$0E,$00,$00,$0F
E0E7 DEFB $00,$00,$3A,$E3,$58,$3A,$E3,$45
E0EF DEFB $3A,$D7,$58,$2F,$35,$0E,$00,$00
E0F7 DEFB $05,$00,$00,$2C,$45,$3A,$F3,$57
E0FF DEFB $3A,$F2,$31,$30,$30,$0E,$00,$00
E107 DEFB $64,$00,$00,$3A,$FE,$0D
E10D DEFB $24,$0E,$8E,$00,$E4,$55,$2C,$31 Line 9230: DATA U,13,1.25,20,.75,18,R,20,U,18,.5,13,U,16,.5,13,U,16,R,15.
E115 DEFB $33,$0E,$00,$00,$0D,$00,$00,$2C
E11D DEFB $31,$2E,$32,$35,$0E,$81,$20,$00
E125 DEFB $00,$00,$2C,$32,$30,$0E,$00,$00
E12D DEFB $14,$00,$00,$2C,$2E,$37,$35,$0E
E135 DEFB $80,$40,$00,$00,$00,$2C,$31,$38
E13D DEFB $0E,$00,$00,$12,$00,$00,$2C,$52
E145 DEFB $2C,$32,$30,$0E,$00,$00,$14,$00
E14D DEFB $00,$2C,$55,$2C,$31,$38,$0E,$00
E155 DEFB $00,$12,$00,$00,$2C,$2E,$35,$0E
E15D DEFB $7F,$7F,$FF,$FF,$FF,$2C,$31,$33
E165 DEFB $0E,$00,$00,$0D,$00,$00,$2C,$55
E16D DEFB $2C,$31,$36,$0E,$00,$00,$10,$00
E175 DEFB $00,$2C,$2E,$35,$0E,$7F,$7F,$FF
E17D DEFB $FF,$FF,$2C,$31,$33,$0E,$00,$00
E185 DEFB $0D,$00,$00,$2C,$55,$2C,$31,$36
E18D DEFB $0E,$00,$00,$10,$00,$00,$2C,$52
E195 DEFB $2C,$31,$35,$0E,$00,$00,$0F,$00
E19D DEFB $00,$0D
E19F DEFB $24,$0F,$2F,$00,$E5,$B0,$22,$39 Line 9231: RESTORE VAL "9230": FOR W=U TO 10: READ X: READ E: BEEP X/3,E: NEXT W: RETURN.
E1A7 DEFB $32,$33,$30,$22,$3A,$EB,$57,$3D
E1AF DEFB $55,$CC,$31,$30,$0E,$00,$00,$0A
E1B7 DEFB $00,$00,$3A,$E3,$58,$3A,$E3,$45
E1BF DEFB $3A,$D7,$58,$2F,$33,$0E,$00,$00
E1C7 DEFB $03,$00,$00,$2C,$45,$3A,$F3,$57
E1CF DEFB $3A,$FE,$0D
E1D2 DEFB $25,$21,$4A,$00,$D7,$2E,$35,$0E Line 9505: BEEP .5,PI: INPUT "PRESS ENTER FOR SCORE "; LINE H$: IF MU>50 THEN LET SC=SC+MU-50.
E1DA DEFB $7F,$7F,$FF,$FF,$FF,$2C,$A7,$3A
E1E2 DEFB $EE,$22,$50,$52,$45,$53,$53,$20
E1EA DEFB $45,$4E,$54,$45,$52,$20,$46,$4F
E1F2 DEFB $52,$20,$53,$43,$4F,$52,$45,$20
E1FA DEFB $22,$3B,$CA,$48,$24,$3A,$FA,$4D
E202 DEFB $55,$3E,$35,$30,$0E,$00,$00,$32
E20A DEFB $00,$00,$CB,$F1,$53,$43,$3D,$53
E212 DEFB $43,$2B,$4D,$55,$2D,$35,$30,$0E
E21A DEFB $00,$00,$32,$00,$00,$0D
E220 DEFB $25,$30,$15,$00,$FA,$53,$43,$3E Line 9520: IF SC>HC THEN LET HC=SC: LET Q$=N$.
E228 DEFB $48,$43,$CB,$F1,$48,$43,$3D,$53
E230 DEFB $43,$3A,$F1,$51,$24,$3D,$4E,$24
E238 DEFB $0D
E239 DEFB $25,$31,$02,$00,$FE,$0D Line 9521: RETURN.
E23F DEFB $25,$35,$9C,$00,$D9,$39,$0E,$00 Line 9525: INK 9: PRINT AT 17,5;"YOU HAVE SCORED ";SC: PRINT : PRINT TAB 4;"BEST SCORE SO FAR IS ";HC: PRINT : PRINT TAB 4;"BY ";Q$: INPUT "PRESS ENTER FOR ANOTHER GAME"; LINE H$: GO TO 15.
E247 DEFB $00,$09,$00,$00,$3A,$F5,$AC,$31
E24F DEFB $37,$0E,$00,$00,$11,$00,$00,$2C
E257 DEFB $35,$0E,$00,$00,$05,$00,$00,$3B
E25F DEFB $22,$59,$4F,$55,$20,$48,$41,$56
E267 DEFB $45,$20,$53,$43,$4F,$52,$45,$44
E26F DEFB $20,$22,$3B,$53,$43,$3A,$F5,$3A
E277 DEFB $F5,$AD,$34,$0E,$00,$00,$04,$00
E27F DEFB $00,$3B,$22,$42,$45,$53,$54,$20
E287 DEFB $53,$43,$4F,$52,$45,$20,$53,$4F
E28F DEFB $20,$46,$41,$52,$20,$49,$53,$20
E297 DEFB $22,$3B,$48,$43,$3A,$F5,$3A,$F5
E29F DEFB $AD,$34,$0E,$00,$00,$04,$00,$00
E2A7 DEFB $3B,$22,$42,$59,$20,$22,$3B,$51
E2AF DEFB $24,$3A,$EE,$22,$50,$52,$45,$53
E2B7 DEFB $53,$20,$45,$4E,$54,$45,$52,$20
E2BF DEFB $46,$4F,$52,$20,$41,$4E,$4F,$54
E2C7 DEFB $48,$45,$52,$20,$47,$41,$4D,$45
E2CF DEFB $22,$3B,$CA,$48,$24,$3A,$EC,$31
E2D7 DEFB $35,$0E,$00,$00,$0F,$00,$00,$0D
E2DF DEFB $25,$80,$40,$00,$EB,$4E,$3D,$55 Line 9600: FOR N=U TO 6: FOR X=O TO 7: BORDER X: PAPER N: CLS : BEEP .01,N*X+10: NEXT X: NEXT N.
E2E7 DEFB $CC,$36,$0E,$00,$00,$06,$00,$00
E2EF DEFB $3A,$EB,$58,$3D,$4F,$CC,$37,$0E
E2F7 DEFB $00,$00,$07,$00,$00,$3A,$E7,$58
E2FF DEFB $3A,$DA,$4E,$3A,$FB,$3A,$D7,$2E
E307 DEFB $30,$31,$0E,$7A,$23,$D7,$0A,$3D
E30F DEFB $2C,$4E,$2A,$58,$2B,$31,$30,$0E
E317 DEFB $00,$00,$0A,$00,$00,$3A,$F3,$58
E31F DEFB $3A,$F3,$4E,$0D
E323 DEFB $25,$85,$F9,$00,$F5,$DB,$55,$3B Line 9605: PRINT FLASH U;AT 4,4;"****CONGRATULATIONS****": PRINT : PRINT : PRINT " THE KILLER WAS ";B$(A): PRINT : PRINT " HE CONFESSED,WHEN THE SHERIFF": PRINT : PRINT " LOCKED HIM UP...": PRINT : PRINT " YOU'RE A HERO,YOU HAVE SAVED": PRINT : PRINT " THE WEST FROM THE WILD BUNCH!": LET SC=SC+5000: LET F$="HERO!": GO TO 9720.
E32B DEFB $AC,$34,$0E,$00,$00,$04,$00,$00
E333 DEFB $2C,$34,$0E,$00,$00,$04,$00,$00
E33B DEFB $3B,$22,$2A,$2A,$2A,$2A,$43,$4F
E343 DEFB $4E,$47,$52,$41,$54,$55,$4C,$41
E34B DEFB $54,$49,$4F,$4E,$53,$2A,$2A,$2A
E353 DEFB $2A,$22,$3A,$F5,$3A,$F5,$3A,$F5
E35B DEFB $22,$20,$54,$48,$45,$20,$4B,$49
E363 DEFB $4C,$4C,$45,$52,$20,$57,$41,$53
E36B DEFB $20,$22,$3B,$42,$24,$28,$41,$29
E373 DEFB $3A,$F5,$3A,$F5,$22,$20,$48,$45
E37B DEFB $20,$43,$4F,$4E,$46,$45,$53,$53
E383 DEFB $45,$44,$2C,$57,$48,$45,$4E,$20
E38B DEFB $54,$48,$45,$20,$53,$48,$45,$52
E393 DEFB $49,$46,$46,$22,$3A,$F5,$3A,$F5
E39B DEFB $22,$20,$4C,$4F,$43,$4B,$45,$44
E3A3 DEFB $20,$48,$49,$4D,$20,$55,$50,$2E
E3AB DEFB $2E,$2E,$22,$3A,$F5,$3A,$F5,$22
E3B3 DEFB $20,$59,$4F,$55,$27,$52,$45,$20
E3BB DEFB $41,$20,$48,$45,$52,$4F,$2C,$59
E3C3 DEFB $4F,$55,$20,$48,$41,$56,$45,$20
E3CB DEFB $53,$41,$56,$45,$44,$22,$3A,$F5
E3D3 DEFB $3A,$F5,$22,$20,$54,$48,$45,$20
E3DB DEFB $57,$45,$53,$54,$20,$46,$52,$4F
E3E3 DEFB $4D,$20,$54,$48,$45,$20,$57,$49
E3EB DEFB $4C,$44,$20,$42,$55,$4E,$43,$48
E3F3 DEFB $21,$22,$3A,$F1,$53,$43,$3D,$53
E3FB DEFB $43,$2B,$35,$30,$30,$30,$0E,$00
E403 DEFB $00,$88,$13,$00,$3A,$F1,$46,$24
E40B DEFB $3D,$22,$48,$45,$52,$4F,$21,$22
E413 DEFB $3A,$EC,$39,$37,$32,$30,$0E,$00
E41B DEFB $00,$F8,$25,$00,$0D
E420 DEFB $25,$E4,$41,$00,$EB,$4E,$3D,$55 Line 9700: FOR N=U TO 6: FOR X=7 TO 0 STEP -U: BORDER N: PAPER X: CLS : BEEP .01,N*-U: NEXT X: NEXT N.
E428 DEFB $CC,$36,$0E,$00,$00,$06,$00,$00
E430 DEFB $3A,$EB,$58,$3D,$37,$0E,$00,$00
E438 DEFB $07,$00,$00,$CC,$30,$0E,$00,$00
E440 DEFB $00,$00,$00,$CD,$2D,$55,$3A,$E7
E448 DEFB $4E,$3A,$DA,$58,$3A,$FB,$3A,$D7
E450 DEFB $2E,$30,$31,$0E,$7A,$23,$D7,$0A
E458 DEFB $3D,$2C,$4E,$2A,$2D,$55,$3A,$F3
E460 DEFB $58,$3A,$F3,$4E,$0D
E465 DEFB $25,$EE,$97,$00,$F5,$AC,$35,$0E Line 9710: PRINT AT 5,U;"UNFORTUNATELY YOU HAVE JUST": PRINT : PRINT " KILLED THE ONLY MAN WHO COULD": PRINT : PRINT " PROVE YOUR INNOCENCE. DEAD MEN": PRINT : PRINT " DON'T CONFESS....": LET F$="IDIOT".
E46D DEFB $00,$00,$05,$00,$00,$2C,$55,$3B
E475 DEFB $22,$55,$4E,$46,$4F,$52,$54,$55
E47D DEFB $4E,$41,$54,$45,$4C,$59,$20,$59
E485 DEFB $4F,$55,$20,$48,$41,$56,$45,$20
E48D DEFB $4A,$55,$53,$54,$22,$3A,$F5,$3A
E495 DEFB $F5,$22,$20,$4B,$49,$4C,$4C,$45
E49D DEFB $44,$20,$54,$48,$45,$20,$4F,$4E
E4A5 DEFB $4C,$59,$20,$4D,$41,$4E,$20,$57
E4AD DEFB $48,$4F,$20,$43,$4F,$55,$4C,$44
E4B5 DEFB $22,$3A,$F5,$3A,$F5,$22,$20,$50
E4BD DEFB $52,$4F,$56,$45,$20,$59,$4F,$55
E4C5 DEFB $52,$20,$49,$4E,$4E,$4F,$43,$45
E4CD DEFB $4E,$43,$45,$2E,$20,$44,$45,$41
E4D5 DEFB $44,$20,$4D,$45,$4E,$22,$3A,$F5
E4DD DEFB $3A,$F5,$22,$20,$44,$4F,$4E,$27
E4E5 DEFB $54,$20,$43,$4F,$4E,$46,$45,$53
E4ED DEFB $53,$2E,$2E,$2E,$2E,$22,$3A,$F1
E4F5 DEFB $46,$24,$3D,$22,$49,$44,$49,$4F
E4FD DEFB $54,$22,$0D
E500 DEFB $25,$F8,$12,$00,$ED,$B0,$22,$39 Line 9720: GO SUB VAL "9500": GO TO VAL "9800".
E508 DEFB $35,$30,$30,$22,$3A,$EC,$B0,$22
E510 DEFB $39,$38,$30,$30,$22,$0D
E516 DEFB $26,$48,$10,$01,$DA,$52,$3A,$E7 Line 9800: PAPER R: BORDER R: CLS : LET X=62298: LET T=8: GO SUB 9900: DRAW -17,29: PLOT 139,137: DRAW -16,28: PLOT 73,137: DRAW 17,-30: PLOT 107,78: DRAW 16,-30: PRINT AT 6,14;"TOP";AT 8,13;"GRADE";AT 10,13;F$: GO TO 9525.
E51E DEFB $52,$3A,$FB,$3A,$F1,$58,$3D,$36
E526 DEFB $32,$32,$39,$38,$0E,$00,$00,$5A
E52E DEFB $F3,$00,$3A,$F1,$54,$3D,$38,$0E
E536 DEFB $00,$00,$08,$00,$00,$3A,$ED,$39
E53E DEFB $39,$30,$30,$0E,$00,$00,$AC,$26
E546 DEFB $00,$3A,$FC,$2D,$31,$37,$0E,$00
E54E DEFB $00,$11,$00,$00,$2C,$32,$39,$0E
E556 DEFB $00,$00,$1D,$00,$00,$3A,$F6,$31
E55E DEFB $33,$39,$0E,$00,$00,$8B,$00,$00
E566 DEFB $2C,$31,$33,$37,$0E,$00,$00,$89
E56E DEFB $00,$00,$3A,$FC,$2D,$31,$36,$0E
E576 DEFB $00,$00,$10,$00,$00,$2C,$32,$38
E57E DEFB $0E,$00,$00,$1C,$00,$00,$3A,$F6
E586 DEFB $37,$33,$0E,$00,$00,$49,$00,$00
E58E DEFB $2C,$31,$33,$37,$0E,$00,$00,$89
E596 DEFB $00,$00,$3A,$FC,$31,$37,$0E,$00
E59E DEFB $00,$11,$00,$00,$2C,$2D,$33,$30
E5A6 DEFB $0E,$00,$00,$1E,$00,$00,$3A,$F6
E5AE DEFB $31,$30,$37,$0E,$00,$00,$6B,$00
E5B6 DEFB $00,$2C,$37,$38,$0E,$00,$00,$4E
E5BE DEFB $00,$00,$3A,$FC,$31,$36,$0E,$00
E5C6 DEFB $00,$10,$00,$00,$2C,$2D,$33,$30
E5CE DEFB $0E,$00,$00,$1E,$00,$00,$3A,$F5
E5D6 DEFB $AC,$36,$0E,$00,$00,$06,$00,$00
E5DE DEFB $2C,$31,$34,$0E,$00,$00,$0E,$00
E5E6 DEFB $00,$3B,$22,$54,$4F,$50,$22,$3B
E5EE DEFB $AC,$38,$0E,$00,$00,$08,$00,$00
E5F6 DEFB $2C,$31,$33,$0E,$00,$00,$0D,$00
E5FE DEFB $00,$3B,$22,$47,$52,$41,$44,$45
E606 DEFB $22,$3B,$AC,$31,$30,$0E,$00,$00
E60E DEFB $0A,$00,$00,$2C,$31,$33,$0E,$00
E616 DEFB $00,$0D,$00,$00,$3B,$46,$24,$3A
E61E DEFB $EC,$39,$35,$32,$35,$0E,$00,$00
E626 DEFB $35,$25,$00,$0D
E62A DEFB $26,$7A,$95,$00,$E7,$52,$3A,$DA Line 9850: BORDER R: PAPER R: INK O: CLS : LET S$="": FOR N=U TO 13: PRINT AT N,13;S$: NEXT N: FOR N=4 TO 6: PRINT AT N,10;S$;S$;S$: NEXT N: INK 9: PRINT PAPER O;AT 5,12;"R.I.P": GO TO 9525.
E632 DEFB $52,$3A,$D9,$4F,$3A,$FB,$3A,$F1
E63A DEFB $53,$24,$3D,$22,$8F,$8F,$8F,$22
E642 DEFB $3A,$EB,$4E,$3D,$55,$CC,$31,$33
E64A DEFB $0E,$00,$00,$0D,$00,$00,$3A,$F5
E652 DEFB $AC,$4E,$2C,$31,$33,$0E,$00,$00
E65A DEFB $0D,$00,$00,$3B,$53,$24,$3A,$F3
E662 DEFB $4E,$3A,$EB,$4E,$3D,$34,$0E,$00
E66A DEFB $00,$04,$00,$00,$CC,$36,$0E,$00
E672 DEFB $00,$06,$00,$00,$3A,$F5,$AC,$4E
E67A DEFB $2C,$31,$30,$0E,$00,$00,$0A,$00
E682 DEFB $00,$3B,$53,$24,$3B,$53,$24,$3B
E68A DEFB $53,$24,$3A,$F3,$4E,$3A,$D9,$39
E692 DEFB $0E,$00,$00,$09,$00,$00,$3A,$F5
E69A DEFB $DA,$4F,$3B,$AC,$35,$0E,$00,$00
E6A2 DEFB $05,$00,$00,$2C,$31,$32,$0E,$00
E6AA DEFB $00,$0C,$00,$00,$3B,$22,$52,$2E
E6B2 DEFB $49,$2E,$50,$22,$3A,$EC,$39,$35
E6BA DEFB $32,$35,$0E,$00,$00,$35,$25,$00
E6C2 DEFB $0D
E6C3 DEFB $26,$8E,$F1,$00,$DA,$52,$3A,$E7 Line 9870: PAPER R: BORDER R: INK 0: CLS : LET X=62331: LET T=29: PRINT AT R,9;"";AT 14,9;"": FOR N=INT PI TO 13: PRINT PAPER 5;AT N,9;" ": NEXT N: GO SUB 9900: LET X=62240: FOR N=1 TO 28: PLOT PEEK X,PEEK (X+1): LET X=X+2: NEXT N.
E6CB DEFB $52,$3A,$D9,$30,$0E,$00,$00,$00
E6D3 DEFB $00,$00,$3A,$FB,$3A,$F1,$58,$3D
E6DB DEFB $36,$32,$33,$33,$31,$0E,$00,$00
E6E3 DEFB $7B,$F3,$00,$3A,$F1,$54,$3D,$32
E6EB DEFB $39,$0E,$00,$00,$1D,$00,$00,$3A
E6F3 DEFB $F5,$AC,$52,$2C,$39,$0E,$00,$00
E6FB DEFB $09,$00,$00,$3B,$22,$8F,$8F,$8F
E703 DEFB $8F,$8F,$8F,$8F,$8F,$8F,$8F,$8F
E70B DEFB $8F,$8F,$22,$3B,$AC,$31,$34,$0E
E713 DEFB $00,$00,$0E,$00,$00,$2C,$39,$0E
E71B DEFB $00,$00,$09,$00,$00,$3B,$22,$8F
E723 DEFB $8F,$8F,$8F,$8F,$8F,$8F,$8F,$8F
E72B DEFB $8F,$8F,$8F,$8F,$22,$3A,$EB,$4E
E733 DEFB $3D,$BA,$A7,$CC,$31,$33,$0E,$00
E73B DEFB $00,$0D,$00,$00,$3A,$F5,$DA,$35
E743 DEFB $0E,$00,$00,$05,$00,$00,$3B,$AC
E74B DEFB $4E,$2C,$39,$0E,$00,$00,$09,$00
E753 DEFB $00,$3B,$22,$8F,$20,$20,$8A,$20
E75B DEFB $20,$8A,$20,$20,$8A,$20,$20,$8F
E763 DEFB $22,$3A,$F3,$4E,$3A,$ED,$39,$39
E76B DEFB $30,$30,$0E,$00,$00,$AC,$26,$00
E773 DEFB $3A,$F1,$58,$3D,$36,$32,$32,$34
E77B DEFB $30,$0E,$00,$00,$20,$F3,$00,$3A
E783 DEFB $EB,$4E,$3D,$31,$0E,$00,$00,$01
E78B DEFB $00,$00,$CC,$32,$38,$0E,$00,$00
E793 DEFB $1C,$00,$00,$3A,$F6,$BE,$58,$2C
E79B DEFB $BE,$28,$58,$2B,$31,$0E,$00,$00
E7A3 DEFB $01,$00,$00,$29,$3A,$F1,$58,$3D
E7AB DEFB $58,$2B,$32,$0E,$00,$00,$02,$00
E7B3 DEFB $00,$3A,$F3,$4E,$0D
E7B8 DEFB $26,$8F,$1C,$01,$F6,$31,$30,$38 Line 9871: PLOT 108,95: DRAW 28,O,PI: PLOT 126,73: DRAW -3,R: PLOT 116,86: DRAW 12,O,-PI: PLOT 127,110: DRAW 5,3,-PI/R: PLOT 117,110: DRAW -5,3,PI/R: PLOT 147,72: DRAW 6,-8,-PI/R: PLOT 97,72: DRAW -6,-8,PI/R: GO TO 9525.
E7C0 DEFB $0E,$00,$00,$6C,$00,$00,$2C,$39
E7C8 DEFB $35,$0E,$00,$00,$5F,$00,$00,$3A
E7D0 DEFB $FC,$32,$38,$0E,$00,$00,$1C,$00
E7D8 DEFB $00,$2C,$4F,$2C,$A7,$3A,$F6,$31
E7E0 DEFB $32,$36,$0E,$00,$00,$7E,$00,$00
E7E8 DEFB $2C,$37,$33,$0E,$00,$00,$49,$00
E7F0 DEFB $00,$3A,$FC,$2D,$33,$0E,$00,$00
E7F8 DEFB $03,$00,$00,$2C,$52,$3A,$F6,$31
E800 DEFB $31,$36,$0E,$00,$00,$74,$00,$00
E808 DEFB $2C,$38,$36,$0E,$00,$00,$56,$00
E810 DEFB $00,$3A,$FC,$31,$32,$0E,$00,$00
E818 DEFB $0C,$00,$00,$2C,$4F,$2C,$2D,$A7
E820 DEFB $3A,$F6,$31,$32,$37,$0E,$00,$00
E828 DEFB $7F,$00,$00,$2C,$31,$31,$30,$0E
E830 DEFB $00,$00,$6E,$00,$00,$3A,$FC,$35
E838 DEFB $0E,$00,$00,$05,$00,$00,$2C,$33
E840 DEFB $0E,$00,$00,$03,$00,$00,$2C,$2D
E848 DEFB $A7,$2F,$52,$3A,$F6,$31,$31,$37
E850 DEFB $0E,$00,$00,$75,$00,$00,$2C,$31
E858 DEFB $31,$30,$0E,$00,$00,$6E,$00,$00
E860 DEFB $3A,$FC,$2D,$35,$0E,$00,$00,$05
E868 DEFB $00,$00,$2C,$33,$0E,$00,$00,$03
E870 DEFB $00,$00,$2C,$A7,$2F,$52,$3A,$F6
E878 DEFB $31,$34,$37,$0E,$00,$00,$93,$00
E880 DEFB $00,$2C,$37,$32,$0E,$00,$00,$48
E888 DEFB $00,$00,$3A,$FC,$36,$0E,$00,$00
E890 DEFB $06,$00,$00,$2C,$2D,$38,$0E,$00
E898 DEFB $00,$08,$00,$00,$2C,$2D,$A7,$2F
E8A0 DEFB $52,$3A,$F6,$39,$37,$0E,$00,$00
E8A8 DEFB $61,$00,$00,$2C,$37,$32,$0E,$00
E8B0 DEFB $00,$48,$00,$00,$3A,$FC,$2D,$36
E8B8 DEFB $0E,$00,$00,$06,$00,$00,$2C,$2D
E8C0 DEFB $38,$0E,$00,$00,$08,$00,$00,$2C
E8C8 DEFB $A7,$2F,$52,$3A,$EC,$39,$35,$32
E8D0 DEFB $35,$0E,$00,$00,$35,$25,$00,$0D
E8D8 DEFB $26,$AC,$30,$00,$EB,$4E,$3D,$55 Line 9900: FOR N=U TO T: PLOT PEEK X,PEEK (X+U): LET X=X+R: DRAW PEEK X,PEEK (X+U): LET X=X+R: NEXT N: RETURN.
E8E0 DEFB $CC,$54,$3A,$F6,$BE,$58,$2C,$BE
E8E8 DEFB $28,$58,$2B,$55,$29,$3A,$F1,$58
E8F0 DEFB $3D,$58,$2B,$52,$3A,$FC,$BE,$58
E8F8 DEFB $2C,$BE,$28,$58,$2B,$55,$29,$3A
E900 DEFB $F1,$58,$3D,$58,$2B,$52,$3A,$F3
E908 DEFB $4E,$3A,$FE,$0D
E90C DEFB $27,$0F,$1F,$00,$D9,$39,$0E,$00 Line 9999: INK 9: BEEP .5,O: PAUSE O: GO TO VAL "15".
E914 DEFB $00,$09,$00,$00,$3A,$D7,$2E,$35
E91C DEFB $0E,$7F,$7F,$FF,$FF,$FF,$2C,$4F
E924 DEFB $3A,$F2,$4F,$3A,$EC,$B0,$22,$31
E92C DEFB $35,$22,$0D
Prev: 5B01 Up: Map Next: E92F