;TAMORET - BY MICHAEL J. LYONS - COPYRIGHTED 1988 ;cmd file ;flags: ;flag1 dog ready to flee ;flag2 kerosene lamp is burning ;flag3 gas pumps are working ;flag4 gas lamp is burning ;flag5 kerosene is in the lamp ;flag6 gas is in the lamp ;flag7 sheriff is active ;flag8 darkness has fallen ;flag9 zombies are active ;flag10 zombies in legal room ;flag11 a beer is has been served ;flag12 the beer has been drunk ;flag13 key to the jail can be located ;flag14 the sheriff is in the cell ;flag15 the cell door is unlocked ;flag16 Amens are being said ;flag17 light messages to be printed ;flag18 vampire is active ;flag19 first number of safe combination has been found ;flag20 second number of safe combination has been found ;flag21 third number of safe combination has been found ;flag22 vault door is open ;flag23 gun is loaded with silver bullet ;flag24 coins have been spent ;flag25 werewolf is active ;flag26 spider is active ;flag27 spider begins following player ;flag28 scepter is now free ;flag29 fly begins to follow player ;flag30 fly is in web and spider is alive ;flag31 lamp has blown up ;flag32 gas lamp is at gate ;flag33 gate has been blown up ;flag34 journal first page has been read ;flag35 journal second page has been read ;flag36 journal third page has been read ;flag37 journal fourth page has been read ;flag38 secret passage is closed ;flag39 request made to get pool ball ;flag40 trunk has been opened ;flag41 shadow is part of the group ;flag42 shadow is bound by talisman ;flag43 lab is unsafe to enter ;flag44 console is unlocked ;flag45 generator is on ;flag46 archway is on ;flag47 purge pump is on ;flag48 nine ball off table ;flag49 pool ball off table ;flag50 death by the stones in wrong place ;flag51 orb is in hole ;flag52 console is protected by ring ;flag53 on swingset ;flag54 amulet not out of tree ;flag55 following rat ;flag56 start to follow rat ;flag57 cross in placed ;flag58 knob on door ;flag59 scepter in place ;flag60 amulet in place ;flag61 talisman in place ;flag62 shadow destroyed ;flag63 ring in place ;flag64 shadow finished pep talk ;flag65 archway has been taken away ;flag66 white shadow resurrection message ;flag71 vagrant message ;flag72 braindead message ;flag73 braindead groupmember ;flag74 merchant message ;flag75 adventurer message ;flag76 resident message ;flag77 mourner message ;flag78 drunk message ;flag79 white shadow no more resurrections ;flag80 console examined ;flag81 vial found ;flag82 rat in hiding ;Counters ;counter1 daylight counter ;counter2 darkness counter ;counter3 dog is fleeing ;counter4 fight timer in bar before sheriff shows ;counter5 timer to get sheriff key ;counter6 timer to track spider following ;counter7 timer to track fly following ;counter8 purge pump timer ;counter9 rat timer ;variables ;variable1 kerosene lamp burn time ;variable2 gas lamp burn time ;variable3 times amen was shouted ;variable4 times statue can be seen before attack ;variable5 counter for number of swings COMMAND ANY NewLife ;Routine to set daylight-dark counters AtLocation 2 ;in start position TurnCounterOn 1 ;Daylight counter on TurnCounterOff 2 ;Darkness counter off TurnFlagON 7 ;sheriff activated TurnFlagOFF 8 ;darkness flag turn off TurnFlagOFF 9 ;zombies off TurnFlagOFF 17 ;can print daylight, darkness message PrintMessage 35 ;new day BlankLine END_COMMAND COMMAND ANY AtLocation 27 ;in church OR AtLocation 56 ;behind pulpit PutInCurrentRoom 205 ;put pulpit in room END_COMMAND COMMAND ANY AtLocationGT 59 ;in park AtLocationLT 74 ;in park NOT AtLocation 72 ;not on mound NOT AtLocation 69 ;not at fountain NOT AtLocation 70 ;not at statue NOT AtLocation 62 ;not at mound NOT AtLOcation 64 ;not at playground NOT AtLocation 65 ;not at statue PutInCurrentRoom 371 ;put tree here END_COMMAND COMMAND ANY AtLocationGT 73 ;by the lake AtLocationLT 79 ;by the lake NOT AtLocation 75 ;not in house PutInCurrentRoom 372 ;put lake here END_COMMAND COMMAND ANY AtLocation 105 ;at back gate FlagOFF 33 ;gate not blown yet PutInCurrentRoom 373 ;put padlock here END_COMMAND COMMAND ANY AtLocation 106 ;in kitchen PutInCurrentRoom 334 ;put dirty dishes here END_COMMAND COMMAND ANY AtLocation 108 ;at back porch PutInCurrentRoom 299 ;put locked door here END_COMMAND COMMAND ANY AtLocation 115 ;at front door PutInCurrentRoom 299 ;put lock door here END_COMMAND COMMAND ANY AtLocation 123 ;in bedroom PutInCurrentRoom 230 ;put dresser here END_COMMAND COMMAND ANY AtLocation 126 ;in closet PutInCurrentRoom 380 ;put clothes here END_COMMAND COMMAND ANY AtLocation 127 ;in attic PutInCurrentRoom 359 ;put cobwebs here END_COMMAND COMMAND ANY AtLocation 128 ;at front gate PutInCurrentRoom 373 ;put padlock here END_COMMAND COMMAND ANY AtLocation 130 ;in basement PutInCurrentRoom 203 ;put crate here END_COMMAND COMMAND ANY AtLocation 151 ;in delivery room PutInCurrentRoom 203 ;put crates here END_COMMAND COMMAND ANY AtLocation 132 ;in laundry PutInCurrentRoom 238 ;put table here PutInCurrentRoom 380 ;put clothes here END_COMMAND COMMAND ANY AtLocation 133 ;in office PutInCurrentRoom 244 ;put cabinet here END_COMMAND COMMAND ANY AtLocation 107 ;in pantry PutInCurrentRoom 204 ;put shelf in here END_COMMAND COMMAND ANY FlagOFF 66 ;white shadow message not given yet PrintMessage 199 ;white shadow resurrect message BlankLine TurnFlagON 66 ;do away with this END_COMMAND COMMAND ANY TurnsEquals 3 ;3 turns has passed PrintMessage 200 ;1st black warning BlankLine END_COMMAND COMMAND ANY TurnsEquals 103 ;103 turns has passed PrintMessage 201 ;second warning given BlankLine END_COMMAND COMMAND ANY TurnsEquals 209 ;209 turns has passed PrintMessage 202 ;3rd warning given BlankLine END_COMMAND COMMAND ANY TurnsEquals 316 ;316 turns has passed PrintMessage 203 ;4th warning given BlankLine END_COMMAND COMMAND ANY Present 312 ;vagrant is here FlagON 71 ;vagrant has given message PrintMessage 205 ;vagrant moans BlankLine END_COMMAND COMMAND ANY FlagOFF 71 ;vagrant has not spoke yet Present 312 ;vagrant is here PrintMessage 204 ;vagrant message BlankLine TurnFlagON 71 ;disable this command END_COMMAND COMMAND ANY Present 331 ;braindead is here FlagOFF 72 ;first meeting with braindead PrintMessage 206 ;braindeads speech BlankLine TurnFlagON 72 ;disable this command AddToGroup 331 ;make braindead a groupmember TurnFlagON 73 ;now a groupmember END_COMMAND COMMAND ANY Present 331 ;braindead is here FlagON 73 ;braindead is a groupmember AtLocation 142 ;at archway PrintMessage 207 ;braindead leaves BlankLine RemoveFromGroup 331 ;remove braindead from group SendToRoom 331 141 ;put braindead in control room TurnFlagOFF 73 ;braindead not groupmember END_COMMAND COMMAND ANY Present 331 ;braindead is here FlagOFF 73 ;braindead not a groupmember FlagON 72 ;has printer first message PrintMessage 208 ;braindead hurry message BlankLine END_COMMAND COMMAND ANY Present 343 ;town merchant is here FlagON 74 ;has meet before PrintMessage 210 ;merchant sighs BlankLine END_COMMAND COMMAND ANY Present 343 ;town merchant here FlagOFF 74 ;first meeting PrintMessage 209 ;merchant warning BlankLIne TurnFlagON 74 ;disable this message END_COMMAND COMMAND ANY FlagON 75 ;has already met adventurer Present 344 ;adventurer is here PrintMessage 211 ;adventure sobs BlankLine END_COMMAND COMMAND ANY Present 344 ;adventurer is here FlagOFF 75 ;first meeting PrintMessage 212 ;adventurer tells his story BlankLine TurnFlagON 75 ;disable this command END_COMMAND COMMAND ANY Present 345 ;resident is here FlagON 76 ;has meet resident before PrintMessage 213 ;resident mumbles BlankLine END_COMMAND COMMAND ANY Present 345 ;resident is here FlagOFF 76 ;first meeting PrintMessage 214 ;resident tells about town TurnFlagON 76 ;disable this command BlankLine END_COMMAND COMMAND ANY Present 346 ;mourner is here FlagON 77 ;has met mourner before PrintMessage 215 ;mourner cries BlankLine END_COMMAND COMMAND ANY Present 346 ;mourner is here FlagOFF 77 ;has not met mourner before PrintMessage 216 ;mourner tells of death of husband BlankLine TurnFlagON 77 ;disable this command END_COMMAND COMMAND ANY Present 347 ;drunk is here FlagOn 78 ;drunk has been met before PrintMessage 217 ;drunk rambles BlankLine END_COMMAND COMMAND ANY Present 347 ;drunk is here FlagOFF 78 ;first meeting PrintMessage 218 ;incoherent story TurnFlagON 78 ;disable this command BlankLine END_COMMAND AtLocationGT 48 ;sheriff deactivator TurnFlagOFF 7 ;sheriff deactivated END_COMMAND COMMAND ANY AtLocationGT 105 ;light deactivator TurnFlagON 17 ;suppress light messages END_COMMAND COMMAND ANY AtLocationGT 56 ;zombie deactivator TurnFlagOFF 9 ;zombies stopped TurnFlagON 10 ;zombie deactivated END_COMMAND COMMAND ANY AtLocationLT 49 ;sheriff activator TurnFlagON 7 ;sheriff active END_COMMAND COMMAND ANY AtLocationLT 106 ;light activator TurnFlagOFF 17 ;allow light messages END_COMMAND COMMAND ANY AtLocationLT 47 ;zombie activator FlagON 8 ;It is dark TurnFlagON 9 ;zombie activated TurnFlagOFF 10 ;zombies activated END_COMMAND COMMAND ANY CounterEquals 1 185 ;CHECKS DAYLIGHT COUNTER FlagOFF 17 ;ok to print PrintMessage 2 ;PRINTS SUNSET MESSAGE BlankLine END_COMMAND COMMAND ANY CounterEquals 2 85 ;CHECKS DARKNESS COUNTER FlagOFF 17 ;ok to print PrintMessage 4 ;SUNRISE MESSAGE BlankLine END_COMMAND COMMAND ANY CounterGT 1 200 ;Check for daylight end TurnCounterOff 1 ;turn daylight counter off TurnCounterOn 2 ;turn darkness counter on TurnFlagON 8 ;turn darkness flag on FlagOFF 17 ;ok to print PrintMessage 3 ;Darkness has fallen BlankLine END_COMMAND COMMAND ANY CounterGT 2 100 ;Check for darkness end TurnCounterOff 2 ;darkness counter off TurnCounterOn 1 ;daylight counter on TurnFlagOFF 8 ;darkness flag off TurnFlagOFF 9 ;zombies deactivated TurnFlagON 10 ;zombie deactivator FlagOFF 17 ;ok to print PrintMessage 1 ;Sun has risen BlankLine END_COMMAND COMMAND ANY FlagON 9 ;zombies can attack FlagON 2 ;lamp is lit FlagOFF 10 ;zombies in legal room Chance 25 ;25% chance for sighting PrintMessage 32 ;Sightings message BlankLine END_COMMAND COMMAND ANY FlagON 9 ;random sightings of creatures in dark FlagOFF 2 ;lamp is unlit FlagOFF 10 ;in legal room PrintMessage 36 ;moon shine message BlankLine PrintMessage 33 ;sighting message BlankLine END_COMMAND COMMAND ANY FlagON 9 ;death by night stalker FlagOFF 2 ;lamp is unlit FlagOFF 10 ;in legal room Chance 5 ;5% chance of zombie attacking PrintMessage 34 ;death by zombies SendAllToRoom 42 ;put all treasure in cemetery MinusScore 50 ;lose points for dumb play KillPlayer ;restart newlife DoneWithTurn END_COMMAND COMMAND ANY IsSomewhere 300 ;sheriff somewhere NOT AtLocation 37 ;not in sherrif office NOT AtLocation 38 ;not in cell FlagON 7 ;legal room Chance 10 ;routine to put sheriff in same room PutInCurrentRoom 300 ;put sheriff in room PrintMessage 5 ;print sherrifs warning SendToRoom 300 37 ;put sheriff back in jail BlankLine END_COMMAND COMMAND ANY AtLocation 8 ;routine for dog to flee Present 301 ;dog is here PrintMessage 6 ;print dog fleeing BlankLine SendToRoom 301 31 ;put dog in sporting goods store DoneWithTurn END_COMMAND COMMAND ANY CounterEquals 3 3 ;routine to have dog leave without you following Present 301 ;dog is here AtLocation 31 ;in sporting goods store FlagOFF 1 ;Dog is ready to be followed PrintMessage 11 ;print follow message SendToRoom 201 49 ;put ham bone in grave Destroy 301 ;put dog in room 0 END_COMMAND COMMAND ANY CounterEquals 3 3 ;routine to have dog leave and you follow Present 301 ;dog is here AtLocation 31 ;in sporting good store FlagON 1 ;dog is ready to be followed FlagON 83 ;ham bone has been given PrintMessage 8 ;print following dog to cemetery SendToRoom 301 44 ;send dog to cemetery GoToRoom 44 ;send player to cemetery PrintMessage 9 ;print dog burying bone TurnCounterOFF 3 ;Turn dog delay counter off SendToRoom 201 49 ;put ham bone under grave Destroy 301 ;put dog in room 0 PlusScore 25 ;add 25 points to score DoneWithTurn END_COMMAND COMMAND ANY FlagOn 2 ;routine to check lamp AddToVariable 1 1 ;increase lamp burn by one VariableGT 1 175 ;check to see if lamp has been on 175 turns PrintMessage 18 ;print flickering lamp VariableEquals 1 200 ;check to see of lamp has been on 200 turns PrintMessage 19 ;Lamp goes off TurnFlagOff 2 ;turn lamp flag off TurnFlagOFF 5 ;turn fuel flag off TurnFlagOFF 6 ;turn gas fuel flag off SwapLocations 207 219 ;get unfueled lamp put fuel lamp in 0 END_COMMAND COMMAND ANY FlagON 4 ;routine for death with lamp Present 218 ;lamp with gas present AddToVariable 1 1 ;increase by one lamp burning VariableGT 1 5 ;check to see if lamp has burnt more than 5 PrintMessage 24 ;Death by explosion MinusScore 50 ;lose 50 points for dumbness Destroy 218 ;destroy gas lamp SendAllToRoom 42 ;send all treasure to cemetery TurnFlagOff 4 ;shut burning lamp flag off KillPlayer ;kill player FlagON 32 ;lamp dropped at gate SwapLocations 250 251 ;put open gate here ChangePassageway 4 108 ;open passage to mansion DoneWithTurn END_COMMAND COMMAND ANY FlagON 4 ;routine to destroy lamp AddToVariable 1 1 ;increase lamp burning by one turn VariableGT 1 5 ;check to see if lamp has burnt more than 5 PrintMessage 29 ;blow up lamp Destroy 218 ;destroy gas lamp TurnFlagOFF 4 ;shut burning lamp flag off TurnFlagON 31 ;turn destruction on DoneWithTurn END_COMMAND COMMAND ANY IsSomewhere 300 ;routine to have sherriff arrest FlagON 5 ;Lamp has been filled with fuel OR FlagON 6 ;lamp has been filled with gas PrintMessage 30 ;Sheriff arest player GoToRoom 38 ;send player to prison BlankLine PrintMessage 31 ;lock player in cell SendAllToRoom 37 ;send treasure to sheriff's office TurnFlagOFF 5 ;lamp no longer has fuel TurnFlagOFF 6 ;lamp no longer has gas TurnFlagOFF 7 ;sheriff quits showing up TurnFlagON 10 ;zombies deactivated DoneWithTurn END_COMMAND COMMAND ANY FlagOn 13 ;routine to for failure to get key CounterGT 4 20 ;key counter elaspse PrintMessage 41 ;arrested for fighting BlankLine TurnFlagOFF 13 ;reset key search flag TurnCounterOFF 4 ;reset key search counter GoToRoom 38 ;Send Player to jail PrintMessage 31 ;locked in cell BlankLine SendAllToRoom 37 ;put all treasure in sherrifs office TurnFlagON 10 ;zombies deactivated SendToRoom 221 38 ;put locked cell door in cell DoneWithTurn END_COMMAND COMMAND ANY FlagOn 12 ;routine for pentalty for not hidding CounterEquals 4 3 ;2 moves have elaspe PrintMessage 41 ;arrested for fighting BlankLine TurnFlagOFF 12 ;reset search flag TurnCounterOFF 4 ;reset serach timer GoToRoom 38 ;send player to jail PrintMessage 31 ;Locked in jail BlankLine SendAllToRoom 37 ;put treasure in sheriffs office TurnFlagON 10 ;zombies deactivated PutInCurrentRoom 221 ;put locked door in cell DoneWithTurn END_COMMAND COMMAND ANY FlagON 14 ;routine to arrest player for no locking door CounterEquals 5 4 ;3 moves elaspe PrintMessage 41 ;arrest for fighting TurnFlagOFF 14 ;reset flag TurnCounterOff 5 ;reset counter GoToRoom 38 ;send player to jail SendToRoom 300 37 ;put sheriff in office PrintMessage 31 ;Locked in jail SendAllToRoom 37 ;put treasure in sheriff office TurnFlagON 10 ;zombies deactivated SwapLocations 221 222 ;put locked door here ChangePassageway 4 0 ;close exit up DoneWithTurn END_COMMAND COMMAND ANY FlagOFF 18 ;vampire not here already AtLocationGT 48 ;routine to have vampire show up AtLocationLT 56 ;in rooms betweem 48 and 56 Chance 40 ;40% chance it will show up PrintMessage 58 ;vampire shows up PutInCurrentRoom 303 ;put vampire in room TurnFlagON 18 ;vampire activator END_COMMAND COMMAND ANY AtLocation 65 ;at statue Present 307 ;statue is here AddToVariable 4 1 ;increase death variable PrintMessage 86 ;angry statue VariableGT 4 5 ;variable to kill player PrintMessage 88 ;you died SendAllToRoom 42 ;transfer goods to cem SetVariableTo 4 1 ;reset variable KillPlayer ;bye bye MinusScore 50 ;bad move DoneWithTurn END_COMMAND COMMAND ANY AtLocation 58 ;at park entrance FlagOFF 25 ;werewolf is alive PrintMessage 91 ;werewolf howls BlankLine END_COMMAND COMMAND ANY FlagOFF 79 ;first time for this command AtLocation 78 ;on the beach PrintMessage 219 ;no more ressurections TurnFlagON 79 ;disable this command END_COMMAND COMMAND ANY FlagON 27 ;spider is following PrintMessage 94 ;spider follows CounterEquals 6 10 ;long enough-time to die TurnCounterOFF 6 ;turn counter off PrintMessage 95 ;spider kills you MinusScore 50 ;bad move EndGame ;it is all over DoneWithTurn END_COMMAND COMMAND ANY FlagON 27 ;spider is following AtLocation 97 ;in praying mantis room PrintMessage 96 ;praying mantis kills spider Destroy 314 ;spider dead Destroy 316 ;destroy praying mantis TurnFlagON 26 ;spider flag shows dead TurnFlagOFF 27 ;flag off for spider following TurnCounterOFF 6 ;shut spider counter off PlusScore 20 ;good job RemoveFromGroup 314 ;remove spider from group DoneWithTurn END_COMMAND COMMAND ANY FlagON 29 ;fly following PrintMessage 101 ;fly follows CounterEquals 7 10 ;enough time-ready to die TurnCounterOFF 7 ;fly counter off PrintMessage 102 ;fly kills player MinusScore 50 ;bad move EndGame ;no use retrying DoneWithTurn END_COMMAND COMMAND ANY FlagON 29 ;fly following AtLocation 90 ;in web room PrintMessage 103 ;fly gets caught in web TurnFlagON 28 ;scepter now free SendToRoom 252 90 ;put scepter here TurnFlagOFF 29 ;fly gone TurnCounterOFF 7 ;reset counter SwapLocations 317 318 ;put trap fly in room RemoveFromGroup 317 ;remove fly from group PlusScore 20 ;good job FlagOFF 26 ;spider is alive FlagOFF 27 ;spider is not following TurnFlagON 30 ;fly caught with spider alive DoneWithTurn END_COMMAND COMMAND ANY FlagOn 30 ;fly caught and spider alive not following PrintMessage 105 ;spider eyes fly BlankLine PrintMessage 93 ;spider eyes you PutInCurrentRoom 314 ;put spider in room AddToGroup 314 ;spider starts following TurnFlagOFF 30 ;disable this routine TurnFlagON 27 ;spider flag to follow TurnCounterON 6 ;spider counter for death activated DoneWithTurn END_COMMAND COMMAND ANY FlagON 32 ;lamp at gate FlagON 31 ;lamp blows up SwapLocations 250 251 ;put open gate now TurnFlagON 33 ;marker to change passageway TurnFlagOFF 32 ;disable this routine PlusScore 15 ;nice job END_COMMAND COMMAND ANY FlagON 33 ;gate blown AtLocation 105 ;at gate ChangePassageway 4 108 ;open passageway TurnFlagOFF 33 ;deactivate this routine END_COMMAND COMMAND ANY Present 321 ;shadow is here IsWearing 234 ;has ring on AddToGroup 321 ;put shadow in group TurnFlagOn 41 ;shadow now a group member END_COMMAND COMMAND ANY Present 321 ;shadow is here NOT IsWearing 234 ;does not have ring on FlagOFF 42 ;not held by talisman PrintMessage 127 ;shadow kills you MinusScore 50 ;bad move EndGame ;no use playing anymore DoneWithTurn END_COMMAND COMMAND ANY FlagON 41 ;shadow is group member FlagOFF 42 ;not held by talisman Chance 10 ;10% chance shadow will attack PrintMessage 126 ;shadow is frighten by ring END_COMMAND COMMAND ANY FlagON 41 ;shadow is group member AtLocation 140 ;in lab Present 256 ;arch is working FlagOFF 42 ;shadow not held by green stone PrintMessage 161 ;shadow scared of arch TurnFlagOFF 41 ;shut group member flag off RemoveFromGroup 321 ;remove shadow from group SendToRoom 321 123 ;put shadow in bedroom END_COMMAND COMMAND ANY AtLocationGT 142 ;in fourth diminsion FlagON 46 ;arch is working FlagOFF 65 ;arch is still here FlagOFF 42 ;shadow not bond by stone FlagOFF 52 ;console not protected FlagOFF 62 ;shadow not destroyed SendToRoom 256 240 ;take archway from chamber PrintMessage 162 ;sinster laugh as arch is taken away TurnFlagON 65 ;arch gone TurnFlagOFF 46 ;shut arch down END_COMMAND COMMAND ANY AtLocation 140 ;in lab FlagON 43 ;room unsafe PrintMessage 142 ;die in unsafe room MinusScore 50 ;bad job EndGame ;no use counting DoneWithTurn END_COMMAND COMMAND ANY FlagON 43 ;lab unsafe FlagON 47 ;purger on CounterGT 8 4 ;purge completed TurnFlagOFF 43 ;lab now safe TurnFlagOFF 47 ;turn purger off TurnCounterOFF 8 ;shut counter off END_COMMAND COMMAND ANY AtLocation 142 ;in chamber FlagOFF 64 ;shadow not talked yet FirstVisitToRoom ;first time there PrintMessage 156 ;shadow gives pep talk TurnFlagON 64 ;shadow talk over Destroy 324 ;get rid of white shadow BlankLine END_COMMAND COMMAND ANY AtLocationGT 153 ;somewhere greater than room 151 AtLocationLT 163 ;in the orange section of 4th Present 206 ;cross here or OR Present 252 ;scepter here OR Present 261 ;orb here OR Present 277 ;amulet here OR Present 283 ;stone here TurnFlagON 50 ;death is set END_COMMAND COMMAND ANY AtLocationGT 163 ;in blue section AtLocationLT 170 ; Present 206 ;cross OR Present 234 ;ring OR Present 261 ;orb OR Present 277 ;amulet here OR Present 283 ;stone TurnFlagON 50 ;death set END_COMMAND COMMAND ANY AtLocationGT 169 ;in silver section AtLocationLT 178 ; Present 234 ;ring OR Present 252 ;scepter OR Present 261 ;orb OR Present 277 ;amulet OR Present 283 ;stone TurnFlagON 50 ;death set END_COMMAND COMMAND ANY AtLocationGT 177 ;in green section AtLocationLT 186 ; Present 206 ;cross OR Present 234 ;ring OR Present 252 ;scepter OR Present 261 ;orb OR Present 277 ;amulet TurnFlagON 50 ;death set END_COMMAND COMMAND ANY AtLocationGT 187 ;in red section AtLocationLT 199 ; Present 206 ;cross OR Present 234 ;ring OR Present 252 ;scepter OR Present 261 ;orb OR Present 283 ;stone TurnFlagON 50 ;death set END_COMMAND COMMAND ANY FlagON 50 ;death is comming PrintMessage 157 ;die by stones MinusScore 50 ;lose turn EndGame ;no use starting over now DoneWithTurn END_COMMAND COMMAND ANY FlagON 53 ;on swingset VerbIsDirection ;going to move TurnFlagOFF 53 ;shut swingset flag off PrintMessage 168 ;leave swingset FlagOFF 54 ;amulet not out of tree SendToRoom 277 0 ;make sure amulet stays in room 0 END_COMMAND COMMAND ANY FlagON 55 ;following rat VerbIsDirection ;going to move TurnFlagOFF 55 ;shut following flag off END_COMMAND COMMAND ANY AtLocation 195 ;in pit IsCarrying 291 ;has umbrella IsOpen 291 ;umbrella open PrintMessage 185 ;umbrella takes you up to island GoToRoom 190 ;on island now DoneWithTurn END_COMMAND COMMAND ANY AtLocation 197 ;in cave of wind IsCarrying 291 ;has umbrella IsOpen 291 ;umbrella is open PrintMessage 186 ;blown into sepulcher SendToRoom 291 42 ;hide umbrella GoToRoom 198 ;put player in sepulcher DoneWithTurn END_COMMAND COMMAND ANY AtLocation 140 ;in lab FlagON 63 ;ring in place FlagON 61 ;tailsman in place FlagON 60 ;amulet in place FlagON 59 ;scepter in place FlagON 57 ;cross in place FlagON 51 ;orb in place FlagON 62 ;shadow defeated PrintMessage 192 ;game win PlusScore 100 ;win game WinGame ;yea! DoneWithTurn END_COMMAND COMMAND ANY AtLocation 140 ;in lab FlagON 63 ;ring in place FlagON 61 ;tailsman in place FlagON 60 ;amulet in place FlagON 59 ;scepter in place FlagON 57 ;cross in place FlagON 51 ;orb in place FlagOFF 62 ;shadow still alive PrintMessage 193 ;game over shadow lives EndGame ;game over DoneWithTurn END_COMMAND COMMAND ANY FlagON 82 ;rat in hiding CounterEquals 9 30 ;20 moves hav elasped SendToRoom 325 100 ;put rat back in forest SendToRoom 248 78 ;put vial back in game TurnFlagOFF 82 ;shut rat off TurnCounterOFF 9 ;shut counter off END_COMMAND COMMAND LIGHT LAMP IsCarrying 207 ;routine to light lamp IsCarrying 200 ;carrying lighter FlagON 5 ;lamp has kerosene in it FlagOFF 2 ;Lamp is not already lit SetVariableTo 1 1 ;turn on light counter TurnFlagON 2 ;Light flag is on SwapLocations 219 207 ;get kersoene lit lamp PrintMessage 27 ;lamp lit with kerosene Destroy 208 ;put kerosene in room 0 DoneWithTurn END_COMMAND COMMAND LIGHT LAMP IsCarrying 207 ;routine to light lamp filled with gas IsCarrying 200 ;has lighter FlagON 6 ;lamp has gas FlagOFF 2 ;lamp is not already lit PrintMessage 23 ;Lamp now lit with gasoline TurnFlagON 4 ;flag for gas lit lamp SetVariableTo 1 1 ;start counter for light SwapLocations 218 207 ;get gas lamp for unlit lamp Destroy 215 ;put gasoline in room 0 DoneWithTurn END_COMMAND COMMAND LIGHT LAMP IsCarrying 218 ;routine to light already lit lamp OR ;is carryin a lit lamp IsCarrying 219 PrintMessage 25 ;print no luck message DoneWithTurn END_COMMAND COMMAND LIGHT LAMP FlagOFF 5 ;routine for no fuel FlagOFF 6 ;lamp not filled flag PrintMessage 15 ;no luck message DoneWithTurn END_COMMAND COMMAND LIGHT LAMP NOT IsCarrying 200 ;routine for no lighter PrintMessage 16 ;no luck message DoneWithTurn END_COMMAND COMMAND LIGHT ANY NOUNPresent PrintMessage 220 ;arsonist message DoneWithTurn END_COMMAND COMMAND EXTINGUISH LAMP Present 219 ;routine to extinquish lamp keroseme TurnFlagOFF 2 ;shut lamp burning flag off SwapLocations 207 219 ;get unlit lamp PrintMessage 26 ;extinguish lamp DoneWithTurn END_COMMAND COMMAND TURN OFF LAMP ReDirectTo EXTINGUISH LAMP DoneWithTurn END_COMMAND COMMAND EXTINGUISH LAMP Present 218 ;routine to try to turn off gas lamp PrintMessage 28 ;No luck message DoneWithTurn END_COMMAND COMMAND EMPTY LAMP IsCarrying 207 ;has lamp FlagON 5 ;has kerosene in lamp OR FlagON 6 ;or is filled with gas PrintMessage 89 ;dump fuel TurnFlagOFF 5 ;shut fuel flag off TurnFlagOFF 6 ;same DoneWithTurn END_COMMAND COMMAND EMPTY LAMP IsCarrying 218 ;has lit lamp OR IsCarrying 219 PrintMessage 90 ;too dangerous to dump lit lamp DoneWithTurn END_COMMAND COMMAND GIVE BONE TO THE DOG AtLocation 31 ;routine to tame dog Present 301 ;dog is present IsCarrying 201 ;player has ham bone PrintMessage 7 ;give bone to dog TurnCounterON 3 ;timer to time dog TurnFlagON 83 ;has given bone to dog SendToRoom 201 0 ;put ham bone in ROOM 0 BlankLine DoneWithTurn END_COMMAND COMMAND GIVE ANY TO THE DOG NOUNPresent PrintMessage 222 ;dog looks funny DoneWithTurn END_COMMAND COMMAND GIVE TALISMAN TO STATUE AtLocation 185 ;in shrine IsCarrying 283 ;has talisman PrintMessage 189 ;talisman give DropIt 283 ;drop talisman TurnFlagON 61 ;talisman in place IsGroupMember 321 ;shadow is in group PrintMessage 190 ;shadow held by statue TurnFlagOFF 41 ;shadow not group member TurnFlagOFF 42 ;shadow not bound Destroy 321 ;get rid of shadow TurnFlagON 62 ;shadow destroyed PlusScore 25 ;good job END_COMMAND COMMAND GIVE TALISMAN TO STATUE AtLocation 185 ;in shrine FlagOn 61 ;talisman is in place GoToRoom 142 ;send player to chamber PrintMessage 198 ;back in chamber PlusScore 25 ;good job DoneWithTurn END_COMMAND COMMAND GIVE ANY TO STATUE NOUNPResent ;noun here AtLocation 185 ;in shrine PrintMessage 223 ;statue refuse DoneWithTurn END_COMMAND COMMAND GIVE ANY TO ANY NOUNPresent ;noun is here ObjectPresent ;object here PrintMessage 224 ;nice try DoneWithTurn END_COMMAND COMMAND FOLLOW DOG AtLocation 31 ;routine to set flag to follow dog Present 301 ;dog is here in sporting goods PrintMessage 10 ;you start following dog TurnFlagOn 1 ;dog fleeing flag activated DoneWithTurn END_COMMAND COMMAND FOLLOW RAT AtLocation 100 ;at rat's intial location Present 325 ;rat is here PrintMessage 175 ;you start to follow rat TurnFlagON 55 ;flag that you started to follow rat DoneWithTurn END_COMMAND COMMAND FOLLOW ANY NOUNPresent ;noun here PrintMessage 225 ;you can't do that DoneWithTurn END_COMMAND COMMAND EXAMINE CRATE AtLocation 17 ;in storeroom Present 203 ;routine to put shovel in crate IsNowhere 202 ;spade in room 0 PrintMessage 12 ;find the spade PutInCurrentRoom 202 ;put spade in storeroom DoneWithTurn END_COMMAND COMMAND EXAMINE SHELF AtLocation 21 ;routine to put ham bone on shelf IsNowhere 201 ;bone in room 0 PrintMessage 13 ;find bone PutInCurrentRoom 201 ;put bone in grocery store DoneWithTurn END_COMMAND COMMAND EXAMINE RACK AtLocation 16 ;routine to put lamp on rack IsNowhere 207 ;lsmp in room 0 PrintMessage 14 ;find lamp PutInCurrentRoom 207 ;put lamp in hardware store DoneWithTurn END_COMMAND COMMAND EXAMINE COUNTER AtLocation 19 ;in the drug store IsNowhere 248 ;pill vial in room 0 PrintMessage 66 ;find vial PutInCurrentRoom 248 ;vial here now TurnFlagON 81 ;has found vial DoneWithTurn END_COMMAND COMMAND EXAMINE TABLE AtLocation 28 ;in clothing store IsNowhere 237 ;hat box not found yet PrintMessage 76 ;find hatbox PutInCurrentRoom 237 ;hat box now here DoneWithTurn END_COMMAND COMMAND EXAMINE TABLE AtLocation 19 ;in drug store IsNowhere 297 ;bird seed not here PrintMessage 226 ;find birdseed PutInCurrentRoom 297 ;put birdseed in room DoneWithTurn END_COMMAND COMMAND EXAMINE WEB AtLocation 90 ;at web IsNowhere 315 ;skeleton not here yet PrintMessage 97 ;skeleton in web PutInCurrentRoom 315 ;put skeleton in room DoneWithTurn END_COMMAND COMMAND EXAMINE CONSOLE AtLocation 141 ;in control room IsNowhere 262 ;console not examine before PrintMessage 129 ;find all buttons PutInCurrentRoom 262 ;put red button here PutInCurrentRoom 263 ;put green button here PutInCurrentRoom 264 ;put readout here PutInCurrentRoom 266 ;put orange button here PutInCurrentRoom 267 ;put blue button here TurnFlagON 80 ;console examined DoneWithTurn END_COMMAND COMMAND EXAMINE READOUT Present 264 ;readout is here FlagOFF 43 ;room safe PrintMessage 130 ;readout at 0 DoneWithTurn END_COMMAND COMMAND EXAMINE READOUT Present 264 ;readout is here FlagON 43 ;room unsafe CounterEquals 8 0 ;purge timer not started PrintMessage 131 ;readout reads 100 DoneWithTurn END_COMMAND COMMAND EXAMINE READOUT Present 264 ;readout is here FlagON 43 ;room is unsafe CounterEquals 8 2 ;purge started PrintMessage 132 ;readout at 75 DoneWithTurn END_COMMAND COMMAND EXAMINE READOUT Present 264 ;readout is here FlagON 43 ;room unsafe CounterEquals 8 3 ;purge half done PrintMessage 133 ;readout at 50 DoneWithTurn END_COMMAND COMMAND EXAMINE READOUT Present 264 ;readout is here FlagON 43 ;room unsafe CounterEquals 8 4 ;purge 3/4 completed PrintMessage 134 ;readout at 25 DoneWithTurn END_COMMAND COMMAND EXAMINE SKELETON AtLocation 90 ;at web IsNowhere 252 ;scepter in not here yet Present 315 ;skeleton is here PrintMessage 98 ;find scepter PutInCurrentRoom 252 ;put scepter in room DoneWithTurn END_COMMAND COMMAND EXAMINE BENCH Atlocation 131 ;at workshop IsNowhere 275 ;prybar not found yet PrintMessage 106 ;find prybar PutInCurrentRoom 275 ;put prybar in room DoneWithTurn END_COMMAND COMMAND EXAMINE POOL TABLE AtLocation 112 ;at recreation table FlagOFF 48 ;nine ball has not be gotten FlagOFF 49 ;eight ball has not be gotten PrintMessage 147 ;show full table DoneWithTurn END_COMMAND COMMAND EXAMINE POOL TABLE AtLocation 112 ;in recreation room FlagON 48 ;nine ball gone FlagOFF 49 ;eight ball has not been gotten PrintMessage 148 ;show table minus 9 ball DoneWithTurn END_COMMAND COMMAND EXAMINE POOL TABLE AtLocation 112 ;in recreation room FlagOFF 48 ;nine ball is here FlagON 49 ;eight ball is missing PrintMessage 149 ;show table with eight ball missing DoneWithTurn END_COMMAND COMMAND EXAMINE POOL TABLE AtLocation 112 ;in recreation room FlagON 48 ;nine ball is missing FlagON 49 ;eight ball is missing PrintMessage 150 ;show table with both balls missing DoneWithTurn END_COMMAND COMMAND EXAMINE DRESSER AtLocation 35 ;in hotel room PrintMessage 151 ;examine dresser DoneWithTurn END_COMMAND COMMAND EXAMINE SPRUCE AtLocation 64 ;in palyground FlagOFF 54 ;amulet not on ground PrintMessage 195 ;object in spruce DoneWithTurn END_COMMAND COMMAND SCREW FUSE IN HOLDER AtLocation 13 ;ROUTINE TO TURN ON PUMPS Present 209 ;open fuse box is here IsCarrying 211 ;got the fuse PrintMessage 20 ;put fuse in holder SwapLocations 209 216 ;swap good fuse box with bad TurnFlagON 3 ;gas pump flag on Destroy 211 ;put fuse in room 0 Destroy 217 ;put holder in room 0 DoneWithTurn END_COMMAND COMMAND ORDER BEER AtLocation 29 ;routine to order a beer in the bar FlagOFF 11 ;beer has not been ordered before IsCarrying 239 ;has coins Destroy 239 ;get rid of coins GetIt 224 ;give beer to player TurnFlagON 11 ;beer now ordered TurnFlagON 24 ;coins spent PrintMessage 37 ;serve beer DoneWithTurn END_COMMAND COMMAND ORDER BEER AtLocation 29 ;is in bar FlagOFF 11 ;no beer has been ordered NOT Present 239 ;coins not here PrintMessage 87 ;no doe no beer DoneWithTurn END_COMMAND COMMAND DRINK BEER NOT AtLocation 29 ;routine to drink beer outside bar FlagON 11 ;beer has been ordered IsCarrying 224 ;carrying the beer PrintMessage 38 ;drunk message BlankLine SendToRoom 224 0 ;put beer nowhere TurnFlagOFF 11 ;reset order flag DoneWithTurn END_COMMAND COMMAND DRINK BEER AtLocation 29 ;routine to drink beer in bar FlagOn 11 ;beer has been ordered Present 224 ;beer is present PrintMessage 39 ;fight starts SendToRoom 224 0 ;put beer nowhere TurnFlagOFF 11 ;reset order flag TurnFlagON 12 ;Fight has started TurnCounterON 4 ;start sheriff looking for you TurnFlagOFF 7 ;sherriff deactivate DoneWithTurn END_COMMAND COMMAND OPEN DESK AtLocation 37 ;routine to open desk with sheriff there Present 300 ;sheriff is there PrintMessage 64 ;sheriff does not allow it DoneWithTurn END_COMMAND COMMAND OPEN DESK AtLocation 37 ;routine to open desk IsNowhere 220 ;key in room 0 PrintMessage 46 ;find key PutInCurrentRoom 220 ;put key in room DoneWithTurn END_COMMAND COMMAND OPEN HATBOX AtLocation 65 ;at hostile statue Present 307 ;hostile statue is here IsCarrying 249 ;have pigeon in box PrintMessage 79 ;pigeon destroys statue PutInCurrentRoom 242 ;statue drops key PutInCurrentRoom 306 ;put pigeon here SwapLocations 249 237 ;put empty hatbox here SwapLocations 307 311 ;put destroyed statue here OpenIt 237 ;open hatbox PlusScore 15 ;good job DoneWithTurn END_COMMAND COMMAND OPEN HATBOX AtLocation 65 ;at hostile statue Present 307 ;hostile statue here IsCarrying 237 ;has empty hatbox PrintMessage 80 ;open empty hatbox DoneWithTurn END_COMMAND COMMAND OPEN HATBOX IsCarrying 249 ;has box with pigeon NOT Present 307 ;hostile statue not here PrintMessage 81 ;release pigeon PutInCurrentRoom 306 ;put pigeon in room DoneWithTurn END_COMMAND COMMAND RELEASE PIGEON ReDirectTo OPEN HATBOX END_COMMAND COMMAND OPEN CABINET AtLocation 15 ;at hardware office IsNowhere 245 ;file in room 0 PrintMessage 65 ;file found PutInCurrentRoom 245 ;get file OpenIt 244 ;file cabinet open DoneWithTurn END_COMMAND COMMAND OPEN DRESSER AtLocation 35 ;routine to get bible IsNowhere 227 ;bible in room 0 PrintMessage 53 ;find bible PutInCurrentRoom 227 ;put bible in current room DoneWithTurn END_COMMAND COMMAND OPEN COFFIN AtLocation 55 ;is in coffin room IsClosed 233 ;coffin is closed PrintMessage 61 ;opening coffin OpenIt 233 ;open coffin PutInCurrentRoom 304 ;put corpse in room DoneWithTurn END_COMMAND COMMAND OPEN ANY NOT AtLocation 20 ;not in cafe NOUNIsCreature ;dummy nound in use PrintMessage 227 ;can't do that DoneWithTurn END_COMMAND COMMAND HIDE AtLocation 29 ;routine to hide a bar FlagOFF 13 ;You have already hid FlagON 12 ;fight in progress PrintMessage 40 ;Sheriff shows up and players flee TurnFlagOn 13 ;key can be got GoToRoom 26 ;locate player outside SendToRoom 300 0 ;put sheriff in bar SendToRoom 302 0 BlankLine TurnFlagOFF 12 DoneWithTurn END_COMMAND COMMAND HIDE AtLocation 37 ;routine to hide with key in sheriff office IsCarrying 220 ;has the key FlagON 13 ;key can be got IsOpen 221 ;cell door open FlagON 15 PrintMessage 42 ;hiding in sheriffs office BlankLine SendToRoom 302 38 ;put patrons in jail SendToRoom 300 38 ;sheriff in jail TurnFlagOFF 13 ;disable key search TurnFlagON 14 PrintMessage 47 ;sherriff enters jail TurnCounterON 5 ;activate sheriff counter DoneWithTurn END_COMMAND COMMAND HIDE AtLocation 35 ;routine to hide in bed PrintMessage 57 ;hide in bed GoToRoom 57 ;put in bed DoneWithTurn END_COMMAND COMMAND HIDE PrintMessage 43 ;routine not to hide DoneWithTurn END_COMMAND COMMAND GO TO BED AtLocation 35 ;routine to go to bed PrintMessage 55 ;enter bed GoToRoom 57 ;put in bed DoneWithTurn END_COMMAND COMMAND GO TO PULPIT AtLocation 27 ;set up for opening pulpit PrintMessage 54 ;go to pulp GoToRoom 56 ;place at pulpit SetVariableTo 3 0 ;variable for amen set off DoneWithTurn END_COMMAND COMMAND GO TO ARCHWAY AtLocation 140 ;in lab Present 256 ;archway is working PrintMessage 143 ;teleported to 4th diminsion GoToRoom 142 ;send to chamber SendToRoom 256 142 ;send archway to chamber DoneWithTurn END_COMMAND COMMAND GO TO ARCHWAY AtLocation 142 ;in chamber Present 256 ;archway is working PrintMessage 144 ;teleported back to lab GoToRoom 140 ;send to lab SendToRoom 256 140 ;send archway to lab DoneWithTurn END_COMMAND COMMAND GO TO ARCHWAY AtLocation 140 ;in lab Present 255 ;non working archway here PrintMessage 145 ;nothing happens DoneWithTurn END_COMMAND COMMAND GO TO ARCHWAY AtLocation 142 ;in chamber NOT Present 256 ;archway is gone PrintMessage 146 ;up the creek DoneWithTurn END_COMMAND COMMAND GO TO SWINGSET AtLocation 64 ;in plauground FlagOFF 53 ;not on swingset PrintMessage 194 ;now on swing TurnFlagON 53 ;marker for flag DoneWithTurn END_COMMAND COMMAND GO TO BOAT AtLocation 74 ;at boat dock Present 296 ;boat is here PrintMessage 228 ;enter boat GoToRoom 76 ;go to boat DoneWithTurn END_COMMAND COMMAND GO TO BOAT AtLocation 78 ;on the beach Present 296 ;boat is here PrintMessage 228 ;enter boat GoToRoom 77 ;go to boat DoneWithTurn END_COMMAND COMMAND GO TO ANY PrintMessage 232 ;can't do that DoneWithTurn END_COMMAND COMMAND SLEEP AtLocation 57 ;routine to sleep PrintMessage 52 ;fitfull sleep DoneWithTurn END_COMMAND COMMAND SLEEP NOT AtLocation 35 ;routine to sleep not in bed PrintMessage 51 ;can't sleep DoneWithTurn END_COMMAND COMMAND LOCK DOOR WITH KEY AtLocation 37 ;routine to lock sheriff in FlagON 14 ;sheriff is present in cell IsCarrying 220 ;has key SendToRoom 300 0 ;sheriff now nowhere TurnFlagOFF 7 ;sheriff deactivated TurnCounterOFF 5 ;stop timer for sheriff escape PutInCurrentRoom 223 ;change to bent key Destroy 220 ;hide good key PrintMessage 44 ;mad sheriff PlusScore 25 ;good job TurnFlagOFF 14 ;reset arrest flag ChangePassageway 4 0 ;close passage to cell LockIt 221 ;lock cell door DoneWithTurn END_COMMAND COMMAND LOCK DOOR WITH KEY AtLocation 74 ;is at boat dock IsCarrying 242 ;has the key IsUnLocked 241 ;door is unlocked IsClosed 241 ;door is closed PrintMessage 83 ;door now lock LockIt 241 ;door now locked DoneWithTurn END_COMMAND COMMAND LOCK CONSOLE WITH KEY AtLocation 141 ;in control room IsCarrying 273 ;has key IsUnLocked 268 ;console is open PrintMessage 136 ;lock console LockIt 268 ;lock console TurnFlagOFF 44 ;console locked DoneWithTurn END_COMMAND COMMAND UNLOCK DOOR WITH KEY AtLocation 37 ;routine open passageway IsCarrying 220 ;has key ChangePassageway 4 38 ;open passage UnLockIt 221 ;unlock door PrintMessage 45 ;unlock jail door TurnFlagON 15 ;door unlock flag DoneWithTurn END_COMMAND COMMAND UNLOCK DOOR WITH KEY AtLocation 74 ;at boat dock IsCarrying 242 ;has right key IsLocked 241 ;door is locked PrintMessage 82 ;door now unlock UnlockIt 241 ;unlock the door ChangePassageway 4 75 ;open passageway DoneWithTurn END_COMMAND COMMAND UNLOCK CONSOLE WITH KEY AtLocation 141 ;in control room FlagON 80 ;console has been examined IsCarrying 273 ;has square key IsLocked 268 ;console is locked PrintMessage 135 ;unlock console TurnFlagON 44 ;console unlocked UnLockIt 268 ;console unlocked DoneWithTurn END_COMMAND COMMAND UNLOCK TRUNK WITH PRYBAR ReDirectTo PRY TRUNK END_COMMAND COMMAND DIG IsCarrying 202 ;routine to dig hole AtLocation 44 ;at cemetery IsLocated 201 49 ;dog has buried bone NOT Present 226 ;hole not here PrintMessage 48 ;dig in grave ChangePassageway 10 49 ;open up new passage PutInCurrentRoom 226 ;put hole in cemetery DoneWithTurn END_COMMAND COMMAND DIG IsCarrying 202 ;routine to dig elsewhere PrintMessage 49 ;no hole capable DoneWithTurn END_COMMAND COMMAND READ BIBLE Present 227 ;routine to have note fall from bible IsNowhere 228 ;note has not been found PrintMessage 50 ;note falls from bible PutInCurrentRoom 228 ;get note END_COMMAND COMMAND READ JOURNAL ReDirectTo TURN PAGE DoneWithTurn END_COMMAND COMMAND READ READOUT ReDirectTo EXAMINE CONSOLE END_COMMAND COMMAND SHOUT AMEN AtLocation 56 ;routine to open pulpit AddToVariable 3 1 ;couter of amen being said VariableEquals 3 3 ;amen said three times PrintMessage 56 ;pulpit opens SendToRoom 229 56 ;put shaft at pulpit ChangePassageway 10 48 ;create down steps PlusScore 15 ;good job Destroy 305 DoneWithTurn END_COMMAND COMMAND WAVE CROSS AT VAMPIRE FlagON 18 ;vampire in room IsCarrying 206 ;have the cross LightPresent ;room has light PrintMessage 59 ;vampire scared SendToRoom 303 0 ;put vampire in room 0 TurnFlagOFF 18 ;reset vampire flag DoneWithTurn END_COMMAND COMMAND WAVE CROSS FlagOFF 18 ;vampire not in room IsCarrying 206 ;have cross LightPresent ;room has light PrintMessage 60 ;no vampire DoneWithTurn END_COMMAND COMMAND WAVE CROSS AT VAMPIRE IsCarrying 206 ;has cross RoomNeedsLight ;room needs light PrintMessage 63 ;wave in dark DoneWithTurn END_COMMAND COMMAND WAVE SCEPTER AT BAT IsCarrying 252 ;has scepter Present 322 ;bat is here PrintMessage 125 ;light scares bat away Destroy 322 ;get rid of bat DoneWithTurn END_COMMAND COMMAND WAVE SCEPTER IsCarrying 252 ;has scepter PrintMessage 233 ;wave the scepter DoneWithTurn END_COMMAND COMMAND WAVE TALISMAN AT SHADOW IsCarrying 283 ;has stone Present 321 ;shadow is here FlagOFF 42 ;shadow not already bond PrintMessage 166 ;shadow now bond AddToGroup 321 ;now following TurnFlagON 42 ;flag for shadow to follow everywhere DoneWithTurn END_COMMAND COMMAND WAVE TALISMAN IsCarrying 283 ;has talisman PrintMessage 234 ;wave talisman DoneWithTurn END_COMMAND COMMAND WAVE ANY NOUNPresent ;noun here PrintMessage 235 ;wave anything DoneWithTurn END_COMMAND COMMAND SEARCH CORPSE AtLocation 55 ;in corpse room Present 304 ;corpse is here PrintMessage 62 ;search corpse PutInCurrentRoom 234 ;put ring in room PlusScore 20 ;good job DoneWithTurn END_COMMAND COMMAND SEARCH FOUNTAIN AtLocation 69 ;at fountain IsNowhere 308 ;werewolf is dead FlagOFF 24 ;coins haven't been spent PrintMessage 75 ;find coins PutInCurrentRoom 239 ;put coins in room DoneWithTurn END_COMMAND COMMAND SEARCH DESK AtLocation 133 ;in office IsNowhere 270 ;journal has not been found yet PrintMessage 108 ;find journal PutInCurrentRoom 270 ;put journal in room DoneWithTurn END_COMMAND COMMAND SEARCH OVERCOAT Present 259 ;overcoat is here IsNowhere 260 ;gum wrapper has not been found PrintMessage 114 ;find gum wrapper PutInCurrentRoom 260 ;put wrapper in room GetIt 260 ;put wrapper in possesion DoneWithTurn END_COMMAND COMMAND SEARCH TRUNK Present 274 ;trunk is here FlagON 40 ;it has been opened IsNowhere 261 ;orb not found yet PrintMessage 124 ;find orb PutInCurrentRoom 261 ;put orb in room PlusScore 20 ;good job DoneWithTurn END_COMMAND COMMAND SEARCH ANY NOUNPresent ;noun here PrintMessage 229 ;find nothing DoneWithTurn END_COMMAND COMMAND TURN RIGHT AtLocation 18 ;is in bank FlagOFF 22 ;vault is close FlagOFF 19 ;no right answer yet PrintMessage 72 ;how many times GetNumberInput 1 20 ;check first combination NumberEquals 4 ;check answer PrintMessage 73 ;to what number GetNumberInput 1 100 ;get combination number NumberEquals 9 ;right number TurnFlagON 19 ;first response correct PrintMessage 67 ;dial turned right DoneWithTurn END_COMMAND COMMAND TURN LEFT AtLocation 18 ;is in bank FlagOFF 22 ;vault is close FlagON 19 ;first answer right PrintMessage 72 ;how many times GetNumberInput 1 20 ;check second combination NumberEquals 3 ;check answer PrintMessage 73 ;what number? GetNumberInput 1 100 ;get answer NumberEquals 96 ;right answer TurnFlagON 20 ;second answer right PrintMessage 67 ;dial turned right DoneWithTurn END_COMMAND COMMAND TURN RIGHT AtLocation 18 ;is in bank FlagOFF 22 ;vault is close FlagON 19 ;first answer correct FlagON 20 ;second answer correct PrintMessage 72 ;how many times GetNumberInput 1 20 ;check answer NumberEquals 2 ;right answer PrintMessage 73 ;what number GetNumberInput 1 100 ;get answer NumberEquals 4 ;right answer TurnFlagON 21 ;third combination flag set PrintMessage 67 ;dial turned right DoneWithTurn END_COMMAND COMMAND TURN LEFT AtLocation 18 ;is in bank FlagOFF 22 ;vault is close FlagOn 19 ;first question right FlagON 20 ;second question right FlagON 21 ;third question right PrintMessage 73 ;to what number GetNumberInput 1 100 ;get combination NumberEquals 50 ;right number ChangePassageway 4 10 ;open passage to vault TurnFlagOn 22 ;vault open PlusScore 25 ;good job PrintMessage 68 ;vault open Destroy 299 ;destroy lock door DoneWithTurn END_COMMAND COMMAND TURN LEFT AtLocation 18 ;in bank FlagOFF 22 ;vault still close PrintMessage 69 ;wrong combination TurnFlagOFF 19 ;turn all combination flag off TurnFlagOFF 20 TurnFlagOFF 21 DoneWithTurn END_COMMAND COMMAND TURN LEFT AtLocation 18 ;at bank FlagON 22 ;vault open PrintMessage 70 ;can't turn dial DoneWithTurn END_COMMAND COMMAND TURN RIGHT AtLocation 18 ;in bank FlagOFF 22 ;vault still close PrintMessage 69 ;wrong combination TurnFlagOFF 19 ;turn all combination flag off TurnFlagOFF 20 TurnFlagOFF 21 DoneWithTurn END_COMMAND COMMAND TURN RIGHT AtLocation 18 ;at bank FlagON 22 ;vault open PrintMessage 70 ;can't turn dial DoneWithTurn END_COMMAND COMMAND TURN PAGE IsCarrying 270 ;has journal FlagOFF 34 ;first page flag off PrintMessage 109 ;read 1st page of journal TurnFlagON 34 ;mark first page DoneWithTurn END_COMMAND COMMAND TURN PAGE IsCarrying 270 ;has journal FlagON 34 ;first page read FlagOFF 35 ;second page not read PrintMessage 110 ;read second page TurnFlagON 35 ;mark second page DoneWithTurn END_COMMAND COMMAND TURN PAGE IsCarrying 270 ;has journal FlagON 35 ;second page read FlagOFF 36 ;third page not read yet PrintMessage 111 ;read third page TurnFlagON 36 ;mark third page DoneWithTurn END_COMMAND COMMAND TURN PAGE IsCarrying 270 ;has journal FlagON 36 ;third page read FlagOFF 37 ;fourth page not read yet PrintMessage 112 ;read fourth page TurnFlagOFF 34 ;reset book TurnFlagOFF 35 ;reset book TurnFlagOFF 36 ;book now reset DoneWithTurn END_COMMAND COMMAND TURN DIAL AtLocation 141 ;in control room FlagON 45 ;generator is working FlagOFF 46 ;archway is off PrintMessage 140 ;archway starts TurnFlagON 46 ;archway now on SwapLocations 255 256 ;move working archway in TurnFlagON 43 ;room unsafe DoneWithTurn END_COMMAND COMMAND TURN DIAL AtLocation 141 ;in control room FlagON 45 ;generator is working FlagON 46 ;archway is on PrintMessage 141 ;archway is turned off TurnFlagOFF 46 ;archway off SwapLocations 256 255 ;put non working arch in room DoneWithTurn END_COMMAND COMMAND TURN DIAL AtLocation 141 ;in control room PrintMessage 152 ;nothing happens DoneWithTurn END_COMMAND COMMAND TURN KNOB AtLocation 168 ;in tiny room FlagON 58 ;knob in door PrintMessage 181 ;now in alcove SwapLocations 288 289 ;put regular door here TurnFlagOFF 58 ;shut flag down GoToRoom 169 ;in alcove DoneWithTurn END_COMMAND COMMAND TURN ANY NOUNPresent ;noun is here PrintMessage 236 ;can't do that DoneWithTurn END_COMMAND COMMAND LOAD GUN IsCarrying 235 ;has gun IsCarrying 236 ;has bullet PrintMessage 71 ;load gun Destroy 236 ;get rid of bullet TurnFlagON 23 ;loaded gun flag on DoneWithTurn END_COMMAND COMMAND SHOOT GUN AT WEREWOLF AtLocation 69 ;at fountain Present 308 ;werewolf is here IsCarrying 235 ;has gun FlagON 23 ;gun is loaded with silver bullet PrintMessage 74 ;shoot werewolf TurnFlagON 25 ;werewolf dead Destroy 308 ;get rid of werewolf TurnFlagOFF 23 ;reset gun flag PlusScore 15 ;good job DoneWithTurn END_COMMAND COMMAND SHOOT WEREWOLF WITH GUN ReDirectTo SHOOT GUN AT WEREWOLF DoneWithTurn END_COMMAND COMMAND SHOOT GUN AT ANY ObjectPresent ;object is here PrintMessage 237 ;no good DoneWithTurn END_COMMAND COMMAND SHOOT ANY WITH GUN NOUNPresent ;noun is here PrintMessage 237 ;no good DoneWithTurn END_COMMAND COMMAND CAPTURE PIGEON Present 306 ;pigeon is here IsCarrying 237 ;has hatbox IsCarrying 297 ;has birdseed IsCarrying 298 ;has stick PrintMessage 77 ;capture pigeon SwapLocations 237 249 ;now has pigeon in box SendToRoom 306 0 ;send pigeon to room 0 DropIt 249 ;drop box DropIt 297 ;drop birdseed DropIt 298 ;drop stick DoneWithTurn END_COMMAND COMMAND CAPTURE PIGEON Present 306 ;pigeon is here NOT Present 237 ;doesn't have hatbox OR NOT Present 297 ;does not have birdseed OR NOT Present 298 ;does not have stick PrintMessage 78 ;fail to capture pigeon DoneWithTurn END_COMMAND COMMAND CAPTURE RAT Present 320 ;rat is here PrintMessage 107 ;secret door opens GoToRoom 131 ;put player in work shop PlusScore 5 ;good job SendToRoom 396 51 ;put passage in delivery room Destroy 320 ;get rid of rat DoneWithTurn END_COMMAND COMMAND CAPTURE ANY NOUNPresent ;noun is here PrintMessage 230 ;how? DoneWithTurn END_COMMAND COMMAND ROW BOAT AtLocation 76 ;is in boat IsCarrying 240 ;has oars PrintMessage 84 ;cross lake ChangePassageway 12 0 ;closepassage GoToRoom 77 ;go to boat on beach ChangePassageway 12 78 ;open passage SendToRoom 296 78 ;send boat to room 78 DoneWithTurn END_COMMAND COMMAND ROW BOAT AtLocation 77 ;is in boat IsCarrying 240 ;has oars PrintMessage 84 ;cross lake Changepassageway 12 0 ;close passage here GoToRoom 76 ;go to boat by dock Changepassageway 12 74 ;open passage SendToRoom 296 74 ;send boat to room 76 DoneWithTurn END_COMMAND COMMAND ROW BOAT AtLocation 76 ;is in boat OR AtLocation 77 NOT Present 240 ;no oars PrintMessage 85 ;dummy no oars DoneWithTurn END_COMMAND COMMAND TOUCH WEB AtLocation 90 ;at web PrintMessage 92 ;web vibrates FlagOFF 27 ;spider not already following FlagOFF 26 ;spider is alive BlankLine PutInCurrentRoom 314 ;put spider in room PrintMessage 93 ;spider eyes you TurnFlagON 27 ;spider can follow TurnCounterON 6 ;spider counter now activated AddToGroup 314 ;spider now part of group DoneWithTurn END_COMMAND COMMAND TOUCH ANY NOUNPresent ;noun here NOUNIsCreature PrintMessage 238 ;feels good DoneWithTurn END_COMMAND COMMAND GET SCEPTER FlagOFF 28 ;scepter in web PrintMessage 99 ;scepter stuck in web ReDirectTo TOUCH WEB END_COMMAND COMMAND GET SCEPTER FlagON 28 ;scepter free FlagOFF 26 ;spider is still alive PrintMessage 104 ;spider will not let you get scepter DoneWithTurn END_COMMAND COMMAND GET BALL AtLocation 112 ;in recreation room IsNowhere 265 ;nine ball not here PrintMessage 115 ;ask what ball to get GetNumberInput 1 15 ;prompt for number TurnFlagON 39 ;turn flag on for asking for ball NumberEquals 9 ;gets right ball TurnFlagOFF 39 ;correct answer TurnFlagON 48 ;nine ball off table PrintMessage 116 ;picks up right ball GetIt 265 ;now carrying nine ball DoneWithTurn END_COMMAND COMMAND GET BALL FlagON 39 ;got wrong ball IsCarrying 272 ;has a ball now PrintMessage 117 ;already have a ball DoneWithTurn END_COMMAND COMMAND GET BALL FlagON 39 ;wrong ball number IsNowhere 272 ;wron ball has not been gotten PrintMessage 118 ;gets wrong ball GetIt 272 ;picks up wrong ball TurnFlagON 49 ;eight ball off table DoneWithTurn END_COMMAND COMMAND GET ORB AtLocation 142 ;in orb room Present 281 ;orb in hole PrintMessage 160 ;get orb from hole SwapLocations 281 261 ;get regular orb GetIt 261 ;pick up orb TurnFlagOFF 51 ;reset orb flag DoneWithTurn END_COMMAND COMMAND GET RING AtLocation 141 ;in control room Present 282 ;ring on console here PrintMessage 165 ;takes ring from console SwapLocations 234 282 ;put ring here GetIt 234 ;pick up ring TurnFlagOFF 52 ;console no longer protected DoneWithTurn END_COMMAND COMMAND GET AMULET FlagON 53 ;on swingset FlagOFF 54 ;amulet not off yet VariableGT 5 2 ;has found amulet PrintMessage 173 ;fail to get amulet TurnFlagOFF 53 ;reset swing SetVariableTo 5 0 ;reset variable counter SendToRoom 277 0 ;put amulet back in room 0 DoneWithTurn END_COMMAND COMMAND GET ANY NOUNIsCreature ;trying a creature NOUNPresent ;creature is here PrintMessage 155 ;can't get that DoneWithTurn END_COMMAND COMMAND SWAT FLY AtLocation 104 ;at fly area Present 317 ;fly is here PrintMessage 100 ;fly gets mad TurnCounterON 7 ;fly counter on AddToGroup 317 ;fly starts following TurnFlagON 29 ;flag fly is following DoneWithTurn END_COMMAND COMMAND SWAT ANY NOUNPresent ;noun is here PrintMessage 239 ;can't swat that DoneWithTurn END_COMMAND COMMAND DROP LAMP IsCarrying 218 ;has gas lamp IsON 218 ;is lit AtLocation 105 ;is at gate TurnFlagON 32 ;lamp at proper place DropIt 218 ;drops lamp PrintMessage 231 ;drops at gate DoneWithTurn END_COMMAND COMMAND DROP TALISMAN FlagON 42 ;shadow is bond by it NOT AtLocation 185 ;not in shrine IsCarrying 283 ;has stone PrintMessage 167 ;shadow now free TurnFlagOFF 42 ;release shadow TurnFlagOFF 41 ;no longer groupmember SendToRoom 321 123 ;put shadow back in bedroom DropIt 278 ;drop talisman DoneWithTurn END_COMMAND COMMAND DROP VIAL FlagON 55 ;following rat IsCarrying 248 ;has vial PrintMessage 176 ;rat takes vial and you follow SendToRoom 248 199 ;send vial to nest SendToRoom 325 199 ;send rat to nest GoToRoom 199 ;send player to nest TurnFlagOFF 55 ;shut following flag off PlusScore 15 ;good job DoneWithTurn END_COMMAND COMMAND DROP VIAL AtLocation 100 ;in rat room Present 325 ;rat is here IsCarrying 248 ;has vial FlagOFF 55 ;not following PrintMessage 177 ;rat takes vial and flees SendToRoom 325 199 ;send rat to nest SendToRoom 248 199 ;put vial in nest TurnCounterON 9 ;turn rat timer on TurnFlagON 82 ;rat is hiding DoneWithTurn END_COMMAND COMMAND DROP ANY AtLocation 76 ;in boat OR AtLocation 77 ;in boat PrintMessage 250 ;bad idea to drop items here DoneWithTurn END_COMMAND COMMAND SHINE ORB AT PLAQUE AtLocation 133 ;in office IsCarrying 261 ;has orb FlagOFF 38 ;secret passage is closed PrintMessage 113 ;open secret passage ChangePassageway 1 135 ;create a passageway TurnFlagON 38 ;flag for secret pass is opened Destroy 232 ;get rid of plaque PutInCurrentRoom 358 ;put passage here DoneWithTurn END_COMMAND COMMAND SHINE ANY AT PLAQUE AtLocation 133 ;in office NOUNIsCarrying ;has noun FlagOFF 38 ;plaque still here PrintMessage 240 ;can't do it DoneWithTurn END_COMMAND COMMAND PUT NINE BALL ON SHELF AtLocation 107 ;in pantry IsNowhere 273 ;key not found IsCarrying 265 ;has nine ball PrintMessage 119 ;ball rolls and find key PutInCurrentRoom 273 ;put key in room DropIt 265 ;put ball in room PlusScore 15 ;good job DoneWithTurn END_COMMAND COMMAND PUT POOL BALL ON SHELF AtLocation 107 ;in pantry IsNowhere 273 ;key not found IsCarrying 272 ;has wrong ball PrintMessage 120 ;ball falls of shelf DropIt 272 ;put ball in room DoneWithTurn END_COMMAND COMMAND PUT BALL ON SHELF AtLocation 107 ;in pantry IsSomewhere 273 ;key has been found IsCarrying 272 ;has other ball OR IsCarrying 265 ;has nine ball PrintMessage 121 ;ball rolls on shelf DoneWithTurn END_COMMAND COMMAND PUT ORB IN HOLE AtLocation 142 ;at apex IsCarrying 261 ;has the orb DropIt 261 ;drop orb PrintMessage 158 ;put orb in hole SwapLocations 261 281 ;get orb in hole TurnFlagON 51 ;orb is set IsNowhere 285 ;dull stone not present PrintMessage 197 ;find full stone PutInCurrentRoom 285 ;put stone in room DoneWithTurn END_COMMAND COMMAND PUT ANY IN HOLE AtLocation 142 ;at apex FlagOFF 51 ;nothing in hole NOUNIsCarrying ;has any PrintMessage 159 ;try to put any in hole DoneWithTurn END_COMMAND COMMAND PUT RING ON CONSOLE AtLocation 141 ;in control room IsCarrying 234 ;has ring OR IsWearing 234 PrintMessage 163 ;put ring on console TurnFlagON 52 ;console now protected DropIt 234 ;drop ring SwapLocations 234 282 ;get ring on counter DoneWithTurn END_COMMAND COMMAND PUT ANY ON CONSOLE AtLocation 141 ;in control room NOUNIsCarrying ;has any PrintMessage 164 ;rolls of console DoneWithTurn END_COMMAND COMMAND PUT CROSS ON ALTAR AtLocation 170 ;in structure room IsCarrying 206 ;has cross PrintMessage 179 ;find door knob PutInCurrentRoom 287 ;put knob in roo GetIt 287 ;get knob DropIt 206 ;drop cross GoToRoom 142 ;send player to chamber PlusScore 20 ;good job TurnFlagON 57 ;cross is in position DoneWithTurn END_COMMAND COMMAND PUT KNOB ON DOOR AtLocation 168 ;in tiny room IsCarrying 287 ;has knob PrintMessage 180 ;put knob on door TurnFlagON 58 ;knob on door SwapLocations 288 289 ;door with knob no here SendToRoom 287 42 ;hide knob DoneWithTurn END_COMMAND COMMAND PUT SCEPTER ON PEDESTAL AtLocation 169 ;in alcove IsCarrying 252 ;has scepter PrintMessage 182 ;find umbrella DropIt 252 ;drop scepter PutInCurrentRoom 291 ;put umbrella in room GetIt 291 ;pick up umbrella TurnFlagON 59 ;scepter in place GoToRoom 142 ;send player back to chamber PlusScore 20 ;good job DoneWithTurn END_COMMAND COMMAND PUT AMULET ON STAND AtLocation 198 ;in sepulcher room IsCarrying 277 ;has amulet PrintMessage 187 ;put amulet on table DropIt 277 ;drop amulet PutInCurrentRoom 293 ;horn GetIt 293 ;get horn TurnFlagON 60 ;amulet in place GoToRoom 142 ;send player back to chamber PlusScore 20 ;good job DoneWithTurn END_COMMAND COMMAND PUT RING ON FINGER AtLocation 155 ;in hand room IsCarrying 234 ;has ring PrintMessage 191 ;ring on the finger DropIt 234 ;drop ring GoToRoom 142 ;put player back in chamber TurnFlagON 63 ;ring in place PlusScore 20 ;good job DoneWithTurn END_COMMAND COMMAND PUSH BUTTON AtLocation 141 ;at control room FlagON 44 ;console unlocked PrintMessage 137 ;everything stops TurnFlagOFF 45 ;generator down TurnFlagOFF 46 ;archway off TurnFlagOFF 47 ;purger off TurnCounterOFF 8 ;purger timer off SendToRoom 255 140 ;put non working arch in lab SendToRoom 256 0 ;put working arch in room 0 DoneWithTurn END_COMMAND COMMAND PUSH BUTTON AtLocation 141 ;in control room PrintMessage 152 ;nothing happens DoneWithTurn END_COMMAND COMMAND PRY TRUNK Present 274 ;trunk is here IsCarrying 275 ;has prybar Present 322 ;bat is here PrintMessage 122 ;bat prevents trunk from being open DoneWithTurn END_COMMAND COMMAND PRY TRUNK Present 274 ;trunk is here IsCarrying 275 ;has prybar FlagOFF 40 ;trunk not open PrintMessage 123 ;opens trunk TurnFlagOn 40 ;trunk now open DoneWithTurn END_COMMAND COMMAND PRY ANY NOUNPresent ;noun is here PrintMessage 241 ;can't pry DoneWithTurn END_COMMAND COMMAND FLIP SWITCH AtLocation 141 ;in control room FlagOFF 45 ;generator not on FlagON 44 ;console unlocked PrintMessage 139 ;generator starts TurnFlagON 45 ;generator flag on DoneWithTurn END_COMMAND COMMAND FLIP SWITCH AtLocation 141 ;in control room FlagON 45 ;generator is on PrintMessage 138 ;generator stops TurnFlagOFF 45 ;shut generator down TurnFlagOFF 46 ;shut arch off SendToRoom 255 140 ;put nonworking arch in lab SendToRoom 256 0 ;put working arch in room 0 DoneWithTurn END_COMMAND COMMAND FLIP SWITCH AtLocation 141 ;in control room PrintMessage 152 ;nothing happens DoneWithTurn END_COMMAND COMMAND SLIDE LEVER AtLocation 141 ;at control room FlagOFF 47 ;purger is off FlagON 43 ;room unsafe PrintMessage 153 ;purger starts TurnFlagON 47 ;purger is now on TurnCounterON 8 ;start purge timer DoneWithTurn END_COMMAND COMMAND SLIDE LEVER AtLocation 141 ;at control room FlagON 47 ;purger is on FlagON 43 ;room is unsafe PrintMessage 154 ;purger stops TurnCounterOFF 8 ;shut timer off TurnFlagOFF 47 ;purger shut down DoneWithTurn END_COMMAND COMMAND SLIDE LEVER AtLocation 141 ;at control room PrintMessage 152 ;nothing happens DoneWithTurn END_COMMAND COMMAND SWING FlagOn 53 ;on swing set LoadWeightGT 10 ;too heavy to swing PrintMessage 196 ;can't swing DoneWithTurn END_COMMAND COMMAND SWING FlagON 53 ;onswingset AddToVariable 5 1 ;increase variable by one VariableEquals 5 1 ;one swing PrintMessage 169 ;first swing DoneWithTurn END_COMMAND COMMAND SWING FlagON 53 ;on swingset VariableEquals 5 2 ;second swing PrintMessage 170 ;second swing DoneWithTurn END_COMMAND COMMAND SWING FlagON 53 ;on swingset VariableGT 5 2 ;swung more than twice FlagOFF 54 ;amulet not found yet PrintMessage 171 ;find amulet PutInCurrentRoom 277 ;put amulet here PlusScore 20 ;good job DoneWithTurn END_COMMAND COMMAND SWING FlagON 53 ;on swingset VariableGT 5 2 ;more than two swings FlagON 54 ;amulet found PrintMessage 172 ;having fun DoneWithTurn END_COMMAND COMMAND KICK AMULET FlagON 53 ;on swingset FlagOFF 54 ;amulet still in tree VariableGT 5 2 ;can be kicked PrintMessage 174 ;kick amulet TurnFlagON 54 ;amulet now out of tree DoneWithTurn END_COMMAND COMMAND THROW STONE AT STRUCTURE AtLocation 172 ;in void with structure IsCarrying 285 ;has stone PrintMessage 178 ;structure swallows you up. SendToRoom 285 42 ;get rid of stone GoToRoom 170 ;put player inside structure DoneWithTurn END_COMMAND COMMAND THROW LAMP AT GATE ReDirectTo DROP LAMP END_COMMAND COMMAND THROW ANY AT ANY ObjectIsCreature ;creature here ObjectPresent ;creatrue here NOUNPresent ;noun is here PrintMessage 242 ;can't do that DoneWithTurn END_COMMAND COMMAND JUMP AtLocation 190 ;on the island IsCarrying 291 ;has umbrella IsClosed 291 ;umbrella closed PrintMessage 183 ;jumping GoToRoom 195 ;go to pit DoneWithTurn END_COMMAND COMMAND JUMP AtLocation 190 ;at island NOT IsCarrying 291 ;does not have umbrella PrintMessage 183 ;jumping GoToRoom 195 ;go to pit DoneWithTurn END_COMMAND COMMAND JUMP AtLocation 190 ;at island IsCarrying 291 ;has umbrella IsOpen 291 ;umbrella open PrintMessage 184 ;blown back up DoneWithTurn END_COMMAND COMMAND JUMP PrintMessage 243 ;fun jumping DoneWithTurn END_COMMAND COMMAND BLOW HORN AtLocation 184 ;in pulsating room IsCarrying 293 ;has horn PrintMessage 188 ;blows horn SendToRoom 293 42 ;hide horn GoToRoom 185 ;put in shrine DoneWithTurn END_COMMAND COMMAND TALK TO ANY ABOUT ANY NOUNPresent ;creature is here PrintMessage 244 ;little foolish DoneWithTurn END_COMMAND COMMAND TELL ANY ABOUT ANY NOUNPresent ;creature is here PrintMessage 244 ;little foolish DoneWithTurn END_COMMAND COMMAND ASK ANY ABOUT ANY NOUNPresent ;creature is here PrintMessage 244 ;little foolish DoneWithTurn END_COMMAND COMMAND ATTACK ANY NOUNPresent ;creature is here PrintMessage 245 ;sure DoneWithTurn END_COMMAND COMMAND PRAY AtLocation 27 ;at church OR AtLocation 56 ;at pulpit PrintMessage 246 ;pray in church DoneWithTurn END_COMMAND COMMAND PRAY PrintMessage 247 ;praying DoneWithTurn END_COMMAND COMMAND FEED ANY NOUNIsCreature ;try to feed something PrintMessage 249 ;can't feed tthat DoneWithTurn END_COMMAND COMMAND FILL LAMP WITH KEROSENE Atlocation 12 ;routine to fill lamp with kerosene IsCarrying 207 ;has unlit lamp FlagOFF 5 ;Lamp is not already filled fuel FlagOFF 6 ; " FlagON 3 ;gas pumps are working PrintMessage 21 ;lamp filled TurnFlagON 5 ;lamp filled flag on DoneWithTurn END_COMMAND COMMAND FILL LAMP WITH KEROSENE AtLocation 12 ;at gas station IsCarrying 207 ;has lamp FlagON 6 ;lamp has gas OR FlagON 5 ;lamp has kerosene PrintMessage 248 ;already have fuel in lamp DoneWithTurn END_COMMAND COMMAND FILL LAMP WITH GASOLINE AtLocation 12 ;at gas station IsCarrying 207 ;has lamp FlagON 6 ;lamp has gas OR FlagON 5 ;lamp has kerosene PrintMessage 248 ;already have fuel in lamp DoneWithTurn END_COMMAND COMMAND FILL LAMP WITH GASOLINE AtLocation 12 ;routine to fill lamp with gas IsCarrying 207 ;has lamp FlagOFF 6 ;lamp not filled already FlagOFF 5 ; " FlagON 3 ;gas pump is working PrintMessage 22 ;lamp filled TurnFlagON 6 ;lamp filled flag on DoneWithTurn END_COMMAND COMMAND FILL LAMP WITH ANY ObjectPresent PrintMessage 221 ;can't do that DoneWithTurn END_COMMAND