mcphail/LM_the_video_game
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

More yourcroft

Browse Source
This commit is contained in:
Neil McPhail 2024-09-16 21:47:10 +00:00
parent a6cff03a70
commit 3220e8fcc8
1 changed files with 47 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

55
lmtvg.paw
View File

@ -4,9 +4,12 @@ PROCESS examine;
PROCESS help;
PROCESS crunch;
PROCESS yourcroft_status;
PROCESS yourcroft_parse;
PROCESS say_help;
FLAG crunchvol;
FLAG yourcroftstate;
FLAG say_help;
DEFAULTS
{
@ -52,7 +55,7 @@ LOCATION scene
LOCATION trap
{
"Wimpy is trapped in a room with no obvious exits.
He is rather perplexed.^Oh, bother!";
He is rather perplexed.^Oh, bother!^(This is placeholder text)^";
}
VOCABULARY
@ -120,12 +123,14 @@ VOCABULARY
NOUN: "USBDR", "DRIVE";
ADJECTIVE: "USB";
NOUN: "PORT";
NOUN 18: "YOURC", "LADYC", "COMPU", "ASSIS", "CYLIN";
NOUN 18: "YOURC", "LADYC", "COMPU", "ASSIS", "CYLIN", "DEVIC";
NOUN: "FLAP";
NOUN: "DOOR";
VERB: "HELP";
VERB: "EAT", "CONSU", "BITE", "CRUNC", "CHOMP", "MUNCH";
VERB: "WAIT";
VERB: "OPEN";
VERB: "CLOSE";
}
OBJECT notused 0
@ -139,7 +144,7 @@ OBJECT notused 0
OBJECT mug 1
{
"A large, chipped mug";
INITIALLYAT CARRIED;
INITIALLYAT NOTCREATED;
WORDS MUG _;
WEIGHT 1;
PROPERTY CONTAINER;
@ -155,7 +160,7 @@ PROCESS examine
OBJECT biscuits
{
"An inexhaustible supply of delicious biscuits";
INITIALLYAT CARRIED;
INITIALLYAT NOTCREATED;
WORDS BISCU _;
WEIGHT 1;
}
@ -282,6 +287,17 @@ RESPONSE
MESSAGE "He tries to be quiet but they're just too tasty.";
WAIT _: MESSAGE "Wimpy waits for a moment."
DONE;
SAY _: AT trap
PROCESS yourcroft_parse
DONE;
}
PROCESS say_help
{
_ _: ZERO say_help
SET say_help
MESSAGE "(Remember to enclose anything you want Wimpy to say in double quotes, like {0}SAY \"HELLO\"{1}. On a Spectrum, hold {0}SYMBOL-SHIFT{1} and press {0}P{1}. On an emulator, you'll probably need to hold {0}Ctrl{1} and press {0}P{1}.)";
}
PROCESS 1
@ -346,17 +362,40 @@ PROCESS yourcroft_status
_ _: EQ yourcroftstate 1
MESSAGE "Yourcroft surveys Wimpy with its tacky, green, blinking LED eye and barks 'I'm watching you, mister!'.";
_ _: EQ yourcroftstate 2
MESSAGE "Yourcroft's eye flashes indignantly and burns with shame at its open flap and exposed port";
MESSAGE "Yourcroft's eye flashes indignantly and burns with shame at its open flap and exposed port.";
_ _: EQ yourcroftstate 3
MESSAGE "Yourcroft's LED eye keeps flicking with rage between Wimpy's face and its new USB appendage";
MESSAGE "Yourcroft's LED eye keeps flicking with rage between Wimpy's face and its new USB appendage.";
_ _: EQ yourcroftstate 4
MESSAGE "The smouldering remains of Yourcroft sparks and fizzles";
MESSAGE "The smouldering remains of Yourcroft sparks and fizzles.";
}
PROCESS examine
{
_ CYLIN: ZERO yourcroftstate
MESSAGE "'What you looking at, buddy?', barks the device. 'I'm a Yourcroft(TM) mark 1 cylindrical assistant, and I've been charged with keeping this door closed.'^'Don't get any bright ideas for escape or I'll zap you!'^Its voice sounds like a strangely robotic-yet-feminine version of popey's dulcet tones. A cheap LED array is lit to form a green, blinking eye which follows your every movement. Below is a flap with a label saying 'USB', which is closed and obscuring any port.^'By the way, please fund our Kickstarter for version 2.0!"
MESSAGE "'What you looking at, buddy?', barks the device. 'I'm a Yourcroft(TM) mark 1 cylindrical assistant, and I've been charged with keeping this door closed.'^^'Don't get any bright ideas for escape or I'll zap you!'^^Its voice sounds like a strangely robotic-yet-feminine version of popey's dulcet tones. A cheap LED array is lit to form a green, blinking eye which follows Wimpy's every movement. Below is a flap with a label saying 'USB', which is closed and obscuring any port.^'By the way, please fund our Kickstarter for version 2.0!'"
PLUS yourcroftstate 1
DONE;
_ YOURC: EQ yourcroftstate 1
MESSAGE "'Don't go poking around - I'm password protected you know!'"
DONE;
_ YOURC: EQ yourcroftstate 2
MESSAGE "Yourcroft is clearly annoyed that its USB port and control touch screen are showing."
DONE;
}
PROCESS yourcroft_parse
{
* *: PARSE
MESSAGE "'Keep it simple, buddy - I ain't ChattyJeeps.'"
PROCESS say_help
DONE;
_ PASSW: LT yourcroftstate 2
MESSAGE "'Hey - that's the right password! You some kind of genius hacker? You can't stop me guarding this door, buddy...'.^^The flap drops open, revealing a USB socket and a small touch screen.^^'Do you mind?', admonishes Yourcroft, 'you're exposing my circuits!'."
LET yourcroftstate 2
DONE;
_ _: MESSAGE "'You ain't the boss of me!'"
DONE;
}