jep-hack/maps/SummerBeachHouse.asm
Llinos Evans 0dd22ececa Summer Beach House (buggy!)
This adds the Summer Beach House from Pokemon Yellow to Route 19, in an effort to make Kanto a bit more interesting.

The code for teaching Pikachu is very buggy right now and someone should check it out. I usually throw code out if it isn't functional but this seems extremely close to working.
2024-08-04 02:27:27 +01:00

190 lines
3.9 KiB
NASM

object_const_def
const SUMMERBEACHHOUSE_VICTOR
const SUMMERBEACHHOUSE_PUKA
SummerBeachHouse_MapScripts:
def_scene_scripts
def_callbacks
; WIP
; I want the Surfin' Dude to teach a high-DV Pikachu Surf.
; Everything here is as I want it, really, it's pretty neat.
; Check engine/events/specials.asm for the funny buggy code.
SummerBeachHouseSurfinDudeScript:
faceplayer
opentext
writetext SummerBeachHouseSurfinDudeText1
yesorno
iffalse .NotPikachu
loadmonindex 1, PIKACHU
special FindPartyMonThatSpecies ; currently just works with Pikachu
writetext SummerBeachHouseSurfinDudeText2
waitbutton
special CheckPikachu
ifequal 0, .NotPikachu
ifequal 1, .GetReward
sjump .GetReward
.GetReward:
writetext SummerBeachHouseSurfinDudeTextICanDoIt
turnobject SUMMERBEACHHOUSE_PUKA, LEFT
showemote EMOTE_SHOCK, SUMMERBEACHHOUSE_PUKA, 15
writetext SummerBeachHousePukaTeach
cry PIKACHU
waitbutton
applymovement SUMMERBEACHHOUSE_PUKA, PukaMovement1
special TeachPikachuSurf
writetext SummerBeachHouseSurfinDudeTextDone
applymovement SUMMERBEACHHOUSE_PUKA, PukaMovement2
waitbutton
closetext
; setevent EVENT_TAUGHT_PIKACHU_SURF
end
.NotPikachu:
writetext SummerBeachHouseSurfinDudeTextNoHave
waitbutton
closetext
end
.TaughtPikachu:
writetext SummerBeachHouseSurfinDudeText4
waitbutton
closetext
end
PukaMovement1:
step LEFT
step UP
step UP
step LEFT
step LEFT
step LEFT
turn_head DOWN
step_end
PukaMovement2:
step RIGHT
step RIGHT
step RIGHT
step DOWN
step DOWN
step RIGHT
step_end
SummerBeachHouseSurfinDudeText1: ; aka Victor
text "Yo! For many years"
line "I have wanted to"
cont "teach a worthy"
cont "PIKACHU to SURF!"
para "Do you have one?"
done
SummerBeachHouseSurfinDudeText2:
text "Ah! A PIKACHU!"
line "Let's see…"
done
SummerBeachHouseSurfinDudeTextNoHave:
text "You don't have"
line "one? Aww…"
done
SummerBeachHouseSurfinDudeTextICanDoIt:
text "Yeah! This PIKACHU"
line "yearns for the"
cont "waves!"
para "PUKA, come here!"
done
SummerBeachHouseSurfinDudeTextDone:
text "There! You can"
line "SURF wherever"
cont "you want with"
cont "this PIKACHU now!"
para "Come again!"
done
SummerBeachHousePoster1Script:
jumptext SummerBeachHousePoster1Text
SummerBeachHousePoster1Text:
text "SURFIN' DUDE's"
line "scribbles…"
para "When I shoot the"
line "tube, the tunes"
cont "hit the groove!"
done
SummerBeachHousePoster2Script:
jumptext SummerBeachHousePoster2Text
SummerBeachHousePoster2Text:
text "30 years of waves!"
line "SURFIN' DUDE"
done
SummerBeachHousePoster3Script:
jumptext SummerBeachHousePoster1Text
SummerBeachHousePoster3Text:
text "It's an old pos-"
line "ter of the SURF-"
cont "IN' DUDE with"
cont "PUKA!"
done
SummerBeachHousePrinterScript:
jumptext SummerBeachHousePrinterText1
SummerBeachHousePrinterText1:
text "It's some sort of"
line "a machine…"
done
SummerBeachHouseSurfinDudeText4:
text "Dogs and burgers"
line "on special today!"
done
SummerBeachHousePukaScript:
faceplayer
opentext
writetext SummerBeachHousePuka
cry PIKACHU
waitbutton
closetext
end
SummerBeachHousePuka:
text "PUKA: Pikaaaa…"
done
SummerBeachHousePukaTeach:
text "PUKA: Pikapika!?"
done
SummerBeachHouse_MapEvents:
db 0, 0 ; filler
def_warp_events
warp_event 3, 7, ROUTE_19, 2
warp_event 2, 7, ROUTE_19, 2
def_coord_events
def_bg_events
bg_event 3, 0, BGEVENT_READ, SummerBeachHousePoster1Script
bg_event 7, 0, BGEVENT_READ, SummerBeachHousePoster2Script
bg_event 13, 1, BGEVENT_READ, SummerBeachHousePrinterScript
bg_event 11, 0, BGEVENT_READ, SummerBeachHousePoster3Script
def_object_events
object_event 3, 3, SPRITE_FISHING_GURU, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, SummerBeachHouseSurfinDudeScript, -1
object_event 8, 5, SPRITE_OVERWORLD_PIKACHU, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, SummerBeachHousePukaScript, -1