diff --git a/games/peasant/NOTES b/games/peasant/NOTES
index 6c71ab38..f12c9287 100644
--- a/games/peasant/NOTES
+++ b/games/peasant/NOTES
@@ -37,6 +37,7 @@ peasant2	18302
 		17780 -- size as of the switch to dictionary word lookup
 		18012 -- hook up more of archery
 		18120 -- finish hooking up archery
+		17941 -- after most of text hooked up (more code was moved to qload)
 
 partial save, can we fit in 4k?
 	102 lines			; inventory was 115?
diff --git a/games/peasant/parse_input.s b/games/peasant/parse_input.s
index d4bef3b3..8a37c802 100644
--- a/games/peasant/parse_input.s
+++ b/games/peasant/parse_input.s
@@ -57,6 +57,20 @@ done_upcase_loop:
 parse_input_smc:
 	nop
 
+
+	;================================
+	; check for "dan"
+
+	lda	CURRENT_NOUN
+	cmp	#NOUN_DAN
+	bne	not_dan
+
+	ldx	#<dan_message
+	ldy	#>dan_message
+	jmp	finish_parse_message
+
+not_dan:
+
 	;================================
 	; jump into verb table
 
diff --git a/games/peasant/text/common.inc b/games/peasant/text/common.inc
index 225113ab..255b2f7c 100644
--- a/games/peasant/text/common.inc
+++ b/games/peasant/text/common.inc
@@ -8,7 +8,6 @@ inside_inn_pot_on_head_message:
 .byte "there before that smelly",13
 .byte "octogenarian gets back.",0
 
-
 ; After jumping in the haystack, go to any screen except Jhonka
 ; both hay and mud go away
 hay_blown_away_message:
@@ -63,9 +62,6 @@ wear_robe_none_message:
 wear_robe_none_message2:
 .byte "And pants. Forgot to",13
 .byte "mention the pants.",0
-
-; + look (when in hay disguise)
-.byte "Right now, you see a bunch of hay.",0
  
 ; + look trees
 look_trees_message:
@@ -174,7 +170,7 @@ go_message:
 ditch_baby_message:
 .byte "Quit tryin to ditch the baby!",0
 
-; + ???? ditch/drop/deploy/use baby (after baby left)
+; + ditch/drop/deploy/use baby (after baby left)
 ; + drop baby, throw baby (before getting the baby)
 no_baby_message:
 .byte "You don't even have two",13