peasant: work on game state

games/peasant/text/Makefile

@@ -0,0 +1,20 @@
+CC = gcc
+CFLAGS = -O2 -Wall -g
+
+all:	dump_text
+
+###
+
+dump_text:	dump_text.o
+	$(CC) -o dump_text dump_text.o $(LFLAGS)
+
+dump_text.o:	dump_text.c
+	$(CC) $(CFLAGS) -c dump_text.c
+
+###
+
+clean:	
+	rm -f *.o dump_text
+
+
+

games/peasant/text/WC.SUMMARY

@@ -0,0 +1,18 @@
+Lines:	630
+Words:	7896
+Bytes:	43694	gzip: 17097 lzsa: 18915
+
+    272 the	    220 a	    188 you	    170 to	    166 You
+    147 and	     97 that	     97 of	     93 in	     77 your
+     77 it	     67 on	     60 is	     57 I	     53 like
+     48 for	     44 this	     42 with	     40 here	     39 have
+     38 don't	     37 up	     37 but	     36 are	     34 get
+     34 be	     34 all	     33 from	     32 there	     32 one
+     32 not	     30 little	     30 It	     28 There's	     28 just
+     28 '	     27 Trogdor	     27 The	     27 some	     27 A
+     26 peasant	     26 out	     26 now	     26 got	     25 baby
+     25 at	     24 He	     24 already	     23 That	     23 says
+
+
+./dump_text  < responses_peasantry.txt    | sort | uniq -c | sort -rn 
+column -x < top50.txt

games/peasant/text/dump_text.c

@@ -0,0 +1,28 @@
+#include <stdio.h>
+#include <string.h>
+
+int main(int argc, char **argv) {
+
+	char string[BUFSIZ];
+	char *result,*pointer;
+
+	while(1) {
+
+		pointer=fgets(string,BUFSIZ,stdin);
+		if (pointer==NULL) break;
+
+		if (string[0]=='#') continue;
+
+		result=strtok(string," .,\"\t?!");
+		while(1) {
+			if (result!=NULL) printf("%s\n",result);
+			else break;
+			result=strtok(NULL," .,\"\t?!");
+		}
+
+//		printf("%s",string);
+
+	}
+
+	return 0;
+}

games/peasant/text/responses_peasantry.txt

@@ -251,8 +251,8 @@ Your attempts at conversation are met with horse grunts and tail flaps. Which is
 
 # (Walk in the path of Dongolev's arrows)
 Hopefully this guy will have some sense and not shoot you.
-# {Dongolev shoots you in the head} That
+# {Dongolev shoots you in the head}
-guy has no sense. He shot you. Dumb, dumb, dumb. Nice one, William Tell. You dead. Thanks for playing.
+That guy has no sense. He shot you. Dumb, dumb, dumb. Nice one, William Tell. You dead. Thanks for playing.
 # + haldo
 the archer stops arching and turns to you. "My brother told you to tell me haldo? He must want to start the old business back up!"
 # + haldo (before talking to Mendelev)
@@ -507,9 +507,9 @@ He dead. He wasn't fat, he was just big boned! Poor pig-man.
 'Me llamo Julio,' you begin... It seems only to further anger the already tempramental Kerrek. That stupid 'Learn Kerrek in 3 Weeks' cassette did nothing for you!
 
 
-#########
+##############
 # Mud Puddle
-#########
+##############
 
 # + (walk into puddle when raining)
 Now you've done it! You're covered in sticky, albeit fine smelling, mud. Your "Scalding Lake" T-shirt is all soiled, too. You just washed it last harvest!
@@ -1208,3 +1208,98 @@ Right now, you see a bunch of hay.
 You used to have one, before the great item blight of 402. Check your INVENTORY to read about it.
 # + look (at something currently in your inventory)
 You've totally got one of those! Check your INVENTORY to give'r a serious looksee.
+
+#################
+# Inventory
+#################
+
+# arrow
+Boy, you sure know how to pick
+em! This arrow's kinda pointy even!!
+# baby
+Awww! Peasant babies are
+adorable. No wonder they fetch
+such a pretty penny on the black
+market.
+# kerrek belt
+Phew! This thing stinks like all
+getout. Why couldn't the Kerrek
+have kidnapped a hot wench or
+something that you coulda saved?
+# chicken feed
+Woah! Gold nuggets! Oh
+wait...This is just chicken
+feed. Crap.
+# SuperTime FunBow TM
+This is a pretty fancy bow.
+You're suprised those shady
+archers give away such decent
+prizes. You half-expected gold
+fish in a bag.
+# monster maskus
+Man, those pagans sure can make
+a freaky lookin mask when they
+want to.  It's like those theatre
+masks' evil uncle or something
+# pebbles
+Woah! Gray chicken feed! Oh
+wait... those are just pebbles.
+Heavier than they look, though.
+# pills
+The innkeeper's medication says
+it's supposed to tread "general
+oldness.  May cause checkers 
+playing, hiked-up pants, and
+overall pee smell."
+# riches
+Riches, dude. Riches. That
+peasant lady totally has to
+share some of this with you,
+right? At least that shiny,
+clawed sceptre thing.
+# robe
+A propa peasant robe. It smells
+freshly washed and has the
+initials 'N.N' sewn onto the
+tag.
+# soda
+A full bottle of popular soda.
+# meatball sub
+A piping hot meatball sub fresh
+from the bottom of a dingy old
+well.  All you need is a bag of
+chips and you've got a combo
+meal!
+# super trinket
+This super trinket is weird. It
+looks like it could either kill
+you or make you the hit of your
+Christmas party.
+# TrogHelmet
+The TrogHelmet is not screwing
+around.  It's a serious helmet.
+It also protects against
+harmful UV rays.
+# TrogShield
+Behold the TrogSheild! No
+seriously, behold it.  There's
+no way Trogdor's fire breath can
+penetrate this thing.
+# TrogSword
+The TrogSword is for real.
+Hands-down the coolest item in
+this whole game. You can't wait
+to lop off that beefy arm of
+Trogdor's with this guy.
+# ???
+# t-shirt
+This has got to be your favorite
+T-Shirt ever. Oh, the times you
+had at Scalding Lake. Canoeing,
+fishing, stoning heathens. What
+a Blast!
+#
+# Note, greyed out could maybe print ---- for strikethrough
+You no longer has this item.
+Hit return to go back to list
+Press ESC or Backspace to exit

games/peasant/zp.inc

@@ -77,8 +77,71 @@ DONE_SONG       = $8B
 APPLEII_MODEL	= $8C
 ESC_PRESSED	= $8D
 
+GAME_STATE_0	= $90
+	BABY_IN_WELL=$00
+	TURN_WELL_CRANK=$00
+	TALK_TO_MENDELEV=$00
+	HALDO_TO_DONGELEV=$00
+	ARROW_BEATEN=$00
+	GARY_SCARED=$00
+	LADY_GONE=$00
+	TRINKET_GIVEN=$00
+	FISH_FED=$00		; also implies man gone and inn open
+	PUDDLE_WET=$00
+	HAY_BALE=$00
+	JHONKA_OUT=$00
+	RAINING=$00
+	NIGHT=$00
+	POT_ON_HEAD=$00
+	WEARING_ROBE=$00
+	ON_FIRE	= $00
+	COTTAGE_ROCK_MOVED=$00
+	KNUCKLES_BLEED=$00
+	DRESSER_OPEN=$00
+
+
+NED_STATUS	= $99
+BUSH_STATUS	= $9A	; status of bush search
+	
+KERREK_STATE	= $9B
+	KERREK_ALIVE	= $00
+	KERREK_DEAD	= $01
+	KERREK_DECOMPOSING = $02
+	KERREK_SKELETON	= $03
+ARROW_SCORE	= $9C	; bottom=score, top=random num needed 3-5?
+
+SCORE_HUNDREDS	= $9D
+SCORE_TENS	= $9E	
+SCORE_ONES	= $9F
+
+
+INVENTORY_1	= $A0
+	INV1_ARROW		= $01
+	INV1_BABY		= $02
+	INV1_KERREK_BELT	= $04
+	INV1_CHICKEN_FEED	= $08
+	INV1_BOW		= $10
+	INV1_MONSTER_MASK	= $20
+	INV1_PEBBLES		= $40
+	INV1_PILLS		= $80
+INVENTORY_2	= $A1
+	INV2_RICHES		= $01
+	INV2_ROBE		= $02
+	INV2_SODA		= $04
+	INV2_MEATBALL		= $08
+	INV2_TRINKET		= $10
+	INV2_TROGHELM		= $20
+	INV2_TROGSHIELD		= $40
+	INV2_TROGSWORD		= $80
+INVENTORY_3	= $A2
+	INV3_MAP		= $01
+	INV3_SHIRT		= $02
+
+
+INVENTORY_1_GONE	= $A3	; had item, but now it's gone
+INVENTORY_2_GONE	= $A4
+INVENTORY_3_GONE	= $A5
 
-; D0-D? used by HGR?
 
 INPUT_X		= $C0
 BOX_X1L		= $C1
@@ -90,6 +153,8 @@ BOX_Y2		= $C6
 SAVED_Y1	= $C7
 SAVED_Y2	= $C8
 
+; D0-D? used by HGR?
+
 WHICH_SLOT	= $DA
 CURRENT_DISK	= $DC
 HGR_COLOR	= $E4