bf8b09b1b6
* Emptied out item_ball_scripts Added GetObjectEventTrainerRangeFromTemplate Added Common_EventScript_FindItem * Replaced trainer_sight_or_berry_tree_id with item constant Replaced scripts with Common_EventScript_FindItem * Renamed to GetItemBallIdAndAmountFromTemplate Moved to item_ball.c * Updated ObjectEventTemplate * Updated inc files to support plural item names * Refactored CopyItemNameHandlePlural to handle all items * Change failsafe in GetItemBallIdFromTemplate to be ITEM_NONE + 1 instead of ITEMS_COUNT * Converted spaces to tabs https://github.com/rh-hideout/pokeemerald-expansion/pull/3942\#discussion_r1446415663 https://github.com/rh-hideout/pokeemerald-expansion/pull/3942\#discussion_r1446415525 https://github.com/rh-hideout/pokeemerald-expansion/pull/3942\#discussion_r1446415409 https://github.com/rh-hideout/pokeemerald-expansion/pull/3942\#discussion_r1446415130 * Added warning on object_event macro to prevent silent failure Reverted global.fieldmap to original state, per feedback --------- Co-authored-by: Bassoonian <iasperbassoonian@gmail.com>
212 lines
5.7 KiB
PHP
212 lines
5.7 KiB
PHP
.set ITEMID, VAR_0x8000
|
|
.set AMOUNT, VAR_0x8001
|
|
|
|
Std_ObtainItem::
|
|
additem ITEMID, AMOUNT
|
|
copyvar VAR_0x8007, VAR_RESULT
|
|
call EventScript_ObtainItemMessage
|
|
return
|
|
|
|
EventScript_ObtainItemMessage::
|
|
bufferitemnameplural STR_VAR_2, ITEMID, AMOUNT
|
|
checkitemtype ITEMID
|
|
call EventScript_BufferPocketNameAndTryFanfare
|
|
call_if_eq VAR_0x8007, TRUE, EventScript_ObtainedItem
|
|
call_if_eq VAR_0x8007, FALSE, EventScript_NoRoomForItem
|
|
return
|
|
|
|
EventScript_BufferPocketNameAndTryFanfare::
|
|
switch VAR_RESULT
|
|
case POCKET_ITEMS, EventScript_BufferItemsPocket
|
|
case POCKET_KEY_ITEMS, EventScript_BufferKeyItemsPocket
|
|
case POCKET_POKE_BALLS, EventScript_BufferPokeballsPocket
|
|
case POCKET_TM_HM, EventScript_BufferTMHMsPocket
|
|
case POCKET_BERRIES, EventScript_BufferBerriesPocket
|
|
end
|
|
|
|
EventScript_BufferItemsPocket::
|
|
bufferstdstring STR_VAR_3, STDSTRING_ITEMS
|
|
call_if_eq VAR_0x8007, TRUE, EventScript_PlayFanfareObtainedItem
|
|
return
|
|
|
|
EventScript_BufferKeyItemsPocket::
|
|
bufferstdstring STR_VAR_3, STDSTRING_KEYITEMS
|
|
call_if_eq VAR_0x8007, TRUE, EventScript_PlayFanfareObtainedItem
|
|
return
|
|
|
|
EventScript_BufferPokeballsPocket::
|
|
bufferstdstring STR_VAR_3, STDSTRING_POKEBALLS
|
|
call_if_eq VAR_0x8007, TRUE, EventScript_PlayFanfareObtainedItem
|
|
return
|
|
|
|
EventScript_BufferTMHMsPocket::
|
|
bufferstdstring STR_VAR_3, STDSTRING_TMHMS
|
|
call_if_eq VAR_0x8007, TRUE, EventScript_PlayFanfareObtainedTMHM
|
|
return
|
|
|
|
EventScript_BufferBerriesPocket::
|
|
bufferstdstring STR_VAR_3, STDSTRING_BERRIES
|
|
call_if_eq VAR_0x8007, TRUE, EventScript_PlayFanfareObtainedItem
|
|
return
|
|
|
|
EventScript_ObtainedItem::
|
|
compare VAR_0x8001, TRUE
|
|
goto_if_eq EventScript_ObtainedItemMessage
|
|
buffernumberstring 0, VAR_0x8001
|
|
message gText_ObtainedTheItems
|
|
goto EventScript_ContinueObtainedItem
|
|
EventScript_ObtainedItemMessage:
|
|
message gText_ObtainedTheItem
|
|
EventScript_ContinueObtainedItem:
|
|
waitfanfare
|
|
msgbox gText_PutItemInPocket, MSGBOX_DEFAULT
|
|
setvar VAR_RESULT, TRUE
|
|
return
|
|
|
|
EventScript_NoRoomForItem::
|
|
setvar VAR_RESULT, FALSE
|
|
return
|
|
|
|
EventScript_PlayFanfareObtainedItem::
|
|
playfanfare MUS_OBTAIN_ITEM
|
|
return
|
|
|
|
EventScript_PlayFanfareObtainedTMHM::
|
|
playfanfare MUS_OBTAIN_TMHM
|
|
return
|
|
|
|
Std_ObtainDecoration::
|
|
adddecoration ITEMID
|
|
copyvar VAR_0x8007, VAR_RESULT
|
|
call EventScript_ObtainDecorationMessage
|
|
return
|
|
|
|
EventScript_ObtainDecorationMessage::
|
|
bufferdecorationname STR_VAR_2, ITEMID
|
|
call_if_eq VAR_0x8007, TRUE, EventScript_ObtainedDecor
|
|
call_if_eq VAR_0x8007, FALSE, EventScript_NoRoomForDecor
|
|
return
|
|
|
|
EventScript_ObtainedDecor::
|
|
playfanfare MUS_OBTAIN_ITEM
|
|
message gText_ObtainedTheDecor
|
|
waitfanfare
|
|
msgbox gText_TheDecorWasTransferredToThePC, MSGBOX_DEFAULT
|
|
setvar VAR_RESULT, TRUE
|
|
return
|
|
|
|
EventScript_NoRoomForDecor::
|
|
setvar VAR_RESULT, FALSE
|
|
return
|
|
|
|
Std_FindItem::
|
|
lock
|
|
faceplayer
|
|
waitse
|
|
copyvar VAR_0x8004, ITEMID
|
|
copyvar VAR_0x8005, AMOUNT
|
|
checkitemspace ITEMID, AMOUNT
|
|
copyvar VAR_0x8007, VAR_RESULT
|
|
bufferitemnameplural STR_VAR_2, ITEMID, AMOUNT
|
|
checkitemtype ITEMID
|
|
call EventScript_BufferPocketNameAndTryFanfare
|
|
call_if_eq VAR_0x8007, TRUE, EventScript_PickUpItem
|
|
call_if_eq VAR_0x8007, FALSE, EventScript_NoRoomToPickUpItem
|
|
release
|
|
return
|
|
|
|
EventScript_PickUpItem::
|
|
removeobject VAR_LAST_TALKED
|
|
additem VAR_0x8004, VAR_0x8005
|
|
specialvar VAR_RESULT, BufferTMHMMoveName
|
|
copyvar VAR_0x8008, VAR_RESULT
|
|
call_if_eq VAR_0x8008, TRUE, EventScript_FoundTMHM
|
|
call_if_eq VAR_0x8008, FALSE, EventScript_FoundItem
|
|
waitfanfare
|
|
waitmessage
|
|
bufferitemnameplural STR_VAR_2, VAR_0x8004, VAR_0x8005
|
|
pyramid_inchallenge
|
|
goto_if_eq VAR_RESULT, TRUE, EventScript_PutBattlePyramidItemInBag
|
|
msgbox gText_PutItemInPocket, MSGBOX_DEFAULT
|
|
return
|
|
|
|
EventScript_PutBattlePyramidItemInBag::
|
|
msgbox gText_PlayerPutItemInBag, MSGBOX_DEFAULT
|
|
return
|
|
|
|
EventScript_FoundTMHM::
|
|
bufferitemnameplural STR_VAR_1, VAR_0x8004, VAR_0x8005
|
|
compare VAR_0x8005, 2
|
|
goto_if_lt EventScript_FoundTMHMMessage
|
|
buffernumberstring STR_VAR_3, VAR_0x8005
|
|
message gText_PlayerFoundTMHMs
|
|
goto EventScript_BufferTMHMsPocket
|
|
return
|
|
EventScript_FoundTMHMMessage::
|
|
message gText_PlayerFoundOneTMHM
|
|
return
|
|
|
|
EventScript_FoundItem::
|
|
compare VAR_0x8001, TRUE
|
|
goto_if_eq EventScript_FoundItemMessage
|
|
buffernumberstring 0, VAR_0x8001
|
|
message gText_PlayerFoundItems
|
|
return
|
|
EventScript_FoundItemMessage::
|
|
message gText_PlayerFoundOneItem
|
|
return
|
|
|
|
EventScript_NoRoomToPickUpItem::
|
|
msgbox gText_ObtainedTheItem, MSGBOX_DEFAULT
|
|
msgbox gText_TooBadBagIsFull, MSGBOX_DEFAULT
|
|
setvar VAR_RESULT, FALSE
|
|
return
|
|
|
|
EventScript_HiddenItemScript::
|
|
lockall
|
|
waitse
|
|
additem VAR_0x8005
|
|
copyvar VAR_0x8007, VAR_RESULT
|
|
bufferitemnameplural STR_VAR_2, VAR_0x8005, 1
|
|
checkitemtype VAR_0x8005
|
|
call EventScript_BufferPocketNameAndTryFanfare
|
|
goto_if_eq VAR_0x8007, TRUE, EventScript_PickUpHiddenItem
|
|
goto_if_eq VAR_0x8007, FALSE, EventScript_NoRoomForHiddenItem
|
|
end
|
|
|
|
EventScript_PickUpHiddenItem::
|
|
copyvar VAR_0x8008, VAR_0x8004
|
|
copyvar VAR_0x8004, VAR_0x8005
|
|
specialvar VAR_RESULT, BufferTMHMMoveName
|
|
goto_if_eq VAR_RESULT, TRUE, EventScript_FoundHiddenTMHM
|
|
goto_if_eq VAR_RESULT, FALSE, EventScript_FoundHiddenItem
|
|
end
|
|
|
|
EventScript_FoundHiddenTMHM::
|
|
bufferitemnameplural STR_VAR_1, VAR_0x8004, 1
|
|
message gText_PlayerFoundOneTMHM
|
|
goto EventScript_PutHiddenItemInPocket
|
|
end
|
|
|
|
EventScript_FoundHiddenItem::
|
|
message gText_PlayerFoundOneItem
|
|
goto EventScript_PutHiddenItemInPocket
|
|
end
|
|
|
|
EventScript_PutHiddenItemInPocket::
|
|
waitmessage
|
|
waitfanfare
|
|
bufferitemnameplural STR_VAR_2, VAR_0x8004, 1
|
|
copyvar VAR_0x8004, VAR_0x8008
|
|
msgbox gText_PutItemInPocket, MSGBOX_DEFAULT
|
|
special TryPutTreasureInvestigatorsOnAir
|
|
special SetHiddenItemFlag
|
|
releaseall
|
|
end
|
|
|
|
EventScript_NoRoomForHiddenItem::
|
|
msgbox gText_PlayerFoundOneItem, MSGBOX_DEFAULT
|
|
msgbox gText_TooBadBagIsFull, MSGBOX_DEFAULT
|
|
setvar VAR_RESULT, 0
|
|
releaseall
|
|
end
|