shithub: pokered

Download patch

ref: 292cf55baddf6d0f32b9d59816497c2041e99953
parent: 50a39daa74a132397f7d389d1878158970e55bfc
author: IIMarckus <iimarckus@gmail.com>
date: Fri Oct 17 05:28:15 EDT 2014

More idioms.

--- a/scripts/beach_house.asm
+++ b/scripts/beach_house.asm
@@ -17,7 +17,7 @@
 	jr nz,.next
 	ld hl,.SurfinDudeText4
 	call PrintText
-	jr .xf2271
+	jr .done
 .next
 	ld hl,$d492
 	bit 0,[hl]
@@ -29,8 +29,8 @@
 	ld hl,.SurfinDudeText3
 .next3
 	call PrintText
-	call $35ef
-	ld a,[$cc26]
+	call YesNoChoice
+	ld a,[wCurrentMenuItem]
 	and a
 	jr nz,.xf226b
 	ld a,1
@@ -40,11 +40,11 @@
 	call $3e84
 	ld hl,$d492
 	set 1,[hl]
-	jr .xf2271
+	jr .done
 .xf226b
 	ld hl,.SurfinDudeText2
 	call PrintText
-.xf2271
+.done
 	jp TextScriptEnd
 
 .SurfinDudeText1
@@ -151,8 +151,8 @@
 	ld [$cc3c],a
 	ld hl,.BeachHousePrinterText3
 	call PrintText
-	call $35ef
-	ld a,[$cc26]
+	call YesNoChoice
+	ld a,[wCurrentMenuItem]
 	and a
 	jp z,$63d0 ; 0xf23d0
 	call $36ec