Home » Personal collection » Acorn ADFS disks » Electron » Tynesoft.ADF » AlligataBB/CrownJewel/CROWN3

AlligataBB/CrownJewel/CROWN3

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Personal collection » Acorn ADFS disks » Electron » Tynesoft.ADF
Filename: AlligataBB/CrownJewel/CROWN3
Read OK:
File size: 424C bytes
Load address: FFFF0E00
Exec address: FFFF8023
Duplicates

There is 1 duplicate copy of this file in the archive:

File contents
    5 *FX200,3
   10 *FX13,4
   20 *FX15,0
   30 MODE4
   31 VDU 28,4,23,36,6
   32 VDU 23;8202;0;0;0;:CLS
   33 *L.CROWN4 5800
   34 ON ERROR PRINT"Error in this program !!":PROCPAUSE:CALL!-4
   35 VDU 19,3,3,0,0,0
   40 *OPT1,1
   50 VDU 23;11,0;0;0;0;0
   70 DIM A(17),C$(17),D$(1),E$(1),N(1),E(1),S(1),W(1),F(15)
   75 L=53
   80 PROCSETSCREEN  
   90 PROCDATA
  100 PRINT"DO YOU WISH TO RESUME PLAY ON A  SAVED GAME ?"
  110 REPEAT:KL$=GET$:UNTILKL$="N" OR KL$="Y"
  120 IF KL$="Y" THEN PROCLOAD 
  130 PROCDESCRIP
  140 IF L=20 AND F(6)=0 THEN PROCJAPS
  150 PROCCHOICE
  160 PRINT
  170 IF B$="LOOK" THEN 130
  180 IF B$="BLEACH" THEN B$="DOMESTIC"
  190 IF B$="SCOURING POWDER" THEN B$="FLASHY"
  200 IF B$="FISH" OR B$="FINGERS" THEN B$="FISH FINGERS"
  210 IF B$="RING" THEN B$="GOLD RING"
  220 IF B$="OLD MAN" THEN B$="MAN"
  230 IF B$="N" OR B$="NORTH" THEN X=1:GOTO550 
  240 IF B$="E" OR B$="EAST" THEN X=2:GOTO550 
  250 IF B$="S" OR B$="SOUTH" THEN X=3:GOTO550 
  260 IF B$="W" OR B$="WEST" THEN X=4:GOTO550 
  270 IF A$="GET" OR A$="TAKE" THEN PROCGET:GOTO540
  280 IF A$="BURN" OR A$="IGNITE" OR A$="LIGHT" OR A$="MELT" THEN PROCBURN:GOTO540
  290 IF A$="INVE" OR A$="INVENTORY" OR A$="LIST" OR A$="INVENT" OR A$="INV" THEN PROCINV:GOTO540
  300 IF A$="OFFER" OR A$="GIVE" THEN PROCOFFER:GOTO540
  310 IF A$="DRINK" AND B$="WINE" THEN PRINT"YOU AREN'T CARRYING IT":GOTO540
  320 IF A$="EAT" OR A$="GOBBLE" OR A$="SWALLOW" THEN PROCEAT:GOTO540
  330 IF A$="PRESS" OR A$="PULL" OR A$="SWITCH" THEN PROCPULL:GOTO540
  340 IF A$="WAIT" THEN PRINT"BORING WAITING ISN'T IT!":PROCPAUSE:GOTO540
  350 IF A$="SAVE" THEN PROCSAVE:GOTO540
  360 IF A$="U" OR A$="UP" OR B$="U" OR B$="UP" THEN PROCUP:GOTO540
  370  IF A$="D" OR A$="DOWN" OR B$="D" OR B$="DOWN" THEN PROCDOWN:GOTO540
  380 IF A$="OPEN" AND B$="DOOR" OR A$="UNLOCK" AND B$="DOOR" THEN PROCUNLOCK:GOTO540
  390 IF A$="CLEAN" OR A$="WIPE" PROCTOIL:GOTO540
  400 IF A$="PAY" THEN PROCPAY:GOTO540
  410 IF A$="READ" AND B$="MAP" AND F(13)=1 THEN PRINT"IT SHOWS A PASSAGE TO THE EAST OFTOWER GREEN":PROCPAUSE:GOTO540
  420 IF A$="READ" AND B$="MAP" AND F(13)=0 THEN PRINT"YOU HAVEN'T GOT A MAP":PROCPAUSE:GOTO540
  430 IF A$="DROP" THEN PROCDROP:GOTO540
  440 IF A$="QUIT" OR A$="END" OR A$="FINISH" OR A$="STOP" THEN PROCQUIT:GOTO540
  450 IF A$="LIGHT" AND B$="TORCH" OR A$="TORCH" AND B$="ON" THEN PROCLAMP:GOTO 540
  460 IF A$="EXAM" AND B$="THRONE" AND A(15)=0 OR A$="MOVE" AND B$="THRONE" AND A(15)=0 OR A$="LOOK" AND B$="THRONE" AND A(15)=0 OR A$="SHIFT" AND B$="THRONE" AND A(15)=0 THEN PRINT"THE CROWN IS HIDDEN BENEATH IT":A(15)=L:GOTO 540
  470 IF A$="EXAM" THEN PRINT"THERE IS NO NEED TO EXAMINE      ANYTHING":PROCPAUSE:GOTO 540
  480 IF A$="DRINK" PROCDRINK:GOTO540
  490 IF A$="DRUG" THEN PROCDRUG:GOTO540
  500 IF A$="ASK" OR A$="TALK" THEN PROCASK:GOTO130
  510 IF A$="PULL" AND B$="LEVER" OR A$="PULL" AND B$="DOWN" THEN PROCPULL:GOTO540
  520 IF A$=B$ THEN PRINT"I DON'T KNOW HOW TO "A$:GOTO540
  530 PRINT"I DON'T KNOW HOW TO "A$" A "'B$"!"
  540 FOR F=1 TO 7000:NEXT:GOTO130 
  550 IF X=3 AND L=9 AND F(2)=0 THEN PRINT"YOU CAN'T GET IN WITHOUT PAYING":GOTO540
  560 IF L=14 AND X=2 AND F(5)=0 OR L=15 AND X=2 AND F(5)=0 THEN PRINT"THERE IS A DOOR OVER THERE       SOMEWHERE BUT YOU CAN'T FIND IT":GOTO540
  570 IF X=2 AND L=19 AND F(3)=0 OR X=2 AND L=42 AND F(4)=0 THEN PRINT"YOU CAN'T GET PAST WITHOUT PAYING":GOTO540
  580 IF X=3 AND L=20 AND F(7)=0 THEN PRINT"YOU CAN'T GO SOUTH BECAUSE THE   BRIDGE IS UP":GOTO540
  590 IF X=1 AND L=22 AND F(8)=0 THEN PRINT"THE MAN WON'T LET YOU PASS":GOTO540
  600 IF X=2 AND L=41 AND F(9)=0 THEN PRINT"A LOCKED DOOR BLOCKS THE WAY EAST":GOTO540
  610 IF X=1 AND L=47 AND F(11)=0 THEN PRINT"A LOCKED DOOR BLOCKS THE WAY     NORTH":GOTO540
  620 IF X=1 AND N=0 THEN PROCNO:GOTO540
  630 IF X=2 AND E=0 THEN PROCNO:GOTO540
  640 IF X=3 AND S=0 THEN PROCNO:GOTO540 
  650 IF X=4 AND W=0 THEN PROCNO:GOTO540
  660 IF X=1 THEN L=N
  670 IF X=2 THEN L=E
  680 IF X=3 THEN L=S
  690 IF X=4 THEN L=W
  700 GOTO130
  710 DEFPROCSETSCREEN
  720 
  730 CLS
  740 VDU 28,4,23,36,6:ENDPROC
  750 DEFPROCDATA
  760 RESTORE 2190:FOR F=1 TO 17:READ C$(F),A(F):NEXT
  770 ENDPROC
  780 DEFPROCDESCRIP
  790 VDU 28,4,23,36,6
  800 CLS
  810 KL$=""
  820 RESTORE (2190+L*10)
  830 READ D$,E$,N,E,S,W
  840 IF L=6 OR L=8 OR L=18 OR L=24 OR L=25 OR L=29 OR L=43 OR L=54 THEN PROCNUMBER:GOTO800
  850 IF L=35 THEN PRINT"YOU HAVE BEEN ARRESTED FOR       ATTEMPTING TO ASSASSINATE THE    P.M.":PROCPAUSE:PROCPAUSE:PROCEND
  860 IF L=20 OR L=23 THEN PROCBRIDGE
  870 IF L=33 PROCPO
  880 IF L=50 AND F(13)=1 THEN E$="YOUR MAP SHOWS A SMALL PASSAGE   TO THE EAST":E=51
  890  IF L=50 AND F(13)=0 THEN E$="YOU ARE SURROUNDED ON ALL SIDES  BY TOWERS":E=0 
  900 IF L=32 THEN PROCTL
  910 PRINT"YOU ARE ";D$:PRINT:IF L=53 AND A(11)=100 OR L=53 AND A(12)=100 OR L=53 AND A(15)=100 THEN PROCPOLICE:GOTO130 
  920 IF L=37 AND A(15)=0 THEN PRINT"SOMETHING IS HIDDEN UNDER THE    THRONE"':GOTO1000
  930 IF L=37 AND A(15)<>0 THEN PRINT"THE THRONE DOESN'T LOOK VERY     COMFORTABLE"':GOTO1000
  940 IF L=4 AND A(5)<>-4 OR L=4 AND A(6)<>-4 THEN E$="THIS LOOKS LIKE A CLEANERS       STORE ROOM"   
  950 IF L=22 AND A(9)<>-22 THEN E$="I CAN SEE THE CONTROL ROOM TO THENORTH"
  960 IF A(12)<>0 AND L=13 THEN E$="THERE IS A LARGE SIGN ABOVE YOU  IT SAYS 'NO SMOKING' - WAXWORKS  ARE HIGHLY FLAMMABLE"
  970 IF L=1 AND F(12)=1 THEN E$="AN OLD MAN SLEEPS IN HERE" 
  980 IF E$="" GOTO1000 
  990 PRINTE$:PRINT
 1000 AS=1
 1010 IF ABS(A(AS))=L THEN1040
 1020 AS=AS+1:IF AS=18 THEN 1110
 1030 GOTO1010
 1040 PRINT"THERE IS :";
 1050 FOR F=1 TO 17
 1060 IF A(F)=L AND F=11 OR A(F)=L AND F=12 OR A(F)=L AND F=15 THEN PRINTTAB(11);"THE "C$(F):GOTO1090
 1070IF A(F)=L THEN PRINTTAB(11);"A "C$(F):GOTO1090
 1080IF ABS(A(F))=L THEN PRINTTAB(11);"SOME "C$(F)
 1090 NEXT
 1100 PRINT
 1110 PRINT"YOU CAN GO ";
 1120 IF N<>0 THEN PRINT"NORTH,";
 1130 IF E<>0 THEN PRINT"EAST,";
 1140 IF S<>0 THEN PRINT"SOUTH,";
 1150 IF W<>0 THEN PRINT"WEST,";
 1160 IF L>30 AND L<34 THEN PRINT"UP,";
 1170 IF L>31 AND L<35 THEN PRINT"DOWN,";
 1180 PRINTCHR$(8);" "
 1190 ENDPROC
 1200 DEFPROCCHOICE
 1210 A$="":B$="":K$=""
 1220 PRINT:INPUT"WHAT SHALL I DO ",K$
 1230 IF K$="" THEN 1220
 1240 F=1
 1250 IF MID$(K$,F,1)=" " THEN 1290
 1260 A$=A$+MID$(K$,F,1):IF F=LEN(K$) THEN 1280
 1270 F=F+1:GOTO1250
 1280 IF A$=K$ THEN B$=A$:ENDPROC
 1290 B$=RIGHT$(K$,LEN(K$)-F)
 1300 ENDPROC
 1310 DEFPROCGET
 1320 AS=1
 1330 IF B$=C$(AS) THEN 1360
 1340 AS=AS+1:IF AS=18 THEN PRINT"I DON'T KNOW WHAT A ",B$;" IS!":ENDPROC
 1350 GOTO1330
 1360 REM
 1370 IF B$="FIVER" AND A(AS)=L THEN 1430
 1380 IF B$="FIVER" AND AS<3 THEN AS=AS+1:GOTO1330 
 1390 IF ABS(A(AS))<>L AND AS=4 OR ABS(A(AS))<>L AND AS=7 OR ABS(A(AS))<>L AND AS=14 THEN PRINT"THE "B$" ARE NOT HERE!":ENDPROC
 1400 IF ABS(A(AS))<>L THEN PRINT"THE "B$" IS NOT HERE!":ENDPROC 
 1410 IF AS=17 THEN F(13)=1
 1420 IF B$="WINE" THEN PRINT"A POLICEMAN ARRIVES AND ARRESTS  YOU FOR ENTERING THE QUEENS      BEDROOM AND STEALING HALF A      BOTTLE OF WINE":PROCPAUSE:PROCPAUSE:PROCEND
 1430 PRINT"OK":A(AS)=100*SGN(A(AS)):ENDPROC
 1440 DEFPROCINV
 1450 SS=0
 1460 PRINT"YOU ARE CARRYING";
 1470 FOR F=1 TO 17
 1480 IF A(F)=100 AND F=11 OR A(F)=100 AND F=12 OR A(F)=100 AND F=15 THEN PRINTTAB(17);"THE ";C$(F):SS=1:GOTO1520
 1490IF A(F)=100 THEN PRINTTAB(17);"A ";C$(F):SS=1:GOTO1520
 1500 IF F=14 AND A(F)=-100 THEN PRINTTAB(17);C$(F):SS=1:GOTO1520
 1510IF A(F)=-100 THEN PRINTTAB(17);"SOME ";C$(F):SS=1:GOTO1520
 1520 NEXT:IF SS=0 THEN PRINT" NOTHING"
 1530 ENDPROC
 1540 DEFPROCPULL
 1550 IF L<>21 THEN PRINT"NOT HERE, I CAN'T":ENDPROC
 1560 IF F(7)=1 THEN PRINT"IT HAS NO EFFECT":ENDPROC
 1570 PRINT"SCREEECH.. THAT LEVER HAS LOWEREDTHE ROAD":F(7)=1:ENDPROC
 1580 DEFPROCNO
 1590 PRINT"YOU CAN'T GO IN THAT DIRECTION":ENDPROC
 1600 DEFPROCSAVE
 1605 REPEAT INPUT"Filename",file$:UNTILfile$<>""
 1610 PRINT"POSITION CASSETTE":PRINT
 1620 X=OPENOUT(file$)
 1630 PRINT#X,L
 1640 FOR F=1 TO 15:PRINT#X,F(F):NEXT
 1650 FOR F=1 TO 17:PRINT#X,A(F):NEXT
 1660 CLOSE#X
 1670 ENDPROC
 1680 DEFPROCLOAD
 1685 INPUT"Filename",file$
 1690 PRINT:PRINT"POSITION CASSETTE AND PRESS PLAY"
 1700 X=OPENUP(file$)
 1710 INPUT#X,L
 1720 FOR F=1 TO 15:INPUT#X,F(F):NEXT
 1730 FOR F=1 TO 17:INPUT#X,A(F):NEXT
 1740 CLOSE#X
 1750 ENDPROC
 1760 DEFPROCUP
 1770 IF L=31 L=32:PRINT"OK":ENDPROC
 1780 IF L=33 L=34:PRINT"OK":ENDPROC
 1790 IF L=32 L=33:PRINT"OK":ENDPROC
 1800 PRINT"YOU CAN'T GO IN THAT DIRECTION":ENDPROC
 1810 DEFPROCDOWN
 1820 IF L=34 L=33:PRINT"OK":ENDPROC
 1830 IF L=33 L=32:PRINT"OK":ENDPROC
 1840 IF L=32 L=31:PRINT"OK":ENDPROC
 1850 PRINT"YOU CAN'T GO IN THAT DIRECTION":ENDPROC
 1860 DEFPROCPAUSE
 1870 FOR F=1 TO 4000:NEXT:ENDPROC
 1880 DEFPROCDROP
 1890 AS=1
 1900 IF B$=C$(AS) THEN 1930
 1910 AS=AS+1:IF AS=18 THEN PRINT"I DON'T KNOW WHAT A ",B$;" IS!":ENDPROC
 1920 GOTO1900
 1930 IF ABS(A(AS))<>100 AND AS=4 OR ABS(A(AS))<>100 AND AS=7 OR ABS(A(AS))<>100 AND AS=14 THEN PRINT"YOU ARE NOT CARRYING THEM":ENDPROC
 1940 IF ABS(A(AS))<>100 THEN PRINT"YOU ARE NOT CARRYING IT":ENDPROC
 1950 PRINT"OK":A(AS)=L*SGN(A(AS))
 1960 IF AS=17 THEN F(13)=0
 1970 ENDPROC
 1980 DEFPROCEND
 1990 CLS:PRINT''''"WELL, THAT SEEMS TO BE THE END OFTHAT GAME. DO YOU WANT TO PLAY   AGAIN ?";:REPEAT:KL$=GET$:UNTILKL$="Y" OR KL$="N"
 2000 IF KL$="Y" THEN GOTO 75
 2010 PRINT'''CHR$136"THANKS FOR PLAYING":PROCPAUSE:VDU 26:CLS
 2020 CALL!-4
 2030 DEFPROCQUIT
 2040 PRINT'"ARE YOU SURE ?"
 2050 REPEAT:KL$=GET$:UNTILKL$="Y" OR KL$="N" 
 2060 IF KL$="N" THEN ENDPROC
 2070 PROCEND
 2080 DEFPROCUNLOCK
 2090 IF L=41 OR L=47 GOTO2110
 2100PRINT"THERE IS NOTHING TO "A$:ENDPROC
 2110 IF L=41 AND F(9)=1 OR L=47 AND F(11)=1 THEN PRINT"IT IS ALREADY OPEN":ENDPROC
 2120 IF A(8)<>100 THEN PRINT"YOU HAVEN'T GOT A KEY":ENDPROC
 2130 IF L=41 THEN PRINT"THE DOOR IS UNLOCKED AND OPEN.   ISN'T IT EASY TO GET INTO        BUCKINGHAM PALACE":PROCPAUSE:F(9)=1:ENDPROC
 2140 IF L=47 THEN PRINT"THE DOOR IS UNLOCKED AND OPEN":PROCPAUSE:F(11)=1:ENDPROC
 2150 DEFPROCLAMP
 2160 IF F(5)=1 PRINT"YOU CAN'T DO THAT":ENDPROC
 2170 IF A(10)<>100 THEN PRINT"YOU ARE NOT CARRYING IT":ENDPROC
 2180 PRINT"OK":F(5)=1:ENDPROC
 2190 DATAFIVER,0,FIVER,0,FIVER,12,DRUGS,-3,DOMESTIC,-4,FLASHY,-4,MATCHES,-16,KEY,0,COFFEE,-22,TORCH,51,SCEPTRE,34,ORB,0,WINE,-38,FISH FINGERS,-39,CROWN,0,GOLD RING,49,MAP,48
 2200 DATAIN A WAITING ROOM IN A   BUS STATION,THERE IS AN OLD MAN HOLDING      SOMETHING IN HERE,6,3,5,2
 2210 DATAIN A WAITING ROOM IN A   BUS STATION,THERE IS A TIME-TABLE ON THE WALLACCORDING TO THIS A BUS IS DUE   SOON,0,1,0,0 
 2220 DATAIN A CAFE,TO THE NORTH IS THE POLICE       STATION,7,0,0,1
 2230 DATAIN A STORE ROOM,THERE IS SOME 'DOMESTIC'         BLEACH AND SOME 'FLASHY' SCOURINGPOWDER,0,5,0,0
 2240 DATAIN THE TOILETS,EVERYTHING IS VERY DIRTY         ON THE WALL IT SAYS 'FULHAM RULE'THAT WALL OBVIOUSLY HASN'T BEEN  PAINTED FOR A LONG TIME,1,0,0,4
 2250 DATA,,0,0,0,0
 2260 DATAIN THE POLICE STATION,THE POLICEMAN BEHIND THE DESK    DOESN'T SEEM TO NOTICE YOU,0,0,3,0
 2270 DATA,,0,0,0,0
 2280 DATAOUTSIDE MADAME TUSSAUDS,THERE IS A PAY-BOX BY YOU THE    ENTRANCE FEE IS `5,8,0,10,0
 2290 DATAIN MADAME TUSSAUDS,THERE ARE MANY WAXWORKS INCLUDINGONE OF MARGARET THATCHER,9,13,11,0
 2300 DATAIN MADAME TUSSAUDS,THERE ARE MANY WAXWORKS INCLUDINGONE OF JOHN WAYNE,10,12,0,0
 2310 DATAIN MADAME TUSSAUDS,THERE ARE MANY WAXWORKS INCLUDINGONE OF MARILYN MONROE,13,15,0,11
 2320 DATAIN MADAME TUSSAUDS,THERE ARE MANY WAXWORKS INCLUDINGONE OF JOHN NOAKES. THERE IS A   LARGE SIGN ABOVE YOU IT SAYS     'NO SMOKING - WAXWORKS ARE HIGHLYFLAMMABLE",0,14,12,10
 2330 DATAIN THE CHAMBER OF HORRORS,IT IS VERY DARK,0,16,15,13
 2340 DATAIN THE CHAMBER OF HORRORS,IT IS VERY DARK,14,17,0,12
 2350 DATAIN THE WAXWORK WORKSHOP,YOU CAN SEE JIMMY SAVILLE'S HEAD ON THE SHELF,0,0,17,14
 2360 DATAIN THE MATERIALS STORE   ROOM,THE FLOOR IS STICKY WITH WAX,16,0,0,15
 2370 DATA,,0,0,0,0
 2380 DATANEAR TOWER BRIDGE,THERE IS A MAN COLLECTING TOLLS,18,20,0,0
 2390 DATAON THE ROAD,YOU CAN SEE ONE OF THE TOWERS    ABOVE YOU,0,22,23,19
 2400 DATAIN THE CONTROL ROOM,THERE IS A LEVER MARKED DOWN,0,0,22,0
 2410 DATAIN A SMALL ROOM,A MAN IS READING HIS NEWSPAPER   HIS CUP OF COFFEE IS ON THE SIDE,21,0,0,20
 2420 DATAON THE ROAD,YOU CAN SEE ONE OF THE TOWERS    ABOVE YOU,20,0,24,0
 2430 DATA,,0,0,0,0
 2440 DATA,,0,0,0,0
 2450 DATAIN THE HOUSE OF COMMONS,THE P.M. IS NORTH OF YOU         DELIVERING A SPEECH,35,25,0,27
 2460 DATAIN A LONG PASSAGEWAY,THE CHANCELLOR OF THE EXCHEQUER  IS DOING A CROSSWORD,30,26,0,28
 2470 DATAIN THE HOUSE OF LORDS,SOMEBODY COUGHS BUT APART FROM   THAT THERE IS NOT A LOT HAPPENING,29,27,0,0
 2480 DATA,,0,0,0,0
 2490 DATAIN THE CLOAK-ROOM,THERE ARE MANY COATS AROUND YOU,0,31,27,0
 2500 DATAIN BIG BEN,STAIRS LEAD UPWARDS,0,0,0,30
 2510 DATAIN BIG BEN,STAIRS LEAD UPWARDS. FROM HERE   YOU CAN SEE THE TOWER OF LONDON,0,0,0,0
 2520 DATAIN BIG BEN,STAIRS LEAD UPWARDS. FROM HERE   YOU CAN SEE THE TELECOM TOWER,0,0,0,0 
 2530 DATAIN BIG BEN,YOU ARE BEHIND THE CLOCKFACE,0,0,0,0 
 2540 DATA,,0,0,0,0
 2550 DATAIN A GRAND HALLWAY,EVERYTHING IS VERY PLUSH,37,0,0,39
 2560 DATAIN THE THRONE ROOM,,0,0,36,38
 2570 DATAIN THE QUEENS BEDROOM,THERE IS HALF A BOTTLE OF WINE   ON THE DRINKS CABINET,0,37,39,41
 2580 DATAIN THE KITCHEN,THERE ARE MANY LUXURIOUS AND     EXOTIC FOODS AROUND YOU,38,36,0,40
 2590 DATAIN THE DINING ROOM,THE TABLE IS LAID FOR DINNER,0,39,0,0
 2600 DATAIN THE GROUNDS OF        BUCKINGHAM PALACE,SOME GUARDS ARE ON DUTY,0,38,0,42
 2610 DATABY BUCKINGHAM PALACE,THE ENTRANCE FEE IS `5,0,41,0,43
 2620 DATA,,0,0,0,0
 2630 DATAAT THE ENTRANCE TO THE   TOWER OF LONDON,THERE IS NO ADMISSION CHARGE     TODAY,0,45,0,54
 2640 DATAAT TRAITOR'S GATE,,46,0,0,44
 2650 DATAIN THE BLOODY TOWER,THERE IS A BEEFEATER HERE,50,47,45,0
 2660 DATAIN THE DUNGEONS,THERE IS A DINGY CELL TO THE     NORTH,48,0,0,46
 2670 DATAIN A DINGY CELL,,0,0,47,0
 2680 DATAIN THE BEAUCHAMP TOWER,THERE IS A JEWELRY DISPLAY IN    HERE,0,50,0,0
 2690 DATAAT TOWER GREEN,YOU ARE SURROUNDED ON ALL SIDES  BY TOWERS,52,0,46,49
 2700 DATAIN THE WHITE TOWER,,0,0,0,50
 2710 DATAAT THE ENTRANCE TO THE   JEWEL HOUSE,,53,0,50,0
 2720 DATAIN THE JEWEL HOUSE,SOME PEOPLE ARE ASKING A GUARD   WHAT ALL THE PANIC IS ABOUT,0,0,52,0
 2730 DATA,,0,0,0,0
 2740 DEFPROCBUS
 2745 VDU 28,0,28,39,6
 2750 CLS
 2760 FORI=14TO0 STEP -1:PROCDBUS(16+I)
 2761 FORBUS=0TO200:NEXTBUS
 2762 NEXT I
 2765 PRINTTAB(5,15);"Bus number  : ";NO    
 2770 PRINTTAB(5,17);"Destination : ";DES$ 
 2790 IF KL$="Y" THEN L=LY:ENDPROC
 2800 PRINTTAB(4,19)"Do you want to catch this bus ?" 
 2810 REPEAT:KL$=GET$:UNTILKL$="Y" OR KL$="N"
 2820 PRINT'"                  OK";  
 2840 FOR IU=1 TO 500:NEXT
 2850 ENDPROC
 2860 DEFPROCNUMBER
 2865 VDU 19,3,1,0,0,0
 2870 R=RND(3)
 2880 RXY=RND(2)
 2890 IF L=6 AND R=1 THEN NO=17:DES$="TOWER BRIDGE":LY=19:LX=1:PROCBUS
 2900 IF L=6 AND R=2 THEN NO=31:DES$="MADAME TUSSAUDS":LY=9:LX=1:PROCBUS
 2910 IF L=6 AND R=3 AND RXY=1 THEN NO=79:DES$="BUCKINGHAM PALACE":LY=42:LX=1:PROCBUS
 2920 IF L=6 AND R=3 AND RXY=2 THEN NO=80:DES$="TOWER OF LONDON":LY=44:LX=1:PROCBUS
 2930 IF L=8 THEN NO=31:DES$="BUS STATION":LY=1:LX=9:PROCBUS
 2940 IF L=18THEN NO=17:DES$="BUS STATION":LY=1:LX=19:PROCBUS
 2950 IF L=24 AND R=1 THEN NO=97:DES$="HOUSES OF PARLIAMENT":LY=26:LX=23:PROCBUS
 2960 IF L=24 AND R=2 OR L=24 AND R=3 THEN NO=63:DES$="BUS STATION":LY=1:LX=23:PROCBUS
 2970 IF L=25 AND R=2 OR L=25 AND R=3 THEN NO=24:DES$="BUS STATION":LY=1:LX=26:PROCBUS
 2980 IF L=25 AND R=1 THEN NO=97:DES$="TOWER BRIDGE":LY=23:LX=26:PROCBUS
 2990 IF L=29 AND R=1 OR L=29 AND R=2 THEN NO=65:DES$="BUS STATION":LY=1:LX=28:PROCBUS
 3000 IF L=29 AND R=3 THEN NO=43:DES$="BUCKINGHAM PALACE":LY=42:LX=28:PROCBUS
 3010 IF L=43 THEN NO=79:DES$="BUS STATION":LY=1:LX=42:PROCBUS  
 3020 IF L=54 AND R=3 THEN NO=28:DES$="BUS STATION":LY=1:LX=44:PROCBUS 
 3030 IF L=54 AND R<>3 THEN NO=11:DES$="MADAME TUSSAUDS":LY=9:LX=44:PROCBUS
 3040 IF KL$="N" THEN L=LX:CLS:               VDU 19,3,3,0,0,0:VDU 28,4,23,36,6       :ENDPROC
 3090 FORI=14TO0 STEP -1:PROCDBUS(2+I)
 3091 FORBUS=0TO200:NEXTBUS:NEXTI
 3092 CLS:VDU 19,3,3,0,0,0:VDU 28,4,23,36,6:L=LY:ENDPROC 
 3100 DEFPROCTOIL
 3110 IF B$<>"TOILETS" AND B$<>"TOILET" THEN PRINT"I CAN'T CLEAN A "B$:ENDPROC
 3120 IF L<>5 THEN PRINT"I CAN'T SEE ANY TOILETS":ENDPROC
 3130 IF A(5)<>-100 AND A(6)<>-100 THEN PRINT"YOU HAVEN'T GOT ANYTING TO CLEAN THEM WITH":ENDPROC
 3140 IF A(5)<>-100 THEN PRINT"YOU'LL NEED SOME BLEACH":ENDPROC
 3150 IF A(6)<>-100 THEN PRINT"YOU'LL NEED SOME SCOURING POWDER":ENDPROC
 3160 PRINT"AS YOU ARE CLEANING THE TOILETS  A MAN COMES ALONG AND PAYS YOU `5(HE MUST THINK THAT YOU ARE AN   EMPLOYEE OF HIS)":A(1)=L:A(6)=0:A(5)=0:PROCPAUSE:ENDPROC 
 3170 DEFPROCPAY
 3180 IF L<>9 AND L<>19 AND L<>42 THEN PRINT"DON'T WASTE YOUR MONEY":ENDPROC
 3190 IF L=9 AND F(2)=1 THEN PRINT"THERE IS NO NEED TO":ENDPROC
 3200 IF L=19 AND F(3)=1 THEN PRINT"THERE IS NO NEED TO":ENDPROC
 3210 IF L=42 AND F(4)=1 THEN PRINT"THERE IS NO NEED TO":ENDPROC
 3220 IF A(1)<>100 AND A(2)<>100 AND A(3)<>100 THEN PRINT"YOU'LL NEED SOME MONEY":ENDPROC
 3230 PRINT"OK - YOU ARE ADMITTED"
 3240 IF L=9 THEN F(2)=1:L=10
 3250 IF L=19 THEN F(3)=1:L=20
 3260 IF L=42 THEN F(4)=1:L=41
 3270 IF A(3)=100 THEN A(3)=0:ENDPROC
 3280 IF A(2)=100 THEN A(2)=0:ENDPROC
 3290 IF A(1)=100 THEN A(1)=0:ENDPROC
 3300 DEFPROCJAPS
 3310 PRINT'"THERE ARE SOME JAPANESE TOURISTS HERE, THEY SEEM TO WANT YOUR     PHOTOGRAPH.WILL YOU POSE FOR     THEM ?"
 3320 REPEAT:RE$=GET$:UNTILRE$="Y" OR RE$="N"
 3330 IF RE$="N" THEN F(6)=1:PRINT'"FOOLISH":PROCPAUSE:GOTO130
 3340 PRINT'"YOU SMILE FOR THE JAPANESE. ONE  OF THE JAPANESE GIVES YOU `5. (I DON'T THINK HE UNDERSTANDS THE   CURRENCY)":F(6)=1:A(2)=20:PROCPAUSE:PROCPAUSE:GOTO130
 3350 DEFPROCDRINK
 3360 IF B$<>"COFFEE" THEN PRINT"HOW CAN YOU DRINK A "B$:ENDPROC
 3370 IF A(9)<>-100 THEN PRINT"YOU ARE NOT CARRYING IT":ENDPROC
 3380 PRINT"NICE":A(9)=0:ENDPROC
 3390 DEFPROCDRUG
 3400 IF B$<>"COFFEE" THEN PRINT"I CAN'T "A$" A "B$:ENDPROC
 3410 IF A(9)<>-100 THEN PRINT"YOU ARE NOT CARRYING IT":ENDPROC
 3420 PRINT"AFTER YOU DRUG THE COFFEE, THE   SILLY MAN DRINKS THE COFFEE AND  FALLS ASLEEP":F(8)=1:A(4)=0:A(9)=0:ENDPROC
 3430 DEFPROCBURN
 3440 IF B$<>"STATUE" AND B$<>"WAXWORK" THEN PRINT"I CAN'T "A$" A "B$:ENDPROC
 3450 IF L<10 OR L>13 THEN PRINT"NOT HERE, I CAN'T":ENDPROC
 3460 IF A(7)<>-100 THEN PRINT"YOU HAVEN'T GOT ANYTHING TO      LIGHT IT WITH":ENDPROC
 3470 IF L<>13 THEN PRINT"THE ROOM FILLS WITH A CHOKING GASAND YOU DIE":PROCPAUSE:PROCPAUSE:PROCEND
 3480 IF A(12)<>0 THEN PRINT"NOT HERE, I CAN'T":ENDPROC
 3490 PRINT"THE "B$" MELTS AND REVEALS"'"THE ORB WHICH WAS HIDDEN INSIDE  IT":A(12)=L:PROCPAUSE:ENDPROC
 3500 DEFPROCPOLICE
 3510 IF A(11)=100 THEN F$="SCEPTRE":A(11)=0:GOTO3540
 3520 IF A(12)=100 THEN F$="ORB":A(12)=0:GOTO3540
 3530 IF A(15)=100 THEN F$="CROWN":A(15)=0
 3540 PRINT'"THE GUARD THANKS YOU FOR THE":PRINTF$
 3550 PROCPAUSE:PROCPAUSE
 3560 F(10)=F(10)+1:IF F(10)=3 THEN PROCFIN
 3570 ENDPROC
 3580 DEFPROCFIN
 3590 CLS
 3600 PRINT''''''"WELL DONE, YOU HAVE RETRIEVED THECROWN JEWELS. DON'T EXPECT A     REWARD BECAUSE YOU AREN'T GETTINGONE! (I WAS LYING ABOUT THE      MILLION POUNDS)":PROCPAUSE:PROCPAUSE:PROCEND
 3610 DEFPROCEAT
 3620 IF B$<>"FISH FINGERS" AND B$<>"DRUGS" THEN PRINT"I'M NOT GOING TO EAT A "B$:ENDPROC
 3630 IF B$="FISH FINGERS" AND A(14)<>-100 OR B$="DRUGS" AND A(4)<>-100 THEN PRINT"YOU HAVEN'T GOT THEM":ENDPROC
 3640 IF B$="FISH FINGERS" THEN PRINT"NICE":A(14)=0:ENDPROC
 3650 PRINT"THOSE WERE SLEEPING TABLETS. YOU ARE NOW SOUND ASLEEP":PROCPAUSE:PROCPAUSE:PROCEND
 3660 DEFPROCBRIDGE
 3670 ENDPROC
 3680 DEFPROCPO
 3690 ENDPROC
 3700 DEFPROCTL
 3710 ENDPROC
 3720 DEFPROCASK
 3730 IF B$<>"GUARD" AND B$<>"MAN" THEN PRINT"NO WAY PAL":PROCPAUSE:ENDPROC
 3740 IF L<>53 AND L<>1 THEN PRINT"NOT HERE YOU CAN'T":PROCPAUSE:ENDPROC
 3750 IF L=1 THEN 3820
 3760 CLS
 3770 PRINT"THE GUARD TELLS YOU THAT THE     CROWN JEWELS HAVE BEEN STOLEN BY A PRACTICAL JOKER, AND HIDDEN IN VARIOUS LOCATIONS IN LONDON"
 3780 PRINT'"THERE IS A MILLION POUND REWARD  FOR ANYONE WHO FINDS THE CROWN,  SCEPTRE AND ORB AND RETURNS THEM TO THE JEWEL HOUSE"
 3790 PRINT'''" PRESS THE SPACE BAR TO CONTINUE" 
 3800 REPEATUNTILGET$<>""
 3810 ENDPROC
 3820 IF L=53 THEN PRINT"NO WAY WIMP":PROCPAUSE:ENDPROC
 3830 PRINT"THE OLD MAN WANTS SOMETHING      VALUABLE":PROCPAUSE:GOTO3810
 3840 DEFPROCOFFER
 3850 IF L<>1 THEN PRINT"DON'T BE DAFT!":PROCPAUSE:ENDPROC
 3860 IF F(12)=1 THEN PRINT"NO LADDIE":PROCPAUSE:ENDPROC
 3870 IF B$<>"GOLD RING" THEN PRINT"HE DOESN'T WANT THAT":PROCPAUSE:ENDPROC
 3880 IF A(16)<>100 THEN PRINT"YOU HAVEN'T GOT ONE":ENDPROC
 3890 PRINT"THE OLD MAN SNATCHES THE RING ANDGIVES YOU A SKELETON KEY":PROCPAUSE:F(12)=1:A(8)=1:A(16)=0:ENDPROC
 3900 DEFPROCDBUS(BUS)
 3910 PRINTTAB(BUS,8);"�������� " 
 3920 PRINTTAB(BUS,9);"�������� " 
 3930 PRINTTAB(BUS,10);"�������� "
 3940 ENDPROC

 *FX200,3

 *FX13,4
 *FX15,0
 �4
 � 28,4,23,36,6
  � 23;8202;0;0;0;:�
! *L.CROWN4 5800
"0 � � �"Error in this program !!":�PAUSE:�!-4
# � 19,3,3,0,0,0
( *OPT1,1
2 � 23;11,0;0;0;0;0
F9 � A(17),C$(17),D$(1),E$(1),N(1),E(1),S(1),W(1),F(15)
K	 L=53
P �SETSCREEN  
Z
 �DATA
d5 �"DO YOU WISH TO RESUME PLAY ON A  SAVED GAME ?"
n �:KL$=�:�KL$="N" � KL$="Y"
x � KL$="Y" � �LOAD 
�
 �DESCRIP
� � L=20 � F(6)=0 � �JAPS
� �CHOICE
� �
� � B$="LOOK" � �tB@
�" � B$="BLEACH" � B$="DOMESTIC"
�) � B$="SCOURING POWDER" � B$="FLASHY"
�3 � B$="FISH" � B$="FINGERS" � B$="FISH FINGERS"
�! � B$="RING" � B$="GOLD RING"
� � B$="OLD MAN" � B$="MAN"
�' � B$="N" � B$="NORTH" � X=1:�TfB 
�& � B$="E" � B$="EAST" � X=2:�TfB 
�' � B$="S" � B$="SOUTH" � X=3:�TfB 
& � B$="W" � B$="WEST" � X=4:�TfB 
( � A$="GET" � A$="TAKE" � �GET:�T\B
E � A$="BURN" � A$="IGNITE" � A$="LIGHT" � A$="MELT" � �BURN:�T\B
"S � A$="INVE" � A$="INVENTORY" � A$="LIST" � A$="INVENT" � A$="INV" � �INV:�T\B
,, � A$="OFFER" � A$="GIVE" � �OFFER:�T\B
6? � A$="DRINK" � B$="WINE" � �"YOU AREN'T CARRYING IT":�T\B
@9 � A$="EAT" � A$="GOBBLE" � A$="SWALLOW" � �EAT:�T\B
J9 � A$="PRESS" � A$="PULL" � A$="SWITCH" � �PULL:�T\B
T; � A$="WAIT" � �"BORING WAITING ISN'T IT!":�PAUSE:�T\B
^ � A$="SAVE" � �SAVE:�T\B
h6 � A$="U" � A$="UP" � B$="U" � B$="UP" � �UP:�T\B
r=  � A$="D" � A$="DOWN" � B$="D" � B$="DOWN" � �DOWN:�T\B
|F � A$="OPEN" � B$="DOOR" � A$="UNLOCK" � B$="DOOR" � �UNLOCK:�T\B
�) � A$="CLEAN" � A$="WIPE" �TOIL:�T\B
� � A$="PAY" � �PAY:�T\B
�d � A$="READ" � B$="MAP" � F(13)=1 � �"IT SHOWS A PASSAGE TO THE EAST OFTOWER GREEN":�PAUSE:�T\B
�M � A$="READ" � B$="MAP" � F(13)=0 � �"YOU HAVEN'T GOT A MAP":�PAUSE:�T\B
� � A$="DROP" � �DROP:�T\B
�C � A$="QUIT" � A$="END" � A$="FINISH" � A$="STOP" � �QUIT:�T\B
�D � A$="LIGHT" � B$="TORCH" � A$="TORCH" � B$="ON" � �LAMP:� �T\B
�� � A$="EXAM" � B$="THRONE" � A(15)=0 � A$="MOVE" � B$="THRONE" � A(15)=0 � A$="LOOK" � B$="THRONE" � A(15)=0 � A$="SHIFT" � B$="THRONE" � A(15)=0 � �"THE CROWN IS HIDDEN BENEATH IT":A(15)=L:� �T\B
�M � A$="EXAM" � �"THERE IS NO NEED TO EXAMINE      ANYTHING":�PAUSE:� �T\B
� � A$="DRINK" �DRINK:�T\B
� � A$="DRUG" � �DRUG:�T\B
�( � A$="ASK" � A$="TALK" � �ASK:�tB@
�C � A$="PULL" � B$="LEVER" � A$="PULL" � B$="DOWN" � �PULL:�T\B
. � A$=B$ � �"I DON'T KNOW HOW TO "A$:�T\B
) �"I DON'T KNOW HOW TO "A$" A "'B$"!"
 � F=1 � 7000:�:�tB@ 
&D � X=3 � L=9 � F(2)=0 � �"YOU CAN'T GET IN WITHOUT PAYING":�T\B
0| � L=14 � X=2 � F(5)=0 � L=15 � X=2 � F(5)=0 � �"THERE IS A DOOR OVER THERE       SOMEWHERE BUT YOU CAN'T FIND IT":�T\B
:] � X=2 � L=19 � F(3)=0 � X=2 � L=42 � F(4)=0 � �"YOU CAN'T GET PAST WITHOUT PAYING":�T\B
DS � X=3 � L=20 � F(7)=0 � �"YOU CAN'T GO SOUTH BECAUSE THE   BRIDGE IS UP":�T\B
N@ � X=1 � L=22 � F(8)=0 � �"THE MAN WON'T LET YOU PASS":�T\B
XG � X=2 � L=41 � F(9)=0 � �"A LOCKED DOOR BLOCKS THE WAY EAST":�T\B
bM � X=1 � L=47 � F(11)=0 � �"A LOCKED DOOR BLOCKS THE WAY     NORTH":�T\B
l � X=1 � N=0 � �NO:�T\B
v � X=2 � E=0 � �NO:�T\B
� � X=3 � S=0 � �NO:�T\B 
� � X=4 � W=0 � �NO:�T\B
� � X=1 � L=N
� � X=2 � L=E
� � X=3 � L=S
� � X=4 � L=W
�
 �tB@
� ��SETSCREEN
� 
� �
� � 28,4,23,36,6:�
� ��DATA
�% � �tNH:� F=1 � 17:� C$(F),A(F):�
 �
 ��DESCRIP
 � 28,4,23,36,6
  �
* KL$=""
4 � (2190+L*10)
> � D$,E$,N,E,S,W
HJ � L=6 � L=8 � L=18 � L=24 � L=25 � L=29 � L=43 � L=54 � �NUMBER:�T`C
Rj � L=35 � �"YOU HAVE BEEN ARRESTED FOR       ATTEMPTING TO ASSASSINATE THE    P.M.":�PAUSE:�PAUSE:�END
\ � L=20 � L=23 � �BRIDGE
f � L=33 �PO
pN � L=50 � F(13)=1 � E$="YOUR MAP SHOWS A SMALL PASSAGE   TO THE EAST":E=51
zM  � L=50 � F(13)=0 � E$="YOU ARE SURROUNDED ON ALL SIDES  BY TOWERS":E=0 
� � L=32 � �TL
�_ �"YOU ARE ";D$:�:� L=53 � A(11)=100 � L=53 � A(12)=100 � L=53 � A(15)=100 � �POLICE:�tB@ 
�I � L=37 � A(15)=0 � �"SOMETHING IS HIDDEN UNDER THE    THRONE"':�dhC
�O � L=37 � A(15)<>0 � �"THE THRONE DOESN'T LOOK VERY     COMFORTABLE"':�dhC
�\ � L=4 � A(5)<>-4 � L=4 � A(6)<>-4 � E$="THIS LOOKS LIKE A CLEANERS       STORE ROOM"   
�E � L=22 � A(9)<>-22 � E$="I CAN SEE THE CONTROL ROOM TO THENORTH"
�t � A(12)<>0 � L=13 � E$="THERE IS A LARGE SIGN ABOVE YOU  IT SAYS 'NO SMOKING' - WAXWORKS  ARE HIGHLY FLAMMABLE"
�6 � L=1 � F(12)=1 � E$="AN OLD MAN SLEEPS IN HERE" 
� � E$="" �dhC 
�
 �E$:�
�	 AS=1
� � �(A(AS))=L ��TPD
� AS=AS+1:� AS=18 � �DVD

 �drC
 �"THERE IS :";
 � F=1 � 17
$N � A(F)=L � F=11 � A(F)=L � F=12 � A(F)=L � F=15 � �11);"THE "C$(F):�DBD
.$� A(F)=L � �11);"A "C$(F):�DBD
8$� �(A(F))=L � �11);"SOME "C$(F)
B �
L �
V �"YOU CAN GO ";
` � N<>0 � �"NORTH,";
j � E<>0 � �"EAST,";
t � S<>0 � �"SOUTH,";
~ � W<>0 � �"WEST,";
� � L>30 � L<34 � �"UP,";
� � L>31 � L<35 � �"DOWN,";
� �(8);" "
� �
�
 ��CHOICE
� A$="":B$="":K$=""
� �:�"WHAT SHALL I DO ",K$
� � K$="" � �dDD
� F=1
� � �K$,F,1)=" " � �TJE
�$ A$=A$+�K$,F,1):� F=�(K$) � �T@E
� F=F+1:�dbD
 � A$=K$ � B$=A$:�

 B$=�K$,�(K$)-F)
 �

 ��GET
(	 AS=1
2 � B$=C$(AS) � �DPE
<: AS=AS+1:� AS=18 � �"I DON'T KNOW WHAT A ",B$;" IS!":�
F
 �TrE
P �
Z" � B$="FIVER" � A(AS)=L � �tVE
d) � B$="FIVER" � AS<3 � AS=AS+1:�TrE 
nb � �(A(AS))<>L � AS=4 � �(A(AS))<>L � AS=7 � �(A(AS))<>L � AS=14 � �"THE "B$" ARE NOT HERE!":�
x0 � �(A(AS))<>L � �"THE "B$" IS NOT HERE!":� 
� � AS=17 � F(13)=1
�� � B$="WINE" � �"A POLICEMAN ARRIVES AND ARRESTS  YOU FOR ENTERING THE QUEENS      BEDROOM AND STEALING HALF A      BOTTLE OF WINE":�PAUSE:�PAUSE:�END
� �"OK":A(AS)=100*�(A(AS)):�
�
 ��INV
�	 SS=0
� �"YOU ARE CARRYING";
� � F=1 � 17
�Z � A(F)=100 � F=11 � A(F)=100 � F=12 � A(F)=100 � F=15 � �17);"THE ";C$(F):SS=1:�dpE
�,� A(F)=100 � �17);"A ";C$(F):SS=1:�dpE
�0 � F=14 � A(F)=-100 � �17);C$(F):SS=1:�dpE
�0� A(F)=-100 � �17);"SOME ";C$(F):SS=1:�dpE
� �:� SS=0 � �" NOTHING"
� �
 ��PULL
% � L<>21 � �"NOT HERE, I CAN'T":�
% � F(7)=1 � �"IT HAS NO EFFECT":�
": �"SCREEECH.. THAT LEVER HAS LOWEREDTHE ROAD":F(7)=1:�
,	 ��NO
6( �"YOU CAN'T GO IN THAT DIRECTION":�
@ ��SAVE
E# � �"Filename",file$:�file$<>""
J �"POSITION CASSETTE":�
T X=�(file$)
^
 �#X,L
h � F=1 � 15:�#X,F(F):�
r � F=1 � 17:�#X,A(F):�
| �#X
� �
� ��LOAD
� �"Filename",file$
�* �:�"POSITION CASSETTE AND PRESS PLAY"
� X=�(file$)
�
 �#X,L
� � F=1 � 15:�#X,F(F):�
� � F=1 � 17:�#X,A(F):�
� �#X
� �
�	 ��UP
� � L=31 L=32:�"OK":�
� � L=33 L=34:�"OK":�
� � L=32 L=33:�"OK":�
( �"YOU CAN'T GO IN THAT DIRECTION":�
 ��DOWN
 � L=34 L=33:�"OK":�
& � L=33 L=32:�"OK":�
0 � L=32 L=31:�"OK":�
:( �"YOU CAN'T GO IN THAT DIRECTION":�
D ��PAUSE
N � F=1 � 4000:�:�
X ��DROP
b	 AS=1
l � B$=C$(AS) � �tJG
v: AS=AS+1:� AS=18 � �"I DON'T KNOW WHAT A ",B$;" IS!":�
�
 �DlG
�k � �(A(AS))<>100 � AS=4 � �(A(AS))<>100 � AS=7 � �(A(AS))<>100 � AS=14 � �"YOU ARE NOT CARRYING THEM":�
�3 � �(A(AS))<>100 � �"YOU ARE NOT CARRYING IT":�
� �"OK":A(AS)=L*�(A(AS))
� � AS=17 � F(13)=0
� �
�
 ��END
�s �:�''''"WELL, THAT SEEMS TO BE THE END OFTHAT GAME. DO YOU WANT TO PLAY   AGAIN ?";:�:KL$=�:�KL$="Y" � KL$="N"
� � KL$="Y" � � �DK@
�/ �'''�136"THANKS FOR PLAYING":�PAUSE:� 26:�
�	 �!-4
� ��QUIT
� �'"ARE YOU SURE ?"
  �:KL$=�:�KL$="Y" � KL$="N" 
 � KL$="N" � �
	 �END
 
 ��UNLOCK
* � L=41 � L=47 �T~H
4�"THERE IS NOTHING TO "A$:�
>? � L=41 � F(9)=1 � L=47 � F(11)=1 � �"IT IS ALREADY OPEN":�
H- � A(8)<>100 � �"YOU HAVEN'T GOT A KEY":�
Rt � L=41 � �"THE DOOR IS UNLOCKED AND OPEN.   ISN'T IT EASY TO GET INTO        BUCKINGHAM PALACE":�PAUSE:F(9)=1:�
\? � L=47 � �"THE DOOR IS UNLOCKED AND OPEN":�PAUSE:F(11)=1:�
f ��LAMP
p$ � F(5)=1 �"YOU CAN'T DO THAT":�
z0 � A(10)<>100 � �"YOU ARE NOT CARRYING IT":�
� �"OK":F(5)=1:�
�� �FIVER,0,FIVER,0,FIVER,12,DRUGS,-3,DOMESTIC,-4,FLASHY,-4,MATCHES,-16,KEY,0,COFFEE,-22,TORCH,51,SCEPTRE,34,ORB,0,WINE,-38,FISH FINGERS,-39,CROWN,0,GOLD RING,49,MAP,48
�e �IN A WAITING ROOM IN A   BUS STATION,THERE IS AN OLD MAN HOLDING      SOMETHING IN HERE,6,3,5,2
�z �IN A WAITING ROOM IN A   BUS STATION,THERE IS A TIME-TABLE ON THE WALLACCORDING TO THIS A BUS IS DUE   SOON,0,1,0,0 
�@ �IN A CAFE,TO THE NORTH IS THE POLICE       STATION,7,0,0,1
�f �IN A STORE ROOM,THERE IS SOME 'DOMESTIC'         BLEACH AND SOME 'FLASHY' SCOURINGPOWDER,0,5,0,0
�� �IN THE TOILETS,EVERYTHING IS VERY DIRTY         ON THE WALL IT SAYS 'FULHAM RULE'THAT WALL OBVIOUSLY HASN'T BEEN  PAINTED FOR A LONG TIME,1,0,0,4
� �,,0,0,0,0
�_ �IN THE POLICE STATION,THE POLICEMAN BEHIND THE DESK    DOESN'T SEEM TO NOTICE YOU,0,0,3,0
� �,,0,0,0,0
�Z �OUTSIDE MADAME TUSSAUDS,THERE IS A PAY-BOX BY YOU THE    ENTRANCE FEE IS `5,8,0,10,0
�\ �IN MADAME TUSSAUDS,THERE ARE MANY WAXWORKS INCLUDINGONE OF MARGARET THATCHER,9,13,11,0
�U �IN MADAME TUSSAUDS,THERE ARE MANY WAXWORKS INCLUDINGONE OF JOHN WAYNE,10,12,0,0
	Z �IN MADAME TUSSAUDS,THERE ARE MANY WAXWORKS INCLUDINGONE OF MARILYN MONROE,13,15,0,11
	� �IN MADAME TUSSAUDS,THERE ARE MANY WAXWORKS INCLUDINGONE OF JOHN NOAKES. THERE IS A   LARGE SIGN ABOVE YOU IT SAYS     'NO SMOKING - WAXWORKS ARE HIGHLYFLAMMABLE",0,14,12,10
	: �IN THE CHAMBER OF HORRORS,IT IS VERY DARK,0,16,15,13
	$: �IN THE CHAMBER OF HORRORS,IT IS VERY DARK,14,17,0,12
	.U �IN THE WAXWORK WORKSHOP,YOU CAN SEE JIMMY SAVILLE'S HEAD ON THE SHELF,0,0,17,14
	8J �IN THE MATERIALS STORE   ROOM,THE FLOOR IS STICKY WITH WAX,16,0,0,15
	B �,,0,0,0,0
	LA �NEAR TOWER BRIDGE,THERE IS A MAN COLLECTING TOLLS,18,20,0,0
	VG �ON THE ROAD,YOU CAN SEE ONE OF THE TOWERS    ABOVE YOU,0,22,23,19
	`? �IN THE CONTROL ROOM,THERE IS A LEVER MARKED DOWN,0,0,22,0
	ja �IN A SMALL ROOM,A MAN IS READING HIS NEWSPAPER   HIS CUP OF COFFEE IS ON THE SIDE,21,0,0,20
	tF �ON THE ROAD,YOU CAN SEE ONE OF THE TOWERS    ABOVE YOU,20,0,24,0
	~ �,,0,0,0,0
	� �,,0,0,0,0
	�] �IN THE HOUSE OF COMMONS,THE P.M. IS NORTH OF YOU         DELIVERING A SPEECH,35,25,0,27
	�[ �IN A LONG PASSAGEWAY,THE CHANCELLOR OF THE EXCHEQUER  IS DOING A CROSSWORD,30,26,0,28
	�h �IN THE HOUSE OF LORDS,SOMEBODY COUGHS BUT APART FROM   THAT THERE IS NOT A LOT HAPPENING,29,27,0,0
	� �,,0,0,0,0
	�A �IN THE CLOAK-ROOM,THERE ARE MANY COATS AROUND YOU,0,31,27,0
	�- �IN BIG BEN,STAIRS LEAD UPWARDS,0,0,0,30
	�Y �IN BIG BEN,STAIRS LEAD UPWARDS. FROM HERE   YOU CAN SEE THE TOWER OF LONDON,0,0,0,0
	�X �IN BIG BEN,STAIRS LEAD UPWARDS. FROM HERE   YOU CAN SEE THE TELECOM TOWER,0,0,0,0 
	�6 �IN BIG BEN,YOU ARE BEHIND THE CLOCKFACE,0,0,0,0 
	� �,,0,0,0,0
	�; �IN A GRAND HALLWAY,EVERYTHING IS VERY PLUSH,37,0,0,39
# �IN THE THRONE ROOM,,0,0,36,38

] �IN THE QUEENS BEDROOM,THERE IS HALF A BOTTLE OF WINE   ON THE DRINKS CABINET,0,37,39,41
X �IN THE KITCHEN,THERE ARE MANY LUXURIOUS AND     EXOTIC FOODS AROUND YOU,38,36,0,40
> �IN THE DINING ROOM,THE TABLE IS LAID FOR DINNER,0,39,0,0
(R �IN THE GROUNDS OF        BUCKINGHAM PALACE,SOME GUARDS ARE ON DUTY,0,38,0,42
2; �BY BUCKINGHAM PALACE,THE ENTRANCE FEE IS `5,0,41,0,43
< �,,0,0,0,0
F_ �AT THE ENTRANCE TO THE   TOWER OF LONDON,THERE IS NO ADMISSION CHARGE     TODAY,0,45,0,54
P" �AT TRAITOR'S GATE,,46,0,0,44
Z> �IN THE BLOODY TOWER,THERE IS A BEEFEATER HERE,50,47,45,0
dF �IN THE DUNGEONS,THERE IS A DINGY CELL TO THE     NORTH,48,0,0,46
n �IN A DINGY CELL,,0,0,47,0
xK �IN THE BEAUCHAMP TOWER,THERE IS A JEWELRY DISPLAY IN    HERE,0,50,0,0
�J �AT TOWER GREEN,YOU ARE SURROUNDED ON ALL SIDES  BY TOWERS,52,0,46,49
�" �IN THE WHITE TOWER,,0,0,0,50
�5 �AT THE ENTRANCE TO THE   JEWEL HOUSE,,53,0,50,0
�^ �IN THE JEWEL HOUSE,SOME PEOPLE ARE ASKING A GUARD   WHAT ALL THE PANIC IS ABOUT,0,0,52,0
� �,,0,0,0,0
�
 ��BUS
� � 28,0,28,39,6
� �
� �I=14�0 � -1:�DBUS(16+I)
� �BUS=0�200:�BUS
� � I
�$ �5,15);"Bus number  : ";NO    
�# �5,17);"Destination : ";DES$ 
� � KL$="Y" � L=LY:�
�. �4,19)"Do you want to catch this bus ?" 
� �:KL$=�:�KL$="Y" � KL$="N"
  �'"                  OK";  
 � IU=1 � 500:�
" �
,
 ��NUMBER
1 � 19,3,1,0,0,0
6 R=�(3)
@
 RXY=�(2)
J< � L=6 � R=1 � NO=17:DES$="TOWER BRIDGE":LY=19:LX=1:�BUS
T> � L=6 � R=2 � NO=31:DES$="MADAME TUSSAUDS":LY=9:LX=1:�BUS
^I � L=6 � R=3 � RXY=1 � NO=79:DES$="BUCKINGHAM PALACE":LY=42:LX=1:�BUS
hG � L=6 � R=3 � RXY=2 � NO=80:DES$="TOWER OF LONDON":LY=44:LX=1:�BUS
r4 � L=8 � NO=31:DES$="BUS STATION":LY=1:LX=9:�BUS
|5 � L=18� NO=17:DES$="BUS STATION":LY=1:LX=19:�BUS
�F � L=24 � R=1 � NO=97:DES$="HOUSES OF PARLIAMENT":LY=26:LX=23:�BUS
�I � L=24 � R=2 � L=24 � R=3 � NO=63:DES$="BUS STATION":LY=1:LX=23:�BUS
�I � L=25 � R=2 � L=25 � R=3 � NO=24:DES$="BUS STATION":LY=1:LX=26:�BUS
�> � L=25 � R=1 � NO=97:DES$="TOWER BRIDGE":LY=23:LX=26:�BUS
�I � L=29 � R=1 � L=29 � R=2 � NO=65:DES$="BUS STATION":LY=1:LX=28:�BUS
�C � L=29 � R=3 � NO=43:DES$="BUCKINGHAM PALACE":LY=42:LX=28:�BUS
�8 � L=43 � NO=79:DES$="BUS STATION":LY=1:LX=42:�BUS  
�= � L=54 � R=3 � NO=28:DES$="BUS STATION":LY=1:LX=44:�BUS 
�A � L=54 � R<>3 � NO=11:DES$="MADAME TUSSAUDS":LY=9:LX=44:�BUS
�M � KL$="N" � L=LX:�:               � 19,3,3,0,0,0:� 28,4,23,36,6       :�
 �I=14�0 � -1:�DBUS(2+I)
 �BUS=0�200:�BUS:�I
, �:� 19,3,3,0,0,0:� 28,4,23,36,6:L=LY:� 
 ��TOIL
&= � B$<>"TOILETS" � B$<>"TOILET" � �"I CAN'T CLEAN A "B$:�
0* � L<>5 � �"I CAN'T SEE ANY TOILETS":�
:P � A(5)<>-100 � A(6)<>-100 � �"YOU HAVEN'T GOT ANYTING TO CLEAN THEM WITH":�
D0 � A(5)<>-100 � �"YOU'LL NEED SOME BLEACH":�
N9 � A(6)<>-100 � �"YOU'LL NEED SOME SCOURING POWDER":�
X� �"AS YOU ARE CLEANING THE TOILETS  A MAN COMES ALONG AND PAYS YOU `5(HE MUST THINK THAT YOU ARE AN   EMPLOYEE OF HIS)":A(1)=L:A(6)=0:A(5)=0:�PAUSE:� 
b
 ��PAY
l9 � L<>9 � L<>19 � L<>42 � �"DON'T WASTE YOUR MONEY":�
v. � L=9 � F(2)=1 � �"THERE IS NO NEED TO":�
�/ � L=19 � F(3)=1 � �"THERE IS NO NEED TO":�
�/ � L=42 � F(4)=1 � �"THERE IS NO NEED TO":�
�F � A(1)<>100 � A(2)<>100 � A(3)<>100 � �"YOU'LL NEED SOME MONEY":�
� �"OK - YOU ARE ADMITTED"
� � L=9 � F(2)=1:L=10
� � L=19 � F(3)=1:L=20
� � L=42 � F(4)=1:L=41
� � A(3)=100 � A(3)=0:�
� � A(2)=100 � A(2)=0:�
� � A(1)=100 � A(1)=0:�
� ��JAPS
�r �'"THERE ARE SOME JAPANESE TOURISTS HERE, THEY SEEM TO WANT YOUR     PHOTOGRAPH.WILL YOU POSE FOR     THEM ?"
� �:RE$=�:�RE$="Y" � RE$="N"

0 � RE$="N" � F(6)=1:�'"FOOLISH":�PAUSE:�tB@

� �'"YOU SMILE FOR THE JAPANESE. ONE  OF THE JAPANESE GIVES YOU `5. (I DON'T THINK HE UNDERSTANDS THE   CURRENCY)":F(6)=1:A(2)=20:�PAUSE:�PAUSE:�tB@

 ��DRINK

 1 � B$<>"COFFEE" � �"HOW CAN YOU DRINK A "B$:�

*0 � A(9)<>-100 � �"YOU ARE NOT CARRYING IT":�

4 �"NICE":A(9)=0:�

> ��DRUG

H, � B$<>"COFFEE" � �"I CAN'T "A$" A "B$:�

R0 � A(9)<>-100 � �"YOU ARE NOT CARRYING IT":�

\m �"AFTER YOU DRUG THE COFFEE, THE   SILLY MAN DRINKS THE COFFEE AND  FALLS ASLEEP":F(8)=1:A(4)=0:A(9)=0:�

f ��BURN

p< � B$<>"STATUE" � B$<>"WAXWORK" � �"I CAN'T "A$" A "B$:�

z+ � L<10 � L>13 � �"NOT HERE, I CAN'T":�

�G � A(7)<>-100 � �"YOU HAVEN'T GOT ANYTHING TO      LIGHT IT WITH":�

�Q � L<>13 � �"THE ROOM FILLS WITH A CHOKING GASAND YOU DIE":�PAUSE:�PAUSE:�END

�( � A(12)<>0 � �"NOT HERE, I CAN'T":�

�Y �"THE "B$" MELTS AND REVEALS"'"THE ORB WHICH WAS HIDDEN INSIDE  IT":A(12)=L:�PAUSE:�

�
 ��POLICE

�- � A(11)=100 � F$="SCEPTRE":A(11)=0:�dTM

�) � A(12)=100 � F$="ORB":A(12)=0:�dTM

�% � A(15)=100 � F$="CROWN":A(15)=0

�) �'"THE GUARD THANKS YOU FOR THE":�F$

� �PAUSE:�PAUSE

�# F(10)=F(10)+1:� F(10)=3 � �FIN

� �

�
 ��FIN
 �
� �''''''"WELL DONE, YOU HAVE RETRIEVED THECROWN JEWELS. DON'T EXPECT A     REWARD BECAUSE YOU AREN'T GETTINGONE! (I WAS LYING ABOUT THE      MILLION POUNDS)":�PAUSE:�PAUSE:�END

 ��EAT
$H � B$<>"FISH FINGERS" � B$<>"DRUGS" � �"I'M NOT GOING TO EAT A "B$:�
.\ � B$="FISH FINGERS" � A(14)<>-100 � B$="DRUGS" � A(4)<>-100 � �"YOU HAVEN'T GOT THEM":�
8, � B$="FISH FINGERS" � �"NICE":A(14)=0:�
BP �"THOSE WERE SLEEPING TABLETS. YOU ARE NOW SOUND ASLEEP":�PAUSE:�PAUSE:�END
L
 ��BRIDGE
V �
`	 ��PO
j �
t	 ��TL
~ �
�
 ��ASK
�7 � B$<>"GUARD" � B$<>"MAN" � �"NO WAY PAL":�PAUSE:�
�4 � L<>53 � L<>1 � �"NOT HERE YOU CAN'T":�PAUSE:�
� � L=1 � �dlN
� �
�� �"THE GUARD TELLS YOU THAT THE     CROWN JEWELS HAVE BEEN STOLEN BY A PRACTICAL JOKER, AND HIDDEN IN VARIOUS LOCATIONS IN LONDON"
�~ �'"THERE IS A MILLION POUND REWARD  FOR ANYONE WHO FINDS THE CROWN,  SCEPTRE AND ORB AND RETURNS THEM TO THE JEWEL HOUSE"
�, �'''" PRESS THE SPACE BAR TO CONTINUE" 
� ���<>""
� �
�% � L=53 � �"NO WAY WIMP":�PAUSE:�
�> �"THE OLD MAN WANTS SOMETHING      VALUABLE":�PAUSE:�dbN
 ��OFFER

( � L<>1 � �"DON'T BE DAFT!":�PAUSE:�
& � F(12)=1 � �"NO LADDIE":�PAUSE:�
9 � B$<>"GOLD RING" � �"HE DOESN'T WANT THAT":�PAUSE:�
(, � A(16)<>100 � �"YOU HAVEN'T GOT ONE":�
2a �"THE OLD MAN SNATCHES THE RING ANDGIVES YOU A SKELETON KEY":�PAUSE:F(12)=1:A(8)=1:A(16)=0:�
< ��DBUS(BUS)
F �BUS,8);"�������� " 
P �BUS,9);"�������� " 
Z �BUS,10);"�������� "
d �
�
00000000  0d 00 05 0d 20 2a 46 58  32 30 30 2c 33 0d 00 0a  |.... *FX200,3...|
00000010  0c 20 2a 46 58 31 33 2c  34 0d 00 14 0c 20 2a 46  |. *FX13,4.... *F|
00000020  58 31 35 2c 30 0d 00 1e  07 20 eb 34 0d 00 1f 13  |X15,0.... .4....|
00000030  20 ef 20 32 38 2c 34 2c  32 33 2c 33 36 2c 36 0d  | . 28,4,23,36,6.|
00000040  00 20 17 20 ef 20 32 33  3b 38 32 30 32 3b 30 3b  |. . . 23;8202;0;|
00000050  30 3b 30 3b 3a db 0d 00  21 13 20 2a 4c 2e 43 52  |0;0;:...!. *L.CR|
00000060  4f 57 4e 34 20 35 38 30  30 0d 00 22 30 20 ee 20  |OWN4 5800.."0 . |
00000070  85 20 f1 22 45 72 72 6f  72 20 69 6e 20 74 68 69  |. ."Error in thi|
00000080  73 20 70 72 6f 67 72 61  6d 20 21 21 22 3a f2 50  |s program !!":.P|
00000090  41 55 53 45 3a d6 21 2d  34 0d 00 23 13 20 ef 20  |AUSE:.!-4..#. . |
000000a0  31 39 2c 33 2c 33 2c 30  2c 30 2c 30 0d 00 28 0c  |19,3,3,0,0,0..(.|
000000b0  20 2a 4f 50 54 31 2c 31  0d 00 32 16 20 ef 20 32  | *OPT1,1..2. . 2|
000000c0  33 3b 31 31 2c 30 3b 30  3b 30 3b 30 3b 30 0d 00  |3;11,0;0;0;0;0..|
000000d0  46 39 20 de 20 41 28 31  37 29 2c 43 24 28 31 37  |F9 . A(17),C$(17|
000000e0  29 2c 44 24 28 31 29 2c  45 24 28 31 29 2c 4e 28  |),D$(1),E$(1),N(|
000000f0  31 29 2c 45 28 31 29 2c  53 28 31 29 2c 57 28 31  |1),E(1),S(1),W(1|
00000100  29 2c 46 28 31 35 29 0d  00 4b 09 20 4c 3d 35 33  |),F(15)..K. L=53|
00000110  0d 00 50 11 20 f2 53 45  54 53 43 52 45 45 4e 20  |..P. .SETSCREEN |
00000120  20 0d 00 5a 0a 20 f2 44  41 54 41 0d 00 64 35 20  | ..Z. .DATA..d5 |
00000130  f1 22 44 4f 20 59 4f 55  20 57 49 53 48 20 54 4f  |."DO YOU WISH TO|
00000140  20 52 45 53 55 4d 45 20  50 4c 41 59 20 4f 4e 20  | RESUME PLAY ON |
00000150  41 20 20 53 41 56 45 44  20 47 41 4d 45 20 3f 22  |A  SAVED GAME ?"|
00000160  0d 00 6e 1f 20 f5 3a 4b  4c 24 3d be 3a fd 4b 4c  |..n. .:KL$=.:.KL|
00000170  24 3d 22 4e 22 20 84 20  4b 4c 24 3d 22 59 22 0d  |$="N" . KL$="Y".|
00000180  00 78 17 20 e7 20 4b 4c  24 3d 22 59 22 20 8c 20  |.x. . KL$="Y" . |
00000190  f2 4c 4f 41 44 20 0d 00  82 0d 20 f2 44 45 53 43  |.LOAD .... .DESC|
000001a0  52 49 50 0d 00 8c 1c 20  e7 20 4c 3d 32 30 20 80  |RIP.... . L=20 .|
000001b0  20 46 28 36 29 3d 30 20  8c 20 f2 4a 41 50 53 0d  | F(6)=0 . .JAPS.|
000001c0  00 96 0c 20 f2 43 48 4f  49 43 45 0d 00 a0 06 20  |... .CHOICE.... |
000001d0  f1 0d 00 aa 17 20 e7 20  42 24 3d 22 4c 4f 4f 4b  |..... . B$="LOOK|
000001e0  22 20 8c 20 8d 74 42 40  0d 00 b4 22 20 e7 20 42  |" . .tB@..." . B|
000001f0  24 3d 22 42 4c 45 41 43  48 22 20 8c 20 42 24 3d  |$="BLEACH" . B$=|
00000200  22 44 4f 4d 45 53 54 49  43 22 0d 00 be 29 20 e7  |"DOMESTIC"...) .|
00000210  20 42 24 3d 22 53 43 4f  55 52 49 4e 47 20 50 4f  | B$="SCOURING PO|
00000220  57 44 45 52 22 20 8c 20  42 24 3d 22 46 4c 41 53  |WDER" . B$="FLAS|
00000230  48 59 22 0d 00 c8 33 20  e7 20 42 24 3d 22 46 49  |HY"...3 . B$="FI|
00000240  53 48 22 20 84 20 42 24  3d 22 46 49 4e 47 45 52  |SH" . B$="FINGER|
00000250  53 22 20 8c 20 42 24 3d  22 46 49 53 48 20 46 49  |S" . B$="FISH FI|
00000260  4e 47 45 52 53 22 0d 00  d2 21 20 e7 20 42 24 3d  |NGERS"...! . B$=|
00000270  22 52 49 4e 47 22 20 8c  20 42 24 3d 22 47 4f 4c  |"RING" . B$="GOL|
00000280  44 20 52 49 4e 47 22 0d  00 dc 1e 20 e7 20 42 24  |D RING".... . B$|
00000290  3d 22 4f 4c 44 20 4d 41  4e 22 20 8c 20 42 24 3d  |="OLD MAN" . B$=|
000002a0  22 4d 41 4e 22 0d 00 e6  27 20 e7 20 42 24 3d 22  |"MAN"...' . B$="|
000002b0  4e 22 20 84 20 42 24 3d  22 4e 4f 52 54 48 22 20  |N" . B$="NORTH" |
000002c0  8c 20 58 3d 31 3a e5 8d  54 66 42 20 0d 00 f0 26  |. X=1:..TfB ...&|
000002d0  20 e7 20 42 24 3d 22 45  22 20 84 20 42 24 3d 22  | . B$="E" . B$="|
000002e0  45 41 53 54 22 20 8c 20  58 3d 32 3a e5 8d 54 66  |EAST" . X=2:..Tf|
000002f0  42 20 0d 00 fa 27 20 e7  20 42 24 3d 22 53 22 20  |B ...' . B$="S" |
00000300  84 20 42 24 3d 22 53 4f  55 54 48 22 20 8c 20 58  |. B$="SOUTH" . X|
00000310  3d 33 3a e5 8d 54 66 42  20 0d 01 04 26 20 e7 20  |=3:..TfB ...& . |
00000320  42 24 3d 22 57 22 20 84  20 42 24 3d 22 57 45 53  |B$="W" . B$="WES|
00000330  54 22 20 8c 20 58 3d 34  3a e5 8d 54 66 42 20 0d  |T" . X=4:..TfB .|
00000340  01 0e 28 20 e7 20 41 24  3d 22 47 45 54 22 20 84  |..( . A$="GET" .|
00000350  20 41 24 3d 22 54 41 4b  45 22 20 8c 20 f2 47 45  | A$="TAKE" . .GE|
00000360  54 3a e5 8d 54 5c 42 0d  01 18 45 20 e7 20 41 24  |T:..T\B...E . A$|
00000370  3d 22 42 55 52 4e 22 20  84 20 41 24 3d 22 49 47  |="BURN" . A$="IG|
00000380  4e 49 54 45 22 20 84 20  41 24 3d 22 4c 49 47 48  |NITE" . A$="LIGH|
00000390  54 22 20 84 20 41 24 3d  22 4d 45 4c 54 22 20 8c  |T" . A$="MELT" .|
000003a0  20 f2 42 55 52 4e 3a e5  8d 54 5c 42 0d 01 22 53  | .BURN:..T\B.."S|
000003b0  20 e7 20 41 24 3d 22 49  4e 56 45 22 20 84 20 41  | . A$="INVE" . A|
000003c0  24 3d 22 49 4e 56 45 4e  54 4f 52 59 22 20 84 20  |$="INVENTORY" . |
000003d0  41 24 3d 22 4c 49 53 54  22 20 84 20 41 24 3d 22  |A$="LIST" . A$="|
000003e0  49 4e 56 45 4e 54 22 20  84 20 41 24 3d 22 49 4e  |INVENT" . A$="IN|
000003f0  56 22 20 8c 20 f2 49 4e  56 3a e5 8d 54 5c 42 0d  |V" . .INV:..T\B.|
00000400  01 2c 2c 20 e7 20 41 24  3d 22 4f 46 46 45 52 22  |.,, . A$="OFFER"|
00000410  20 84 20 41 24 3d 22 47  49 56 45 22 20 8c 20 f2  | . A$="GIVE" . .|
00000420  4f 46 46 45 52 3a e5 8d  54 5c 42 0d 01 36 3f 20  |OFFER:..T\B..6? |
00000430  e7 20 41 24 3d 22 44 52  49 4e 4b 22 20 80 20 42  |. A$="DRINK" . B|
00000440  24 3d 22 57 49 4e 45 22  20 8c 20 f1 22 59 4f 55  |$="WINE" . ."YOU|
00000450  20 41 52 45 4e 27 54 20  43 41 52 52 59 49 4e 47  | AREN'T CARRYING|
00000460  20 49 54 22 3a e5 8d 54  5c 42 0d 01 40 39 20 e7  | IT":..T\B..@9 .|
00000470  20 41 24 3d 22 45 41 54  22 20 84 20 41 24 3d 22  | A$="EAT" . A$="|
00000480  47 4f 42 42 4c 45 22 20  84 20 41 24 3d 22 53 57  |GOBBLE" . A$="SW|
00000490  41 4c 4c 4f 57 22 20 8c  20 f2 45 41 54 3a e5 8d  |ALLOW" . .EAT:..|
000004a0  54 5c 42 0d 01 4a 39 20  e7 20 41 24 3d 22 50 52  |T\B..J9 . A$="PR|
000004b0  45 53 53 22 20 84 20 41  24 3d 22 50 55 4c 4c 22  |ESS" . A$="PULL"|
000004c0  20 84 20 41 24 3d 22 53  57 49 54 43 48 22 20 8c  | . A$="SWITCH" .|
000004d0  20 f2 50 55 4c 4c 3a e5  8d 54 5c 42 0d 01 54 3b  | .PULL:..T\B..T;|
000004e0  20 e7 20 41 24 3d 22 57  41 49 54 22 20 8c 20 f1  | . A$="WAIT" . .|
000004f0  22 42 4f 52 49 4e 47 20  57 41 49 54 49 4e 47 20  |"BORING WAITING |
00000500  49 53 4e 27 54 20 49 54  21 22 3a f2 50 41 55 53  |ISN'T IT!":.PAUS|
00000510  45 3a e5 8d 54 5c 42 0d  01 5e 1e 20 e7 20 41 24  |E:..T\B..^. . A$|
00000520  3d 22 53 41 56 45 22 20  8c 20 f2 53 41 56 45 3a  |="SAVE" . .SAVE:|
00000530  e5 8d 54 5c 42 0d 01 68  36 20 e7 20 41 24 3d 22  |..T\B..h6 . A$="|
00000540  55 22 20 84 20 41 24 3d  22 55 50 22 20 84 20 42  |U" . A$="UP" . B|
00000550  24 3d 22 55 22 20 84 20  42 24 3d 22 55 50 22 20  |$="U" . B$="UP" |
00000560  8c 20 f2 55 50 3a e5 8d  54 5c 42 0d 01 72 3d 20  |. .UP:..T\B..r= |
00000570  20 e7 20 41 24 3d 22 44  22 20 84 20 41 24 3d 22  | . A$="D" . A$="|
00000580  44 4f 57 4e 22 20 84 20  42 24 3d 22 44 22 20 84  |DOWN" . B$="D" .|
00000590  20 42 24 3d 22 44 4f 57  4e 22 20 8c 20 f2 44 4f  | B$="DOWN" . .DO|
000005a0  57 4e 3a e5 8d 54 5c 42  0d 01 7c 46 20 e7 20 41  |WN:..T\B..|F . A|
000005b0  24 3d 22 4f 50 45 4e 22  20 80 20 42 24 3d 22 44  |$="OPEN" . B$="D|
000005c0  4f 4f 52 22 20 84 20 41  24 3d 22 55 4e 4c 4f 43  |OOR" . A$="UNLOC|
000005d0  4b 22 20 80 20 42 24 3d  22 44 4f 4f 52 22 20 8c  |K" . B$="DOOR" .|
000005e0  20 f2 55 4e 4c 4f 43 4b  3a e5 8d 54 5c 42 0d 01  | .UNLOCK:..T\B..|
000005f0  86 29 20 e7 20 41 24 3d  22 43 4c 45 41 4e 22 20  |.) . A$="CLEAN" |
00000600  84 20 41 24 3d 22 57 49  50 45 22 20 f2 54 4f 49  |. A$="WIPE" .TOI|
00000610  4c 3a e5 8d 54 5c 42 0d  01 90 1c 20 e7 20 41 24  |L:..T\B.... . A$|
00000620  3d 22 50 41 59 22 20 8c  20 f2 50 41 59 3a e5 8d  |="PAY" . .PAY:..|
00000630  54 5c 42 0d 01 9a 64 20  e7 20 41 24 3d 22 52 45  |T\B...d . A$="RE|
00000640  41 44 22 20 80 20 42 24  3d 22 4d 41 50 22 20 80  |AD" . B$="MAP" .|
00000650  20 46 28 31 33 29 3d 31  20 8c 20 f1 22 49 54 20  | F(13)=1 . ."IT |
00000660  53 48 4f 57 53 20 41 20  50 41 53 53 41 47 45 20  |SHOWS A PASSAGE |
00000670  54 4f 20 54 48 45 20 45  41 53 54 20 4f 46 54 4f  |TO THE EAST OFTO|
00000680  57 45 52 20 47 52 45 45  4e 22 3a f2 50 41 55 53  |WER GREEN":.PAUS|
00000690  45 3a e5 8d 54 5c 42 0d  01 a4 4d 20 e7 20 41 24  |E:..T\B...M . A$|
000006a0  3d 22 52 45 41 44 22 20  80 20 42 24 3d 22 4d 41  |="READ" . B$="MA|
000006b0  50 22 20 80 20 46 28 31  33 29 3d 30 20 8c 20 f1  |P" . F(13)=0 . .|
000006c0  22 59 4f 55 20 48 41 56  45 4e 27 54 20 47 4f 54  |"YOU HAVEN'T GOT|
000006d0  20 41 20 4d 41 50 22 3a  f2 50 41 55 53 45 3a e5  | A MAP":.PAUSE:.|
000006e0  8d 54 5c 42 0d 01 ae 1e  20 e7 20 41 24 3d 22 44  |.T\B.... . A$="D|
000006f0  52 4f 50 22 20 8c 20 f2  44 52 4f 50 3a e5 8d 54  |ROP" . .DROP:..T|
00000700  5c 42 0d 01 b8 43 20 e7  20 41 24 3d 22 51 55 49  |\B...C . A$="QUI|
00000710  54 22 20 84 20 41 24 3d  22 45 4e 44 22 20 84 20  |T" . A$="END" . |
00000720  41 24 3d 22 46 49 4e 49  53 48 22 20 84 20 41 24  |A$="FINISH" . A$|
00000730  3d 22 53 54 4f 50 22 20  8c 20 f2 51 55 49 54 3a  |="STOP" . .QUIT:|
00000740  e5 8d 54 5c 42 0d 01 c2  44 20 e7 20 41 24 3d 22  |..T\B...D . A$="|
00000750  4c 49 47 48 54 22 20 80  20 42 24 3d 22 54 4f 52  |LIGHT" . B$="TOR|
00000760  43 48 22 20 84 20 41 24  3d 22 54 4f 52 43 48 22  |CH" . A$="TORCH"|
00000770  20 80 20 42 24 3d 22 4f  4e 22 20 8c 20 f2 4c 41  | . B$="ON" . .LA|
00000780  4d 50 3a e5 20 8d 54 5c  42 0d 01 cc c8 20 e7 20  |MP:. .T\B.... . |
00000790  41 24 3d 22 45 58 41 4d  22 20 80 20 42 24 3d 22  |A$="EXAM" . B$="|
000007a0  54 48 52 4f 4e 45 22 20  80 20 41 28 31 35 29 3d  |THRONE" . A(15)=|
000007b0  30 20 84 20 41 24 3d 22  4d 4f 56 45 22 20 80 20  |0 . A$="MOVE" . |
000007c0  42 24 3d 22 54 48 52 4f  4e 45 22 20 80 20 41 28  |B$="THRONE" . A(|
000007d0  31 35 29 3d 30 20 84 20  41 24 3d 22 4c 4f 4f 4b  |15)=0 . A$="LOOK|
000007e0  22 20 80 20 42 24 3d 22  54 48 52 4f 4e 45 22 20  |" . B$="THRONE" |
000007f0  80 20 41 28 31 35 29 3d  30 20 84 20 41 24 3d 22  |. A(15)=0 . A$="|
00000800  53 48 49 46 54 22 20 80  20 42 24 3d 22 54 48 52  |SHIFT" . B$="THR|
00000810  4f 4e 45 22 20 80 20 41  28 31 35 29 3d 30 20 8c  |ONE" . A(15)=0 .|
00000820  20 f1 22 54 48 45 20 43  52 4f 57 4e 20 49 53 20  | ."THE CROWN IS |
00000830  48 49 44 44 45 4e 20 42  45 4e 45 41 54 48 20 49  |HIDDEN BENEATH I|
00000840  54 22 3a 41 28 31 35 29  3d 4c 3a e5 20 8d 54 5c  |T":A(15)=L:. .T\|
00000850  42 0d 01 d6 4d 20 e7 20  41 24 3d 22 45 58 41 4d  |B...M . A$="EXAM|
00000860  22 20 8c 20 f1 22 54 48  45 52 45 20 49 53 20 4e  |" . ."THERE IS N|
00000870  4f 20 4e 45 45 44 20 54  4f 20 45 58 41 4d 49 4e  |O NEED TO EXAMIN|
00000880  45 20 20 20 20 20 20 41  4e 59 54 48 49 4e 47 22  |E      ANYTHING"|
00000890  3a f2 50 41 55 53 45 3a  e5 20 8d 54 5c 42 0d 01  |:.PAUSE:. .T\B..|
000008a0  e0 1e 20 e7 20 41 24 3d  22 44 52 49 4e 4b 22 20  |.. . A$="DRINK" |
000008b0  f2 44 52 49 4e 4b 3a e5  8d 54 5c 42 0d 01 ea 1e  |.DRINK:..T\B....|
000008c0  20 e7 20 41 24 3d 22 44  52 55 47 22 20 8c 20 f2  | . A$="DRUG" . .|
000008d0  44 52 55 47 3a e5 8d 54  5c 42 0d 01 f4 28 20 e7  |DRUG:..T\B...( .|
000008e0  20 41 24 3d 22 41 53 4b  22 20 84 20 41 24 3d 22  | A$="ASK" . A$="|
000008f0  54 41 4c 4b 22 20 8c 20  f2 41 53 4b 3a e5 8d 74  |TALK" . .ASK:..t|
00000900  42 40 0d 01 fe 43 20 e7  20 41 24 3d 22 50 55 4c  |B@...C . A$="PUL|
00000910  4c 22 20 80 20 42 24 3d  22 4c 45 56 45 52 22 20  |L" . B$="LEVER" |
00000920  84 20 41 24 3d 22 50 55  4c 4c 22 20 80 20 42 24  |. A$="PULL" . B$|
00000930  3d 22 44 4f 57 4e 22 20  8c 20 f2 50 55 4c 4c 3a  |="DOWN" . .PULL:|
00000940  e5 8d 54 5c 42 0d 02 08  2e 20 e7 20 41 24 3d 42  |..T\B.... . A$=B|
00000950  24 20 8c 20 f1 22 49 20  44 4f 4e 27 54 20 4b 4e  |$ . ."I DON'T KN|
00000960  4f 57 20 48 4f 57 20 54  4f 20 22 41 24 3a e5 8d  |OW HOW TO "A$:..|
00000970  54 5c 42 0d 02 12 29 20  f1 22 49 20 44 4f 4e 27  |T\B...) ."I DON'|
00000980  54 20 4b 4e 4f 57 20 48  4f 57 20 54 4f 20 22 41  |T KNOW HOW TO "A|
00000990  24 22 20 41 20 22 27 42  24 22 21 22 0d 02 1c 1a  |$" A "'B$"!"....|
000009a0  20 e3 20 46 3d 31 20 b8  20 37 30 30 30 3a ed 3a  | . F=1 . 7000:.:|
000009b0  e5 8d 74 42 40 20 0d 02  26 44 20 e7 20 58 3d 33  |..tB@ ..&D . X=3|
000009c0  20 80 20 4c 3d 39 20 80  20 46 28 32 29 3d 30 20  | . L=9 . F(2)=0 |
000009d0  8c 20 f1 22 59 4f 55 20  43 41 4e 27 54 20 47 45  |. ."YOU CAN'T GE|
000009e0  54 20 49 4e 20 57 49 54  48 4f 55 54 20 50 41 59  |T IN WITHOUT PAY|
000009f0  49 4e 47 22 3a e5 8d 54  5c 42 0d 02 30 7c 20 e7  |ING":..T\B..0| .|
00000a00  20 4c 3d 31 34 20 80 20  58 3d 32 20 80 20 46 28  | L=14 . X=2 . F(|
00000a10  35 29 3d 30 20 84 20 4c  3d 31 35 20 80 20 58 3d  |5)=0 . L=15 . X=|
00000a20  32 20 80 20 46 28 35 29  3d 30 20 8c 20 f1 22 54  |2 . F(5)=0 . ."T|
00000a30  48 45 52 45 20 49 53 20  41 20 44 4f 4f 52 20 4f  |HERE IS A DOOR O|
00000a40  56 45 52 20 54 48 45 52  45 20 20 20 20 20 20 20  |VER THERE       |
00000a50  53 4f 4d 45 57 48 45 52  45 20 42 55 54 20 59 4f  |SOMEWHERE BUT YO|
00000a60  55 20 43 41 4e 27 54 20  46 49 4e 44 20 49 54 22  |U CAN'T FIND IT"|
00000a70  3a e5 8d 54 5c 42 0d 02  3a 5d 20 e7 20 58 3d 32  |:..T\B..:] . X=2|
00000a80  20 80 20 4c 3d 31 39 20  80 20 46 28 33 29 3d 30  | . L=19 . F(3)=0|
00000a90  20 84 20 58 3d 32 20 80  20 4c 3d 34 32 20 80 20  | . X=2 . L=42 . |
00000aa0  46 28 34 29 3d 30 20 8c  20 f1 22 59 4f 55 20 43  |F(4)=0 . ."YOU C|
00000ab0  41 4e 27 54 20 47 45 54  20 50 41 53 54 20 57 49  |AN'T GET PAST WI|
00000ac0  54 48 4f 55 54 20 50 41  59 49 4e 47 22 3a e5 8d  |THOUT PAYING":..|
00000ad0  54 5c 42 0d 02 44 53 20  e7 20 58 3d 33 20 80 20  |T\B..DS . X=3 . |
00000ae0  4c 3d 32 30 20 80 20 46  28 37 29 3d 30 20 8c 20  |L=20 . F(7)=0 . |
00000af0  f1 22 59 4f 55 20 43 41  4e 27 54 20 47 4f 20 53  |."YOU CAN'T GO S|
00000b00  4f 55 54 48 20 42 45 43  41 55 53 45 20 54 48 45  |OUTH BECAUSE THE|
00000b10  20 20 20 42 52 49 44 47  45 20 49 53 20 55 50 22  |   BRIDGE IS UP"|
00000b20  3a e5 8d 54 5c 42 0d 02  4e 40 20 e7 20 58 3d 31  |:..T\B..N@ . X=1|
00000b30  20 80 20 4c 3d 32 32 20  80 20 46 28 38 29 3d 30  | . L=22 . F(8)=0|
00000b40  20 8c 20 f1 22 54 48 45  20 4d 41 4e 20 57 4f 4e  | . ."THE MAN WON|
00000b50  27 54 20 4c 45 54 20 59  4f 55 20 50 41 53 53 22  |'T LET YOU PASS"|
00000b60  3a e5 8d 54 5c 42 0d 02  58 47 20 e7 20 58 3d 32  |:..T\B..XG . X=2|
00000b70  20 80 20 4c 3d 34 31 20  80 20 46 28 39 29 3d 30  | . L=41 . F(9)=0|
00000b80  20 8c 20 f1 22 41 20 4c  4f 43 4b 45 44 20 44 4f  | . ."A LOCKED DO|
00000b90  4f 52 20 42 4c 4f 43 4b  53 20 54 48 45 20 57 41  |OR BLOCKS THE WA|
00000ba0  59 20 45 41 53 54 22 3a  e5 8d 54 5c 42 0d 02 62  |Y EAST":..T\B..b|
00000bb0  4d 20 e7 20 58 3d 31 20  80 20 4c 3d 34 37 20 80  |M . X=1 . L=47 .|
00000bc0  20 46 28 31 31 29 3d 30  20 8c 20 f1 22 41 20 4c  | F(11)=0 . ."A L|
00000bd0  4f 43 4b 45 44 20 44 4f  4f 52 20 42 4c 4f 43 4b  |OCKED DOOR BLOCK|
00000be0  53 20 54 48 45 20 57 41  59 20 20 20 20 20 4e 4f  |S THE WAY     NO|
00000bf0  52 54 48 22 3a e5 8d 54  5c 42 0d 02 6c 1c 20 e7  |RTH":..T\B..l. .|
00000c00  20 58 3d 31 20 80 20 4e  3d 30 20 8c 20 f2 4e 4f  | X=1 . N=0 . .NO|
00000c10  3a e5 8d 54 5c 42 0d 02  76 1c 20 e7 20 58 3d 32  |:..T\B..v. . X=2|
00000c20  20 80 20 45 3d 30 20 8c  20 f2 4e 4f 3a e5 8d 54  | . E=0 . .NO:..T|
00000c30  5c 42 0d 02 80 1d 20 e7  20 58 3d 33 20 80 20 53  |\B.... . X=3 . S|
00000c40  3d 30 20 8c 20 f2 4e 4f  3a e5 8d 54 5c 42 20 0d  |=0 . .NO:..T\B .|
00000c50  02 8a 1c 20 e7 20 58 3d  34 20 80 20 57 3d 30 20  |... . X=4 . W=0 |
00000c60  8c 20 f2 4e 4f 3a e5 8d  54 5c 42 0d 02 94 10 20  |. .NO:..T\B.... |
00000c70  e7 20 58 3d 31 20 8c 20  4c 3d 4e 0d 02 9e 10 20  |. X=1 . L=N.... |
00000c80  e7 20 58 3d 32 20 8c 20  4c 3d 45 0d 02 a8 10 20  |. X=2 . L=E.... |
00000c90  e7 20 58 3d 33 20 8c 20  4c 3d 53 0d 02 b2 10 20  |. X=3 . L=S.... |
00000ca0  e7 20 58 3d 34 20 8c 20  4c 3d 57 0d 02 bc 0a 20  |. X=4 . L=W.... |
00000cb0  e5 8d 74 42 40 0d 02 c6  10 20 dd f2 53 45 54 53  |..tB@.... ..SETS|
00000cc0  43 52 45 45 4e 0d 02 d0  05 20 0d 02 da 06 20 db  |CREEN.... .... .|
00000cd0  0d 02 e4 15 20 ef 20 32  38 2c 34 2c 32 33 2c 33  |.... . 28,4,23,3|
00000ce0  36 2c 36 3a e1 0d 02 ee  0b 20 dd f2 44 41 54 41  |6,6:..... ..DATA|
00000cf0  0d 02 f8 25 20 f7 20 8d  74 4e 48 3a e3 20 46 3d  |...% . .tNH:. F=|
00000d00  31 20 b8 20 31 37 3a f3  20 43 24 28 46 29 2c 41  |1 . 17:. C$(F),A|
00000d10  28 46 29 3a ed 0d 03 02  06 20 e1 0d 03 0c 0e 20  |(F):..... ..... |
00000d20  dd f2 44 45 53 43 52 49  50 0d 03 16 13 20 ef 20  |..DESCRIP.... . |
00000d30  32 38 2c 34 2c 32 33 2c  33 36 2c 36 0d 03 20 06  |28,4,23,36,6.. .|
00000d40  20 db 0d 03 2a 0b 20 4b  4c 24 3d 22 22 0d 03 34  | ...*. KL$=""..4|
00000d50  12 20 f7 20 28 32 31 39  30 2b 4c 2a 31 30 29 0d  |. . (2190+L*10).|
00000d60  03 3e 14 20 f3 20 44 24  2c 45 24 2c 4e 2c 45 2c  |.>. . D$,E$,N,E,|
00000d70  53 2c 57 0d 03 48 4a 20  e7 20 4c 3d 36 20 84 20  |S,W..HJ . L=6 . |
00000d80  4c 3d 38 20 84 20 4c 3d  31 38 20 84 20 4c 3d 32  |L=8 . L=18 . L=2|
00000d90  34 20 84 20 4c 3d 32 35  20 84 20 4c 3d 32 39 20  |4 . L=25 . L=29 |
00000da0  84 20 4c 3d 34 33 20 84  20 4c 3d 35 34 20 8c 20  |. L=43 . L=54 . |
00000db0  f2 4e 55 4d 42 45 52 3a  e5 8d 54 60 43 0d 03 52  |.NUMBER:..T`C..R|
00000dc0  6a 20 e7 20 4c 3d 33 35  20 8c 20 f1 22 59 4f 55  |j . L=35 . ."YOU|
00000dd0  20 48 41 56 45 20 42 45  45 4e 20 41 52 52 45 53  | HAVE BEEN ARRES|
00000de0  54 45 44 20 46 4f 52 20  20 20 20 20 20 20 41 54  |TED FOR       AT|
00000df0  54 45 4d 50 54 49 4e 47  20 54 4f 20 41 53 53 41  |TEMPTING TO ASSA|
00000e00  53 53 49 4e 41 54 45 20  54 48 45 20 20 20 20 50  |SSINATE THE    P|
00000e10  2e 4d 2e 22 3a f2 50 41  55 53 45 3a f2 50 41 55  |.M.":.PAUSE:.PAU|
00000e20  53 45 3a f2 45 4e 44 0d  03 5c 1c 20 e7 20 4c 3d  |SE:.END..\. . L=|
00000e30  32 30 20 84 20 4c 3d 32  33 20 8c 20 f2 42 52 49  |20 . L=23 . .BRI|
00000e40  44 47 45 0d 03 66 0f 20  e7 20 4c 3d 33 33 20 f2  |DGE..f. . L=33 .|
00000e50  50 4f 0d 03 70 4e 20 e7  20 4c 3d 35 30 20 80 20  |PO..pN . L=50 . |
00000e60  46 28 31 33 29 3d 31 20  8c 20 45 24 3d 22 59 4f  |F(13)=1 . E$="YO|
00000e70  55 52 20 4d 41 50 20 53  48 4f 57 53 20 41 20 53  |UR MAP SHOWS A S|
00000e80  4d 41 4c 4c 20 50 41 53  53 41 47 45 20 20 20 54  |MALL PASSAGE   T|
00000e90  4f 20 54 48 45 20 45 41  53 54 22 3a 45 3d 35 31  |O THE EAST":E=51|
00000ea0  0d 03 7a 4d 20 20 e7 20  4c 3d 35 30 20 80 20 46  |..zM  . L=50 . F|
00000eb0  28 31 33 29 3d 30 20 8c  20 45 24 3d 22 59 4f 55  |(13)=0 . E$="YOU|
00000ec0  20 41 52 45 20 53 55 52  52 4f 55 4e 44 45 44 20  | ARE SURROUNDED |
00000ed0  4f 4e 20 41 4c 4c 20 53  49 44 45 53 20 20 42 59  |ON ALL SIDES  BY|
00000ee0  20 54 4f 57 45 52 53 22  3a 45 3d 30 20 0d 03 84  | TOWERS":E=0 ...|
00000ef0  11 20 e7 20 4c 3d 33 32  20 8c 20 f2 54 4c 0d 03  |. . L=32 . .TL..|
00000f00  8e 5f 20 f1 22 59 4f 55  20 41 52 45 20 22 3b 44  |._ ."YOU ARE ";D|
00000f10  24 3a f1 3a e7 20 4c 3d  35 33 20 80 20 41 28 31  |$:.:. L=53 . A(1|
00000f20  31 29 3d 31 30 30 20 84  20 4c 3d 35 33 20 80 20  |1)=100 . L=53 . |
00000f30  41 28 31 32 29 3d 31 30  30 20 84 20 4c 3d 35 33  |A(12)=100 . L=53|
00000f40  20 80 20 41 28 31 35 29  3d 31 30 30 20 8c 20 f2  | . A(15)=100 . .|
00000f50  50 4f 4c 49 43 45 3a e5  8d 74 42 40 20 0d 03 98  |POLICE:..tB@ ...|
00000f60  49 20 e7 20 4c 3d 33 37  20 80 20 41 28 31 35 29  |I . L=37 . A(15)|
00000f70  3d 30 20 8c 20 f1 22 53  4f 4d 45 54 48 49 4e 47  |=0 . ."SOMETHING|
00000f80  20 49 53 20 48 49 44 44  45 4e 20 55 4e 44 45 52  | IS HIDDEN UNDER|
00000f90  20 54 48 45 20 20 20 20  54 48 52 4f 4e 45 22 27  | THE    THRONE"'|
00000fa0  3a e5 8d 64 68 43 0d 03  a2 4f 20 e7 20 4c 3d 33  |:..dhC...O . L=3|
00000fb0  37 20 80 20 41 28 31 35  29 3c 3e 30 20 8c 20 f1  |7 . A(15)<>0 . .|
00000fc0  22 54 48 45 20 54 48 52  4f 4e 45 20 44 4f 45 53  |"THE THRONE DOES|
00000fd0  4e 27 54 20 4c 4f 4f 4b  20 56 45 52 59 20 20 20  |N'T LOOK VERY   |
00000fe0  20 20 43 4f 4d 46 4f 52  54 41 42 4c 45 22 27 3a  |  COMFORTABLE"':|
00000ff0  e5 8d 64 68 43 0d 03 ac  5c 20 e7 20 4c 3d 34 20  |..dhC...\ . L=4 |
00001000  80 20 41 28 35 29 3c 3e  2d 34 20 84 20 4c 3d 34  |. A(5)<>-4 . L=4|
00001010  20 80 20 41 28 36 29 3c  3e 2d 34 20 8c 20 45 24  | . A(6)<>-4 . E$|
00001020  3d 22 54 48 49 53 20 4c  4f 4f 4b 53 20 4c 49 4b  |="THIS LOOKS LIK|
00001030  45 20 41 20 43 4c 45 41  4e 45 52 53 20 20 20 20  |E A CLEANERS    |
00001040  20 20 20 53 54 4f 52 45  20 52 4f 4f 4d 22 20 20  |   STORE ROOM"  |
00001050  20 0d 03 b6 45 20 e7 20  4c 3d 32 32 20 80 20 41  | ...E . L=22 . A|
00001060  28 39 29 3c 3e 2d 32 32  20 8c 20 45 24 3d 22 49  |(9)<>-22 . E$="I|
00001070  20 43 41 4e 20 53 45 45  20 54 48 45 20 43 4f 4e  | CAN SEE THE CON|
00001080  54 52 4f 4c 20 52 4f 4f  4d 20 54 4f 20 54 48 45  |TROL ROOM TO THE|
00001090  4e 4f 52 54 48 22 0d 03  c0 74 20 e7 20 41 28 31  |NORTH"...t . A(1|
000010a0  32 29 3c 3e 30 20 80 20  4c 3d 31 33 20 8c 20 45  |2)<>0 . L=13 . E|
000010b0  24 3d 22 54 48 45 52 45  20 49 53 20 41 20 4c 41  |$="THERE IS A LA|
000010c0  52 47 45 20 53 49 47 4e  20 41 42 4f 56 45 20 59  |RGE SIGN ABOVE Y|
000010d0  4f 55 20 20 49 54 20 53  41 59 53 20 27 4e 4f 20  |OU  IT SAYS 'NO |
000010e0  53 4d 4f 4b 49 4e 47 27  20 2d 20 57 41 58 57 4f  |SMOKING' - WAXWO|
000010f0  52 4b 53 20 20 41 52 45  20 48 49 47 48 4c 59 20  |RKS  ARE HIGHLY |
00001100  46 4c 41 4d 4d 41 42 4c  45 22 0d 03 ca 36 20 e7  |FLAMMABLE"...6 .|
00001110  20 4c 3d 31 20 80 20 46  28 31 32 29 3d 31 20 8c  | L=1 . F(12)=1 .|
00001120  20 45 24 3d 22 41 4e 20  4f 4c 44 20 4d 41 4e 20  | E$="AN OLD MAN |
00001130  53 4c 45 45 50 53 20 49  4e 20 48 45 52 45 22 20  |SLEEPS IN HERE" |
00001140  0d 03 d4 13 20 e7 20 45  24 3d 22 22 20 e5 8d 64  |.... . E$="" ..d|
00001150  68 43 20 0d 03 de 0a 20  f1 45 24 3a f1 0d 03 e8  |hC .... .E$:....|
00001160  09 20 41 53 3d 31 0d 03  f2 17 20 e7 20 94 28 41  |. AS=1.... . .(A|
00001170  28 41 53 29 29 3d 4c 20  8c 8d 54 50 44 0d 03 fc  |(AS))=L ..TPD...|
00001180  1b 20 41 53 3d 41 53 2b  31 3a e7 20 41 53 3d 31  |. AS=AS+1:. AS=1|
00001190  38 20 8c 20 8d 44 56 44  0d 04 06 0a 20 e5 8d 64  |8 . .DVD.... ..d|
000011a0  72 43 0d 04 10 13 20 f1  22 54 48 45 52 45 20 49  |rC.... ."THERE I|
000011b0  53 20 3a 22 3b 0d 04 1a  0f 20 e3 20 46 3d 31 20  |S :";.... . F=1 |
000011c0  b8 20 31 37 0d 04 24 4e  20 e7 20 41 28 46 29 3d  |. 17..$N . A(F)=|
000011d0  4c 20 80 20 46 3d 31 31  20 84 20 41 28 46 29 3d  |L . F=11 . A(F)=|
000011e0  4c 20 80 20 46 3d 31 32  20 84 20 41 28 46 29 3d  |L . F=12 . A(F)=|
000011f0  4c 20 80 20 46 3d 31 35  20 8c 20 f1 8a 31 31 29  |L . F=15 . ..11)|
00001200  3b 22 54 48 45 20 22 43  24 28 46 29 3a e5 8d 44  |;"THE "C$(F):..D|
00001210  42 44 0d 04 2e 24 e7 20  41 28 46 29 3d 4c 20 8c  |BD...$. A(F)=L .|
00001220  20 f1 8a 31 31 29 3b 22  41 20 22 43 24 28 46 29  | ..11);"A "C$(F)|
00001230  3a e5 8d 44 42 44 0d 04  38 24 e7 20 94 28 41 28  |:..DBD..8$. .(A(|
00001240  46 29 29 3d 4c 20 8c 20  f1 8a 31 31 29 3b 22 53  |F))=L . ..11);"S|
00001250  4f 4d 45 20 22 43 24 28  46 29 0d 04 42 06 20 ed  |OME "C$(F)..B. .|
00001260  0d 04 4c 06 20 f1 0d 04  56 14 20 f1 22 59 4f 55  |..L. ...V. ."YOU|
00001270  20 43 41 4e 20 47 4f 20  22 3b 0d 04 60 18 20 e7  | CAN GO ";..`. .|
00001280  20 4e 3c 3e 30 20 8c 20  f1 22 4e 4f 52 54 48 2c  | N<>0 . ."NORTH,|
00001290  22 3b 0d 04 6a 17 20 e7  20 45 3c 3e 30 20 8c 20  |";..j. . E<>0 . |
000012a0  f1 22 45 41 53 54 2c 22  3b 0d 04 74 18 20 e7 20  |."EAST,";..t. . |
000012b0  53 3c 3e 30 20 8c 20 f1  22 53 4f 55 54 48 2c 22  |S<>0 . ."SOUTH,"|
000012c0  3b 0d 04 7e 17 20 e7 20  57 3c 3e 30 20 8c 20 f1  |;..~. . W<>0 . .|
000012d0  22 57 45 53 54 2c 22 3b  0d 04 88 1c 20 e7 20 4c  |"WEST,";.... . L|
000012e0  3e 33 30 20 80 20 4c 3c  33 34 20 8c 20 f1 22 55  |>30 . L<34 . ."U|
000012f0  50 2c 22 3b 0d 04 92 1e  20 e7 20 4c 3e 33 31 20  |P,";.... . L>31 |
00001300  80 20 4c 3c 33 35 20 8c  20 f1 22 44 4f 57 4e 2c  |. L<35 . ."DOWN,|
00001310  22 3b 0d 04 9c 0e 20 f1  bd 28 38 29 3b 22 20 22  |";.... ..(8);" "|
00001320  0d 04 a6 06 20 e1 0d 04  b0 0d 20 dd f2 43 48 4f  |.... ..... ..CHO|
00001330  49 43 45 0d 04 ba 16 20  41 24 3d 22 22 3a 42 24  |ICE.... A$="":B$|
00001340  3d 22 22 3a 4b 24 3d 22  22 0d 04 c4 1d 20 f1 3a  |="":K$="".... .:|
00001350  e8 22 57 48 41 54 20 53  48 41 4c 4c 20 49 20 44  |."WHAT SHALL I D|
00001360  4f 20 22 2c 4b 24 0d 04  ce 13 20 e7 20 4b 24 3d  |O ",K$.... . K$=|
00001370  22 22 20 8c 20 8d 64 44  44 0d 04 d8 08 20 46 3d  |"" . .dDD.... F=|
00001380  31 0d 04 e2 1a 20 e7 20  c1 4b 24 2c 46 2c 31 29  |1.... . .K$,F,1)|
00001390  3d 22 20 22 20 8c 20 8d  54 4a 45 0d 04 ec 24 20  |=" " . .TJE...$ |
000013a0  41 24 3d 41 24 2b c1 4b  24 2c 46 2c 31 29 3a e7  |A$=A$+.K$,F,1):.|
000013b0  20 46 3d a9 28 4b 24 29  20 8c 20 8d 54 40 45 0d  | F=.(K$) . .T@E.|
000013c0  04 f6 10 20 46 3d 46 2b  31 3a e5 8d 64 62 44 0d  |... F=F+1:..dbD.|
000013d0  05 00 16 20 e7 20 41 24  3d 4b 24 20 8c 20 42 24  |... . A$=K$ . B$|
000013e0  3d 41 24 3a e1 0d 05 0a  14 20 42 24 3d c2 4b 24  |=A$:..... B$=.K$|
000013f0  2c a9 28 4b 24 29 2d 46  29 0d 05 14 06 20 e1 0d  |,.(K$)-F).... ..|
00001400  05 1e 0a 20 dd f2 47 45  54 0d 05 28 09 20 41 53  |... ..GET..(. AS|
00001410  3d 31 0d 05 32 17 20 e7  20 42 24 3d 43 24 28 41  |=1..2. . B$=C$(A|
00001420  53 29 20 8c 20 8d 44 50  45 0d 05 3c 3a 20 41 53  |S) . .DPE..<: AS|
00001430  3d 41 53 2b 31 3a e7 20  41 53 3d 31 38 20 8c 20  |=AS+1:. AS=18 . |
00001440  f1 22 49 20 44 4f 4e 27  54 20 4b 4e 4f 57 20 57  |."I DON'T KNOW W|
00001450  48 41 54 20 41 20 22 2c  42 24 3b 22 20 49 53 21  |HAT A ",B$;" IS!|
00001460  22 3a e1 0d 05 46 0a 20  e5 8d 54 72 45 0d 05 50  |":...F. ..TrE..P|
00001470  06 20 f4 0d 05 5a 22 20  e7 20 42 24 3d 22 46 49  |. ...Z" . B$="FI|
00001480  56 45 52 22 20 80 20 41  28 41 53 29 3d 4c 20 8c  |VER" . A(AS)=L .|
00001490  20 8d 74 56 45 0d 05 64  29 20 e7 20 42 24 3d 22  | .tVE..d) . B$="|
000014a0  46 49 56 45 52 22 20 80  20 41 53 3c 33 20 8c 20  |FIVER" . AS<3 . |
000014b0  41 53 3d 41 53 2b 31 3a  e5 8d 54 72 45 20 0d 05  |AS=AS+1:..TrE ..|
000014c0  6e 62 20 e7 20 94 28 41  28 41 53 29 29 3c 3e 4c  |nb . .(A(AS))<>L|
000014d0  20 80 20 41 53 3d 34 20  84 20 94 28 41 28 41 53  | . AS=4 . .(A(AS|
000014e0  29 29 3c 3e 4c 20 80 20  41 53 3d 37 20 84 20 94  |))<>L . AS=7 . .|
000014f0  28 41 28 41 53 29 29 3c  3e 4c 20 80 20 41 53 3d  |(A(AS))<>L . AS=|
00001500  31 34 20 8c 20 f1 22 54  48 45 20 22 42 24 22 20  |14 . ."THE "B$" |
00001510  41 52 45 20 4e 4f 54 20  48 45 52 45 21 22 3a e1  |ARE NOT HERE!":.|
00001520  0d 05 78 30 20 e7 20 94  28 41 28 41 53 29 29 3c  |..x0 . .(A(AS))<|
00001530  3e 4c 20 8c 20 f1 22 54  48 45 20 22 42 24 22 20  |>L . ."THE "B$" |
00001540  49 53 20 4e 4f 54 20 48  45 52 45 21 22 3a e1 20  |IS NOT HERE!":. |
00001550  0d 05 82 16 20 e7 20 41  53 3d 31 37 20 8c 20 46  |.... . AS=17 . F|
00001560  28 31 33 29 3d 31 0d 05  8c 9a 20 e7 20 42 24 3d  |(13)=1.... . B$=|
00001570  22 57 49 4e 45 22 20 8c  20 f1 22 41 20 50 4f 4c  |"WINE" . ."A POL|
00001580  49 43 45 4d 41 4e 20 41  52 52 49 56 45 53 20 41  |ICEMAN ARRIVES A|
00001590  4e 44 20 41 52 52 45 53  54 53 20 20 59 4f 55 20  |ND ARRESTS  YOU |
000015a0  46 4f 52 20 45 4e 54 45  52 49 4e 47 20 54 48 45  |FOR ENTERING THE|
000015b0  20 51 55 45 45 4e 53 20  20 20 20 20 20 42 45 44  | QUEENS      BED|
000015c0  52 4f 4f 4d 20 41 4e 44  20 53 54 45 41 4c 49 4e  |ROOM AND STEALIN|
000015d0  47 20 48 41 4c 46 20 41  20 20 20 20 20 20 42 4f  |G HALF A      BO|
000015e0  54 54 4c 45 20 4f 46 20  57 49 4e 45 22 3a f2 50  |TTLE OF WINE":.P|
000015f0  41 55 53 45 3a f2 50 41  55 53 45 3a f2 45 4e 44  |AUSE:.PAUSE:.END|
00001600  0d 05 96 1f 20 f1 22 4f  4b 22 3a 41 28 41 53 29  |.... ."OK":A(AS)|
00001610  3d 31 30 30 2a b4 28 41  28 41 53 29 29 3a e1 0d  |=100*.(A(AS)):..|
00001620  05 a0 0a 20 dd f2 49 4e  56 0d 05 aa 09 20 53 53  |... ..INV.... SS|
00001630  3d 30 0d 05 b4 19 20 f1  22 59 4f 55 20 41 52 45  |=0.... ."YOU ARE|
00001640  20 43 41 52 52 59 49 4e  47 22 3b 0d 05 be 0f 20  | CARRYING";.... |
00001650  e3 20 46 3d 31 20 b8 20  31 37 0d 05 c8 5a 20 e7  |. F=1 . 17...Z .|
00001660  20 41 28 46 29 3d 31 30  30 20 80 20 46 3d 31 31  | A(F)=100 . F=11|
00001670  20 84 20 41 28 46 29 3d  31 30 30 20 80 20 46 3d  | . A(F)=100 . F=|
00001680  31 32 20 84 20 41 28 46  29 3d 31 30 30 20 80 20  |12 . A(F)=100 . |
00001690  46 3d 31 35 20 8c 20 f1  8a 31 37 29 3b 22 54 48  |F=15 . ..17);"TH|
000016a0  45 20 22 3b 43 24 28 46  29 3a 53 53 3d 31 3a e5  |E ";C$(F):SS=1:.|
000016b0  8d 64 70 45 0d 05 d2 2c  e7 20 41 28 46 29 3d 31  |.dpE...,. A(F)=1|
000016c0  30 30 20 8c 20 f1 8a 31  37 29 3b 22 41 20 22 3b  |00 . ..17);"A ";|
000016d0  43 24 28 46 29 3a 53 53  3d 31 3a e5 8d 64 70 45  |C$(F):SS=1:..dpE|
000016e0  0d 05 dc 30 20 e7 20 46  3d 31 34 20 80 20 41 28  |...0 . F=14 . A(|
000016f0  46 29 3d 2d 31 30 30 20  8c 20 f1 8a 31 37 29 3b  |F)=-100 . ..17);|
00001700  43 24 28 46 29 3a 53 53  3d 31 3a e5 8d 64 70 45  |C$(F):SS=1:..dpE|
00001710  0d 05 e6 30 e7 20 41 28  46 29 3d 2d 31 30 30 20  |...0. A(F)=-100 |
00001720  8c 20 f1 8a 31 37 29 3b  22 53 4f 4d 45 20 22 3b  |. ..17);"SOME ";|
00001730  43 24 28 46 29 3a 53 53  3d 31 3a e5 8d 64 70 45  |C$(F):SS=1:..dpE|
00001740  0d 05 f0 1b 20 ed 3a e7  20 53 53 3d 30 20 8c 20  |.... .:. SS=0 . |
00001750  f1 22 20 4e 4f 54 48 49  4e 47 22 0d 05 fa 06 20  |." NOTHING".... |
00001760  e1 0d 06 04 0b 20 dd f2  50 55 4c 4c 0d 06 0e 25  |..... ..PULL...%|
00001770  20 e7 20 4c 3c 3e 32 31  20 8c 20 f1 22 4e 4f 54  | . L<>21 . ."NOT|
00001780  20 48 45 52 45 2c 20 49  20 43 41 4e 27 54 22 3a  | HERE, I CAN'T":|
00001790  e1 0d 06 18 25 20 e7 20  46 28 37 29 3d 31 20 8c  |....% . F(7)=1 .|
000017a0  20 f1 22 49 54 20 48 41  53 20 4e 4f 20 45 46 46  | ."IT HAS NO EFF|
000017b0  45 43 54 22 3a e1 0d 06  22 3a 20 f1 22 53 43 52  |ECT":...": ."SCR|
000017c0  45 45 45 43 48 2e 2e 20  54 48 41 54 20 4c 45 56  |EEECH.. THAT LEV|
000017d0  45 52 20 48 41 53 20 4c  4f 57 45 52 45 44 54 48  |ER HAS LOWEREDTH|
000017e0  45 20 52 4f 41 44 22 3a  46 28 37 29 3d 31 3a e1  |E ROAD":F(7)=1:.|
000017f0  0d 06 2c 09 20 dd f2 4e  4f 0d 06 36 28 20 f1 22  |..,. ..NO..6( ."|
00001800  59 4f 55 20 43 41 4e 27  54 20 47 4f 20 49 4e 20  |YOU CAN'T GO IN |
00001810  54 48 41 54 20 44 49 52  45 43 54 49 4f 4e 22 3a  |THAT DIRECTION":|
00001820  e1 0d 06 40 0b 20 dd f2  53 41 56 45 0d 06 45 23  |...@. ..SAVE..E#|
00001830  20 f5 20 e8 22 46 69 6c  65 6e 61 6d 65 22 2c 66  | . ."Filename",f|
00001840  69 6c 65 24 3a fd 66 69  6c 65 24 3c 3e 22 22 0d  |ile$:.file$<>"".|
00001850  06 4a 1b 20 f1 22 50 4f  53 49 54 49 4f 4e 20 43  |.J. ."POSITION C|
00001860  41 53 53 45 54 54 45 22  3a f1 0d 06 54 0f 20 58  |ASSETTE":...T. X|
00001870  3d ae 28 66 69 6c 65 24  29 0d 06 5e 0a 20 f1 23  |=.(file$)..^. .#|
00001880  58 2c 4c 0d 06 68 1a 20  e3 20 46 3d 31 20 b8 20  |X,L..h. . F=1 . |
00001890  31 35 3a f1 23 58 2c 46  28 46 29 3a ed 0d 06 72  |15:.#X,F(F):...r|
000018a0  1a 20 e3 20 46 3d 31 20  b8 20 31 37 3a f1 23 58  |. . F=1 . 17:.#X|
000018b0  2c 41 28 46 29 3a ed 0d  06 7c 08 20 d9 23 58 0d  |,A(F):...|. .#X.|
000018c0  06 86 06 20 e1 0d 06 90  0b 20 dd f2 4c 4f 41 44  |... ..... ..LOAD|
000018d0  0d 06 95 16 20 e8 22 46  69 6c 65 6e 61 6d 65 22  |.... ."Filename"|
000018e0  2c 66 69 6c 65 24 0d 06  9a 2a 20 f1 3a f1 22 50  |,file$...* .:."P|
000018f0  4f 53 49 54 49 4f 4e 20  43 41 53 53 45 54 54 45  |OSITION CASSETTE|
00001900  20 41 4e 44 20 50 52 45  53 53 20 50 4c 41 59 22  | AND PRESS PLAY"|
00001910  0d 06 a4 0f 20 58 3d ad  28 66 69 6c 65 24 29 0d  |.... X=.(file$).|
00001920  06 ae 0a 20 e8 23 58 2c  4c 0d 06 b8 1a 20 e3 20  |... .#X,L.... . |
00001930  46 3d 31 20 b8 20 31 35  3a e8 23 58 2c 46 28 46  |F=1 . 15:.#X,F(F|
00001940  29 3a ed 0d 06 c2 1a 20  e3 20 46 3d 31 20 b8 20  |):..... . F=1 . |
00001950  31 37 3a e8 23 58 2c 41  28 46 29 3a ed 0d 06 cc  |17:.#X,A(F):....|
00001960  08 20 d9 23 58 0d 06 d6  06 20 e1 0d 06 e0 09 20  |. .#X.... ..... |
00001970  dd f2 55 50 0d 06 ea 18  20 e7 20 4c 3d 33 31 20  |..UP.... . L=31 |
00001980  4c 3d 33 32 3a f1 22 4f  4b 22 3a e1 0d 06 f4 18  |L=32:."OK":.....|
00001990  20 e7 20 4c 3d 33 33 20  4c 3d 33 34 3a f1 22 4f  | . L=33 L=34:."O|
000019a0  4b 22 3a e1 0d 06 fe 18  20 e7 20 4c 3d 33 32 20  |K":..... . L=32 |
000019b0  4c 3d 33 33 3a f1 22 4f  4b 22 3a e1 0d 07 08 28  |L=33:."OK":....(|
000019c0  20 f1 22 59 4f 55 20 43  41 4e 27 54 20 47 4f 20  | ."YOU CAN'T GO |
000019d0  49 4e 20 54 48 41 54 20  44 49 52 45 43 54 49 4f  |IN THAT DIRECTIO|
000019e0  4e 22 3a e1 0d 07 12 0b  20 dd f2 44 4f 57 4e 0d  |N":..... ..DOWN.|
000019f0  07 1c 18 20 e7 20 4c 3d  33 34 20 4c 3d 33 33 3a  |... . L=34 L=33:|
00001a00  f1 22 4f 4b 22 3a e1 0d  07 26 18 20 e7 20 4c 3d  |."OK":...&. . L=|
00001a10  33 33 20 4c 3d 33 32 3a  f1 22 4f 4b 22 3a e1 0d  |33 L=32:."OK":..|
00001a20  07 30 18 20 e7 20 4c 3d  33 32 20 4c 3d 33 31 3a  |.0. . L=32 L=31:|
00001a30  f1 22 4f 4b 22 3a e1 0d  07 3a 28 20 f1 22 59 4f  |."OK":...:( ."YO|
00001a40  55 20 43 41 4e 27 54 20  47 4f 20 49 4e 20 54 48  |U CAN'T GO IN TH|
00001a50  41 54 20 44 49 52 45 43  54 49 4f 4e 22 3a e1 0d  |AT DIRECTION":..|
00001a60  07 44 0c 20 dd f2 50 41  55 53 45 0d 07 4e 15 20  |.D. ..PAUSE..N. |
00001a70  e3 20 46 3d 31 20 b8 20  34 30 30 30 3a ed 3a e1  |. F=1 . 4000:.:.|
00001a80  0d 07 58 0b 20 dd f2 44  52 4f 50 0d 07 62 09 20  |..X. ..DROP..b. |
00001a90  41 53 3d 31 0d 07 6c 17  20 e7 20 42 24 3d 43 24  |AS=1..l. . B$=C$|
00001aa0  28 41 53 29 20 8c 20 8d  74 4a 47 0d 07 76 3a 20  |(AS) . .tJG..v: |
00001ab0  41 53 3d 41 53 2b 31 3a  e7 20 41 53 3d 31 38 20  |AS=AS+1:. AS=18 |
00001ac0  8c 20 f1 22 49 20 44 4f  4e 27 54 20 4b 4e 4f 57  |. ."I DON'T KNOW|
00001ad0  20 57 48 41 54 20 41 20  22 2c 42 24 3b 22 20 49  | WHAT A ",B$;" I|
00001ae0  53 21 22 3a e1 0d 07 80  0a 20 e5 8d 44 6c 47 0d  |S!":..... ..DlG.|
00001af0  07 8a 6b 20 e7 20 94 28  41 28 41 53 29 29 3c 3e  |..k . .(A(AS))<>|
00001b00  31 30 30 20 80 20 41 53  3d 34 20 84 20 94 28 41  |100 . AS=4 . .(A|
00001b10  28 41 53 29 29 3c 3e 31  30 30 20 80 20 41 53 3d  |(AS))<>100 . AS=|
00001b20  37 20 84 20 94 28 41 28  41 53 29 29 3c 3e 31 30  |7 . .(A(AS))<>10|
00001b30  30 20 80 20 41 53 3d 31  34 20 8c 20 f1 22 59 4f  |0 . AS=14 . ."YO|
00001b40  55 20 41 52 45 20 4e 4f  54 20 43 41 52 52 59 49  |U ARE NOT CARRYI|
00001b50  4e 47 20 54 48 45 4d 22  3a e1 0d 07 94 33 20 e7  |NG THEM":....3 .|
00001b60  20 94 28 41 28 41 53 29  29 3c 3e 31 30 30 20 8c  | .(A(AS))<>100 .|
00001b70  20 f1 22 59 4f 55 20 41  52 45 20 4e 4f 54 20 43  | ."YOU ARE NOT C|
00001b80  41 52 52 59 49 4e 47 20  49 54 22 3a e1 0d 07 9e  |ARRYING IT":....|
00001b90  1b 20 f1 22 4f 4b 22 3a  41 28 41 53 29 3d 4c 2a  |. ."OK":A(AS)=L*|
00001ba0  b4 28 41 28 41 53 29 29  0d 07 a8 16 20 e7 20 41  |.(A(AS)).... . A|
00001bb0  53 3d 31 37 20 8c 20 46  28 31 33 29 3d 30 0d 07  |S=17 . F(13)=0..|
00001bc0  b2 06 20 e1 0d 07 bc 0a  20 dd f2 45 4e 44 0d 07  |.. ..... ..END..|
00001bd0  c6 73 20 db 3a f1 27 27  27 27 22 57 45 4c 4c 2c  |.s .:.''''"WELL,|
00001be0  20 54 48 41 54 20 53 45  45 4d 53 20 54 4f 20 42  | THAT SEEMS TO B|
00001bf0  45 20 54 48 45 20 45 4e  44 20 4f 46 54 48 41 54  |E THE END OFTHAT|
00001c00  20 47 41 4d 45 2e 20 44  4f 20 59 4f 55 20 57 41  | GAME. DO YOU WA|
00001c10  4e 54 20 54 4f 20 50 4c  41 59 20 20 20 41 47 41  |NT TO PLAY   AGA|
00001c20  49 4e 20 3f 22 3b 3a f5  3a 4b 4c 24 3d be 3a fd  |IN ?";:.:KL$=.:.|
00001c30  4b 4c 24 3d 22 59 22 20  84 20 4b 4c 24 3d 22 4e  |KL$="Y" . KL$="N|
00001c40  22 0d 07 d0 17 20 e7 20  4b 4c 24 3d 22 59 22 20  |".... . KL$="Y" |
00001c50  8c 20 e5 20 8d 44 4b 40  0d 07 da 2f 20 f1 27 27  |. . .DK@.../ .''|
00001c60  27 bd 31 33 36 22 54 48  41 4e 4b 53 20 46 4f 52  |'.136"THANKS FOR|
00001c70  20 50 4c 41 59 49 4e 47  22 3a f2 50 41 55 53 45  | PLAYING":.PAUSE|
00001c80  3a ef 20 32 36 3a db 0d  07 e4 09 20 d6 21 2d 34  |:. 26:..... .!-4|
00001c90  0d 07 ee 0b 20 dd f2 51  55 49 54 0d 07 f8 17 20  |.... ..QUIT.... |
00001ca0  f1 27 22 41 52 45 20 59  4f 55 20 53 55 52 45 20  |.'"ARE YOU SURE |
00001cb0  3f 22 0d 08 02 20 20 f5  3a 4b 4c 24 3d be 3a fd  |?"...  .:KL$=.:.|
00001cc0  4b 4c 24 3d 22 59 22 20  84 20 4b 4c 24 3d 22 4e  |KL$="Y" . KL$="N|
00001cd0  22 20 0d 08 0c 12 20 e7  20 4b 4c 24 3d 22 4e 22  |" .... . KL$="N"|
00001ce0  20 8c 20 e1 0d 08 16 09  20 f2 45 4e 44 0d 08 20  | . ..... .END.. |
00001cf0  0d 20 dd f2 55 4e 4c 4f  43 4b 0d 08 2a 18 20 e7  |. ..UNLOCK..*. .|
00001d00  20 4c 3d 34 31 20 84 20  4c 3d 34 37 20 e5 8d 54  | L=41 . L=47 ..T|
00001d10  7e 48 0d 08 34 1f f1 22  54 48 45 52 45 20 49 53  |~H..4.."THERE IS|
00001d20  20 4e 4f 54 48 49 4e 47  20 54 4f 20 22 41 24 3a  | NOTHING TO "A$:|
00001d30  e1 0d 08 3e 3f 20 e7 20  4c 3d 34 31 20 80 20 46  |...>? . L=41 . F|
00001d40  28 39 29 3d 31 20 84 20  4c 3d 34 37 20 80 20 46  |(9)=1 . L=47 . F|
00001d50  28 31 31 29 3d 31 20 8c  20 f1 22 49 54 20 49 53  |(11)=1 . ."IT IS|
00001d60  20 41 4c 52 45 41 44 59  20 4f 50 45 4e 22 3a e1  | ALREADY OPEN":.|
00001d70  0d 08 48 2d 20 e7 20 41  28 38 29 3c 3e 31 30 30  |..H- . A(8)<>100|
00001d80  20 8c 20 f1 22 59 4f 55  20 48 41 56 45 4e 27 54  | . ."YOU HAVEN'T|
00001d90  20 47 4f 54 20 41 20 4b  45 59 22 3a e1 0d 08 52  | GOT A KEY":...R|
00001da0  74 20 e7 20 4c 3d 34 31  20 8c 20 f1 22 54 48 45  |t . L=41 . ."THE|
00001db0  20 44 4f 4f 52 20 49 53  20 55 4e 4c 4f 43 4b 45  | DOOR IS UNLOCKE|
00001dc0  44 20 41 4e 44 20 4f 50  45 4e 2e 20 20 20 49 53  |D AND OPEN.   IS|
00001dd0  4e 27 54 20 49 54 20 45  41 53 59 20 54 4f 20 47  |N'T IT EASY TO G|
00001de0  45 54 20 49 4e 54 4f 20  20 20 20 20 20 20 20 42  |ET INTO        B|
00001df0  55 43 4b 49 4e 47 48 41  4d 20 50 41 4c 41 43 45  |UCKINGHAM PALACE|
00001e00  22 3a f2 50 41 55 53 45  3a 46 28 39 29 3d 31 3a  |":.PAUSE:F(9)=1:|
00001e10  e1 0d 08 5c 3f 20 e7 20  4c 3d 34 37 20 8c 20 f1  |...\? . L=47 . .|
00001e20  22 54 48 45 20 44 4f 4f  52 20 49 53 20 55 4e 4c  |"THE DOOR IS UNL|
00001e30  4f 43 4b 45 44 20 41 4e  44 20 4f 50 45 4e 22 3a  |OCKED AND OPEN":|
00001e40  f2 50 41 55 53 45 3a 46  28 31 31 29 3d 31 3a e1  |.PAUSE:F(11)=1:.|
00001e50  0d 08 66 0b 20 dd f2 4c  41 4d 50 0d 08 70 24 20  |..f. ..LAMP..p$ |
00001e60  e7 20 46 28 35 29 3d 31  20 f1 22 59 4f 55 20 43  |. F(5)=1 ."YOU C|
00001e70  41 4e 27 54 20 44 4f 20  54 48 41 54 22 3a e1 0d  |AN'T DO THAT":..|
00001e80  08 7a 30 20 e7 20 41 28  31 30 29 3c 3e 31 30 30  |.z0 . A(10)<>100|
00001e90  20 8c 20 f1 22 59 4f 55  20 41 52 45 20 4e 4f 54  | . ."YOU ARE NOT|
00001ea0  20 43 41 52 52 59 49 4e  47 20 49 54 22 3a e1 0d  | CARRYING IT":..|
00001eb0  08 84 13 20 f1 22 4f 4b  22 3a 46 28 35 29 3d 31  |... ."OK":F(5)=1|
00001ec0  3a e1 0d 08 8e aa 20 dc  46 49 56 45 52 2c 30 2c  |:..... .FIVER,0,|
00001ed0  46 49 56 45 52 2c 30 2c  46 49 56 45 52 2c 31 32  |FIVER,0,FIVER,12|
00001ee0  2c 44 52 55 47 53 2c 2d  33 2c 44 4f 4d 45 53 54  |,DRUGS,-3,DOMEST|
00001ef0  49 43 2c 2d 34 2c 46 4c  41 53 48 59 2c 2d 34 2c  |IC,-4,FLASHY,-4,|
00001f00  4d 41 54 43 48 45 53 2c  2d 31 36 2c 4b 45 59 2c  |MATCHES,-16,KEY,|
00001f10  30 2c 43 4f 46 46 45 45  2c 2d 32 32 2c 54 4f 52  |0,COFFEE,-22,TOR|
00001f20  43 48 2c 35 31 2c 53 43  45 50 54 52 45 2c 33 34  |CH,51,SCEPTRE,34|
00001f30  2c 4f 52 42 2c 30 2c 57  49 4e 45 2c 2d 33 38 2c  |,ORB,0,WINE,-38,|
00001f40  46 49 53 48 20 46 49 4e  47 45 52 53 2c 2d 33 39  |FISH FINGERS,-39|
00001f50  2c 43 52 4f 57 4e 2c 30  2c 47 4f 4c 44 20 52 49  |,CROWN,0,GOLD RI|
00001f60  4e 47 2c 34 39 2c 4d 41  50 2c 34 38 0d 08 98 65  |NG,49,MAP,48...e|
00001f70  20 dc 49 4e 20 41 20 57  41 49 54 49 4e 47 20 52  | .IN A WAITING R|
00001f80  4f 4f 4d 20 49 4e 20 41  20 20 20 42 55 53 20 53  |OOM IN A   BUS S|
00001f90  54 41 54 49 4f 4e 2c 54  48 45 52 45 20 49 53 20  |TATION,THERE IS |
00001fa0  41 4e 20 4f 4c 44 20 4d  41 4e 20 48 4f 4c 44 49  |AN OLD MAN HOLDI|
00001fb0  4e 47 20 20 20 20 20 20  53 4f 4d 45 54 48 49 4e  |NG      SOMETHIN|
00001fc0  47 20 49 4e 20 48 45 52  45 2c 36 2c 33 2c 35 2c  |G IN HERE,6,3,5,|
00001fd0  32 0d 08 a2 7a 20 dc 49  4e 20 41 20 57 41 49 54  |2...z .IN A WAIT|
00001fe0  49 4e 47 20 52 4f 4f 4d  20 49 4e 20 41 20 20 20  |ING ROOM IN A   |
00001ff0  42 55 53 20 53 54 41 54  49 4f 4e 2c 54 48 45 52  |BUS STATION,THER|
00002000  45 20 49 53 20 41 20 54  49 4d 45 2d 54 41 42 4c  |E IS A TIME-TABL|
00002010  45 20 4f 4e 20 54 48 45  20 57 41 4c 4c 41 43 43  |E ON THE WALLACC|
00002020  4f 52 44 49 4e 47 20 54  4f 20 54 48 49 53 20 41  |ORDING TO THIS A|
00002030  20 42 55 53 20 49 53 20  44 55 45 20 20 20 53 4f  | BUS IS DUE   SO|
00002040  4f 4e 2c 30 2c 31 2c 30  2c 30 20 0d 08 ac 40 20  |ON,0,1,0,0 ...@ |
00002050  dc 49 4e 20 41 20 43 41  46 45 2c 54 4f 20 54 48  |.IN A CAFE,TO TH|
00002060  45 20 4e 4f 52 54 48 20  49 53 20 54 48 45 20 50  |E NORTH IS THE P|
00002070  4f 4c 49 43 45 20 20 20  20 20 20 20 53 54 41 54  |OLICE       STAT|
00002080  49 4f 4e 2c 37 2c 30 2c  30 2c 31 0d 08 b6 66 20  |ION,7,0,0,1...f |
00002090  dc 49 4e 20 41 20 53 54  4f 52 45 20 52 4f 4f 4d  |.IN A STORE ROOM|
000020a0  2c 54 48 45 52 45 20 49  53 20 53 4f 4d 45 20 27  |,THERE IS SOME '|
000020b0  44 4f 4d 45 53 54 49 43  27 20 20 20 20 20 20 20  |DOMESTIC'       |
000020c0  20 20 42 4c 45 41 43 48  20 41 4e 44 20 53 4f 4d  |  BLEACH AND SOM|
000020d0  45 20 27 46 4c 41 53 48  59 27 20 53 43 4f 55 52  |E 'FLASHY' SCOUR|
000020e0  49 4e 47 50 4f 57 44 45  52 2c 30 2c 35 2c 30 2c  |INGPOWDER,0,5,0,|
000020f0  30 0d 08 c0 97 20 dc 49  4e 20 54 48 45 20 54 4f  |0.... .IN THE TO|
00002100  49 4c 45 54 53 2c 45 56  45 52 59 54 48 49 4e 47  |ILETS,EVERYTHING|
00002110  20 49 53 20 56 45 52 59  20 44 49 52 54 59 20 20  | IS VERY DIRTY  |
00002120  20 20 20 20 20 20 20 4f  4e 20 54 48 45 20 57 41  |       ON THE WA|
00002130  4c 4c 20 49 54 20 53 41  59 53 20 27 46 55 4c 48  |LL IT SAYS 'FULH|
00002140  41 4d 20 52 55 4c 45 27  54 48 41 54 20 57 41 4c  |AM RULE'THAT WAL|
00002150  4c 20 4f 42 56 49 4f 55  53 4c 59 20 48 41 53 4e  |L OBVIOUSLY HASN|
00002160  27 54 20 42 45 45 4e 20  20 50 41 49 4e 54 45 44  |'T BEEN  PAINTED|
00002170  20 46 4f 52 20 41 20 4c  4f 4e 47 20 54 49 4d 45  | FOR A LONG TIME|
00002180  2c 31 2c 30 2c 30 2c 34  0d 08 ca 0f 20 dc 2c 2c  |,1,0,0,4.... .,,|
00002190  30 2c 30 2c 30 2c 30 0d  08 d4 5f 20 dc 49 4e 20  |0,0,0,0..._ .IN |
000021a0  54 48 45 20 50 4f 4c 49  43 45 20 53 54 41 54 49  |THE POLICE STATI|
000021b0  4f 4e 2c 54 48 45 20 50  4f 4c 49 43 45 4d 41 4e  |ON,THE POLICEMAN|
000021c0  20 42 45 48 49 4e 44 20  54 48 45 20 44 45 53 4b  | BEHIND THE DESK|
000021d0  20 20 20 20 44 4f 45 53  4e 27 54 20 53 45 45 4d  |    DOESN'T SEEM|
000021e0  20 54 4f 20 4e 4f 54 49  43 45 20 59 4f 55 2c 30  | TO NOTICE YOU,0|
000021f0  2c 30 2c 33 2c 30 0d 08  de 0f 20 dc 2c 2c 30 2c  |,0,3,0.... .,,0,|
00002200  30 2c 30 2c 30 0d 08 e8  5a 20 dc 4f 55 54 53 49  |0,0,0...Z .OUTSI|
00002210  44 45 20 4d 41 44 41 4d  45 20 54 55 53 53 41 55  |DE MADAME TUSSAU|
00002220  44 53 2c 54 48 45 52 45  20 49 53 20 41 20 50 41  |DS,THERE IS A PA|
00002230  59 2d 42 4f 58 20 42 59  20 59 4f 55 20 54 48 45  |Y-BOX BY YOU THE|
00002240  20 20 20 20 45 4e 54 52  41 4e 43 45 20 46 45 45  |    ENTRANCE FEE|
00002250  20 49 53 20 60 35 2c 38  2c 30 2c 31 30 2c 30 0d  | IS `5,8,0,10,0.|
00002260  08 f2 5c 20 dc 49 4e 20  4d 41 44 41 4d 45 20 54  |..\ .IN MADAME T|
00002270  55 53 53 41 55 44 53 2c  54 48 45 52 45 20 41 52  |USSAUDS,THERE AR|
00002280  45 20 4d 41 4e 59 20 57  41 58 57 4f 52 4b 53 20  |E MANY WAXWORKS |
00002290  49 4e 43 4c 55 44 49 4e  47 4f 4e 45 20 4f 46 20  |INCLUDINGONE OF |
000022a0  4d 41 52 47 41 52 45 54  20 54 48 41 54 43 48 45  |MARGARET THATCHE|
000022b0  52 2c 39 2c 31 33 2c 31  31 2c 30 0d 08 fc 55 20  |R,9,13,11,0...U |
000022c0  dc 49 4e 20 4d 41 44 41  4d 45 20 54 55 53 53 41  |.IN MADAME TUSSA|
000022d0  55 44 53 2c 54 48 45 52  45 20 41 52 45 20 4d 41  |UDS,THERE ARE MA|
000022e0  4e 59 20 57 41 58 57 4f  52 4b 53 20 49 4e 43 4c  |NY WAXWORKS INCL|
000022f0  55 44 49 4e 47 4f 4e 45  20 4f 46 20 4a 4f 48 4e  |UDINGONE OF JOHN|
00002300  20 57 41 59 4e 45 2c 31  30 2c 31 32 2c 30 2c 30  | WAYNE,10,12,0,0|
00002310  0d 09 06 5a 20 dc 49 4e  20 4d 41 44 41 4d 45 20  |...Z .IN MADAME |
00002320  54 55 53 53 41 55 44 53  2c 54 48 45 52 45 20 41  |TUSSAUDS,THERE A|
00002330  52 45 20 4d 41 4e 59 20  57 41 58 57 4f 52 4b 53  |RE MANY WAXWORKS|
00002340  20 49 4e 43 4c 55 44 49  4e 47 4f 4e 45 20 4f 46  | INCLUDINGONE OF|
00002350  20 4d 41 52 49 4c 59 4e  20 4d 4f 4e 52 4f 45 2c  | MARILYN MONROE,|
00002360  31 33 2c 31 35 2c 30 2c  31 31 0d 09 10 b2 20 dc  |13,15,0,11.... .|
00002370  49 4e 20 4d 41 44 41 4d  45 20 54 55 53 53 41 55  |IN MADAME TUSSAU|
00002380  44 53 2c 54 48 45 52 45  20 41 52 45 20 4d 41 4e  |DS,THERE ARE MAN|
00002390  59 20 57 41 58 57 4f 52  4b 53 20 49 4e 43 4c 55  |Y WAXWORKS INCLU|
000023a0  44 49 4e 47 4f 4e 45 20  4f 46 20 4a 4f 48 4e 20  |DINGONE OF JOHN |
000023b0  4e 4f 41 4b 45 53 2e 20  54 48 45 52 45 20 49 53  |NOAKES. THERE IS|
000023c0  20 41 20 20 20 4c 41 52  47 45 20 53 49 47 4e 20  | A   LARGE SIGN |
000023d0  41 42 4f 56 45 20 59 4f  55 20 49 54 20 53 41 59  |ABOVE YOU IT SAY|
000023e0  53 20 20 20 20 20 27 4e  4f 20 53 4d 4f 4b 49 4e  |S     'NO SMOKIN|
000023f0  47 20 2d 20 57 41 58 57  4f 52 4b 53 20 41 52 45  |G - WAXWORKS ARE|
00002400  20 48 49 47 48 4c 59 46  4c 41 4d 4d 41 42 4c 45  | HIGHLYFLAMMABLE|
00002410  22 2c 30 2c 31 34 2c 31  32 2c 31 30 0d 09 1a 3a  |",0,14,12,10...:|
00002420  20 dc 49 4e 20 54 48 45  20 43 48 41 4d 42 45 52  | .IN THE CHAMBER|
00002430  20 4f 46 20 48 4f 52 52  4f 52 53 2c 49 54 20 49  | OF HORRORS,IT I|
00002440  53 20 56 45 52 59 20 44  41 52 4b 2c 30 2c 31 36  |S VERY DARK,0,16|
00002450  2c 31 35 2c 31 33 0d 09  24 3a 20 dc 49 4e 20 54  |,15,13..$: .IN T|
00002460  48 45 20 43 48 41 4d 42  45 52 20 4f 46 20 48 4f  |HE CHAMBER OF HO|
00002470  52 52 4f 52 53 2c 49 54  20 49 53 20 56 45 52 59  |RRORS,IT IS VERY|
00002480  20 44 41 52 4b 2c 31 34  2c 31 37 2c 30 2c 31 32  | DARK,14,17,0,12|
00002490  0d 09 2e 55 20 dc 49 4e  20 54 48 45 20 57 41 58  |...U .IN THE WAX|
000024a0  57 4f 52 4b 20 57 4f 52  4b 53 48 4f 50 2c 59 4f  |WORK WORKSHOP,YO|
000024b0  55 20 43 41 4e 20 53 45  45 20 4a 49 4d 4d 59 20  |U CAN SEE JIMMY |
000024c0  53 41 56 49 4c 4c 45 27  53 20 48 45 41 44 20 4f  |SAVILLE'S HEAD O|
000024d0  4e 20 54 48 45 20 53 48  45 4c 46 2c 30 2c 30 2c  |N THE SHELF,0,0,|
000024e0  31 37 2c 31 34 0d 09 38  4a 20 dc 49 4e 20 54 48  |17,14..8J .IN TH|
000024f0  45 20 4d 41 54 45 52 49  41 4c 53 20 53 54 4f 52  |E MATERIALS STOR|
00002500  45 20 20 20 52 4f 4f 4d  2c 54 48 45 20 46 4c 4f  |E   ROOM,THE FLO|
00002510  4f 52 20 49 53 20 53 54  49 43 4b 59 20 57 49 54  |OR IS STICKY WIT|
00002520  48 20 57 41 58 2c 31 36  2c 30 2c 30 2c 31 35 0d  |H WAX,16,0,0,15.|
00002530  09 42 0f 20 dc 2c 2c 30  2c 30 2c 30 2c 30 0d 09  |.B. .,,0,0,0,0..|
00002540  4c 41 20 dc 4e 45 41 52  20 54 4f 57 45 52 20 42  |LA .NEAR TOWER B|
00002550  52 49 44 47 45 2c 54 48  45 52 45 20 49 53 20 41  |RIDGE,THERE IS A|
00002560  20 4d 41 4e 20 43 4f 4c  4c 45 43 54 49 4e 47 20  | MAN COLLECTING |
00002570  54 4f 4c 4c 53 2c 31 38  2c 32 30 2c 30 2c 30 0d  |TOLLS,18,20,0,0.|
00002580  09 56 47 20 dc 4f 4e 20  54 48 45 20 52 4f 41 44  |.VG .ON THE ROAD|
00002590  2c 59 4f 55 20 43 41 4e  20 53 45 45 20 4f 4e 45  |,YOU CAN SEE ONE|
000025a0  20 4f 46 20 54 48 45 20  54 4f 57 45 52 53 20 20  | OF THE TOWERS  |
000025b0  20 20 41 42 4f 56 45 20  59 4f 55 2c 30 2c 32 32  |  ABOVE YOU,0,22|
000025c0  2c 32 33 2c 31 39 0d 09  60 3f 20 dc 49 4e 20 54  |,23,19..`? .IN T|
000025d0  48 45 20 43 4f 4e 54 52  4f 4c 20 52 4f 4f 4d 2c  |HE CONTROL ROOM,|
000025e0  54 48 45 52 45 20 49 53  20 41 20 4c 45 56 45 52  |THERE IS A LEVER|
000025f0  20 4d 41 52 4b 45 44 20  44 4f 57 4e 2c 30 2c 30  | MARKED DOWN,0,0|
00002600  2c 32 32 2c 30 0d 09 6a  61 20 dc 49 4e 20 41 20  |,22,0..ja .IN A |
00002610  53 4d 41 4c 4c 20 52 4f  4f 4d 2c 41 20 4d 41 4e  |SMALL ROOM,A MAN|
00002620  20 49 53 20 52 45 41 44  49 4e 47 20 48 49 53 20  | IS READING HIS |
00002630  4e 45 57 53 50 41 50 45  52 20 20 20 48 49 53 20  |NEWSPAPER   HIS |
00002640  43 55 50 20 4f 46 20 43  4f 46 46 45 45 20 49 53  |CUP OF COFFEE IS|
00002650  20 4f 4e 20 54 48 45 20  53 49 44 45 2c 32 31 2c  | ON THE SIDE,21,|
00002660  30 2c 30 2c 32 30 0d 09  74 46 20 dc 4f 4e 20 54  |0,0,20..tF .ON T|
00002670  48 45 20 52 4f 41 44 2c  59 4f 55 20 43 41 4e 20  |HE ROAD,YOU CAN |
00002680  53 45 45 20 4f 4e 45 20  4f 46 20 54 48 45 20 54  |SEE ONE OF THE T|
00002690  4f 57 45 52 53 20 20 20  20 41 42 4f 56 45 20 59  |OWERS    ABOVE Y|
000026a0  4f 55 2c 32 30 2c 30 2c  32 34 2c 30 0d 09 7e 0f  |OU,20,0,24,0..~.|
000026b0  20 dc 2c 2c 30 2c 30 2c  30 2c 30 0d 09 88 0f 20  | .,,0,0,0,0.... |
000026c0  dc 2c 2c 30 2c 30 2c 30  2c 30 0d 09 92 5d 20 dc  |.,,0,0,0,0...] .|
000026d0  49 4e 20 54 48 45 20 48  4f 55 53 45 20 4f 46 20  |IN THE HOUSE OF |
000026e0  43 4f 4d 4d 4f 4e 53 2c  54 48 45 20 50 2e 4d 2e  |COMMONS,THE P.M.|
000026f0  20 49 53 20 4e 4f 52 54  48 20 4f 46 20 59 4f 55  | IS NORTH OF YOU|
00002700  20 20 20 20 20 20 20 20  20 44 45 4c 49 56 45 52  |         DELIVER|
00002710  49 4e 47 20 41 20 53 50  45 45 43 48 2c 33 35 2c  |ING A SPEECH,35,|
00002720  32 35 2c 30 2c 32 37 0d  09 9c 5b 20 dc 49 4e 20  |25,0,27...[ .IN |
00002730  41 20 4c 4f 4e 47 20 50  41 53 53 41 47 45 57 41  |A LONG PASSAGEWA|
00002740  59 2c 54 48 45 20 43 48  41 4e 43 45 4c 4c 4f 52  |Y,THE CHANCELLOR|
00002750  20 4f 46 20 54 48 45 20  45 58 43 48 45 51 55 45  | OF THE EXCHEQUE|
00002760  52 20 20 49 53 20 44 4f  49 4e 47 20 41 20 43 52  |R  IS DOING A CR|
00002770  4f 53 53 57 4f 52 44 2c  33 30 2c 32 36 2c 30 2c  |OSSWORD,30,26,0,|
00002780  32 38 0d 09 a6 68 20 dc  49 4e 20 54 48 45 20 48  |28...h .IN THE H|
00002790  4f 55 53 45 20 4f 46 20  4c 4f 52 44 53 2c 53 4f  |OUSE OF LORDS,SO|
000027a0  4d 45 42 4f 44 59 20 43  4f 55 47 48 53 20 42 55  |MEBODY COUGHS BU|
000027b0  54 20 41 50 41 52 54 20  46 52 4f 4d 20 20 20 54  |T APART FROM   T|
000027c0  48 41 54 20 54 48 45 52  45 20 49 53 20 4e 4f 54  |HAT THERE IS NOT|
000027d0  20 41 20 4c 4f 54 20 48  41 50 50 45 4e 49 4e 47  | A LOT HAPPENING|
000027e0  2c 32 39 2c 32 37 2c 30  2c 30 0d 09 b0 0f 20 dc  |,29,27,0,0.... .|
000027f0  2c 2c 30 2c 30 2c 30 2c  30 0d 09 ba 41 20 dc 49  |,,0,0,0,0...A .I|
00002800  4e 20 54 48 45 20 43 4c  4f 41 4b 2d 52 4f 4f 4d  |N THE CLOAK-ROOM|
00002810  2c 54 48 45 52 45 20 41  52 45 20 4d 41 4e 59 20  |,THERE ARE MANY |
00002820  43 4f 41 54 53 20 41 52  4f 55 4e 44 20 59 4f 55  |COATS AROUND YOU|
00002830  2c 30 2c 33 31 2c 32 37  2c 30 0d 09 c4 2d 20 dc  |,0,31,27,0...- .|
00002840  49 4e 20 42 49 47 20 42  45 4e 2c 53 54 41 49 52  |IN BIG BEN,STAIR|
00002850  53 20 4c 45 41 44 20 55  50 57 41 52 44 53 2c 30  |S LEAD UPWARDS,0|
00002860  2c 30 2c 30 2c 33 30 0d  09 ce 59 20 dc 49 4e 20  |,0,0,30...Y .IN |
00002870  42 49 47 20 42 45 4e 2c  53 54 41 49 52 53 20 4c  |BIG BEN,STAIRS L|
00002880  45 41 44 20 55 50 57 41  52 44 53 2e 20 46 52 4f  |EAD UPWARDS. FRO|
00002890  4d 20 48 45 52 45 20 20  20 59 4f 55 20 43 41 4e  |M HERE   YOU CAN|
000028a0  20 53 45 45 20 54 48 45  20 54 4f 57 45 52 20 4f  | SEE THE TOWER O|
000028b0  46 20 4c 4f 4e 44 4f 4e  2c 30 2c 30 2c 30 2c 30  |F LONDON,0,0,0,0|
000028c0  0d 09 d8 58 20 dc 49 4e  20 42 49 47 20 42 45 4e  |...X .IN BIG BEN|
000028d0  2c 53 54 41 49 52 53 20  4c 45 41 44 20 55 50 57  |,STAIRS LEAD UPW|
000028e0  41 52 44 53 2e 20 46 52  4f 4d 20 48 45 52 45 20  |ARDS. FROM HERE |
000028f0  20 20 59 4f 55 20 43 41  4e 20 53 45 45 20 54 48  |  YOU CAN SEE TH|
00002900  45 20 54 45 4c 45 43 4f  4d 20 54 4f 57 45 52 2c  |E TELECOM TOWER,|
00002910  30 2c 30 2c 30 2c 30 20  0d 09 e2 36 20 dc 49 4e  |0,0,0,0 ...6 .IN|
00002920  20 42 49 47 20 42 45 4e  2c 59 4f 55 20 41 52 45  | BIG BEN,YOU ARE|
00002930  20 42 45 48 49 4e 44 20  54 48 45 20 43 4c 4f 43  | BEHIND THE CLOC|
00002940  4b 46 41 43 45 2c 30 2c  30 2c 30 2c 30 20 0d 09  |KFACE,0,0,0,0 ..|
00002950  ec 0f 20 dc 2c 2c 30 2c  30 2c 30 2c 30 0d 09 f6  |.. .,,0,0,0,0...|
00002960  3b 20 dc 49 4e 20 41 20  47 52 41 4e 44 20 48 41  |; .IN A GRAND HA|
00002970  4c 4c 57 41 59 2c 45 56  45 52 59 54 48 49 4e 47  |LLWAY,EVERYTHING|
00002980  20 49 53 20 56 45 52 59  20 50 4c 55 53 48 2c 33  | IS VERY PLUSH,3|
00002990  37 2c 30 2c 30 2c 33 39  0d 0a 00 23 20 dc 49 4e  |7,0,0,39...# .IN|
000029a0  20 54 48 45 20 54 48 52  4f 4e 45 20 52 4f 4f 4d  | THE THRONE ROOM|
000029b0  2c 2c 30 2c 30 2c 33 36  2c 33 38 0d 0a 0a 5d 20  |,,0,0,36,38...] |
000029c0  dc 49 4e 20 54 48 45 20  51 55 45 45 4e 53 20 42  |.IN THE QUEENS B|
000029d0  45 44 52 4f 4f 4d 2c 54  48 45 52 45 20 49 53 20  |EDROOM,THERE IS |
000029e0  48 41 4c 46 20 41 20 42  4f 54 54 4c 45 20 4f 46  |HALF A BOTTLE OF|
000029f0  20 57 49 4e 45 20 20 20  4f 4e 20 54 48 45 20 44  | WINE   ON THE D|
00002a00  52 49 4e 4b 53 20 43 41  42 49 4e 45 54 2c 30 2c  |RINKS CABINET,0,|
00002a10  33 37 2c 33 39 2c 34 31  0d 0a 14 58 20 dc 49 4e  |37,39,41...X .IN|
00002a20  20 54 48 45 20 4b 49 54  43 48 45 4e 2c 54 48 45  | THE KITCHEN,THE|
00002a30  52 45 20 41 52 45 20 4d  41 4e 59 20 4c 55 58 55  |RE ARE MANY LUXU|
00002a40  52 49 4f 55 53 20 41 4e  44 20 20 20 20 20 45 58  |RIOUS AND     EX|
00002a50  4f 54 49 43 20 46 4f 4f  44 53 20 41 52 4f 55 4e  |OTIC FOODS AROUN|
00002a60  44 20 59 4f 55 2c 33 38  2c 33 36 2c 30 2c 34 30  |D YOU,38,36,0,40|
00002a70  0d 0a 1e 3e 20 dc 49 4e  20 54 48 45 20 44 49 4e  |...> .IN THE DIN|
00002a80  49 4e 47 20 52 4f 4f 4d  2c 54 48 45 20 54 41 42  |ING ROOM,THE TAB|
00002a90  4c 45 20 49 53 20 4c 41  49 44 20 46 4f 52 20 44  |LE IS LAID FOR D|
00002aa0  49 4e 4e 45 52 2c 30 2c  33 39 2c 30 2c 30 0d 0a  |INNER,0,39,0,0..|
00002ab0  28 52 20 dc 49 4e 20 54  48 45 20 47 52 4f 55 4e  |(R .IN THE GROUN|
00002ac0  44 53 20 4f 46 20 20 20  20 20 20 20 20 42 55 43  |DS OF        BUC|
00002ad0  4b 49 4e 47 48 41 4d 20  50 41 4c 41 43 45 2c 53  |KINGHAM PALACE,S|
00002ae0  4f 4d 45 20 47 55 41 52  44 53 20 41 52 45 20 4f  |OME GUARDS ARE O|
00002af0  4e 20 44 55 54 59 2c 30  2c 33 38 2c 30 2c 34 32  |N DUTY,0,38,0,42|
00002b00  0d 0a 32 3b 20 dc 42 59  20 42 55 43 4b 49 4e 47  |..2; .BY BUCKING|
00002b10  48 41 4d 20 50 41 4c 41  43 45 2c 54 48 45 20 45  |HAM PALACE,THE E|
00002b20  4e 54 52 41 4e 43 45 20  46 45 45 20 49 53 20 60  |NTRANCE FEE IS `|
00002b30  35 2c 30 2c 34 31 2c 30  2c 34 33 0d 0a 3c 0f 20  |5,0,41,0,43..<. |
00002b40  dc 2c 2c 30 2c 30 2c 30  2c 30 0d 0a 46 5f 20 dc  |.,,0,0,0,0..F_ .|
00002b50  41 54 20 54 48 45 20 45  4e 54 52 41 4e 43 45 20  |AT THE ENTRANCE |
00002b60  54 4f 20 54 48 45 20 20  20 54 4f 57 45 52 20 4f  |TO THE   TOWER O|
00002b70  46 20 4c 4f 4e 44 4f 4e  2c 54 48 45 52 45 20 49  |F LONDON,THERE I|
00002b80  53 20 4e 4f 20 41 44 4d  49 53 53 49 4f 4e 20 43  |S NO ADMISSION C|
00002b90  48 41 52 47 45 20 20 20  20 20 54 4f 44 41 59 2c  |HARGE     TODAY,|
00002ba0  30 2c 34 35 2c 30 2c 35  34 0d 0a 50 22 20 dc 41  |0,45,0,54..P" .A|
00002bb0  54 20 54 52 41 49 54 4f  52 27 53 20 47 41 54 45  |T TRAITOR'S GATE|
00002bc0  2c 2c 34 36 2c 30 2c 30  2c 34 34 0d 0a 5a 3e 20  |,,46,0,0,44..Z> |
00002bd0  dc 49 4e 20 54 48 45 20  42 4c 4f 4f 44 59 20 54  |.IN THE BLOODY T|
00002be0  4f 57 45 52 2c 54 48 45  52 45 20 49 53 20 41 20  |OWER,THERE IS A |
00002bf0  42 45 45 46 45 41 54 45  52 20 48 45 52 45 2c 35  |BEEFEATER HERE,5|
00002c00  30 2c 34 37 2c 34 35 2c  30 0d 0a 64 46 20 dc 49  |0,47,45,0..dF .I|
00002c10  4e 20 54 48 45 20 44 55  4e 47 45 4f 4e 53 2c 54  |N THE DUNGEONS,T|
00002c20  48 45 52 45 20 49 53 20  41 20 44 49 4e 47 59 20  |HERE IS A DINGY |
00002c30  43 45 4c 4c 20 54 4f 20  54 48 45 20 20 20 20 20  |CELL TO THE     |
00002c40  4e 4f 52 54 48 2c 34 38  2c 30 2c 30 2c 34 36 0d  |NORTH,48,0,0,46.|
00002c50  0a 6e 1f 20 dc 49 4e 20  41 20 44 49 4e 47 59 20  |.n. .IN A DINGY |
00002c60  43 45 4c 4c 2c 2c 30 2c  30 2c 34 37 2c 30 0d 0a  |CELL,,0,0,47,0..|
00002c70  78 4b 20 dc 49 4e 20 54  48 45 20 42 45 41 55 43  |xK .IN THE BEAUC|
00002c80  48 41 4d 50 20 54 4f 57  45 52 2c 54 48 45 52 45  |HAMP TOWER,THERE|
00002c90  20 49 53 20 41 20 4a 45  57 45 4c 52 59 20 44 49  | IS A JEWELRY DI|
00002ca0  53 50 4c 41 59 20 49 4e  20 20 20 20 48 45 52 45  |SPLAY IN    HERE|
00002cb0  2c 30 2c 35 30 2c 30 2c  30 0d 0a 82 4a 20 dc 41  |,0,50,0,0...J .A|
00002cc0  54 20 54 4f 57 45 52 20  47 52 45 45 4e 2c 59 4f  |T TOWER GREEN,YO|
00002cd0  55 20 41 52 45 20 53 55  52 52 4f 55 4e 44 45 44  |U ARE SURROUNDED|
00002ce0  20 4f 4e 20 41 4c 4c 20  53 49 44 45 53 20 20 42  | ON ALL SIDES  B|
00002cf0  59 20 54 4f 57 45 52 53  2c 35 32 2c 30 2c 34 36  |Y TOWERS,52,0,46|
00002d00  2c 34 39 0d 0a 8c 22 20  dc 49 4e 20 54 48 45 20  |,49..." .IN THE |
00002d10  57 48 49 54 45 20 54 4f  57 45 52 2c 2c 30 2c 30  |WHITE TOWER,,0,0|
00002d20  2c 30 2c 35 30 0d 0a 96  35 20 dc 41 54 20 54 48  |,0,50...5 .AT TH|
00002d30  45 20 45 4e 54 52 41 4e  43 45 20 54 4f 20 54 48  |E ENTRANCE TO TH|
00002d40  45 20 20 20 4a 45 57 45  4c 20 48 4f 55 53 45 2c  |E   JEWEL HOUSE,|
00002d50  2c 35 33 2c 30 2c 35 30  2c 30 0d 0a a0 5e 20 dc  |,53,0,50,0...^ .|
00002d60  49 4e 20 54 48 45 20 4a  45 57 45 4c 20 48 4f 55  |IN THE JEWEL HOU|
00002d70  53 45 2c 53 4f 4d 45 20  50 45 4f 50 4c 45 20 41  |SE,SOME PEOPLE A|
00002d80  52 45 20 41 53 4b 49 4e  47 20 41 20 47 55 41 52  |RE ASKING A GUAR|
00002d90  44 20 20 20 57 48 41 54  20 41 4c 4c 20 54 48 45  |D   WHAT ALL THE|
00002da0  20 50 41 4e 49 43 20 49  53 20 41 42 4f 55 54 2c  | PANIC IS ABOUT,|
00002db0  30 2c 30 2c 35 32 2c 30  0d 0a aa 0f 20 dc 2c 2c  |0,0,52,0.... .,,|
00002dc0  30 2c 30 2c 30 2c 30 0d  0a b4 0a 20 dd f2 42 55  |0,0,0,0.... ..BU|
00002dd0  53 0d 0a b9 13 20 ef 20  32 38 2c 30 2c 32 38 2c  |S.... . 28,0,28,|
00002de0  33 39 2c 36 0d 0a be 06  20 db 0d 0a c8 1d 20 e3  |39,6.... ..... .|
00002df0  49 3d 31 34 b8 30 20 88  20 2d 31 3a f2 44 42 55  |I=14.0 . -1:.DBU|
00002e00  53 28 31 36 2b 49 29 0d  0a c9 14 20 e3 42 55 53  |S(16+I).... .BUS|
00002e10  3d 30 b8 32 30 30 3a ed  42 55 53 0d 0a ca 08 20  |=0.200:.BUS.... |
00002e20  ed 20 49 0d 0a cd 24 20  f1 8a 35 2c 31 35 29 3b  |. I...$ ..5,15);|
00002e30  22 42 75 73 20 6e 75 6d  62 65 72 20 20 3a 20 22  |"Bus number  : "|
00002e40  3b 4e 4f 20 20 20 20 0d  0a d2 23 20 f1 8a 35 2c  |;NO    ...# ..5,|
00002e50  31 37 29 3b 22 44 65 73  74 69 6e 61 74 69 6f 6e  |17);"Destination|
00002e60  20 3a 20 22 3b 44 45 53  24 20 0d 0a e6 17 20 e7  | : ";DES$ .... .|
00002e70  20 4b 4c 24 3d 22 59 22  20 8c 20 4c 3d 4c 59 3a  | KL$="Y" . L=LY:|
00002e80  e1 0d 0a f0 2e 20 f1 8a  34 2c 31 39 29 22 44 6f  |..... ..4,19)"Do|
00002e90  20 79 6f 75 20 77 61 6e  74 20 74 6f 20 63 61 74  | you want to cat|
00002ea0  63 68 20 74 68 69 73 20  62 75 73 20 3f 22 20 0d  |ch this bus ?" .|
00002eb0  0a fa 1f 20 f5 3a 4b 4c  24 3d be 3a fd 4b 4c 24  |... .:KL$=.:.KL$|
00002ec0  3d 22 59 22 20 84 20 4b  4c 24 3d 22 4e 22 0d 0b  |="Y" . KL$="N"..|
00002ed0  04 20 20 f1 27 22 20 20  20 20 20 20 20 20 20 20  |.  .'"          |
00002ee0  20 20 20 20 20 20 20 20  4f 4b 22 3b 20 20 0d 0b  |        OK";  ..|
00002ef0  18 13 20 e3 20 49 55 3d  31 20 b8 20 35 30 30 3a  |.. . IU=1 . 500:|
00002f00  ed 0d 0b 22 06 20 e1 0d  0b 2c 0d 20 dd f2 4e 55  |...". ...,. ..NU|
00002f10  4d 42 45 52 0d 0b 31 13  20 ef 20 31 39 2c 33 2c  |MBER..1. . 19,3,|
00002f20  31 2c 30 2c 30 2c 30 0d  0b 36 0b 20 52 3d b3 28  |1,0,0,0..6. R=.(|
00002f30  33 29 0d 0b 40 0d 20 52  58 59 3d b3 28 32 29 0d  |3)..@. RXY=.(2).|
00002f40  0b 4a 3c 20 e7 20 4c 3d  36 20 80 20 52 3d 31 20  |.J< . L=6 . R=1 |
00002f50  8c 20 4e 4f 3d 31 37 3a  44 45 53 24 3d 22 54 4f  |. NO=17:DES$="TO|
00002f60  57 45 52 20 42 52 49 44  47 45 22 3a 4c 59 3d 31  |WER BRIDGE":LY=1|
00002f70  39 3a 4c 58 3d 31 3a f2  42 55 53 0d 0b 54 3e 20  |9:LX=1:.BUS..T> |
00002f80  e7 20 4c 3d 36 20 80 20  52 3d 32 20 8c 20 4e 4f  |. L=6 . R=2 . NO|
00002f90  3d 33 31 3a 44 45 53 24  3d 22 4d 41 44 41 4d 45  |=31:DES$="MADAME|
00002fa0  20 54 55 53 53 41 55 44  53 22 3a 4c 59 3d 39 3a  | TUSSAUDS":LY=9:|
00002fb0  4c 58 3d 31 3a f2 42 55  53 0d 0b 5e 49 20 e7 20  |LX=1:.BUS..^I . |
00002fc0  4c 3d 36 20 80 20 52 3d  33 20 80 20 52 58 59 3d  |L=6 . R=3 . RXY=|
00002fd0  31 20 8c 20 4e 4f 3d 37  39 3a 44 45 53 24 3d 22  |1 . NO=79:DES$="|
00002fe0  42 55 43 4b 49 4e 47 48  41 4d 20 50 41 4c 41 43  |BUCKINGHAM PALAC|
00002ff0  45 22 3a 4c 59 3d 34 32  3a 4c 58 3d 31 3a f2 42  |E":LY=42:LX=1:.B|
00003000  55 53 0d 0b 68 47 20 e7  20 4c 3d 36 20 80 20 52  |US..hG . L=6 . R|
00003010  3d 33 20 80 20 52 58 59  3d 32 20 8c 20 4e 4f 3d  |=3 . RXY=2 . NO=|
00003020  38 30 3a 44 45 53 24 3d  22 54 4f 57 45 52 20 4f  |80:DES$="TOWER O|
00003030  46 20 4c 4f 4e 44 4f 4e  22 3a 4c 59 3d 34 34 3a  |F LONDON":LY=44:|
00003040  4c 58 3d 31 3a f2 42 55  53 0d 0b 72 34 20 e7 20  |LX=1:.BUS..r4 . |
00003050  4c 3d 38 20 8c 20 4e 4f  3d 33 31 3a 44 45 53 24  |L=8 . NO=31:DES$|
00003060  3d 22 42 55 53 20 53 54  41 54 49 4f 4e 22 3a 4c  |="BUS STATION":L|
00003070  59 3d 31 3a 4c 58 3d 39  3a f2 42 55 53 0d 0b 7c  |Y=1:LX=9:.BUS..||
00003080  35 20 e7 20 4c 3d 31 38  8c 20 4e 4f 3d 31 37 3a  |5 . L=18. NO=17:|
00003090  44 45 53 24 3d 22 42 55  53 20 53 54 41 54 49 4f  |DES$="BUS STATIO|
000030a0  4e 22 3a 4c 59 3d 31 3a  4c 58 3d 31 39 3a f2 42  |N":LY=1:LX=19:.B|
000030b0  55 53 0d 0b 86 46 20 e7  20 4c 3d 32 34 20 80 20  |US...F . L=24 . |
000030c0  52 3d 31 20 8c 20 4e 4f  3d 39 37 3a 44 45 53 24  |R=1 . NO=97:DES$|
000030d0  3d 22 48 4f 55 53 45 53  20 4f 46 20 50 41 52 4c  |="HOUSES OF PARL|
000030e0  49 41 4d 45 4e 54 22 3a  4c 59 3d 32 36 3a 4c 58  |IAMENT":LY=26:LX|
000030f0  3d 32 33 3a f2 42 55 53  0d 0b 90 49 20 e7 20 4c  |=23:.BUS...I . L|
00003100  3d 32 34 20 80 20 52 3d  32 20 84 20 4c 3d 32 34  |=24 . R=2 . L=24|
00003110  20 80 20 52 3d 33 20 8c  20 4e 4f 3d 36 33 3a 44  | . R=3 . NO=63:D|
00003120  45 53 24 3d 22 42 55 53  20 53 54 41 54 49 4f 4e  |ES$="BUS STATION|
00003130  22 3a 4c 59 3d 31 3a 4c  58 3d 32 33 3a f2 42 55  |":LY=1:LX=23:.BU|
00003140  53 0d 0b 9a 49 20 e7 20  4c 3d 32 35 20 80 20 52  |S...I . L=25 . R|
00003150  3d 32 20 84 20 4c 3d 32  35 20 80 20 52 3d 33 20  |=2 . L=25 . R=3 |
00003160  8c 20 4e 4f 3d 32 34 3a  44 45 53 24 3d 22 42 55  |. NO=24:DES$="BU|
00003170  53 20 53 54 41 54 49 4f  4e 22 3a 4c 59 3d 31 3a  |S STATION":LY=1:|
00003180  4c 58 3d 32 36 3a f2 42  55 53 0d 0b a4 3e 20 e7  |LX=26:.BUS...> .|
00003190  20 4c 3d 32 35 20 80 20  52 3d 31 20 8c 20 4e 4f  | L=25 . R=1 . NO|
000031a0  3d 39 37 3a 44 45 53 24  3d 22 54 4f 57 45 52 20  |=97:DES$="TOWER |
000031b0  42 52 49 44 47 45 22 3a  4c 59 3d 32 33 3a 4c 58  |BRIDGE":LY=23:LX|
000031c0  3d 32 36 3a f2 42 55 53  0d 0b ae 49 20 e7 20 4c  |=26:.BUS...I . L|
000031d0  3d 32 39 20 80 20 52 3d  31 20 84 20 4c 3d 32 39  |=29 . R=1 . L=29|
000031e0  20 80 20 52 3d 32 20 8c  20 4e 4f 3d 36 35 3a 44  | . R=2 . NO=65:D|
000031f0  45 53 24 3d 22 42 55 53  20 53 54 41 54 49 4f 4e  |ES$="BUS STATION|
00003200  22 3a 4c 59 3d 31 3a 4c  58 3d 32 38 3a f2 42 55  |":LY=1:LX=28:.BU|
00003210  53 0d 0b b8 43 20 e7 20  4c 3d 32 39 20 80 20 52  |S...C . L=29 . R|
00003220  3d 33 20 8c 20 4e 4f 3d  34 33 3a 44 45 53 24 3d  |=3 . NO=43:DES$=|
00003230  22 42 55 43 4b 49 4e 47  48 41 4d 20 50 41 4c 41  |"BUCKINGHAM PALA|
00003240  43 45 22 3a 4c 59 3d 34  32 3a 4c 58 3d 32 38 3a  |CE":LY=42:LX=28:|
00003250  f2 42 55 53 0d 0b c2 38  20 e7 20 4c 3d 34 33 20  |.BUS...8 . L=43 |
00003260  8c 20 4e 4f 3d 37 39 3a  44 45 53 24 3d 22 42 55  |. NO=79:DES$="BU|
00003270  53 20 53 54 41 54 49 4f  4e 22 3a 4c 59 3d 31 3a  |S STATION":LY=1:|
00003280  4c 58 3d 34 32 3a f2 42  55 53 20 20 0d 0b cc 3d  |LX=42:.BUS  ...=|
00003290  20 e7 20 4c 3d 35 34 20  80 20 52 3d 33 20 8c 20  | . L=54 . R=3 . |
000032a0  4e 4f 3d 32 38 3a 44 45  53 24 3d 22 42 55 53 20  |NO=28:DES$="BUS |
000032b0  53 54 41 54 49 4f 4e 22  3a 4c 59 3d 31 3a 4c 58  |STATION":LY=1:LX|
000032c0  3d 34 34 3a f2 42 55 53  20 0d 0b d6 41 20 e7 20  |=44:.BUS ...A . |
000032d0  4c 3d 35 34 20 80 20 52  3c 3e 33 20 8c 20 4e 4f  |L=54 . R<>3 . NO|
000032e0  3d 31 31 3a 44 45 53 24  3d 22 4d 41 44 41 4d 45  |=11:DES$="MADAME|
000032f0  20 54 55 53 53 41 55 44  53 22 3a 4c 59 3d 39 3a  | TUSSAUDS":LY=9:|
00003300  4c 58 3d 34 34 3a f2 42  55 53 0d 0b e0 4d 20 e7  |LX=44:.BUS...M .|
00003310  20 4b 4c 24 3d 22 4e 22  20 8c 20 4c 3d 4c 58 3a  | KL$="N" . L=LX:|
00003320  db 3a 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.:              |
00003330  20 ef 20 31 39 2c 33 2c  33 2c 30 2c 30 2c 30 3a  | . 19,3,3,0,0,0:|
00003340  ef 20 32 38 2c 34 2c 32  33 2c 33 36 2c 36 20 20  |. 28,4,23,36,6  |
00003350  20 20 20 20 20 3a e1 0d  0c 12 1c 20 e3 49 3d 31  |     :..... .I=1|
00003360  34 b8 30 20 88 20 2d 31  3a f2 44 42 55 53 28 32  |4.0 . -1:.DBUS(2|
00003370  2b 49 29 0d 0c 13 17 20  e3 42 55 53 3d 30 b8 32  |+I).... .BUS=0.2|
00003380  30 30 3a ed 42 55 53 3a  ed 49 0d 0c 14 2c 20 db  |00:.BUS:.I..., .|
00003390  3a ef 20 31 39 2c 33 2c  33 2c 30 2c 30 2c 30 3a  |:. 19,3,3,0,0,0:|
000033a0  ef 20 32 38 2c 34 2c 32  33 2c 33 36 2c 36 3a 4c  |. 28,4,23,36,6:L|
000033b0  3d 4c 59 3a e1 20 0d 0c  1c 0b 20 dd f2 54 4f 49  |=LY:. .... ..TOI|
000033c0  4c 0d 0c 26 3d 20 e7 20  42 24 3c 3e 22 54 4f 49  |L..&= . B$<>"TOI|
000033d0  4c 45 54 53 22 20 80 20  42 24 3c 3e 22 54 4f 49  |LETS" . B$<>"TOI|
000033e0  4c 45 54 22 20 8c 20 f1  22 49 20 43 41 4e 27 54  |LET" . ."I CAN'T|
000033f0  20 43 4c 45 41 4e 20 41  20 22 42 24 3a e1 0d 0c  | CLEAN A "B$:...|
00003400  30 2a 20 e7 20 4c 3c 3e  35 20 8c 20 f1 22 49 20  |0* . L<>5 . ."I |
00003410  43 41 4e 27 54 20 53 45  45 20 41 4e 59 20 54 4f  |CAN'T SEE ANY TO|
00003420  49 4c 45 54 53 22 3a e1  0d 0c 3a 50 20 e7 20 41  |ILETS":...:P . A|
00003430  28 35 29 3c 3e 2d 31 30  30 20 80 20 41 28 36 29  |(5)<>-100 . A(6)|
00003440  3c 3e 2d 31 30 30 20 8c  20 f1 22 59 4f 55 20 48  |<>-100 . ."YOU H|
00003450  41 56 45 4e 27 54 20 47  4f 54 20 41 4e 59 54 49  |AVEN'T GOT ANYTI|
00003460  4e 47 20 54 4f 20 43 4c  45 41 4e 20 54 48 45 4d  |NG TO CLEAN THEM|
00003470  20 57 49 54 48 22 3a e1  0d 0c 44 30 20 e7 20 41  | WITH":...D0 . A|
00003480  28 35 29 3c 3e 2d 31 30  30 20 8c 20 f1 22 59 4f  |(5)<>-100 . ."YO|
00003490  55 27 4c 4c 20 4e 45 45  44 20 53 4f 4d 45 20 42  |U'LL NEED SOME B|
000034a0  4c 45 41 43 48 22 3a e1  0d 0c 4e 39 20 e7 20 41  |LEACH":...N9 . A|
000034b0  28 36 29 3c 3e 2d 31 30  30 20 8c 20 f1 22 59 4f  |(6)<>-100 . ."YO|
000034c0  55 27 4c 4c 20 4e 45 45  44 20 53 4f 4d 45 20 53  |U'LL NEED SOME S|
000034d0  43 4f 55 52 49 4e 47 20  50 4f 57 44 45 52 22 3a  |COURING POWDER":|
000034e0  e1 0d 0c 58 9a 20 f1 22  41 53 20 59 4f 55 20 41  |...X. ."AS YOU A|
000034f0  52 45 20 43 4c 45 41 4e  49 4e 47 20 54 48 45 20  |RE CLEANING THE |
00003500  54 4f 49 4c 45 54 53 20  20 41 20 4d 41 4e 20 43  |TOILETS  A MAN C|
00003510  4f 4d 45 53 20 41 4c 4f  4e 47 20 41 4e 44 20 50  |OMES ALONG AND P|
00003520  41 59 53 20 59 4f 55 20  60 35 28 48 45 20 4d 55  |AYS YOU `5(HE MU|
00003530  53 54 20 54 48 49 4e 4b  20 54 48 41 54 20 59 4f  |ST THINK THAT YO|
00003540  55 20 41 52 45 20 41 4e  20 20 20 45 4d 50 4c 4f  |U ARE AN   EMPLO|
00003550  59 45 45 20 4f 46 20 48  49 53 29 22 3a 41 28 31  |YEE OF HIS)":A(1|
00003560  29 3d 4c 3a 41 28 36 29  3d 30 3a 41 28 35 29 3d  |)=L:A(6)=0:A(5)=|
00003570  30 3a f2 50 41 55 53 45  3a e1 20 0d 0c 62 0a 20  |0:.PAUSE:. ..b. |
00003580  dd f2 50 41 59 0d 0c 6c  39 20 e7 20 4c 3c 3e 39  |..PAY..l9 . L<>9|
00003590  20 80 20 4c 3c 3e 31 39  20 80 20 4c 3c 3e 34 32  | . L<>19 . L<>42|
000035a0  20 8c 20 f1 22 44 4f 4e  27 54 20 57 41 53 54 45  | . ."DON'T WASTE|
000035b0  20 59 4f 55 52 20 4d 4f  4e 45 59 22 3a e1 0d 0c  | YOUR MONEY":...|
000035c0  76 2e 20 e7 20 4c 3d 39  20 80 20 46 28 32 29 3d  |v. . L=9 . F(2)=|
000035d0  31 20 8c 20 f1 22 54 48  45 52 45 20 49 53 20 4e  |1 . ."THERE IS N|
000035e0  4f 20 4e 45 45 44 20 54  4f 22 3a e1 0d 0c 80 2f  |O NEED TO":..../|
000035f0  20 e7 20 4c 3d 31 39 20  80 20 46 28 33 29 3d 31  | . L=19 . F(3)=1|
00003600  20 8c 20 f1 22 54 48 45  52 45 20 49 53 20 4e 4f  | . ."THERE IS NO|
00003610  20 4e 45 45 44 20 54 4f  22 3a e1 0d 0c 8a 2f 20  | NEED TO":..../ |
00003620  e7 20 4c 3d 34 32 20 80  20 46 28 34 29 3d 31 20  |. L=42 . F(4)=1 |
00003630  8c 20 f1 22 54 48 45 52  45 20 49 53 20 4e 4f 20  |. ."THERE IS NO |
00003640  4e 45 45 44 20 54 4f 22  3a e1 0d 0c 94 46 20 e7  |NEED TO":....F .|
00003650  20 41 28 31 29 3c 3e 31  30 30 20 80 20 41 28 32  | A(1)<>100 . A(2|
00003660  29 3c 3e 31 30 30 20 80  20 41 28 33 29 3c 3e 31  |)<>100 . A(3)<>1|
00003670  30 30 20 8c 20 f1 22 59  4f 55 27 4c 4c 20 4e 45  |00 . ."YOU'LL NE|
00003680  45 44 20 53 4f 4d 45 20  4d 4f 4e 45 59 22 3a e1  |ED SOME MONEY":.|
00003690  0d 0c 9e 1d 20 f1 22 4f  4b 20 2d 20 59 4f 55 20  |.... ."OK - YOU |
000036a0  41 52 45 20 41 44 4d 49  54 54 45 44 22 0d 0c a8  |ARE ADMITTED"...|
000036b0  18 20 e7 20 4c 3d 39 20  8c 20 46 28 32 29 3d 31  |. . L=9 . F(2)=1|
000036c0  3a 4c 3d 31 30 0d 0c b2  19 20 e7 20 4c 3d 31 39  |:L=10.... . L=19|
000036d0  20 8c 20 46 28 33 29 3d  31 3a 4c 3d 32 30 0d 0c  | . F(3)=1:L=20..|
000036e0  bc 19 20 e7 20 4c 3d 34  32 20 8c 20 46 28 34 29  |.. . L=42 . F(4)|
000036f0  3d 31 3a 4c 3d 34 31 0d  0c c6 1a 20 e7 20 41 28  |=1:L=41.... . A(|
00003700  33 29 3d 31 30 30 20 8c  20 41 28 33 29 3d 30 3a  |3)=100 . A(3)=0:|
00003710  e1 0d 0c d0 1a 20 e7 20  41 28 32 29 3d 31 30 30  |..... . A(2)=100|
00003720  20 8c 20 41 28 32 29 3d  30 3a e1 0d 0c da 1a 20  | . A(2)=0:..... |
00003730  e7 20 41 28 31 29 3d 31  30 30 20 8c 20 41 28 31  |. A(1)=100 . A(1|
00003740  29 3d 30 3a e1 0d 0c e4  0b 20 dd f2 4a 41 50 53  |)=0:..... ..JAPS|
00003750  0d 0c ee 72 20 f1 27 22  54 48 45 52 45 20 41 52  |...r .'"THERE AR|
00003760  45 20 53 4f 4d 45 20 4a  41 50 41 4e 45 53 45 20  |E SOME JAPANESE |
00003770  54 4f 55 52 49 53 54 53  20 48 45 52 45 2c 20 54  |TOURISTS HERE, T|
00003780  48 45 59 20 53 45 45 4d  20 54 4f 20 57 41 4e 54  |HEY SEEM TO WANT|
00003790  20 59 4f 55 52 20 20 20  20 20 50 48 4f 54 4f 47  | YOUR     PHOTOG|
000037a0  52 41 50 48 2e 57 49 4c  4c 20 59 4f 55 20 50 4f  |RAPH.WILL YOU PO|
000037b0  53 45 20 46 4f 52 20 20  20 20 20 54 48 45 4d 20  |SE FOR     THEM |
000037c0  3f 22 0d 0c f8 1f 20 f5  3a 52 45 24 3d be 3a fd  |?".... .:RE$=.:.|
000037d0  52 45 24 3d 22 59 22 20  84 20 52 45 24 3d 22 4e  |RE$="Y" . RE$="N|
000037e0  22 0d 0d 02 30 20 e7 20  52 45 24 3d 22 4e 22 20  |"...0 . RE$="N" |
000037f0  8c 20 46 28 36 29 3d 31  3a f1 27 22 46 4f 4f 4c  |. F(6)=1:.'"FOOL|
00003800  49 53 48 22 3a f2 50 41  55 53 45 3a e5 8d 74 42  |ISH":.PAUSE:..tB|
00003810  40 0d 0d 0c 98 20 f1 27  22 59 4f 55 20 53 4d 49  |@.... .'"YOU SMI|
00003820  4c 45 20 46 4f 52 20 54  48 45 20 4a 41 50 41 4e  |LE FOR THE JAPAN|
00003830  45 53 45 2e 20 4f 4e 45  20 20 4f 46 20 54 48 45  |ESE. ONE  OF THE|
00003840  20 4a 41 50 41 4e 45 53  45 20 47 49 56 45 53 20  | JAPANESE GIVES |
00003850  59 4f 55 20 60 35 2e 20  28 49 20 44 4f 4e 27 54  |YOU `5. (I DON'T|
00003860  20 54 48 49 4e 4b 20 48  45 20 55 4e 44 45 52 53  | THINK HE UNDERS|
00003870  54 41 4e 44 53 20 54 48  45 20 20 20 43 55 52 52  |TANDS THE   CURR|
00003880  45 4e 43 59 29 22 3a 46  28 36 29 3d 31 3a 41 28  |ENCY)":F(6)=1:A(|
00003890  32 29 3d 32 30 3a f2 50  41 55 53 45 3a f2 50 41  |2)=20:.PAUSE:.PA|
000038a0  55 53 45 3a e5 8d 74 42  40 0d 0d 16 0c 20 dd f2  |USE:..tB@.... ..|
000038b0  44 52 49 4e 4b 0d 0d 20  31 20 e7 20 42 24 3c 3e  |DRINK.. 1 . B$<>|
000038c0  22 43 4f 46 46 45 45 22  20 8c 20 f1 22 48 4f 57  |"COFFEE" . ."HOW|
000038d0  20 43 41 4e 20 59 4f 55  20 44 52 49 4e 4b 20 41  | CAN YOU DRINK A|
000038e0  20 22 42 24 3a e1 0d 0d  2a 30 20 e7 20 41 28 39  | "B$:...*0 . A(9|
000038f0  29 3c 3e 2d 31 30 30 20  8c 20 f1 22 59 4f 55 20  |)<>-100 . ."YOU |
00003900  41 52 45 20 4e 4f 54 20  43 41 52 52 59 49 4e 47  |ARE NOT CARRYING|
00003910  20 49 54 22 3a e1 0d 0d  34 15 20 f1 22 4e 49 43  | IT":...4. ."NIC|
00003920  45 22 3a 41 28 39 29 3d  30 3a e1 0d 0d 3e 0b 20  |E":A(9)=0:...>. |
00003930  dd f2 44 52 55 47 0d 0d  48 2c 20 e7 20 42 24 3c  |..DRUG..H, . B$<|
00003940  3e 22 43 4f 46 46 45 45  22 20 8c 20 f1 22 49 20  |>"COFFEE" . ."I |
00003950  43 41 4e 27 54 20 22 41  24 22 20 41 20 22 42 24  |CAN'T "A$" A "B$|
00003960  3a e1 0d 0d 52 30 20 e7  20 41 28 39 29 3c 3e 2d  |:...R0 . A(9)<>-|
00003970  31 30 30 20 8c 20 f1 22  59 4f 55 20 41 52 45 20  |100 . ."YOU ARE |
00003980  4e 4f 54 20 43 41 52 52  59 49 4e 47 20 49 54 22  |NOT CARRYING IT"|
00003990  3a e1 0d 0d 5c 6d 20 f1  22 41 46 54 45 52 20 59  |:...\m ."AFTER Y|
000039a0  4f 55 20 44 52 55 47 20  54 48 45 20 43 4f 46 46  |OU DRUG THE COFF|
000039b0  45 45 2c 20 54 48 45 20  20 20 53 49 4c 4c 59 20  |EE, THE   SILLY |
000039c0  4d 41 4e 20 44 52 49 4e  4b 53 20 54 48 45 20 43  |MAN DRINKS THE C|
000039d0  4f 46 46 45 45 20 41 4e  44 20 20 46 41 4c 4c 53  |OFFEE AND  FALLS|
000039e0  20 41 53 4c 45 45 50 22  3a 46 28 38 29 3d 31 3a  | ASLEEP":F(8)=1:|
000039f0  41 28 34 29 3d 30 3a 41  28 39 29 3d 30 3a e1 0d  |A(4)=0:A(9)=0:..|
00003a00  0d 66 0b 20 dd f2 42 55  52 4e 0d 0d 70 3c 20 e7  |.f. ..BURN..p< .|
00003a10  20 42 24 3c 3e 22 53 54  41 54 55 45 22 20 80 20  | B$<>"STATUE" . |
00003a20  42 24 3c 3e 22 57 41 58  57 4f 52 4b 22 20 8c 20  |B$<>"WAXWORK" . |
00003a30  f1 22 49 20 43 41 4e 27  54 20 22 41 24 22 20 41  |."I CAN'T "A$" A|
00003a40  20 22 42 24 3a e1 0d 0d  7a 2b 20 e7 20 4c 3c 31  | "B$:...z+ . L<1|
00003a50  30 20 84 20 4c 3e 31 33  20 8c 20 f1 22 4e 4f 54  |0 . L>13 . ."NOT|
00003a60  20 48 45 52 45 2c 20 49  20 43 41 4e 27 54 22 3a  | HERE, I CAN'T":|
00003a70  e1 0d 0d 84 47 20 e7 20  41 28 37 29 3c 3e 2d 31  |....G . A(7)<>-1|
00003a80  30 30 20 8c 20 f1 22 59  4f 55 20 48 41 56 45 4e  |00 . ."YOU HAVEN|
00003a90  27 54 20 47 4f 54 20 41  4e 59 54 48 49 4e 47 20  |'T GOT ANYTHING |
00003aa0  54 4f 20 20 20 20 20 20  4c 49 47 48 54 20 49 54  |TO      LIGHT IT|
00003ab0  20 57 49 54 48 22 3a e1  0d 0d 8e 51 20 e7 20 4c  | WITH":....Q . L|
00003ac0  3c 3e 31 33 20 8c 20 f1  22 54 48 45 20 52 4f 4f  |<>13 . ."THE ROO|
00003ad0  4d 20 46 49 4c 4c 53 20  57 49 54 48 20 41 20 43  |M FILLS WITH A C|
00003ae0  48 4f 4b 49 4e 47 20 47  41 53 41 4e 44 20 59 4f  |HOKING GASAND YO|
00003af0  55 20 44 49 45 22 3a f2  50 41 55 53 45 3a f2 50  |U DIE":.PAUSE:.P|
00003b00  41 55 53 45 3a f2 45 4e  44 0d 0d 98 28 20 e7 20  |AUSE:.END...( . |
00003b10  41 28 31 32 29 3c 3e 30  20 8c 20 f1 22 4e 4f 54  |A(12)<>0 . ."NOT|
00003b20  20 48 45 52 45 2c 20 49  20 43 41 4e 27 54 22 3a  | HERE, I CAN'T":|
00003b30  e1 0d 0d a2 59 20 f1 22  54 48 45 20 22 42 24 22  |....Y ."THE "B$"|
00003b40  20 4d 45 4c 54 53 20 41  4e 44 20 52 45 56 45 41  | MELTS AND REVEA|
00003b50  4c 53 22 27 22 54 48 45  20 4f 52 42 20 57 48 49  |LS"'"THE ORB WHI|
00003b60  43 48 20 57 41 53 20 48  49 44 44 45 4e 20 49 4e  |CH WAS HIDDEN IN|
00003b70  53 49 44 45 20 20 49 54  22 3a 41 28 31 32 29 3d  |SIDE  IT":A(12)=|
00003b80  4c 3a f2 50 41 55 53 45  3a e1 0d 0d ac 0d 20 dd  |L:.PAUSE:..... .|
00003b90  f2 50 4f 4c 49 43 45 0d  0d b6 2d 20 e7 20 41 28  |.POLICE...- . A(|
00003ba0  31 31 29 3d 31 30 30 20  8c 20 46 24 3d 22 53 43  |11)=100 . F$="SC|
00003bb0  45 50 54 52 45 22 3a 41  28 31 31 29 3d 30 3a e5  |EPTRE":A(11)=0:.|
00003bc0  8d 64 54 4d 0d 0d c0 29  20 e7 20 41 28 31 32 29  |.dTM...) . A(12)|
00003bd0  3d 31 30 30 20 8c 20 46  24 3d 22 4f 52 42 22 3a  |=100 . F$="ORB":|
00003be0  41 28 31 32 29 3d 30 3a  e5 8d 64 54 4d 0d 0d ca  |A(12)=0:..dTM...|
00003bf0  25 20 e7 20 41 28 31 35  29 3d 31 30 30 20 8c 20  |% . A(15)=100 . |
00003c00  46 24 3d 22 43 52 4f 57  4e 22 3a 41 28 31 35 29  |F$="CROWN":A(15)|
00003c10  3d 30 0d 0d d4 29 20 f1  27 22 54 48 45 20 47 55  |=0...) .'"THE GU|
00003c20  41 52 44 20 54 48 41 4e  4b 53 20 59 4f 55 20 46  |ARD THANKS YOU F|
00003c30  4f 52 20 54 48 45 22 3a  f1 46 24 0d 0d de 12 20  |OR THE":.F$.... |
00003c40  f2 50 41 55 53 45 3a f2  50 41 55 53 45 0d 0d e8  |.PAUSE:.PAUSE...|
00003c50  23 20 46 28 31 30 29 3d  46 28 31 30 29 2b 31 3a  |# F(10)=F(10)+1:|
00003c60  e7 20 46 28 31 30 29 3d  33 20 8c 20 f2 46 49 4e  |. F(10)=3 . .FIN|
00003c70  0d 0d f2 06 20 e1 0d 0d  fc 0a 20 dd f2 46 49 4e  |.... ..... ..FIN|
00003c80  0d 0e 06 06 20 db 0d 0e  10 b4 20 f1 27 27 27 27  |.... ..... .''''|
00003c90  27 27 22 57 45 4c 4c 20  44 4f 4e 45 2c 20 59 4f  |''"WELL DONE, YO|
00003ca0  55 20 48 41 56 45 20 52  45 54 52 49 45 56 45 44  |U HAVE RETRIEVED|
00003cb0  20 54 48 45 43 52 4f 57  4e 20 4a 45 57 45 4c 53  | THECROWN JEWELS|
00003cc0  2e 20 44 4f 4e 27 54 20  45 58 50 45 43 54 20 41  |. DON'T EXPECT A|
00003cd0  20 20 20 20 20 52 45 57  41 52 44 20 42 45 43 41  |     REWARD BECA|
00003ce0  55 53 45 20 59 4f 55 20  41 52 45 4e 27 54 20 47  |USE YOU AREN'T G|
00003cf0  45 54 54 49 4e 47 4f 4e  45 21 20 28 49 20 57 41  |ETTINGONE! (I WA|
00003d00  53 20 4c 59 49 4e 47 20  41 42 4f 55 54 20 54 48  |S LYING ABOUT TH|
00003d10  45 20 20 20 20 20 20 4d  49 4c 4c 49 4f 4e 20 50  |E      MILLION P|
00003d20  4f 55 4e 44 53 29 22 3a  f2 50 41 55 53 45 3a f2  |OUNDS)":.PAUSE:.|
00003d30  50 41 55 53 45 3a f2 45  4e 44 0d 0e 1a 0a 20 dd  |PAUSE:.END.... .|
00003d40  f2 45 41 54 0d 0e 24 48  20 e7 20 42 24 3c 3e 22  |.EAT..$H . B$<>"|
00003d50  46 49 53 48 20 46 49 4e  47 45 52 53 22 20 80 20  |FISH FINGERS" . |
00003d60  42 24 3c 3e 22 44 52 55  47 53 22 20 8c 20 f1 22  |B$<>"DRUGS" . ."|
00003d70  49 27 4d 20 4e 4f 54 20  47 4f 49 4e 47 20 54 4f  |I'M NOT GOING TO|
00003d80  20 45 41 54 20 41 20 22  42 24 3a e1 0d 0e 2e 5c  | EAT A "B$:....\|
00003d90  20 e7 20 42 24 3d 22 46  49 53 48 20 46 49 4e 47  | . B$="FISH FING|
00003da0  45 52 53 22 20 80 20 41  28 31 34 29 3c 3e 2d 31  |ERS" . A(14)<>-1|
00003db0  30 30 20 84 20 42 24 3d  22 44 52 55 47 53 22 20  |00 . B$="DRUGS" |
00003dc0  80 20 41 28 34 29 3c 3e  2d 31 30 30 20 8c 20 f1  |. A(4)<>-100 . .|
00003dd0  22 59 4f 55 20 48 41 56  45 4e 27 54 20 47 4f 54  |"YOU HAVEN'T GOT|
00003de0  20 54 48 45 4d 22 3a e1  0d 0e 38 2c 20 e7 20 42  | THEM":...8, . B|
00003df0  24 3d 22 46 49 53 48 20  46 49 4e 47 45 52 53 22  |$="FISH FINGERS"|
00003e00  20 8c 20 f1 22 4e 49 43  45 22 3a 41 28 31 34 29  | . ."NICE":A(14)|
00003e10  3d 30 3a e1 0d 0e 42 50  20 f1 22 54 48 4f 53 45  |=0:...BP ."THOSE|
00003e20  20 57 45 52 45 20 53 4c  45 45 50 49 4e 47 20 54  | WERE SLEEPING T|
00003e30  41 42 4c 45 54 53 2e 20  59 4f 55 20 41 52 45 20  |ABLETS. YOU ARE |
00003e40  4e 4f 57 20 53 4f 55 4e  44 20 41 53 4c 45 45 50  |NOW SOUND ASLEEP|
00003e50  22 3a f2 50 41 55 53 45  3a f2 50 41 55 53 45 3a  |":.PAUSE:.PAUSE:|
00003e60  f2 45 4e 44 0d 0e 4c 0d  20 dd f2 42 52 49 44 47  |.END..L. ..BRIDG|
00003e70  45 0d 0e 56 06 20 e1 0d  0e 60 09 20 dd f2 50 4f  |E..V. ...`. ..PO|
00003e80  0d 0e 6a 06 20 e1 0d 0e  74 09 20 dd f2 54 4c 0d  |..j. ...t. ..TL.|
00003e90  0e 7e 06 20 e1 0d 0e 88  0a 20 dd f2 41 53 4b 0d  |.~. ..... ..ASK.|
00003ea0  0e 92 37 20 e7 20 42 24  3c 3e 22 47 55 41 52 44  |..7 . B$<>"GUARD|
00003eb0  22 20 80 20 42 24 3c 3e  22 4d 41 4e 22 20 8c 20  |" . B$<>"MAN" . |
00003ec0  f1 22 4e 4f 20 57 41 59  20 50 41 4c 22 3a f2 50  |."NO WAY PAL":.P|
00003ed0  41 55 53 45 3a e1 0d 0e  9c 34 20 e7 20 4c 3c 3e  |AUSE:....4 . L<>|
00003ee0  35 33 20 80 20 4c 3c 3e  31 20 8c 20 f1 22 4e 4f  |53 . L<>1 . ."NO|
00003ef0  54 20 48 45 52 45 20 59  4f 55 20 43 41 4e 27 54  |T HERE YOU CAN'T|
00003f00  22 3a f2 50 41 55 53 45  3a e1 0d 0e a6 11 20 e7  |":.PAUSE:..... .|
00003f10  20 4c 3d 31 20 8c 20 8d  64 6c 4e 0d 0e b0 06 20  | L=1 . .dlN.... |
00003f20  db 0d 0e ba 86 20 f1 22  54 48 45 20 47 55 41 52  |..... ."THE GUAR|
00003f30  44 20 54 45 4c 4c 53 20  59 4f 55 20 54 48 41 54  |D TELLS YOU THAT|
00003f40  20 54 48 45 20 20 20 20  20 43 52 4f 57 4e 20 4a  | THE     CROWN J|
00003f50  45 57 45 4c 53 20 48 41  56 45 20 42 45 45 4e 20  |EWELS HAVE BEEN |
00003f60  53 54 4f 4c 45 4e 20 42  59 20 41 20 50 52 41 43  |STOLEN BY A PRAC|
00003f70  54 49 43 41 4c 20 4a 4f  4b 45 52 2c 20 41 4e 44  |TICAL JOKER, AND|
00003f80  20 48 49 44 44 45 4e 20  49 4e 20 56 41 52 49 4f  | HIDDEN IN VARIO|
00003f90  55 53 20 4c 4f 43 41 54  49 4f 4e 53 20 49 4e 20  |US LOCATIONS IN |
00003fa0  4c 4f 4e 44 4f 4e 22 0d  0e c4 7e 20 f1 27 22 54  |LONDON"...~ .'"T|
00003fb0  48 45 52 45 20 49 53 20  41 20 4d 49 4c 4c 49 4f  |HERE IS A MILLIO|
00003fc0  4e 20 50 4f 55 4e 44 20  52 45 57 41 52 44 20 20  |N POUND REWARD  |
00003fd0  46 4f 52 20 41 4e 59 4f  4e 45 20 57 48 4f 20 46  |FOR ANYONE WHO F|
00003fe0  49 4e 44 53 20 54 48 45  20 43 52 4f 57 4e 2c 20  |INDS THE CROWN, |
00003ff0  20 53 43 45 50 54 52 45  20 41 4e 44 20 4f 52 42  | SCEPTRE AND ORB|
00004000  20 41 4e 44 20 52 45 54  55 52 4e 53 20 54 48 45  | AND RETURNS THE|
00004010  4d 20 54 4f 20 54 48 45  20 4a 45 57 45 4c 20 48  |M TO THE JEWEL H|
00004020  4f 55 53 45 22 0d 0e ce  2c 20 f1 27 27 27 22 20  |OUSE"..., .'''" |
00004030  50 52 45 53 53 20 54 48  45 20 53 50 41 43 45 20  |PRESS THE SPACE |
00004040  42 41 52 20 54 4f 20 43  4f 4e 54 49 4e 55 45 22  |BAR TO CONTINUE"|
00004050  20 0d 0e d8 0c 20 f5 fd  be 3c 3e 22 22 0d 0e e2  | .... ...<>""...|
00004060  06 20 e1 0d 0e ec 25 20  e7 20 4c 3d 35 33 20 8c  |. ....% . L=53 .|
00004070  20 f1 22 4e 4f 20 57 41  59 20 57 49 4d 50 22 3a  | ."NO WAY WIMP":|
00004080  f2 50 41 55 53 45 3a e1  0d 0e f6 3e 20 f1 22 54  |.PAUSE:....> ."T|
00004090  48 45 20 4f 4c 44 20 4d  41 4e 20 57 41 4e 54 53  |HE OLD MAN WANTS|
000040a0  20 53 4f 4d 45 54 48 49  4e 47 20 20 20 20 20 20  | SOMETHING      |
000040b0  56 41 4c 55 41 42 4c 45  22 3a f2 50 41 55 53 45  |VALUABLE":.PAUSE|
000040c0  3a e5 8d 64 62 4e 0d 0f  00 0c 20 dd f2 4f 46 46  |:..dbN.... ..OFF|
000040d0  45 52 0d 0f 0a 28 20 e7  20 4c 3c 3e 31 20 8c 20  |ER...( . L<>1 . |
000040e0  f1 22 44 4f 4e 27 54 20  42 45 20 44 41 46 54 21  |."DON'T BE DAFT!|
000040f0  22 3a f2 50 41 55 53 45  3a e1 0d 0f 14 26 20 e7  |":.PAUSE:....& .|
00004100  20 46 28 31 32 29 3d 31  20 8c 20 f1 22 4e 4f 20  | F(12)=1 . ."NO |
00004110  4c 41 44 44 49 45 22 3a  f2 50 41 55 53 45 3a e1  |LADDIE":.PAUSE:.|
00004120  0d 0f 1e 39 20 e7 20 42  24 3c 3e 22 47 4f 4c 44  |...9 . B$<>"GOLD|
00004130  20 52 49 4e 47 22 20 8c  20 f1 22 48 45 20 44 4f  | RING" . ."HE DO|
00004140  45 53 4e 27 54 20 57 41  4e 54 20 54 48 41 54 22  |ESN'T WANT THAT"|
00004150  3a f2 50 41 55 53 45 3a  e1 0d 0f 28 2c 20 e7 20  |:.PAUSE:...(, . |
00004160  41 28 31 36 29 3c 3e 31  30 30 20 8c 20 f1 22 59  |A(16)<>100 . ."Y|
00004170  4f 55 20 48 41 56 45 4e  27 54 20 47 4f 54 20 4f  |OU HAVEN'T GOT O|
00004180  4e 45 22 3a e1 0d 0f 32  61 20 f1 22 54 48 45 20  |NE":...2a ."THE |
00004190  4f 4c 44 20 4d 41 4e 20  53 4e 41 54 43 48 45 53  |OLD MAN SNATCHES|
000041a0  20 54 48 45 20 52 49 4e  47 20 41 4e 44 47 49 56  | THE RING ANDGIV|
000041b0  45 53 20 59 4f 55 20 41  20 53 4b 45 4c 45 54 4f  |ES YOU A SKELETO|
000041c0  4e 20 4b 45 59 22 3a f2  50 41 55 53 45 3a 46 28  |N KEY":.PAUSE:F(|
000041d0  31 32 29 3d 31 3a 41 28  38 29 3d 31 3a 41 28 31  |12)=1:A(8)=1:A(1|
000041e0  36 29 3d 30 3a e1 0d 0f  3c 10 20 dd f2 44 42 55  |6)=0:...<. ..DBU|
000041f0  53 28 42 55 53 29 0d 0f  46 1a 20 f1 8a 42 55 53  |S(BUS)..F. ..BUS|
00004200  2c 38 29 3b 22 80 81 81  81 81 81 81 93 20 22 20  |,8);"........ " |
00004210  0d 0f 50 1a 20 f1 8a 42  55 53 2c 39 29 3b 22 84  |..P. ..BUS,9);".|
00004220  85 85 85 85 85 85 97 20  22 20 0d 0f 5a 1a 20 f1  |....... " ..Z. .|
00004230  8a 42 55 53 2c 31 30 29  3b 22 88 89 8a 8a 8a 99  |.BUS,10);"......|
00004240  9a 9b 20 22 0d 0f 64 06  20 e1 0d ff              |.. "..d. ...|
0000424c
AlligataBB/CrownJewel/CROWN3.m0
AlligataBB/CrownJewel/CROWN3.m1
AlligataBB/CrownJewel/CROWN3.m2
AlligataBB/CrownJewel/CROWN3.m4
AlligataBB/CrownJewel/CROWN3.m5