REM AIR.AGT command turn spotlight redirectto light spotlight end_command command connect spotlight not present [screwdriver] printmessage "I don't think you have the proper tool to try this." donewithturn end_command command connect spotlight not present [suit] printmessage "There is nothing here to connect it to." donewithturn end_command command connect spotlight nounpresent present [suit] present [screwdriver] printmessage "You manage to screw the spotlight onto the Eva-Suit" printmessage "The Spotlight throws out a bright beam of light." sendtoroom [spotlight] [suit] destroy [dead spot] donewithturn end_command rem cylinder / connect actions command connect any not atlocation [eva storage area] printmessage "You see nothing to connect the $noun$ to." donewithturn end_command command connect any nounpresent nounisnumber [cylinder] printmessage "The cylinder will not move...You must connect something to it." donewithturn end_command command connect any nounpresent not nounisnumber [suit] not nounisnumber [evac bag] printmessage "You see nothing to connect the $noun$ to." donewithturn end_command command connect any nounpresent nouniswearing printmessage "You cannot do this while wearing the $noun$." donewithturn end_command command connect any nounpresent nounisnumber [suit] or nounisnumber [evac bag] printmessage "You connect the $noun$ to the cylinder." flagon [cylinder dead] printmessage "Nothing Happens." donewithturn end_command command connect any nounpresent variablegt [cylinder supply] 0 subtractfromvariable [cylinder supply] 1 printmessage "A muffled hissing is briefly heard." end_command command connect any nounpresent nounisnumber [suit] setvariableto [suit supply] 100 donewithturn end_command command connect any nounpresent nounisnumber [evac bag] setvariableto [bag supply] 50 printmessage "The Evac-Bag inflates." donewithturn end_command command wear suit present [suit] flagon [arm broken] printmessage "You find your damaged arm makes this impossible." donewithturn end_command command examine suit nounpresent nounisopen flagoff [suit fixed] printmessage "Close examination reveals a small hole in the Eva-Suit." end_command command examine suit nounpresent nounisopen flagon [suit fixed] printmessage "Close examination reveals a patch covering a small hole." end_command command examine bag nounpresent nounisnumber [evac bag] nounisopen flagoff [bag fixed] printmessage "Close examination reveals a small hole in the Evac-Bag." end_command command examine bag nounpresent nounisnumber [evac bag] nounisopen flagon [bag fixed] printmessage "Close examination reveals a patch covering a small hole." end_command command examine walls not present [wall hole] not present [wall fixed] printmessage The walls are just your standard plast-crete construction. end_printmessage donewithturn end_command message [patchit] The patch fits over the hole and effectively plugs it. end_message MESSAGE [PATCHED] You've already patched that hole! END_MESSAGE command patch any redirectto affix patch end_command command affix patch nounpresent atlocation [sd storage cells] flagon [hull breach 1] turnflagoff [hull breach 1] subtractfromvariable [patches] 1 plusscore 10 printmessage [patchit] destroy [wall hole] putincurrentroom [wall fixed] donewithturn end_command command affix patch nounpresent atlocation [se hold] flagon [hull breach 3] turnflagoff [hull breach 3] subtractfromvariable [patches] 1 plusscore 10 printmessage [patchit] destroy [wall hole] putincurrentroom [wall fixed] donewithturn end_command command affix patch nounpresent atlocation [ns south area] flagon [hull breach 2] turnflagoff [hull breach 2] subtractfromvariable [patches] 1 plusscore 10 printmessage [patchit] destroy [wall hole] putincurrentroom [wall fixed] donewithturn end_command command affix patch nounpresent present [suit] isopen [suit] flagoff [suit fixed] turnflagon [suit fixed] subtractfromvariable [patches] 1 plusscore 10 printmessage [patchit] destroy [eva hole] sendtoroom [eva fixed] [suit] donewithturn end_command command affix patch nounpresent present [evac bag] isopen [evac bag] flagoff [bag fixed] turnflagon [bag fixed] subtractfromvariable [patches] 1 plusscore 10 printmessage [patchit] destroy [evac hole] sendtoroom [evac fixed] [evac bag] donewithturn end_command command affix patch nounpresent present [suit] isopen [suit] flagon [suit fixed] printmessage [PATCHED] donewithturn end_command command affix patch nounpresent present [evac bag] isopen [evac bag] flagon [bag fixed] printmessage [PATCHED] donewithturn end_command command affix patch nounpresent atlocation [sd storage cells] flagoff [hull breach 1] printmessage [PATCHED] donewithturn end_command command affix patch nounpresent atlocation [ns south area] flagoff [hull breach 2] printmessage [PATCHED] donewithturn end_command command affix patch nounpresent atlocation [se hold] flagoff [hull breach 3] printmessage [PATCHED] donewithturn end_command command affix patch nounpresent printmessage While they do make nice wall decorations, shining and gleaming and all that. It is not recommended that you waste them. end_printmessage donewithturn end_command command remove suit flagoff [in ship] printmessage "That would be suicide!!!". donewithturn end_message command open suit flagoff [in ship] printmessage "That would be suicide!!!". donewithturn end_message