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

Document some Cinnabar scripts

Browse Source
This commit is contained in:
GriffinR
2020-01-17 12:11:12 -05:00
parent 8bdd942c9e
commit ad643af58a
35 changed files with 666 additions and 661 deletions
Download Patch File Download Diff File Expand all files Collapse all files
data/maps/CinnabarIsland_PokemonLab_Lounge/map.json
+3 -3
View File
@@ -23,7 +23,7 @@
"movement_range_y": 1,
"trainer_type": 0,
"trainer_sight_or_berry_tree_id": 0,
"script": "CinnabarIsland_PokemonLab_Lounge_EventScript_16E2B9",
"script": "CinnabarIsland_PokemonLab_Lounge_EventScript_Scientist",
"flag": "0"
},
{
@@ -36,7 +36,7 @@
"movement_range_y": 1,
"trainer_type": 0,
"trainer_sight_or_berry_tree_id": 0,
"script": "CinnabarIsland_PokemonLab_Lounge_EventScript_16E2C2",
"script": "CinnabarIsland_PokemonLab_Lounge_EventScript_Clifton",
"flag": "0"
},
{
@@ -49,7 +49,7 @@
"movement_range_y": 1,
"trainer_type": 0,
"trainer_sight_or_berry_tree_id": 0,
"script": "CinnabarIsland_PokemonLab_Lounge_EventScript_16E33E",
"script": "CinnabarIsland_PokemonLab_Lounge_EventScript_Norma",
"flag": "0"
}
],
data/maps/CinnabarIsland_PokemonLab_Lounge/scripts.inc
+23 -23
View File
@@ -1,90 +1,90 @@
CinnabarIsland_PokemonLab_Lounge_MapScripts:: @ 816E2B8
.byte 0
CinnabarIsland_PokemonLab_Lounge_EventScript_16E2B9:: @ 816E2B9
msgbox gUnknown_8199FB3, MSGBOX_NPC
CinnabarIsland_PokemonLab_Lounge_EventScript_Scientist:: @ 816E2B9
msgbox CinnabarIsland_PokemonLab_Lounge_Text_FoundFossilInMtMoon, MSGBOX_NPC
end
CinnabarIsland_PokemonLab_Lounge_EventScript_16E2C2:: @ 816E2C2
CinnabarIsland_PokemonLab_Lounge_EventScript_Clifton:: @ 816E2C2
lock
faceplayer
setvar VAR_0x8008, INGAME_TRADE_ELECTRODE
call EventScript_GetInGameTradeSpeciesInfo
goto_if_set FLAG_DID_ESPHERE_TRADE, EventScript_16E334
goto_if_set FLAG_DID_ESPHERE_TRADE, CinnabarIsland_PokemonLab_Lounge_EventScript_CliftonAlreadyTraded
msgbox Trade_Text_DoYouHaveMonWouldYouTradeForMon, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_16E31C
goto_if_eq CinnabarIsland_PokemonLab_Lounge_EventScript_CliftonDeclineTrade
call EventScript_ChooseMonForInGameTrade
compare VAR_0x8004, PARTY_SIZE
goto_if_ge EventScript_16E31C
goto_if_ge CinnabarIsland_PokemonLab_Lounge_EventScript_CliftonDeclineTrade
call EventScript_GetInGameTradeSpecies
compare VAR_RESULT, VAR_0x8009
goto_if_ne EventScript_16E326
goto_if_ne CinnabarIsland_PokemonLab_Lounge_EventScript_CliftonNotRequestedMon
call EventScript_DoInGameTrade
msgbox Trade_Text_Thanks
setflag FLAG_DID_ESPHERE_TRADE
release
end
EventScript_16E31C:: @ 816E31C
CinnabarIsland_PokemonLab_Lounge_EventScript_CliftonDeclineTrade:: @ 816E31C
msgbox Trade_Text_WellIfYouDontWantTo
release
end
EventScript_16E326:: @ 816E326
CinnabarIsland_PokemonLab_Lounge_EventScript_CliftonNotRequestedMon:: @ 816E326
getspeciesname 0, VAR_0x8009
msgbox Trade_Text_ThisIsntMon
release
end
EventScript_16E334:: @ 816E334
CinnabarIsland_PokemonLab_Lounge_EventScript_CliftonAlreadyTraded:: @ 816E334
msgbox Trade_Text_HasTradedMonGrownStronger
release
end
CinnabarIsland_PokemonLab_Lounge_EventScript_16E33E:: @ 816E33E
CinnabarIsland_PokemonLab_Lounge_EventScript_Norma:: @ 816E33E
lock
faceplayer
setvar VAR_0x8008, INGAME_TRADE_TANGELA
copyvar VAR_0x8004, VAR_0x8008
specialvar VAR_RESULT, GetInGameTradeSpeciesInfo
copyvar VAR_0x8009, VAR_RESULT
goto_if_set FLAG_DID_TANGENY_TRADE, EventScript_16E3D4
msgbox gUnknown_81A5AD6, MSGBOX_YESNO
goto_if_set FLAG_DID_TANGENY_TRADE, CinnabarIsland_PokemonLab_Lounge_EventScript_NormaAlreadyTraded
msgbox Trade_Text_DoYouHaveMonWantToTradeForMon, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_16E3BC
goto_if_eq CinnabarIsland_PokemonLab_Lounge_EventScript_NormaDeclineTrade
special Special_ChooseMonFromParty
waitstate
copyvar VAR_0x800A, VAR_0x8004
compare VAR_0x8004, PARTY_SIZE
goto_if_ge EventScript_16E3BC
goto_if_ge CinnabarIsland_PokemonLab_Lounge_EventScript_NormaDeclineTrade
copyvar VAR_0x8005, VAR_0x800A
specialvar VAR_RESULT, GetTradeSpecies
copyvar VAR_0x800B, VAR_RESULT
compare VAR_RESULT, VAR_0x8009
goto_if_ne EventScript_16E3C6
goto_if_ne CinnabarIsland_PokemonLab_Lounge_EventScript_NormaNotRequestedMon
copyvar VAR_0x8004, VAR_0x8008
copyvar VAR_0x8005, VAR_0x800A
special CreateInGameTradePokemon
special DoInGameTradeScene
waitstate
msgbox gUnknown_81A5B4A
msgbox Trade_Text_ThanksYoureAPal
setflag FLAG_DID_TANGENY_TRADE
release
end
EventScript_16E3BC:: @ 816E3BC
msgbox gUnknown_81A5B08
CinnabarIsland_PokemonLab_Lounge_EventScript_NormaDeclineTrade:: @ 816E3BC
msgbox Trade_Text_ThatsTooBad
release
end
EventScript_16E3C6:: @ 816E3C6
CinnabarIsland_PokemonLab_Lounge_EventScript_NormaNotRequestedMon:: @ 816E3C6
getspeciesname 0, VAR_0x8009
msgbox gUnknown_81A5B18
msgbox Trade_Text_ThisIsNoMon
release
end
EventScript_16E3D4:: @ 816E3D4
msgbox gUnknown_81A5B60
CinnabarIsland_PokemonLab_Lounge_EventScript_NormaAlreadyTraded:: @ 816E3D4
msgbox Trade_Text_HowIsMyOldMon
release
end
data/maps/CinnabarIsland_PokemonLab_Lounge/text.inc
+1 -1
View File
@@ -1,4 +1,4 @@
gUnknown_8199FB3:: @ 8199FB3
CinnabarIsland_PokemonLab_Lounge_Text_FoundFossilInMtMoon:: @ 8199FB3
.string "I found this most remarkable fossil\n"
.string "inside MT. MOON.\p"
.string "I think it's of a rare, prehistoric\n"