peasant: print message when leaving inn with pot on head

games/peasant/peasant3.s

@@ -143,13 +143,44 @@ new_location:
 
 	;=======================
 	; before game text
+	;=======================
+
 
 	lda	MAP_LOCATION
+
 	cmp	#LOCATION_JHONKA_CAVE
+	beq	before_jhonka_cave
+
+	cmp	#LOCATION_OUTSIDE_INN
+	beq	before_inn
+
 	bne	no_before_game_text
 
+
+	;=====================
+	; at inn
+
+before_inn:
+	; see if pot on head
+
+	lda	GAME_STATE_1
+	and	#POT_ON_HEAD
+	beq	no_before_game_text
+
+	; take pott off head
+
+	lda	GAME_STATE_1
+	and	#<(~POT_ON_HEAD)
+	sta	GAME_STATE_1
+
+	ldx	#<outside_inn_pot_message
+	ldy	#>outside_inn_pot_message
+	jsr	finish_parse_message
+
+	;=====================
 	; at jhonka cave
 
+before_jhonka_cave:
 	; check to see if in hay
 
 	lda	GAME_STATE_1

games/peasant/text/inn.inc

@@ -9,16 +9,6 @@ inn_dialog_start:
 .byte "there before that smelly",13
 .byte "octogenarian gets back.",0
 
-; + (exiting inn with pot on head)
-.byte "Phew! You discard the big",13
-.byte "black pot and wipe the",13
-.byte "horse grease from your",13
-.byte "eyes. The hood of your robe",13
-.byte "is still covered in highly",13
-.byte "flammable horse grease,",13
-.byte "though.",0
-
-
 ; + look (day)
 inside_inn_look_message:
 .byte "What a dump! Only one bed",13

games/peasant/text/peasant3.inc

@@ -533,6 +533,17 @@ lake_east_throw_default_gone_message:
 ; Outside Giant Inn
 ;===================
 
+; + (exiting inn with pot on head)
+outside_inn_pot_message:
+.byte "Phew! You discard the big",13
+.byte "black pot and wipe the",13
+.byte "horse grease from your",13
+.byte "eyes. The hood of your robe",13
+.byte "is still covered in highly",13
+.byte "flammable horse grease,",13
+.byte "though.",0
+
+
 ; + look
 outside_inn_look_message:
 .byte "There's a giant Inn here.",13