dionmoustos/Pokemon-Firered
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Begin fresh dump of mystery_event_msg

Browse Source
This commit is contained in:
PikalaxALT
2019-10-17 22:32:06 -04:00
parent 2f0ae810f7
commit c40fdc5eb6
3 changed files with 22 additions and 332 deletions
Download Patch File Download Diff File Expand all files Collapse all files
asm/macros/event.inc
+1 -2
View File
@@ -1225,10 +1225,9 @@
.byte 0xb7
.endm
.macro setvaddress long, word
.macro setvaddress long
.byte 0xb8
.4byte \long
.2byte \word
.endm
.macro vgoto pointer
data/mystery_event_msg.s
+18 -329
View File
@@ -3,6 +3,7 @@
#include "constants/songs.h"
#include "constants/species.h"
#include "constants/vars.h"
#include "constants/items.h"
.include "asm/macros.inc"
.include "asm/macros/event.inc"
.include "constants/constants.inc"
@@ -10,333 +11,21 @@
.section .rodata
.align 2
MysteryEventScript_StampCard:: @ 8488E2
.incbin "baserom.gba", 0x488E28, 0xB40
MysteryEventScript_StampCard:: @ 8488E28
setvaddress MysteryEventScript_StampCard
setorcopyvar VAR_RESULT, TRUE
specialvar VAR_0x8008, sub_80CC730
setorcopyvar VAR_RESULT, FALSE
specialvar VAR_0x8009, sub_80CC730
subvar VAR_0x8008, VAR_0x8009
getnumberstring 0, VAR_0x8008
lock
faceplayer
vmessage gUnknown_8488E55
waitmessage
waitbuttonpress
release
end
@ setvaddress MysteryEventScript_StampCard
@ setorcopyvar VAR_RESULT, 1
@ specialvar VAR_0x8008, sub_813986C
@ setorcopyvar VAR_RESULT, 0
@ specialvar VAR_0x8009, sub_813986C
@ subvar VAR_0x8008, VAR_0x8009
@ getnumberstring 0, VAR_0x8008
@ lock
@ faceplayer
@ vmessage sText_MysteryGiftStampCard
@ waitmessage
@ waitbutton
@ release
@ end
@
@ sText_MysteryGiftStampCard:
@ .string "Thank you for using the STAMP CARD\nSystem.\pYou have {STR_VAR_1} more to collect to\nfill your STAMP CARD.$"
@
@ MysteryEventScript_SurfPichu:: @ 8674D3D
@ setvaddress MysteryEventScript_SurfPichu
@ checkflag FLAG_MYSTERY_EVENT_DONE
@ vgoto_if 0, SurfPichu_GiveIfPossible
@ gotoram
@
@ SurfPichu_GiveIfPossible: @ 8674D4C
@ specialvar VAR_EVENT_PICHU_SLOT, CalculatePlayerPartyCount
@ compare_var_to_value VAR_EVENT_PICHU_SLOT, 6
@ vgoto_if 1, SurfPichu_FullParty
@ setflag FLAG_MYSTERY_EVENT_DONE
@ vcall SurfPichu_GiveEgg
@ lock
@ faceplayer
@ vmessage sText_MysteryGiftEgg
@ waitmessage
@ waitbutton
@ playfanfare MUS_FANFA4
@ waitfanfare
@ release
@ end
@
@ SurfPichu_FullParty: @ 8674D73
@ lock
@ faceplayer
@ vmessage sText_FullParty
@ waitmessage
@ waitbutton
@ release
@ end
@
@ SurfPichu_GiveEgg: @ 8674D7E
@ giveegg SPECIES_PICHU
@ setobedience VAR_EVENT_PICHU_SLOT
@ setcatchlocale VAR_EVENT_PICHU_SLOT, 255
@ compare_var_to_value VAR_EVENT_PICHU_SLOT, 1
@ vgoto_if 1, SurfPichu_Slot1
@ compare_var_to_value VAR_EVENT_PICHU_SLOT, 2
@ vgoto_if 1, SurfPichu_Slot2
@ compare_var_to_value VAR_EVENT_PICHU_SLOT, 3
@ vgoto_if 1, SurfPichu_Slot3
@ compare_var_to_value VAR_EVENT_PICHU_SLOT, 4
@ vgoto_if 1, SurfPichu_Slot4
@ compare_var_to_value VAR_EVENT_PICHU_SLOT, 5
@ vgoto_if 1, SurfPichu_Slot5
@ return
@
@ SurfPichu_Slot1: @ 8674DC0
@ setpokemove 1, 2, MOVE_SURF
@ return
@
@ SurfPichu_Slot2:: @ 8674DC6
@ setpokemove 2, 2, MOVE_SURF
@ return
@
@ SurfPichu_Slot3: @ 8674DCC
@ setpokemove 3, 2, MOVE_SURF
@ return
@
@ SurfPichu_Slot4: @ 8674DD2
@ setpokemove 4, 2, MOVE_SURF
@ return
@
@ SurfPichu_Slot5: @ 8674DD8
@ setpokemove 5, 2, MOVE_SURF
@ return
@
@ sText_MysteryGiftEgg:
@ .string "Thank you for using the MYSTERY\nGIFT System.\pFrom the POKéMON CENTER we\nhave a gift--a POKéMON EGG!\pPlease raise it with love and\nkindness.$"
@
@ sText_FullParty:
@ .string "Oh, your party appears to be full.\pPlease come see me after storing\na POKéMON on a PC.$"
@
@ MysteryEventScript_VisitingTrainer:: @ 8674EC1
@ setvaddress MysteryEventScript_VisitingTrainer
@ special ValidateEReaderTrainer
@ compare_var_to_value VAR_RESULT, 0
@ vgoto_if 1, MysteryEventScript_VisitingTrainerArrived
@ lock
@ faceplayer
@ vmessage sText_MysteryGiftVisitingTrainer
@ waitmessage
@ waitbutton
@ release
@ end
@
@ MysteryEventScript_VisitingTrainerArrived: @ 8674EDF
@ lock
@ faceplayer
@ vmessage sText_MysteryGiftVisitingTrainer_2
@ waitmessage
@ waitbutton
@ release
@ end
@
@ sText_MysteryGiftVisitingTrainer:
@ .string "Thank you for using the MYSTERY\nGIFT System.\pBy holding this WONDER CARD, you\nmay take part in a survey at a\lPOKéMON MART.\pUse these surveys to invite\nTRAINERS to SOOTOPOLIS CITY.\p…Let me give you a secret\npassword for a survey:\p“GIVE ME\nAWESOME TRAINER”\pWrite that in on a survey and send\nit to the WIRELESS\lCOMMUNICATION SYSTEM.$"
@
@ sText_MysteryGiftVisitingTrainer_2:
@ .string "Thank you for using the MYSTERY\nGIFT System.\pA TRAINER has arrived in\nSOOTOPOLIS CITY looking for you.\pWe hope you will enjoy\nbattling the visiting TRAINER.\pYou may invite other TRAINERS by\nentering other passwords.\pTry looking for other passwords\nthat may work.$"
@
@ MysteryEventScript_BattleCard:: @ 867513C
@ setvaddress MysteryEventScript_BattleCard
@ checkflag FLAG_MYSTERY_EVENT_DONE
@ vgoto_if 1, MysteryEventScript_BattleCardInfo
@ setorcopyvar VAR_RESULT, 2
@ specialvar VAR_0x8008, sub_813986C
@ compare_var_to_value VAR_0x8008, 3
@ vgoto_if 0, MysteryEventScript_BattleCardInfo
@ lock
@ faceplayer
@ vmessage sText_MysteryGiftBattleCountCard_2
@ waitmessage
@ waitbutton
@ giveitem ITEM_POTION
@ release
@ setflag FLAG_MYSTERY_EVENT_DONE
@ end
@
@ MysteryEventScript_BattleCardInfo: @ 8675179
@ lock
@ faceplayer
@ vmessage sText_MysteryGiftBattleCountCard
@ waitmessage
@ waitbutton
@ release
@ end
@
@ sText_MysteryGiftBattleCountCard:
@ .string "Thank you for using the MYSTERY\nGIFT System.\pYour BATTLE COUNT CARD keeps\ntrack of your battle record against\lTRAINERS with the same CARD.\pLook for and battle TRAINERS who\nhave the same CARD as you.\pYou may check the overall rankings\nby reading the NEWS.\pPlease do give it a try!$"
@
@ sText_MysteryGiftBattleCountCard_2:
@ .string "Thank you for using the MYSTERY\nGIFT System.\pCongratulations!\pYou have won a prize for winning\nthree battles!\pWe hope you will be inspired to\nbattle some more.$"
@
@ MysteryEventScript_AuroraTicket:: @ 867533C
@ setvaddress MysteryEventScript_AuroraTicket
@ lock
@ faceplayer
@ checkflag FLAG_0x13A
@ vgoto_if 1, AuroraTicket_Obtained
@ checkflag FLAG_0x1AD
@ vgoto_if 1, AuroraTicket_Obtained
@ checkitem ITEM_AURORA_TICKET, 1
@ compare_var_to_value VAR_RESULT, 1
@ vgoto_if 1, AuroraTicket_Obtained
@ vmessage sText_AuroraTicket1
@ waitmessage
@ waitbutton
@ checkitemspace ITEM_AURORA_TICKET, 1
@ compare_var_to_value VAR_RESULT, 0
@ vgoto_if 1, AuroraTicket_NoBagSpace
@ giveitem ITEM_AURORA_TICKET
@ setflag FLAG_0x8D5
@ setflag FLAG_0x13A
@ vmessage sText_AuroraTicket2
@ waitmessage
@ waitbutton
@ release
@ end
@
@ AuroraTicket_NoBagSpace: @ 8675397
@ vmessage sText_AuroraTicketNoPlace
@ waitmessage
@ waitbutton
@ release
@ end
@
@ AuroraTicket_Obtained: @ 86753A0
@ vmessage sText_AuroraTicketGot
@ waitmessage
@ waitbutton
@ release
@ end
@
@ sText_AuroraTicket1:
@ .string "Thank you for using the MYSTERY\nGIFT System.\pYou must be {PLAYER}.\nThere is a ticket here for you.$"
@
@ sText_AuroraTicket2:
@ .string "It appears to be for use at the\nLILYCOVE CITY port.\pWhy not give it a try and see what\nit is about?$"
@
@ sText_AuroraTicketGot:
@ .string "Thank you for using the MYSTERY\nGIFT System.$"
@
@ sText_AuroraTicketNoPlace:
@ .string "Oh, I'm sorry, {PLAYER}.\nYour BAG’s KEY ITEMS POCKET is full.\pPlease store something on your PC,\nthen come back for this.$"
@
@ MysteryEventScript_MysticTicket:: @ 867550B
@ setvaddress MysteryEventScript_MysticTicket
@ lock
@ faceplayer
@ checkflag FLAG_0x13B
@ vgoto_if 1, MysticTicket_Obtained
@ checkflag FLAG_0x091
@ vgoto_if 1, MysticTicket_Obtained
@ checkflag FLAG_0x092
@ vgoto_if 1, MysticTicket_Obtained
@ checkitem ITEM_MYSTIC_TICKET, 1
@ compare_var_to_value VAR_RESULT, 1
@ vgoto_if 1, MysticTicket_Obtained
@ vmessage sText_MysticTicket2
@ waitmessage
@ waitbutton
@ checkitemspace ITEM_MYSTIC_TICKET, 1
@ compare_var_to_value VAR_RESULT, 0
@ vgoto_if 1, MysticTicket_NoBagSpace
@ giveitem ITEM_MYSTIC_TICKET
@ setflag FLAG_0x8E0
@ setflag FLAG_0x13B
@ vmessage sText_MysticTicket1
@ waitmessage
@ waitbutton
@ release
@ end
@
@ MysticTicket_NoBagSpace: @ 867556F
@ vmessage sText_MysticTicketNoPlace
@ waitmessage
@ waitbutton
@ release
@ end
@
@ MysticTicket_Obtained: @ 8675578
@ vmessage sText_MysticTicketGot
@ waitmessage
@ waitbutton
@ release
@ end
@
@ sText_MysticTicket2:
@ .string "Thank you for using the MYSTERY\nGIFT System.\pYou must be {PLAYER}.\nThere is a ticket here for you.$"
@
@ sText_MysticTicket1:
@ .string "It appears to be for use at the\nLILYCOVE CITY port.\pWhy not give it a try and see what\nit is about?$"
@
@ sText_MysticTicketGot:
@ .string "Thank you for using the MYSTERY\nGIFT System.$"
@
@ sText_MysticTicketNoPlace:
@ .string "Oh, I'm sorry, {PLAYER}.\nYour BAG’s KEY ITEMS POCKET is full.\pPlease store something on your PC,\nthen come back for this.$"
@
@ MysteryEventScript_AlteringCave:: @ 86756E3
@ setvaddress MysteryEventScript_AlteringCave
@ addvar VAR_ALTERING_CAVE_WILD_SET, 1
@ compare_var_to_value VAR_ALTERING_CAVE_WILD_SET, 10
@ vgoto_if 0, MysteryEventScript_AlteringCave_
@ setvar VAR_ALTERING_CAVE_WILD_SET, 0
@ MysteryEventScript_AlteringCave_: @ 86756FD
@ lock
@ faceplayer
@ vmessage sText_MysteryGiftAlteringCave
@ waitmessage
@ waitbutton
@ release
@ end
@
@ sText_MysteryGiftAlteringCave::
@ .string "Thank you for using the MYSTERY\nGIFT System.\pThere appears to be a rumor about\nrare POKéMON sightings.\pThe sightings reportedly came from\nthe ALTERING CAVE on ROUTE 103.\pPerhaps it would be worthwhile for\nyou to investigate this rumor.$"
@
@ MysteryEventScript_OldSeaMap:: @ 86757F4
@ setvaddress MysteryEventScript_OldSeaMap
@ lock
@ faceplayer
@ checkflag FLAG_0x13C
@ vgoto_if 1, OldSeaMap_Obtained
@ checkflag FLAG_0x1CA
@ vgoto_if 1, OldSeaMap_Obtained
@ checkitem ITEM_OLD_SEA_MAP, 1
@ compare_var_to_value VAR_RESULT, 1
@ vgoto_if 1, OldSeaMap_Obtained
@ vmessage sText_MysteryGiftOldSeaMap
@ waitmessage
@ waitbutton
@ checkitemspace ITEM_OLD_SEA_MAP, 1
@ compare_var_to_value VAR_RESULT, 0
@ vgoto_if 1, OldSeaMap_NoBagSpace
@ giveitem ITEM_OLD_SEA_MAP
@ setflag FLAG_0x8D6
@ setflag FLAG_0x13C
@ vmessage sText_MysteryGiftOldSeaMap_1
@ waitmessage
@ waitbutton
@ release
@ end
@
@ OldSeaMap_NoBagSpace: @ 867584F
@ vmessage sText_MysteryGiftOldSeaMap_3
@ waitmessage
@ waitbutton
@ release
@ end
@
@ OldSeaMap_Obtained: @ 8675858
@ vmessage sText_MysteryGiftOldSeaMap_2
@ waitmessage
@ waitbutton
@ release
@ end
@
@ sText_MysteryGiftOldSeaMap:
@ .string "Thank you for using the MYSTERY\nGIFT System.\pLet me confirm--you are {PLAYER}?\pWe received this OLD SEA MAP\naddressed to you.$"
@
@ sText_MysteryGiftOldSeaMap_1:
@ .string "It appears to be for use at the\nLILYCOVE CITY port.\pWhy not give it a try and see what\nit is about?$"
@
@ sText_MysteryGiftOldSeaMap_2:
@ .string "Thank you for using the MYSTERY\nGIFT System.$"
@
@ sText_MysteryGiftOldSeaMap_3:
@ .string "Oh, I'm sorry, {PLAYER}.\nYour BAG’s KEY ITEMS POCKET is full.\pPlease store something on your PC,\nthen come back for this.$"
gUnknown_8488E55::
.incbin "baserom.gba", 0x488E55, 0xB13
include/constants/flags.h
+3 -1
View File
@@ -1288,7 +1288,9 @@
#define FLAG_TRAINER_FLAG_START 0x500
#define TRAINERS_FLAG_NO 0x2E7
#define SYS_FLAGS (FLAG_TRAINER_FLAG_START + TRAINERS_FLAG_NO + (TRAINERS_FLAG_NO & 31 ? 32 - (TRAINERS_FLAG_NO & 31) : 0)) // 0x800
#define TRAINER_FLAGS_WORDS 0x300
#define SYS_FLAGS (FLAG_TRAINER_FLAG_START + TRAINER_FLAGS_WORDS)
// SYSTEM FLAGS