00000000: 00 40 2E 53 20 4E 3D 31 36 0D 2E 4C 20 4C 2C 54 |.@.S N=16..L L,T|
00000010: 45 4D 50 4C 20 45 58 0D 2E 21 44 52 41 57 0D 2E |EMPL EX..!DRAW..|
00000020: 50 20 22 59 6F 75 20 65 6E 74 65 72 20 61 20 72 |P "You enter a r|
00000030: 6F 6F 6D 20 77 69 74 68 20 61 6E 20 65 78 69 74 |oom with an exit|
00000040: 20 61 74 20 65 69 74 68 65 72 20 65 6E 64 20 61 | at either end a|
00000050: 6E 64 20 61 20 64 6F 6F 72 20 69 6E 20 74 68 65 |nd a door in the|
00000060: 20 6D 69 64 64 6C 65 2E 20 54 68 65 20 6D 69 64 | middle. The mid|
00000070: 64 6C 65 64 6F 6F 72 20 69 73 20 3B 0D 2E 49 20 |dledoor is ;..I |
00000080: 4E 30 28 31 36 29 3A 34 0D 2E 45 20 50 20 22 63 |N0(16):4..E P "c|
00000090: 6C 6F 73 65 64 2E 0D 2E 54 20 50 20 22 6F 70 65 |losed...T P "ope|
000000A0: 6E 2E 0D 2E 24 20 50 0D 2E 21 4D 4F 52 45 0D 2E |n...$ P..!MORE..|
000000B0: 50 20 22 50 65 64 65 73 74 61 6C 73 20 66 6C 61 |P "Pedestals fla|
000000C0: 6E 6B 20 74 68 65 20 64 6F 6F 72 77 61 79 2E 20 |nk the doorway. |
000000D0: 4F 6E 20 74 68 65 0D 2E 54 20 50 20 22 72 69 67 |On the..T P "rig|
000000E0: 68 74 20 70 65 64 65 73 74 61 6C 3B 0D 2E 54 20 |ht pedestal;..T |
000000F0: 4A 20 2B 34 0D 2E 49 20 4E 30 28 31 36 29 3A 32 |J +4..I N0(16):2|
00000100: 0D 2E 54 20 50 20 22 67 72 6F 75 6E 64 3B 0D 2E |..T P "ground;..|
00000110: 45 20 50 20 22 6C 65 66 74 20 70 65 64 65 73 74 |E P "left pedest|
00000120: 61 6C 3B 0D 2E 50 20 22 20 69 73 20 61 20 73 74 |al;..P " is a st|
00000130: 6F 6E 65 20 75 72 6E 2E 0D 2E 21 48 45 52 45 0D |one urn...!HERE.|
00000140: 21 4C 4F 4F 4B 0D 2E 50 20 22 54 68 65 20 72 6F |!LOOK..P "The ro|
00000150: 6F 6D 20 68 61 73 20 65 78 69 74 73 20 74 6F 20 |om has exits to |
00000160: 74 68 65 20 6C 65 66 74 20 61 6E 64 20 72 69 67 |the left and rig|
00000170: 68 74 61 6E 64 20 61 20 64 6F 6F 72 20 69 6E 20 |htand a door in |
00000180: 66 72 6F 6E 74 20 6F 66 20 79 6F 75 2E 0D 25 4C |front of you..%L|
00000190: 4F 55 52 0D 2E 50 20 22 49 74 20 6C 6F 6F 6B 73 |OUR..P "It looks|
000001A0: 20 6C 69 6B 65 20 69 74 20 68 65 6C 64 20 68 6F | like it held ho|
000001B0: 74 20 63 6F 61 6C 73 2E 0D 25 47 54 55 52 0D 2E |t coals..%GTUR..|
000001C0: 49 20 4E 30 28 31 36 29 3A 31 0D 2E 54 20 50 20 |I N0(16):1..T P |
000001D0: 22 59 6F 75 20 61 6C 72 65 61 64 79 20 68 61 76 |"You already hav|
000001E0: 65 20 69 74 2E 0D 2E 54 20 4A 20 2D 33 0D 2E 53 |e it...T J -3..S|
000001F0: 20 4E 31 28 31 36 29 3D 4E 30 28 31 36 29 0D 2E | N1(16)=N0(16)..|
00000200: 53 20 4E 30 28 31 36 29 3D 31 0D 2E 21 44 52 41 |S N0(16)=1..!DRA|
00000210: 57 0D 2E 49 20 4E 31 28 31 36 29 3A 34 0D 2E 54 |W..I N1(16):4..T|
00000220: 20 50 20 22 54 68 65 20 64 6F 6F 72 20 63 6C 6F | P "The door clo|
00000230: 73 65 73 2E 0D 2E 45 20 50 20 22 54 68 65 20 75 |ses...E P "The u|
00000240: 72 6E 20 69 73 20 76 65 72 79 20 68 65 61 76 79 |rn is very heavy|
00000250: 2E 20 59 6F 75 20 63 61 6E 20 68 61 72 64 6C 79 |. You can hardly|
00000260: 20 20 20 6D 6F 76 65 20 69 74 2E 0D 2E 24 20 50 | move it...$ P|
00000270: 0D 25 44 52 55 52 0D 2E 21 4E 55 52 4E 0D 2E 54 |.%DRUR..!NURN..T|
00000280: 20 4A 20 2D 32 0D 2E 53 20 4E 30 28 31 36 29 3D | J -2..S N0(16)=|
00000290: 32 0D 2E 50 20 22 59 6F 75 20 73 65 74 20 74 68 |2..P "You set th|
000002A0: 65 20 75 72 6E 20 64 6F 77 6E 20 6E 65 78 74 20 |e urn down next |
000002B0: 74 6F 20 79 6F 75 2E 0D 21 4E 55 52 4E 0D 2E 21 |to you..!NURN..!|
000002C0: 43 4C 52 54 0D 2E 49 20 4E 30 28 31 36 29 23 31 |CLRT..I N0(16)#1|
000002D0: 0D 2E 54 20 50 20 22 59 6F 75 20 64 6F 6E 27 74 |..T P "You don't|
000002E0: 20 68 61 76 65 20 74 68 65 20 75 72 6E 2E 0D 44 | have the urn..D|
000002F0: 52 4F 50 20 55 52 4E 20 20 4C 45 46 54 20 50 45 |ROP URN LEFT PE|
00000300: 44 45 53 0D 53 45 54 20 20 55 52 4E 20 20 4C 45 |DES.SET URN LE|
00000310: 46 54 20 50 45 44 45 53 0D 50 55 54 20 20 55 52 |FT PEDES.PUT UR|
00000320: 4E 20 20 4C 45 46 54 20 50 45 44 45 53 0D 50 4C |N LEFT PEDES.PL|
00000330: 41 43 45 55 52 4E 20 20 4C 45 46 54 20 50 45 44 |ACEURN LEFT PED|
00000340: 45 53 0D 2E 21 4E 55 52 4E 0D 2E 54 20 4A 20 2D |ES..!NURN..T J -|
00000350: 32 0D 2E 53 20 4E 30 28 31 36 29 3D 30 0D 2E 21 |2..S N0(16)=0..!|
00000360: 44 52 41 57 0D 2E 5F 20 50 0D 2E 21 43 4C 52 54 |DRAW.._ P..!CLRT|
00000370: 0D 2E 50 20 22 59 6F 75 20 73 65 74 20 74 68 65 |..P "You set the|
00000380: 20 75 72 6E 20 64 6F 77 6E 20 77 69 74 68 20 61 | urn down with a|
00000390: 20 73 69 67 68 2E 0D 2E 24 20 50 0D 44 52 4F 50 | sigh...$ P.DROP|
000003A0: 20 55 52 4E 20 20 52 49 47 48 54 50 45 44 45 53 | URN RIGHTPEDES|
000003B0: 0D 53 45 54 20 20 55 52 4E 20 20 52 49 47 48 54 |.SET URN RIGHT|
000003C0: 50 45 44 45 53 0D 50 55 54 20 20 55 52 4E 20 20 |PEDES.PUT URN |
000003D0: 52 49 47 48 54 50 45 44 45 53 0D 50 4C 41 43 45 |RIGHTPEDES.PLACE|
000003E0: 55 52 4E 20 20 52 49 47 48 54 50 45 44 45 53 0D |URN RIGHTPEDES.|
000003F0: 2E 21 4E 55 52 4E 0D 2E 54 20 4A 20 2D 32 0D 2E |.!NURN..T J -2..|
00000400: 53 20 4E 30 28 31 36 29 3D 33 0D 2E 21 44 52 41 |S N0(16)=3..!DRA|
00000410: 57 0D 2E 5F 20 50 0D 2E 21 43 4C 52 54 0D 2E 50 |W.._ P..!CLRT..P|
00000420: 20 22 59 6F 75 20 73 65 74 20 74 68 65 20 75 72 | "You set the ur|
00000430: 6E 20 64 6F 77 6E 20 6F 6E 20 74 68 65 20 70 65 |n down on the pe|
00000440: 64 65 73 74 61 6C 2E 0D 2E 50 20 22 59 6F 75 20 |destal...P "You |
00000450: 68 65 61 72 20 61 20 63 6C 69 63 6B 20 61 73 20 |hear a click as |
00000460: 74 68 65 20 63 6F 6C 75 6D 6E 20 6D 6F 76 65 73 |the column moves|
00000470: 0D 2E 50 20 22 61 20 66 72 61 63 74 69 6F 6E 20 |..P "a fraction |
00000480: 6F 66 20 61 6E 20 69 6E 63 68 2E 0D 2E 24 20 50 |of an inch...$ P|
00000490: 0D 2E 21 4D 4F 52 45 0D 2E 53 20 4E 30 28 31 36 |..!MORE..S N0(16|
000004A0: 29 3D 34 0D 2E 21 44 52 41 57 0D 2E 50 20 22 57 |)=4..!DRAW..P "W|
000004B0: 69 74 68 20 73 74 61 72 74 6C 69 6E 67 20 73 77 |ith startling sw|
000004C0: 69 66 74 6E 65 73 73 20 74 68 65 20 6D 69 64 64 |iftness the midd|
000004D0: 6C 65 0D 2E 50 20 22 64 6F 6F 72 20 6F 70 65 6E |le..P "door open|
000004E0: 73 21 0D 2E 24 20 50 0D 44 52 4F 50 20 55 52 4E |s!..$ P.DROP URN|
000004F0: 20 20 50 45 44 45 53 0D 53 45 54 20 20 55 52 4E | PEDES.SET URN|
00000500: 20 20 50 45 44 45 53 0D 50 55 54 20 20 55 52 4E | PEDES.PUT URN|
00000510: 20 20 50 45 44 45 53 0D 50 4C 41 43 45 55 52 4E | PEDES.PLACEURN|
00000520: 20 20 50 45 44 45 53 0D 2E 21 4E 55 52 4E 0D 2E | PEDES..!NURN..|
00000530: 54 20 4A 20 2D 32 0D 2E 50 20 22 59 6F 75 20 6D |T J -2..P "You m|
00000540: 75 73 74 20 73 70 65 63 69 66 79 20 77 68 69 63 |ust specify whic|
00000550: 68 20 70 65 64 65 73 74 61 6C 2E 0D 50 45 44 49 |h pedestal..PEDI|
00000560: 53 0D 2E 21 43 4C 52 54 0D 2E 50 20 22 49 74 27 |S..!CLRT..P "It'|
00000570: 73 20 73 70 65 6C 6C 65 64 20 70 65 64 65 73 74 |s spelled pedest|
00000580: 61 6C 2E 0D 49 4E 56 45 4E 0D 45 51 55 49 50 0D |al..INVEN.EQUIP.|
00000590: 2E 21 43 4C 52 54 0D 2E 49 20 4E 30 28 31 36 29 |.!CLRT..I N0(16)|
000005A0: 3A 31 0D 2E 54 20 50 20 22 59 6F 75 20 63 61 6E |:1..T P "You can|
000005B0: 27 74 20 73 65 65 20 77 68 61 74 20 79 6F 75 20 |'t see what you |
000005C0: 68 61 76 65 20 77 68 65 6E 20 79 6F 75 27 72 65 |have when you're|
000005D0: 20 68 6F 6C 64 69 6E 67 20 61 20 6D 61 73 73 69 | holding a massi|
000005E0: 76 65 20 75 72 6E 2E 0D 2E 45 20 25 2E 2E 45 51 |ve urn...E %..EQ|
000005F0: 0D 25 46 57 2E 2E 0D 25 2E 2E 45 4E 0D 2E 49 20 |.%FW...%..EN..I |
00000600: 4E 30 28 31 36 29 23 34 0D 2E 54 20 50 20 22 54 |N0(16)#4..T P "T|
00000610: 68 65 20 64 6F 6F 72 20 69 73 20 63 6C 6F 73 65 |he door is close|
00000620: 64 2E 20 59 6F 75 20 63 61 6E 27 74 20 6F 70 65 |d. You can't ope|
00000630: 6E 20 69 74 2E 0D 2E 45 20 33 20 52 4F 4F 4D 20 |n it...E 3 ROOM |
00000640: 37 2E 31 20 20 0D 2E 45 20 21 47 4F 54 4F 0D 21 |7.1 ..E !GOTO.!|
00000650: 4E 4F 47 4F 0D 2E 49 20 4E 30 28 31 36 29 3A 31 |NOGO..I N0(16):1|
00000660: 0D 2E 54 20 50 20 22 54 68 65 20 75 72 6E 20 69 |..T P "The urn i|
00000670: 73 20 76 65 72 79 20 68 65 61 76 79 2C 20 79 6F |s very heavy, yo|
00000680: 75 20 63 61 6E 27 74 0D 2E 54 20 50 20 22 63 61 |u can't..T P "ca|
00000690: 72 72 79 20 69 74 20 61 6E 79 77 68 65 72 65 2E |rry it anywhere.|
000006A0: 0D 25 4C 2E 2E 2E 0D 2E 21 4E 4F 47 4F 0D 2E 45 |.%L.....!NOGO..E|
000006B0: 20 53 20 47 45 28 36 29 3D 31 37 0D 2E 45 20 33 | S GE(6)=17..E 3|
000006C0: 20 52 4F 4F 4D 20 31 33 2E 30 20 0D 2E 45 20 21 | ROOM 13.0 ..E !|
000006D0: 54 55 4E 4C 0D 25 52 2E 2E 2E 0D 2E 21 4E 4F 47 |TUNL.%R.....!NOG|
000006E0: 4F 0D 2E 54 20 4A 20 2D 32 0D 2E 49 20 4E 30 28 |O..T J -2..I N0(|
000006F0: 31 37 29 3A 34 0D 2E 54 20 53 20 47 45 28 36 29 |17):4..T S GE(6)|
00000700: 3D 31 30 30 0D 2E 54 20 33 20 52 4F 4F 4D 20 31 |=100..T 3 ROOM 1|
00000710: 36 2E 30 20 0D 2E 45 20 53 20 47 45 28 36 29 3D |6.0 ..E S GE(6)=|
00000720: 30 0D 2E 45 20 33 20 52 4F 4F 4D 20 31 37 2E 30 |0..E 3 ROOM 17.0|
00000730: 20 0D 2E 21 54 55 4E 4C 0D 21 44 52 41 57 0D 2E | ..!TUNL.!DRAW..|
00000740: 53 20 50 3D 33 2D 50 0D 2E 43 20 31 2C 50 2C 30 |S P=3-P..C 1,P,0|
00000750: 0D 2E 42 20 52 47 48 54 4C 0D 2E 53 20 56 3D 50 |..B RGHTL..S V=P|
00000760: 0D 2E 44 20 0D 2E 49 20 4E 30 28 31 36 29 3A 30 |..D ..I N0(16):0|
00000770: 0D 2E 54 20 42 20 50 45 44 31 4A 0D 2E 45 20 42 |..T B PED1J..E B|
00000780: 20 50 45 44 31 4E 0D 2E 53 20 56 3D 50 0D 2E 44 | PED1N..S V=P..D|
00000790: 20 0D 2E 49 20 4E 30 28 31 36 29 3E 32 0D 2E 54 | ..I N0(16)>2..T|
000007A0: 20 42 20 50 45 44 32 4A 0D 2E 45 20 42 20 50 45 | B PED2J..E B PE|
000007B0: 44 32 4E 0D 2E 53 20 56 3D 50 0D 2E 44 20 0D 2E |D2N..S V=P..D ..|
000007C0: 42 20 54 4D 50 45 58 0D 2E 49 20 4E 30 28 31 36 |B TMPEX..I N0(16|
000007D0: 29 3A 34 0D 2E 54 20 53 20 43 4F 28 31 35 29 3D |):4..T S CO(15)=|
000007E0: 34 0D 2E 53 20 56 3D 50 0D 2E 44 20 0D 2E 5F 20 |4..S V=P..D .._ |
000007F0: 50 0D 2E 21 43 4C 52 54 0D 40 40 40 40 40 0D 0D |P..!CLRT.@@@@@..|
.@.S N=16..L L,TEMPL EX..!DRAW..P "YOU E
NTER A ROOM WITH AN EXIT AT EITHER END A
ND A DOOR IN THE MIDDLE. THE MIDDLEDOOR
IS ;..I N0(16):4..E P "CLOSED...T P "OPE
N...$ P..!MORE..P "PEDESTALS FLANK THE D
OORWAY. ON THE..T P "RIGHT PEDESTAL;..T
J +4..I N0(16):2..T P "GROUND;..E P "LEF
T PEDESTAL;..P " IS A STONE URN...!HERE.
!LOOK..P "THE ROOM HAS EXITS TO THE LEFT
AND RIGHTAND A DOOR IN FRONT OF YOU..%L
OUR..P "IT LOOKS LIKE IT HELD HOT COALS.
.%GTUR..I N0(16):1..T P "YOU ALREADY HAV
E IT...T J -3..S N1(16)=N0(16)..S N0(16)
=1..!DRAW..I N1(16):4..T P "THE DOOR CLO
SES...E P "THE URN IS VERY HEAVY. YOU CA
N HARDLY MOVE IT...$ P.%DRUR..!NURN..T
J -2..S N0(16)=2..P "YOU SET THE URN DO
WN NEXT TO YOU..!NURN..!CLRT..I N0(16)#1
..T P "YOU DON'T HAVE THE URN..DROP URN
LEFT PEDES.SET URN LEFT PEDES.PUT UR
N LEFT PEDES.PLACEURN LEFT PEDES..!NUR
N..T J -2..S N0(16)=0..!DRAW.._ P..!CLRT
..P "YOU SET THE URN DOWN WITH A SIGH...
$ P.DROP URN RIGHTPEDES.SET URN RIGHT
PEDES.PUT URN RIGHTPEDES.PLACEURN RIG
HTPEDES..!NURN..T J -2..S N0(16)=3..!DRA
W.._ P..!CLRT..P "YOU SET THE URN DOWN O
N THE PEDESTAL...P "YOU HEAR A CLICK AS
THE COLUMN MOVES..P "A FRACTION OF AN IN
CH...$ P..!MORE..S N0(16)=4..!DRAW..P "W
ITH STARTLING SWIFTNESS THE MIDDLE..P "D
OOR OPENS!..$ P.DROP URN PEDES.SET URN
PEDES.PUT URN PEDES.PLACEURN PEDES.
.!NURN..T J -2..P "YOU MUST SPECIFY WHIC
H PEDESTAL..PEDIS..!CLRT..P "IT'S SPELLE
D PEDESTAL..INVEN.EQUIP..!CLRT..I N0(16)
:1..T P "YOU CAN'T SEE WHAT YOU HAVE WHE
N YOU'RE HOLDING A MASSIVE URN...E %..EQ
.%FW...%..EN..I N0(16)#4..T P "THE DOOR
IS CLOSED. YOU CAN'T OPEN IT...E 3 ROOM
7.1 ..E !GOTO.!NOGO..I N0(16):1..T P "T
HE URN IS VERY HEAVY, YOU CAN'T..T P "CA
RRY IT ANYWHERE..%L.....!NOGO..E S GE(6)
=17..E 3 ROOM 13.0 ..E !TUNL.%R.....!NOG
O..T J -2..I N0(17):4..T S GE(6)=100..T
3 ROOM 16.0 ..E S GE(6)=0..E 3 ROOM 17.0
..!TUNL.!DRAW..S P=3-P..C 1,P,0..B RGHT
L..S V=P..D ..I N0(16):0..T B PED1J..E B
PED1N..S V=P..D ..I N0(16)>2..T B PED2J
..E B PED2N..S V=P..D ..B TMPEX..I N0(16
):4..T S CO(15)=4..S V=P..D .._ P..!CLRT
.@@@@@..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL