peasant: hook up mud puddle dialog

games/peasant/TODO

@@ -52,6 +52,44 @@ Map:
 - implement map
 
 Peasantry:
+- Gary
+- Kerrek 1
+- Well
+- Yellow Tree
+- Waterfall
+  + Waterfall animation
+
+- Haystack
+  + Hook up dialog for mud
+  + Hook up sprites for walking hay
+- Puddle
+  + Hook up responses when mud is wet
+- Archery
+  + Archer animations
+- River/Rock
+  + River animation
+- Mountain Pass
+  + Knight animations
+  + hook up/fix dialog when you have various items
+  + be sure to fix the "talk knight" dialog for robe/fire etc
+  + Block path unless you have all three items
+
+- Jhonka
+- Cottage
+- West Lake
+  + Water animations
+- East Lake
+  + Boat animations
+  + Water animations
+- Inn
+
+- Ned Cottage
+- Ned
+- Kerrek2
+  + See Kerrek1
+- Lady Cottage
+- Burnt trees
+
 - animation for the boat
 - animation of River
 - animation of waterfall
@@ -71,6 +109,4 @@ Ending:
   Modify sprite routine to auto-shift colors so we can have more
   of an arc on baby trajectory?
 
-Pass:
-- hook up/fix dialog when you have various items
-- be sure to fix the "talk knight" dialog for robe/fire etc
+

games/peasant/parse_input.s

@@ -898,6 +898,7 @@ noun_lookup:
 .byte "RIVER",NOUN_RIVER|$80
 .byte "STONE",NOUN_STONE|$80
 .byte "IN HAY",NOUN_IN_HAY|$80
+.byte "PUDDLE",NOUN_PUDDLE|$80
 .byte $00
 
 

games/peasant/peasant2.s

@@ -263,14 +263,14 @@ map_priority_hi:
 
 verb_tables_low:
 	.byte	<hay_bale_verb_table		; 5	-- haystack
-	.byte	<river_stone_verb_table		; 6	-- puddle
+	.byte	<puddle_verb_table		; 6	-- puddle
 	.byte	<river_stone_verb_table		; 7	-- archery
 	.byte	<river_stone_verb_table		; 8	-- river
 	.byte	<mountain_pass_verb_table	; 9	-- knight
 
 verb_tables_hi:
 	.byte	>hay_bale_verb_table		; 5	-- haystack
-	.byte	>river_stone_verb_table		; 6	-- puddle
+	.byte	>puddle_verb_table		; 6	-- puddle
 	.byte	>river_stone_verb_table		; 7	-- archery
 	.byte	>river_stone_verb_table		; 8	-- river
 	.byte	>mountain_pass_verb_table	; 9	-- knight

games/peasant/peasant2_actions.s

@@ -3,7 +3,7 @@
 	;=======================
 	;=======================
 	;=======================
-	; Thay Hay Bale
+	; That Hay Bale
 	;=======================
 	;=======================
 	;=======================
@@ -137,6 +137,86 @@ hug_tree:
 
 
 
+	;=======================
+	;=======================
+	;=======================
+	; Puddle
+	;=======================
+	;=======================
+	;=======================
+
+puddle_verb_table:
+	.byte VERB_GET
+	.word puddle_get-1
+	.byte VERB_TAKE
+	.word puddle_take-1
+	.byte VERB_STEAL
+	.word puddle_steal-1
+	.byte VERB_LOOK
+	.word puddle_look-1
+	.byte 0
+
+
+	;================
+	; get
+	;================
+puddle_get:
+puddle_steal:
+puddle_take:
+	lda	CURRENT_NOUN
+
+	cmp	#NOUN_ROCK
+	beq	puddle_get_rock
+	cmp	#NOUN_STONE
+	beq	puddle_get_rock
+
+
+	; else "probably wish" message
+
+	jmp	parse_common_get
+
+puddle_get_rock:
+	ldx	#<puddle_get_rock_message
+	ldy	#>puddle_get_rock_message
+	jmp	finish_parse_message
+
+	;=================
+	; look
+	;=================
+
+puddle_look:
+
+	lda	CURRENT_NOUN
+
+	cmp	#NOUN_ROCK
+	beq	puddle_look_at_rock
+	cmp	#NOUN_STONE
+	beq	puddle_look_at_rock
+	cmp	#NOUN_MUD
+	beq	puddle_look_at_mud
+	cmp	#NOUN_PUDDLE
+	beq	puddle_look_at_mud
+	cmp	#NOUN_NONE
+	beq	puddle_look_at
+
+	jmp	parse_common_look
+
+puddle_look_at:
+	ldx	#<puddle_look_at_message
+	ldy	#>puddle_look_at_message
+	jmp	finish_parse_message
+
+puddle_look_at_mud:
+	ldx	#<puddle_look_mud_message
+	ldy	#>puddle_look_mud_message
+	jmp	finish_parse_message
+
+puddle_look_at_rock:
+	ldx	#<puddle_get_rock_message
+	ldy	#>puddle_get_rock_message
+	jmp	finish_parse_message
+
+
 	;=======================
 	;=======================
 	;=======================

games/peasant/text/peasant2.inc

@@ -71,6 +71,7 @@ hay_get_hay_message:
 .byte "Now you've done it! You're covered in sticky, albeit fine smelling, mud. Your ",34,"Scalding Lake",34," T-shirt is all soiled, too. You just washed it last harvest!",0
 
 ; + look (dry)
+puddle_look_at_message:
 .byte "There's a dried out mud",13
 .byte "puddle. It's all caked and",13
 .byte "cracked like the kind",13
@@ -80,7 +81,14 @@ hay_get_hay_message:
 ; + look (wet)
 .byte "Not much to see. 'Sides that big mud puddle.",0
 
+; + look mud / puddle				; NOT IN WIKI?
+puddle_look_mud_message:
+.byte "The bone-dry mud puddle is",13
+.byte "cracked and caked.",0
+
+
 ; + get / look rock
+puddle_get_rock_message:
 .byte "That rock's not doin' a",13
 .byte "whole lot for me.",0
 

games/peasant/tokens.inc

@@ -174,5 +174,6 @@ NOUN_WOMAN	= 95
 NOUN_RIVER	= 96
 NOUN_STONE	= 97
 NOUN_IN_HAY	= 98
+NOUN_PUDDLE	= 99
 ;
-NOUN_UNKNOWN	= 99
+NOUN_UNKNOWN	= 100