Add Meltan Event

A guy in a Safari Zone Rest House will hand you a Meltan he found lost. It's built off the Lapras guy in Silph.

Also changes the positions of some trader NPCs in the Pokemon Centres to match the others.
This commit is contained in:
Llinos Evans 2023-04-09 14:48:04 +01:00
parent 4389e86fd1
commit 7e3d48513b
8 changed files with 70 additions and 7 deletions

View file

@ -6,6 +6,7 @@ SafariZoneEastRestHouse_TextPointers:
dw SafariZoneRestHouse3Text1
dw SafariZoneRestHouse3Text2
dw SafariZoneRestHouse3Text3
dw SafariZoneRestHouse3Meltan
SafariZoneRestHouse3Text1:
text_far _SafariZoneRestHouse3Text1
@ -18,3 +19,44 @@ SafariZoneRestHouse3Text2:
SafariZoneRestHouse3Text3:
text_far _SafariZoneRestHouse3Text3
text_end
SafariZoneRestHouse3Meltan:
; meltan guy
text_asm
ld a, [wd72e]
bit 0, a ; got meltan?
jr z, .giveMeltan
CheckEvent EVENT_GOT_MELTAN
jr nz, .MeltanInfo
ld hl, .MeltanGuyText
call PrintText
jr .done
.giveMeltan
ld hl, .MeltanGuyText
call PrintText
lb bc, MELTAN, 5
SetEvent EVENT_GOT_MELTAN
call GivePokemon
jr nc, .done
ld a, [wSimulatedJoypadStatesEnd]
and a
call z, WaitForTextScrollButtonPress
call EnableAutoTextBoxDrawing
ld hl, .MeltanInfoWithBlackjackAndHookers
call PrintText
ld hl, wd72e
set 0, [hl]
jr .done
.MeltanInfo
ld hl, .MeltanInfoWithBlackjackAndHookers
call PrintText
.done
jp TextScriptEnd
.MeltanInfoWithBlackjackAndHookers
text_far _MeltanInfo
text_end
.MeltanGuyText
text_far _MeltanGuyText
text_end