mirror of
https://github.com/thornAvery/kep-hack.git
synced 2025-09-16 10:23:34 +12:00
d20207f012
Yeah for some reason the salesman didn't actually tell you that you got the item. Meanie.
323 lines
5.3 KiB
NASM
323 lines
5.3 KiB
NASM
FuchsiaCity_Script:
|
|
jp EnableAutoTextBoxDrawing
|
|
|
|
FuchsiaCity_TextPointers:
|
|
dw FuchsiaCityText1
|
|
dw FuchsiaCityText2
|
|
dw FuchsiaCityText3
|
|
dw FuchsiaCityText4
|
|
dw FuchsiaCityText5
|
|
dw FuchsiaCityText6
|
|
dw FuchsiaCityText7
|
|
dw FuchsiaCityText8
|
|
dw FuchsiaCityText9
|
|
dw FuchsiaCityText10
|
|
dw SubstituteGuy
|
|
dw SafariBallSalesman
|
|
dw FuchsiaCityText12
|
|
dw FuchsiaCityText13
|
|
dw MartSignText
|
|
dw PokeCenterSignText
|
|
dw FuchsiaCityText16
|
|
dw FuchsiaCityText17
|
|
dw FuchsiaCityText18
|
|
dw FuchsiaCityText19
|
|
dw FuchsiaCityText20
|
|
dw FuchsiaCityText21
|
|
dw FuchsiaCityText22
|
|
dw FuchsiaCityText23
|
|
dw FuchsiaCityText24
|
|
|
|
FuchsiaCityText1:
|
|
text_far _FuchsiaCityText1
|
|
text_end
|
|
|
|
FuchsiaCityText2:
|
|
text_far _FuchsiaCityText2
|
|
text_end
|
|
|
|
FuchsiaCityText3:
|
|
text_far _FuchsiaCityText3
|
|
text_end
|
|
|
|
FuchsiaCityText4:
|
|
text_far _FuchsiaCityText4
|
|
text_end
|
|
|
|
FuchsiaCityText5:
|
|
FuchsiaCityText6:
|
|
FuchsiaCityText7:
|
|
FuchsiaCityText8:
|
|
FuchsiaCityText9:
|
|
FuchsiaCityText10:
|
|
text_far _FuchsiaCityText5
|
|
text_end
|
|
|
|
FuchsiaCityText12:
|
|
text_far _FuchsiaCityText11
|
|
text_end
|
|
|
|
FuchsiaCityText13:
|
|
text_far _FuchsiaCityText13
|
|
text_end
|
|
|
|
FuchsiaCityText16:
|
|
text_far _FuchsiaCityText16
|
|
text_end
|
|
|
|
FuchsiaCityText17:
|
|
text_far _FuchsiaCityText17
|
|
text_end
|
|
|
|
FuchsiaCityText18:
|
|
text_far _FuchsiaCityText18
|
|
text_end
|
|
|
|
FuchsiaCityText19:
|
|
text_asm
|
|
ld hl, FuchsiaCityChanseyText
|
|
call PrintText
|
|
ld a, CHANSEY
|
|
call DisplayPokedex
|
|
jp TextScriptEnd
|
|
|
|
FuchsiaCityChanseyText:
|
|
text_far _FuchsiaCityChanseyText
|
|
text_end
|
|
|
|
FuchsiaCityText20:
|
|
text_asm
|
|
ld hl, FuchsiaCityVoltorbText
|
|
call PrintText
|
|
ld a, VOLTORB
|
|
call DisplayPokedex
|
|
jp TextScriptEnd
|
|
|
|
FuchsiaCityVoltorbText:
|
|
text_far _FuchsiaCityVoltorbText
|
|
text_end
|
|
|
|
FuchsiaCityText21:
|
|
text_asm
|
|
ld hl, FuchsiaCityKangaskhanText
|
|
call PrintText
|
|
ld a, KANGASKHAN
|
|
call DisplayPokedex
|
|
jp TextScriptEnd
|
|
|
|
FuchsiaCityKangaskhanText:
|
|
text_far _FuchsiaCityKangaskhanText
|
|
text_end
|
|
|
|
FuchsiaCityText22:
|
|
text_asm
|
|
ld hl, FuchsiaCitySlowpokeText
|
|
call PrintText
|
|
ld a, SLOWPOKE
|
|
call DisplayPokedex
|
|
jp TextScriptEnd
|
|
|
|
FuchsiaCitySlowpokeText:
|
|
text_far _FuchsiaCitySlowpokeText
|
|
text_end
|
|
|
|
FuchsiaCityText23:
|
|
text_asm
|
|
ld hl, FuchsiaCityLaprasText
|
|
call PrintText
|
|
ld a, LAPRAS
|
|
call DisplayPokedex
|
|
jp TextScriptEnd
|
|
|
|
FuchsiaCityLaprasText:
|
|
text_far _FuchsiaCityLaprasText
|
|
text_end
|
|
|
|
FuchsiaCityText24:
|
|
text_asm
|
|
CheckEvent EVENT_GOT_DOME_FOSSIL
|
|
jr nz, .asm_3b4e8
|
|
CheckEventReuseA EVENT_GOT_HELIX_FOSSIL
|
|
jr nz, .asm_667d5
|
|
ld hl, FuchsiaCityText_19b2a
|
|
call PrintText
|
|
jr .asm_4343f
|
|
.asm_3b4e8
|
|
ld hl, FuchsiaCityOmanyteText
|
|
call PrintText
|
|
ld a, OMANYTE
|
|
jr .asm_81556
|
|
.asm_667d5
|
|
ld hl, FuchsiaCityKabutoText
|
|
call PrintText
|
|
ld a, KABUTO
|
|
.asm_81556
|
|
call DisplayPokedex
|
|
.asm_4343f
|
|
jp TextScriptEnd
|
|
|
|
FuchsiaCityOmanyteText:
|
|
text_far _FuchsiaCityOmanyteText
|
|
text_end
|
|
|
|
FuchsiaCityKabutoText:
|
|
text_far _FuchsiaCityKabutoText
|
|
text_end
|
|
|
|
FuchsiaCityText_19b2a:
|
|
text_far _FuchsiaCityText_19b2a
|
|
text_end
|
|
|
|
SafariBallSalesman:
|
|
text_asm
|
|
ld hl, .Text1
|
|
call PrintText
|
|
ld a, MONEY_BOX
|
|
ld [wTextBoxID], a
|
|
call DisplayTextBoxID
|
|
call YesNoChoice
|
|
ld a, [wCurrentMenuItem]
|
|
and a
|
|
jp nz, .choseNo
|
|
ldh [hMoney], a
|
|
ldh [hMoney + 2], a
|
|
ld a, $24
|
|
ldh [hMoney + 1], a
|
|
call HasEnoughMoney
|
|
jr nc, .enoughMoney
|
|
ld hl, .NoMoneyText
|
|
jr .printText
|
|
.enoughMoney
|
|
lb bc, SAFARI_BALL, 3
|
|
call GiveItem
|
|
jr nc, .BagFull
|
|
ld hl, ReceivedSafariBallsText
|
|
call PrintText
|
|
xor a
|
|
ld [wPriceTemp], a
|
|
ld [wPriceTemp + 2], a
|
|
ld a, $24
|
|
ld [wPriceTemp + 1], a
|
|
ld hl, wPriceTemp + 2
|
|
ld de, wPlayerMoney + 2
|
|
ld c, $3
|
|
predef SubBCDPredef
|
|
ld a, MONEY_BOX
|
|
ld [wTextBoxID], a
|
|
call DisplayTextBoxID
|
|
jr .done
|
|
.choseNo
|
|
ld hl, RefuseText
|
|
call PrintText
|
|
jr .done
|
|
.BagFull
|
|
ld hl, SafariBallBagFull
|
|
call PrintText
|
|
jr .done
|
|
.printText
|
|
call PrintText
|
|
.done
|
|
jp TextScriptEnd
|
|
|
|
.Text1
|
|
text_far _SafariBallSalesmanText1
|
|
text_end
|
|
|
|
.NoMoneyText
|
|
text_far _SafariBallSalesmanNoMoneyText
|
|
text_end
|
|
|
|
RefuseText:
|
|
text_far _SafariBallSalesmanNoText
|
|
text_end
|
|
|
|
ReceivedSafariBallsText:
|
|
text_far _ReceivedSafariBallsText
|
|
sound_get_item_1
|
|
text_end
|
|
|
|
SafariBallBagFull:
|
|
text_far _SafariBallBagFull
|
|
text_end
|
|
|
|
; FireRed NPC
|
|
; This guy has a Kangaskhan fetish or something wtf
|
|
SubstituteGuy:
|
|
text_asm
|
|
CheckEvent EVENT_GOT_TM50
|
|
jr nz, .got_item
|
|
ld hl, TM50PreReceiveText
|
|
call PrintText
|
|
|
|
call YesNoChoice
|
|
ld a, [wCurrentMenuItem]
|
|
and a
|
|
jr nz, .refused
|
|
|
|
lb bc, TM_SUBSTITUTE, 1
|
|
call GiveItem
|
|
jr nc, .bag_full
|
|
ld hl, ReceivedTM50Text
|
|
call PrintText
|
|
SetEvent EVENT_GOT_TM50
|
|
jr .done
|
|
.refused
|
|
ld hl, TM50Refused
|
|
call PrintText
|
|
jr .done
|
|
.bag_full
|
|
ld hl, SubstituteNoRoomText
|
|
call PrintText
|
|
jr .done
|
|
.got_item
|
|
ld hl, TM50ExplanationText
|
|
call PrintText
|
|
.done
|
|
jp TextScriptEnd
|
|
|
|
TM50PreReceiveText:
|
|
text "Aww, I wish I was"
|
|
line "a KANGASKHAN"
|
|
cont "baby."
|
|
|
|
para "I'd love to be a"
|
|
line "SUBSTITUTE for"
|
|
cont "the baby..."
|
|
|
|
para "And snuggle in"
|
|
line "the mother"
|
|
cont "KANGASKHAN's"
|
|
cont "belly pouch."
|
|
|
|
para "But only #MON"
|
|
line "can use the"
|
|
cont "move SUBSTITUTE."
|
|
|
|
para "Want to teach it"
|
|
line "to one?"
|
|
prompt
|
|
|
|
ReceivedTM50Text:
|
|
text_far _ReceivedTM50Text
|
|
sound_get_item_1
|
|
text_end
|
|
|
|
TM50ExplanationText:
|
|
text "Boy, what I'd"
|
|
line "give to crawl"
|
|
cont "inside a"
|
|
cont "KANGASKHAN belly"
|
|
cont "pouch..."
|
|
done
|
|
|
|
TM50Refused:
|
|
text "Oh really?"
|
|
|
|
para "SUBSTITUTE seems"
|
|
line "so fun..."
|
|
done
|
|
|
|
SubstituteNoRoomText:
|
|
text_far _TMNPCNoRoomText
|
|
text_end
|