Somw placeholder text and a mug

lmtvg.paw

@@ -1,5 +1,8 @@
 #INCLUDE "char.paw"
 
+PROCESS examine;
+PROCESS help;
+
 DEFAULTS
 {
 	CHARSET: 0;
@@ -17,6 +20,31 @@ LOCATION start 0
 	"Linux Matters:^  The Video Game";
 }
 
+LOCATION mug 1
+{
+	"In the mug";
+}
+
+LOCATION intro
+{
+	"This is a text adventure for the ZX Spectrum in the classic style of {19}{1}The Hobbit{19}{0} or {19}{1}Zork{19}{0}.
+	You play as {16}{6}Wimpy{16}{7}, host of the Linux Matters podcast with friends {16}{5}Popey{16}{7} and
+	{16}{4}Mark{16}{7}.^^
+	In common with the classic adventures, you can control Wimpy by entering simple words and sentences in English.
+	A simple example may be {20}{1}GET CAKE{20}{0} whereas a more complex one such as {20}{1}SAY
+	TO MARK \"GO NORTH AND QUICKLY RUB THE DEPRESSING FERRET ON THE BALLOON THEN RELEASE IT\"{20}{0} may
+	also be possible. Depending on how well I've programmed the game, either the ferret or the balloon will
+	be free.^^
+	Perhaps the first command to enter might be {20}{1}HELP{20}{0}, but it pays to be curious so make sure
+	you always {20}{1}EXAMINE{20}{0} everything you can.";
+}
+
+LOCATION trap
+{
+	"Wimpy is trapped in a room with no obvious exits.
+	He is rather perplexed.^Oh, bother!";
+}
+
 VOCABULARY
 {
 	NOUN 2: "S", "SOUTH";
@@ -56,11 +84,9 @@ VOCABULARY
 	VERB 25: "QUIT", "STOP";
 	VERB 26: "SAVE";
 	VERB 27: "LOAD";
-	VERB 28: "RAMSA";
-	VERB 29: "RAMLO";
-	VERB 30: "LOOK", "EXAMI";
+	VERB 30: "LOOK";
 	VERB 31: "SAY", "ASK", "TALK", "SPEAK";
-	VERB 32: "PICS";
+	VERB 32: "EXAMI", "EXAM", "X";
 	ADJECTIVE 130: "SMALL";
 	ADJECTIVE 131: "BIG", "LARGE";
 	ADJECTIVE 132: "OLD";
@@ -74,6 +100,11 @@ VOCABULARY
 	ADVERB 142: "QUIET";
 	ADVERB 143: "LOUDL";
 	ADVERB 144: "CAREF", "SOFTL", "GENTL";
+
+	NOUN: "PASSW", "1234", "HUNTER", "12345";
+	NOUN: "BISCU", "PACKE";
+	NOUN: "MUG", "CUP";
+	VERB: "HELP";
 }
 
 OBJECT notused 0
@@ -84,6 +115,21 @@ OBJECT notused 0
 	WEIGHT 1;
 }
 
+OBJECT mug 1
+{
+	"A large, chipped mug";
+	INITIALLYAT CARRIED;
+	WORDS MUG _;
+	WEIGHT 1;
+}
+PROCESS examine
+{
+	_ MUG:	PRESENT mug
+		MESSAGE "A few chips and cracks, but robust and clean. It contains:"
+		LISTAT mug
+		DONE;
+}
+
 MESSAGES
 {
 	0: "Default message";
@@ -162,15 +208,33 @@ RESPONSE
 	WEAR _: AUTOW DONE;
 	R _: DESC;
 	QUIT _: QUIT TURNS END;
-	SAVE _: SAVE;
-	LOAD _: LOAD;
-	RAMSA _: RAMSAVE;
-	RAMLO _: RAMLOAD 255;
+	SAVE _:	RAMSAVE
+		MESSAGE "Game saved to RAM.";
+	LOAD _:	RAMLOAD 255
+		DESC;
+	LOOK _: PREP AT
+		PROCESS examine
+		DONE;
 	LOOK _: PLUS 29 128 DESC;
+	X _:	PROCESS examine
+		DONE;
+	HELP _:	PROCESS help
+		DONE;
 }
 
 PROCESS 1
 {
+	* *:	AT start
+		MODE 0 1
+		ANYKEY
+		GOTO intro
+		DESC;
+
+	* *:	AT intro
+		ANYKEY
+		GOTO trap
+		DESC;
+
 	* _: NEWLINE ZERO 0 ABSENT 0 LISTOBJ;
 	* _: PRESENT 0 LISTOBJ;
 }
@@ -179,3 +243,14 @@ PROCESS 2
 {
 }
 
+PROCESS examine
+{
+	_ _:	MESSAGE "Wimpy isn't sure what he is supposed to look at."
+		DONE;
+}
+
+PROCESS help
+{
+	_ _:	MESSAGE "Just placeholder text for now."
+		DONE;
+}