Kurt instamakes balls now

README.md

@@ -27,6 +27,7 @@ The Fairy-type does exist.
 
 ## QoL Changes
 - A Trader NPC is available in a new Lake of Rage town area, allowing you to access trade evolutions natively.
+- Kurt now makes Apricorn Balls instantly. He's had his coffee and is listening to his favourite music.
 - Instant text is now an option!
 - Clock reset procedure is now like vanilla GS, requiring just Down + B.
 - Tilesets now handle up to 255 titles (from 192), allowing for slightly nicer maps.

maps/DebugRoom.ablk

@@ -1,4 +1,4 @@
- ! ! !WW




E

+ ! ! !WW




E

 R
  !



 E
R





E
TvUXYG~IJ

maps/DebugRoom.asm

@@ -101,6 +101,7 @@ DebugRoom_MapEvents:
 	warp_event  5, 35, VIRIDIAN_FOREST, 1 ; southwest warp
 	warp_event 19, 34, VIRIDIAN_FOREST, 1 ; southern warp
 	warp_event 33, 33, VIRIDIAN_FOREST, 1 ; southeast warp
+	warp_event  5,  3, AZALEA_TOWN, 1 
 
 	def_coord_events
 

maps/KurtsHouse.asm

@@ -72,8 +72,8 @@ Kurt1:
 	iffalse .NoRoomForBall
 	setevent EVENT_KURT_GAVE_YOU_LURE_BALL
 .GotLureBall:
-	checkevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_1
-	iftrue .WaitForApricorns
+	;checkevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_1
+	;iftrue .WaitForApricorns
 	checkevent EVENT_GAVE_KURT_RED_APRICORN
 	iftrue .GiveLevelBall
 	checkevent EVENT_GAVE_KURT_BLU_APRICORN
@@ -167,11 +167,17 @@ Kurt1:
 
 .GaveKurtApricorns:
 	setevent EVENT_TEMPORARY_UNTIL_MAP_RELOAD_1
-	setflag ENGINE_KURT_MAKING_BALLS
-.WaitForApricorns:
-	writetext KurtsHouseKurtItWillTakeADayText
+	;setflag ENGINE_KURT_MAKING_BALLS
+;.WaitForApricorns:
+	writetext KurtsHouseKurtGetStartedText
 	waitbutton
 	closetext
+	special FadeBlackQuickly
+	special ReloadSpritesNoPalettes
+	playsound SFX_WARP_TO
+	waitsfx
+	pause 35
+	sjump Kurt1	
 	end
 
 .Cancel:
@@ -528,12 +534,9 @@ KurtsHouseKurtAskYouHaveAnApricornText:
 	line "into a BALL."
 	done
 
-KurtsHouseKurtItWillTakeADayText:
-	text "KURT: It'll take a"
-	line "day to make you a"
-
-	para "BALL. Come back"
-	line "for it later."
+KurtsHouseKurtGetStartedText:
+	text "Kurt: I'll get"
+	line "started right now!"
 	done
 
 KurtsHouseKurtThatsALetdownText: