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

Merge pull request #278 from GriffinRichards/doc-miscscript

Browse Source 
Split/label some common event scripts
This commit is contained in:
PikalaxALT
2020-03-02 12:19:18 -05:00
committed by GitHub
parent e8504c7a3f 358f785a03
commit 0169a98c68
21 changed files with 374 additions and 361 deletions
Download Patch File Download Diff File Expand all files Collapse all files
data/scripts/cave_of_origin.inc
+36
View File
@@ -0,0 +1,36 @@
@ All unused / leftover scripts from RS
CaveOfOrigin_EventScript_Shake1:: @ 81A7493
lockall
setvar VAR_TEMP_1, 1
goto CaveOfOrigin_EventScript_Shake
end
CaveOfOrigin_EventScript_Shake2:: @ 81A749F
lockall
setvar VAR_TEMP_2, 1
goto CaveOfOrigin_EventScript_Shake
end
CaveOfOrigin_EventScript_Shake3:: @ 81A74AB
lockall
setvar VAR_TEMP_3, 1
goto CaveOfOrigin_EventScript_Shake
end
CaveOfOrigin_EventScript_Shake:: @ 81A74B7
setvar VAR_0x8004, 1
setvar VAR_0x8005, 1
setvar VAR_0x8006, 8
setvar VAR_0x8007, 5
special Special_ShakeScreen
waitstate
releaseall
end
CaveOfOrigin_EventScript_DisableShakes:: @ 81A74D1
setvar VAR_TEMP_1, 1
setvar VAR_TEMP_2, 1
setvar VAR_TEMP_3, 1
setvar VAR_TEMP_4, 1
setvar VAR_TEMP_5, 1
return
data/scripts/hall_of_fame.inc
+38
View File
@@ -0,0 +1,38 @@
EventScript_SetDefeatedEliteFourFlagsVars:: @ 81A651A
clearflag FLAG_HIDE_POSTGAME_GOSSIPERS
call EventScript_ResetEliteFour
special Special_UpdateTrainerFanClubGameClear
specialvar VAR_RESULT, IsNationalPokedexEnabled
compare VAR_RESULT, FALSE
call_if_eq EventScript_SetReadyTryGiveNationalDexScene
call EventScript_ResetLegendaries
return
EventScript_SetReadyTryGiveNationalDexScene:: @ 81A653B
setvar VAR_MAP_SCENE_PALLET_TOWN_OAK, 2
return
EventScript_ResetLegendaries:: @ 81A6541
clearflag FLAG_LUGIA_FLEW_AWAY
clearflag FLAG_HO_OH_FLEW_AWAY
clearflag FLAG_DEOXYS_FLEW_AWAY
return
EventScript_ResetEliteFourEnd:: @ 81A654B
call EventScript_ResetEliteFour
end
EventScript_ResetEliteFour:: @ 81A6551
clearflag FLAG_DEFEATED_LORELEI
clearflag FLAG_DEFEATED_BRUNO
clearflag FLAG_DEFEATED_AGATHA
clearflag FLAG_DEFEATED_LANCE
clearflag FLAG_DEFEATED_CHAMP
cleartrainerflag TRAINER_CHAMPION_FIRST_SQUIRTLE
cleartrainerflag TRAINER_CHAMPION_FIRST_BULBASAUR
cleartrainerflag TRAINER_CHAMPION_FIRST_CHARMANDER
cleartrainerflag TRAINER_CHAMPION_REMATCH_SQUIRTLE
cleartrainerflag TRAINER_CHAMPION_REMATCH_BULBASAUR
cleartrainerflag TRAINER_CHAMPION_REMATCH_CHARMANDER
setvar VAR_MAP_SCENE_POKEMON_LEAGUE, 0
return
data/scripts/itemfinder.inc
+27
View File
@@ -0,0 +1,27 @@
EventScript_ItemfinderDigUpUnderfootItem:: @ 81A8D49
lockall
textcolor 3
waitse
call EventScript_TryPickUpHiddenItem
compare VAR_0x8007, TRUE
goto_if_eq EventScript_DigUpItemPutInPocket
compare VAR_0x8007, FALSE
goto_if_eq EventScript_DigUpItemBagIsFull
end
EventScript_DigUpItemPutInPocket::
message Text_DugUpItemFromGround
waitfanfare
waitmessage
delay 60
msgbox Text_PutItemAway
special Special_SetHiddenItemFlag
releaseall
end
EventScript_DigUpItemBagIsFull::
msgbox Text_DugUpItemFromGround
msgbox Text_TooBadBagFull
setvar VAR_RESULT, 0
releaseall
end
data/scripts/questionnaire.inc
+48
View File
@@ -0,0 +1,48 @@
EventScript_Questionnaire:: @ 81A7702
lockall
textcolor 3
msgbox Text_FillOutQuestionnaire, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_DeclineQuestionnaire
setvar VAR_0x8004, EASY_CHAT_TYPE_QUESTIONNAIRE
call Common_ShowEasyChatScreen
lock
faceplayer
specialvar VAR_0x8008, Special_GetMartClerkObjectId
textcolor 0
compare VAR_0x8004, 0
goto_if_eq EventScript_EnableMysteryGift
compare VAR_RESULT, 0
goto_if_eq EventScript_DeclineQuestionnaire
compare VAR_RESULT, 1
goto_if_eq EventScript_TookQuestionnaire
end
EventScript_EnableMysteryGift:: @ 81A774D
applymovement VAR_0x8008, Movement_FaceDown
waitmovement 0
playse SE_PIN
applymovement VAR_0x8008, Movement_ExclamationMark
waitmovement 0
applymovement VAR_0x8008, Movement_Delay48
waitmovement 0
msgbox Text_YouKnowThoseWords
setflag FLAG_SYS_MYSTERY_GIFT_ENABLED
textcolor 3
special sub_80699BC
signmsg
msgbox Text_YouCanAccessMysteryGift
normalmsg
releaseall
end
EventScript_DeclineQuestionnaire:: @ 81A778A
releaseall
end
EventScript_TookQuestionnaire:: @ 81A778C
applymovement VAR_0x8008, Movement_FaceDown
waitmovement 0
msgbox Text_QuestionnaireThankYou
releaseall
end
data/scripts/white_out.inc
+69
View File
@@ -0,0 +1,69 @@
EventScript_AfterWhiteOutHeal:: @ 81A8D97
lockall
textcolor 1
msgbox Text_FirstShouldRestoreMonsHealth
call EventScript_PkmnCenterNurse_TakeAndHealPkmn
call_if_unset FLAG_DEFEATED_BROCK, EventScript_AfterWhiteOutHealMsgPreBrock
call_if_set FLAG_DEFEATED_BROCK, EventScript_AfterWhiteOutHealMsg
applymovement VAR_LAST_TALKED, Movement_Bow
waitmovement 0
fadedefaultbgm
releaseall
end
EventScript_AfterWhiteOutHealMsgPreBrock:: @ 81A8DC6
msgbox Text_MonsHealedShouldBuyPotions
return
EventScript_AfterWhiteOutHealMsg:: @ 81A8DCF
msgbox Text_MonsHealed
return
EventScript_AfterWhiteOutMomHeal:: @ 81A8DD8
lockall
textcolor 1
applymovement 1, Movement_WalkInPlaceFastestDown
waitmovement 0
msgbox Text_HadQuiteAnExperienceTakeRest
call EventScript_OutOfCenterPartyHeal
msgbox Text_MomExplainHPGetPotions
fadedefaultbgm
releaseall
end
EventScript_FieldPoison:: @ 81A8DFD
lockall
textcolor 3
special TryFieldPoisonWhiteOut
waitstate
compare VAR_RESULT, TRUE
goto_if_eq EventScript_FieldWhiteOut
releaseall
end
EventScript_FieldWhiteOut:: @ 81A8E11
checkmoney 1, 0
compare VAR_RESULT, FALSE
goto_if_eq EventScript_FieldWhiteOutNoMoney
compare VAR_RESULT, TRUE
goto_if_eq EventScript_FieldWhiteOutHasMoney
end
EventScript_FieldWhiteOutNoMoney:: @ 81A8E2E
msgbox Text_WhitedOut
goto EventScript_FieldWhiteOutFade
end
EventScript_FieldWhiteOutHasMoney:: @ 81A8E3C
special Special_OverworldWhiteOutGetMoneyLoss
msgbox Text_WhitedOutLostMoney
goto EventScript_FieldWhiteOutFade
end
EventScript_FieldWhiteOutFade:: @ 81A8E4D
special Script_FadeOutMapMusic
waitstate
fadescreen FADE_TO_BLACK
special SetCB2Whiteout
waitstate
end