#include "global.h" #include "globaldata.h" #include "ground_script.h" #include "constants/dungeon.h" #include "constants/friend_area.h" #include "constants/item.h" #include "constants/monster.h" #include "constants/move_id.h" #include "direction_util.h" #include "pixelpos_math.h" #include "music_util.h" #include "code_8099360.h" #include "code_8094F88.h" #include "code_80958E8.h" #include "rescue_scenario.h" #include "adventure_info.h" #include "code_80A26CC.h" #include "debug.h" #include "dungeon_info.h" #include "event_flag.h" #include "exclusive_pokemon.h" #include "friend_area.h" #include "ground_link.h" #include "ground_lives.h" #include "ground_main.h" #include "ground_map.h" #include "ground_script.h" #include "ground_sprite.h" #include "input.h" #include "items.h" #include "main_loops.h" #include "math.h" #include "music.h" #include "other_random.h" #include "random.h" #include "rescue_team_info.h" #include "save.h" #include "string_format.h" #include "text_util.h" #include "pokemon.h" #include "wigglytuff_shop1.h" #include "wonder_mail.h" #include "palette_util.h" #include "pokemon_3.h" #include "memory.h" #include "script_item.h" #include "ground_lives_helper.h" #include "friend_area_dialogue.h" #include "structs/str_dungeon_setup.h" #include "ground_map_conversion_table.h" #include "unk_ds_only_feature.h" #include "textbox.h" #include "ground_event.h" #include "ground_effect.h" #include "ground_object.h" #include "ground_weather.h" #include "code_809D148.h" #include "training_maze.h" // Beware of the declarations without specified arguments, returning u32 or s32, these were quickly hacked in to get the code to compile and link // The return values are almost certainly NOT correct and will need to be rechecked when moving to header files bool8 sub_802FCF0(void); bool8 sub_8099B94(void); bool8 sub_80961D8(void); void ResetMailbox(void); void sub_80963FC(void); void sub_8096488(void); bool8 sub_80964B4(void); u8 sub_80964E4(); // For gScriptLocks, gScriptLockConds, gUnlockBranchLabels #define SCRIPT_LOCKS_ARR_COUNT 129 static EWRAM_DATA s16 gCurrentMap = 0; static EWRAM_DATA s16 gUnknown_2039A32 = 0; static EWRAM_DATA s16 gUnknown_2039A34 = 0; static EWRAM_DATA u8 gAnyScriptLocked = 0; // Hard to say why the arrays are larger than SCRIPT_LOCKS_ARR_COUNT. Could be unused EWRAM variables or special case indexes. static ALIGNED(4) EWRAM_DATA u8 gScriptLocks[SCRIPT_LOCKS_ARR_COUNT + 7] = {0}; static ALIGNED(4) EWRAM_DATA u8 gScriptLockConds[SCRIPT_LOCKS_ARR_COUNT + 7] = {0}; static EWRAM_DATA u32 gUnlockBranchLabels[SCRIPT_LOCKS_ARR_COUNT + 1] = {0}; static EWRAM_DATA MenuItem gChoices[9] = {0}; static EWRAM_DATA char sPokeNameBuffer[POKEMON_NAME_LENGTH + 2] = {0}; static EWRAM_DATA u32 gUnknown_2039DA4 = 0; static EWRAM_DATA u16 gUnknown_2039DA8 = 0; static EWRAM_INIT int sNumChoices = 0; static EWRAM_INIT u8 *gUnknown_203B4B0 = NULL; static const CallbackData sNullCallbackData = { .maybeId = 4, .getIndex = NULL, .getSize = NULL, .getHitboxCenter = NULL, .getPosHeightAndUnk = NULL, .getDirection = NULL, .getFlags = NULL, .setHitboxPos = NULL, .setPositionBounds = NULL, .moveReal = NULL, .setPosHeight = NULL, .setDirection = NULL, .setEventIndex = NULL, .livesOnlyNullsub = NULL, .func38 = NULL, .setFlags = NULL, .clearFlags = NULL, .func44_livesOnlySpriteRelated = NULL, .moveRelative = NULL, .func4C_spriteRelatedCheck = NULL, .func50_spriteRelated = NULL, }; static const PixelPos sPixelPosZero = {0, 0}; static const ScriptCommand gUnknown_81164E4[] = { {0xF6, 0, 0xC5, 0, 0, "../ground/ground_script.c"}, {0xEF, 0, 0, 0, 0, NULL}, }; static s32 ExecuteScriptCommand(Action *action); static s32 sub_80A14E8(Action *action, u8 idx, u32 r2, s32 r3); static const ScriptCommand *FindLabel(Action *action, s32 r1); static const ScriptCommand *ResolveJump(Action *action, s32 r1); static void sub_80A2500(s32 param_1, ActionUnkIds *param_2); static void sub_80A252C(s32 param_1, ActionUnkIds *param_2); static void sub_80A2558(s32 param_1, ActionUnkIds *param_2); static void sub_80A2584(s16 r0, s16 r1); static void sub_80A2598(s16 r0, s16 r1); static u32 sub_80A25AC(u16 param_1); void sub_809D490(void) { UNUSED void *oldPtr = gUnknown_203B4B0; // Needed to match gUnknown_203B4B0 = MemoryAlloc(0x400, 6); sub_809D4B0(); } void sub_809D4B0(void) { s32 i; gCurrentMap = -1; gUnknown_2039A32 = -1; gUnknown_2039A34 = -1; gAnyScriptLocked = 0; for (i = 0; i < SCRIPT_LOCKS_ARR_COUNT; i++) { gScriptLocks[i] = 0; gScriptLockConds[i] = 0; gUnlockBranchLabels[i] = 0; } } void sub_809D508(void) { FREE_AND_SET_NULL(gUnknown_203B4B0); } static void sub_809D520(ActionUnkIds *a0) { a0->unk0 = -1; } static Action *sub_809D52C(ActionUnkIds *a0) { switch (a0->unk0) { case 0: return 0; case 1: return sub_80A882C(a0->unk2); case 2: return GroundObject_GetAction(a0->unk2); case 3: return sub_80AD158(a0->unk2); } return NULL; } static void InitScriptData(ScriptData *a0) { s32 i; a0->state = -1; a0->savedState = 0; a0->script.ptr2 = 0; a0->script.ptr = 0; a0->savedScript.ptr2 = 0; a0->savedScript.ptr = 0; a0->curScriptOp = 0; a0->curPtr = 0; a0->unk22 = -1; a0->unk24 = 0; a0->unk26 = 0xFF; a0->branchDiscriminant = 0; a0->unk2A = 0; a0->unk2C = 0; a0->unk30 = 0; for (i = 0; i < 4; i++) { a0->localVars.val[i] = 0; } } static void InitAction(Action *a0) { s32 i; a0->callbacks = NULL; a0->parentObject = NULL; a0->group = -1; a0->sector = 0xFF; sub_809D520(&a0->unkC); for (i = 0; i < 4; i++) { a0->predefinedScripts[i] = NULL; } InitScriptData(&a0->scriptData); InitScriptData(&a0->scriptData2); } void InitActionWithParams(Action *action, const CallbackData *callbacks, void *parent, s32 group, s32 sector) { s32 group_s32 = (s16) group; s32 sector_s32 = (s8) sector; InitAction(action); action->callbacks = callbacks; action->parentObject = parent; action->group = group_s32; action->sector = sector_s32; action->unk8.unk0 = callbacks->maybeId; if (callbacks->getIndex) action->unk8.unk2 = callbacks->getIndex(parent); else action->unk8.unk2 = 0; } void InitAction2(Action *action) { InitAction(action); } UNUSED static s16 sub_809D654(Action *action) { return action->scriptData.savedState; } UNUSED static s16 sub_809D65C(Action *action) { if(action->scriptData.savedState != 0) return action->scriptData.state; else return -1; } bool8 sub_809D678(Action *action) { return action->scriptData.savedState == 0 ? FALSE : TRUE; } bool8 sub_809D684(Action *action, ScriptInfoSmall *scriptInfo) { if(action->scriptData.savedState != 0) { if(action->scriptData.savedScript.ptr != 0) { if(action->scriptData.savedScript.ptr2 == scriptInfo->ptr) return 1; } else { if(action->scriptData.script.ptr2 == scriptInfo->ptr) return 1; } } if(action->scriptData2.savedState != 0) { if(action->scriptData2.savedScript.ptr != 0) { if(action->scriptData2.savedScript.ptr2 == scriptInfo->ptr) return 1; } else { if(action->scriptData2.script.ptr2 == scriptInfo->ptr) return 1; } } return 0; } void SetPredefinedScript(Action *param_1, s16 index, const ScriptCommand *param_3) { param_1->predefinedScripts[index] = param_3; } bool8 GetPredefinedScript(Action *param_1, ScriptInfoSmall *script, s32 _index) { const ScriptCommand *scriptPtr; s32 index = (s16) _index; scriptPtr = param_1->predefinedScripts[index]; script->ptr = scriptPtr; script->state = index; script->group = param_1->group; script->sector = param_1->sector; return scriptPtr != NULL; } void GetFunctionScript(Action *param_1, ScriptInfoSmall *script, s16 index) { s32 index_s32 = index; script->ptr = gFunctionScriptTable[index_s32].script; script->state = 2; if (param_1 != NULL) { script->group = param_1->group; script->sector = param_1->sector; } else { script->group = -1; script->sector = -1; } } bool8 ActionResetScriptData(Action *param_1, const DebugLocation *unused) { InitScriptData(¶m_1->scriptData); InitScriptData(¶m_1->scriptData2); return TRUE; } static bool8 ActionResetScriptDataForDeletion(Action *param_1, const DebugLocation *unused) { InitScriptData(¶m_1->scriptData); InitScriptData(¶m_1->scriptData2); param_1->scriptData.savedState = 4; return TRUE; } bool8 GroundScript_ExecutePP(Action *action, ActionUnkIds *param_2, ScriptInfoSmall *param_3, const DebugLocation *unused) { if ((param_3 == NULL) || (param_3->ptr == NULL)) { return FALSE; } switch(param_3->state) { case 2: case 3: if (action->scriptData.state == 1) { action->scriptData2 = action->scriptData; break; } if (action->scriptData.state == 5) { InitScriptData(&action->scriptData2); } break; case 5: if (action->scriptData.state != 2) { FATAL_ERROR_ARGS("../ground/ground_script.c", 688, "execute script type error B"); } if (action->scriptData2.state != -1) { FATAL_ERROR_ARGS("../ground/ground_script.c", 689, "execute script type error C"); } action->scriptData2 = action->scriptData; break; case 0: if (action->scriptData.state != 1) { InitScriptData(&action->scriptData2); } else { action->scriptData2 = action->scriptData; } break; case 1: InitScriptData(&action->scriptData2); break; default: FATAL_ERROR_ARGS("../ground/ground_script.c", 708, "execute script type error %d", param_3->state); } InitScriptData(&action->scriptData); if (param_2 != NULL) { action->unkC = *param_2; } else { sub_809D520(&action->unkC); } action->scriptData.state = param_3->state; action->scriptData.savedState = 3; action->scriptData.script.group = param_3->group; action->scriptData.script.sector = param_3->sector; action->scriptData.script.ptr = param_3->ptr; action->scriptData.script.ptr2 = param_3->ptr; action->scriptData.savedScript.ptr = 0; action->scriptData.savedScript.ptr2 = NULL; if (action->callbacks->getDirection != 0) { action->callbacks->getDirection(action->parentObject, &action->scriptData.unk26); } return TRUE; } bool8 ExecutePredefinedScript(Action *param_1, ActionUnkIds *param_2, s16 index, const DebugLocation *debug) { ScriptInfoSmall auStack28; GetPredefinedScript(param_1,&auStack28,index); return GroundScript_ExecutePP(param_1, param_2, &auStack28, debug); } static u8 GroundScriptCheckLockCondition(Action *param_1, s16 param_2) { s32 param_2_s32; param_2_s32 = param_2; if ((param_2 == 0) && (IsTextboxOpen_809A750() == 0)) { param_1->scriptData.script.ptr = ResolveJump(param_1, 0); return 0; } else { param_1->scriptData.unk22 = param_2_s32; param_1->scriptData.savedState = 2; gAnyScriptLocked = 1; return 1; } } bool8 GroundScript_Cancel(Action *r0) { // NOTE: Will always return TRUE return ActionResetScriptDataForDeletion(r0, DEBUG_LOC_PTR("../ground/ground_script.c", 821, "GroundScript_Cancel")); } static u8 GroundCancelAllEntities(void) { u8 ret; ret = GroundLivesCancelAll(); ret |= GroundObjectsCancelAll(); ret |= GroundEffectsCancelAll(); return ret; } bool8 GroundScriptNotify(Action *param_1, s32 param_2) { s16 sVar1; s16 sVar2; bool8 ret; s32 param_2_s16 = (s16) param_2; ret = FALSE; sVar1 = param_1->scriptData.unk22; if ((sVar1 != -1) && (sVar1 == param_2_s16)) { param_1->scriptData.unk22 = -1; ret = TRUE; } sVar2 = param_1->scriptData2.unk22; if ((sVar2 != -1) && (sVar2 == param_2_s16)) { param_1->scriptData2.unk22 = -1; ret = TRUE; } return ret; } void GroundScriptLockJumpZero(s16 index) { s32 index_s16 = index; gScriptLocks[index_s16] = 1; gUnlockBranchLabels[index_s16] = 0; gAnyScriptLocked = 1; } void GroundScriptLock(s16 index, s32 r1) { s32 index_s16 = index; gScriptLocks[index_s16] = 1; gUnlockBranchLabels[index_s16] = r1; gAnyScriptLocked = 1; } static bool8 GroundScriptLockCond(Action *param_1, s16 index, s32 param_3) { s32 index_s32 = index; gUnlockBranchLabels[index_s32] = param_3; if (index_s32 == 0) { if (IsTextboxOpen_809A750() == 0) { return FALSE; } param_1->scriptData.unk22 = index_s32; } else { param_1->scriptData.unk22 = index_s32 | 0x80; gScriptLocks[index_s32] = 1; gScriptLockConds[index_s32] = 1; } param_1->scriptData.savedState = 2; gAnyScriptLocked = 1; return TRUE; } s16 HandleAction(Action *action, const DebugLocation *debug) { ScriptCommand cmd; if (action->scriptData.savedState) { bool8 loopContinue = TRUE; while (loopContinue) { switch (action->scriptData.savedState) { case 2: { switch (action->scriptData.curScriptOp) { // handled cases (all hex) // 3, 4, 5, 6, 7, 22..28, 2c, 30..38, 39, 3a, 3b, 3c, 3d, 3e, 3f, // 58..5b, 5d, 5e, 60, 61..67, 68, 69..6f, 70, 71..76, 77..7c, 7d..82, 83..88, // 89, 8a, 8b..90, 91..95, 98, 99, 9b..a3, cf, d2..d8, da, db, dc, dd, de, df, // e0, e1, e2, e3, e5 // other cases up to 0xf1 immediately break (which breaks again and loops for ExScrCmd) case 0x58 ... 0x5b: case 0x5d: case 0x5e: case 0x60: case 0x8b ... 0x90: case 0x98: case 0x99: case 0xdb: case 0xdc: { if (action->scriptData.unk2A > 0) { action->scriptData.unk2A--; loopContinue = FALSE; } else { action->scriptData.savedState = 3; } break; } case 0xdd: { if (action->callbacks->func4C_spriteRelatedCheck(action->parentObject)) { loopContinue = FALSE; } else { action->scriptData.savedState = 3; } break; } case 0xde: { if (action->callbacks->func50_spriteRelated(action->parentObject)) { loopContinue = FALSE; } else { action->scriptData.savedState = 3; } break; } case 0x22 ... 0x28: case 0xdf: { if (sub_8099B94()) { loopContinue = FALSE; } else { action->scriptData.savedState = 3; } break; } case 0xe0: { cmd = *action->scriptData.curPtr; if (IsEqualtoBGTrack(cmd.argShort)) { if (action->scriptData.unk2C++ < 10800) { loopContinue = FALSE; } else { action->scriptData.savedState = 3; } } else { action->scriptData.savedState = 3; } break; } case 0xe1: case 0xe2: { cmd = *action->scriptData.curPtr; if (IsSoundPlaying(cmd.argShort)) { if (action->scriptData.unk2C++ < 3600) { loopContinue = FALSE; } else { action->scriptData.savedState = 3; } } else { action->scriptData.savedState = 3; } break; } case 0x61 ... 0x67: { PixelPos pos, pos2; action->callbacks->getHitboxCenter(action->parentObject, &pos); pos2.x = action->scriptData.pos2.x - pos.x; pos2.y = action->scriptData.pos2.y - pos.y; ClampPixelPos(&pos2, action->scriptData.unk30); if (pos2.x == 0 && pos2.y == 0) { action->scriptData.savedState = 3; break; } if (action->callbacks->moveRelative(action->parentObject, &pos2) & 9) { action->scriptData.savedState = 3; break; } action->callbacks->setEventIndex(action->parentObject, 0x1000); if (action->scriptData.unk2A >= 0) { if (action->scriptData.unk2A > 0) { action->scriptData.unk2A--; loopContinue = FALSE; } else { action->scriptData.savedState = 3; } } else { loopContinue = FALSE; } break; } case 0x69 ... 0x6f: { PixelPos pos, pos2; s32 res; s32 dir; UNUSED s32 dirBefore; s8 dirS8; action->callbacks->getHitboxCenter(action->parentObject, &pos); pos2.x = action->scriptData.pos2.x - pos.x; pos2.y = action->scriptData.pos2.y - pos.y; ClampPixelPos(&pos2, action->scriptData.unk30); if (pos2.x == 0 && pos2.y == 0) { action->scriptData.savedState = 3; break; } res = action->callbacks->moveRelative(action->parentObject, &pos2); dir = (s8) VecDirection8Radial(&pos2); dirBefore = action->scriptData.unk26; dirS8 = dir; action->scriptData.unk26 = dirS8; action->callbacks->setDirection(action->parentObject, dir); if (res & 9) { action->scriptData.savedState = 3; break; } action->callbacks->setEventIndex(action->parentObject, 0x1000); if (action->scriptData.unk2A >= 0) { if (action->scriptData.unk2A > 0) { action->scriptData.unk2A--; loopContinue = FALSE; } else { action->scriptData.savedState = 3; } } else { loopContinue = FALSE; } break; } case 0x71 ... 0x76: case 0x7d ... 0x82: { if (action->scriptData.unk2A > 0) { PixelPos pos; InterpolatePixelPos(&pos, &action->scriptData.pos1, &action->scriptData.pos2, action->scriptData.unk2A, action->scriptData.unk2C); action->callbacks->moveReal(action->parentObject, &pos); action->callbacks->setEventIndex(action->parentObject, 0x1000); action->scriptData.unk2A--; action->scriptData.unk2C++; loopContinue = FALSE; } else { action->scriptData.savedState = 3; } break; } case 0x77 ... 0x7c: case 0x83 ... 0x88: { if (action->scriptData.unk2A > 0) { PixelPos pos1, pos2, pos3; s32 dir; UNUSED s32 dirBefore; s8 dirS8; action->callbacks->getHitboxCenter(action->parentObject, &pos1); InterpolatePixelPos(&pos2, &action->scriptData.pos1, &action->scriptData.pos2, action->scriptData.unk2A, action->scriptData.unk2C); pos3.x = pos2.x - pos1.x; pos3.y = pos2.y - pos1.y; dir = (s8) VecDirection8Radial(&pos3); dirBefore = action->scriptData.unk26; dirS8 = dir; action->scriptData.unk26 = dirS8; action->callbacks->setDirection(action->parentObject, dir); action->callbacks->moveReal(action->parentObject, &pos2); action->callbacks->setEventIndex(action->parentObject, 0x1000); action->scriptData.unk2A--; action->scriptData.unk2C++; loopContinue = FALSE; } else { action->scriptData.savedState = 3; } break; } case 0x68: case 0x70: { s32 height, unk; s32 delta; action->callbacks->getPosHeightAndUnk(action->parentObject, &height, &unk); delta = action->scriptData.unk48 - height; if (delta == 0) { action->scriptData.savedState = 3; break; } // oh wow, cmn instruction height += (delta < -action->scriptData.unk30) ? -action->scriptData.unk30 : (delta > action->scriptData.unk30) ? action->scriptData.unk30 : delta; action->callbacks->setPosHeight(action->parentObject, height); loopContinue = FALSE; break; } case 0x89: case 0x8a: { PixelPos pos; s8 dir; action->callbacks->getDirection(action->parentObject, &dir); pos = SetVecFromDirectionSpeed(dir, action->scriptData.unk30); if (action->callbacks->moveRelative(action->parentObject, &pos) & 9) { action->scriptData.savedState = 3; break; } action->callbacks->setEventIndex(action->parentObject, 0x1000); if (action->scriptData.unk2A > 0) { action->scriptData.unk2A--; loopContinue = FALSE; } else { action->scriptData.savedState = 3; } break; } case 0x91 ... 0x95: { if (action->scriptData.unk2A > 0) { action->scriptData.unk2A--; loopContinue = FALSE; } else { PixelPos pos1, pos2, pos3, pos4; UNUSED s32 tmp1; s32 tmp2; s8 dir; bool8 flag; cmd = *action->scriptData.curPtr; tmp1 = -1; tmp2 = -1; flag = FALSE; action->callbacks->getDirection(action->parentObject, &dir); // arg1h synthetic switch (cmd.op) { case 0x91: case 0x92: { tmp2 = (s8) action->scriptData.unk4D; break; } case 0x93: { s16 res; res = sub_80A7AE8((s16)cmd.arg1); if (res >= 0) { flag = TRUE; sub_80A8FD8(res, &pos1); sub_80A8F9C(res, &pos2); } break; } case 0x94: { s32 res; res = (s16)sub_80A7AE8((s16)cmd.arg1); if (res >= 0) { flag = TRUE; sub_80A8FD8(res, &pos1); pos2 = sPixelPosZero; } break; } case 0x95: { flag = TRUE; action->callbacks->getHitboxCenter(action->parentObject, &pos1); action->callbacks->getSize(action->parentObject, &pos2); GroundLink_GetPos((s16)cmd.arg1, &pos1); break; } } if (flag) { action->callbacks->getHitboxCenter(action->parentObject, &pos3); action->callbacks->getSize(action->parentObject, &pos4); tmp2 = SizedDeltaDirection8(&pos3, &pos4, &pos1, &pos2); if (tmp2 == -1) { tmp2 = SizedDeltaDirection4(&pos3, &sPixelPosZero, &pos1, &sPixelPosZero); } } if (tmp2 == -1 || tmp2 == dir) { action->scriptData.savedState = 3; break; } ASM_MATCH_TRICK(dir); action->scriptData.unk26 = sub_8002A70(dir, tmp2, (u8)cmd.argShort); action->callbacks->setDirection(action->parentObject, action->scriptData.unk26); action->scriptData.unk2A = cmd.argByte; } break; } case 0x9b ... 0xa3: { if (sub_809D234()) { loopContinue = FALSE; } else { action->scriptData.savedState = 3; } break; } case 0xe3: case 0xe5: { if (action->scriptData.unk22 != -1) { loopContinue = FALSE; } else { action->scriptData.script.ptr = ResolveJump(action, gUnlockBranchLabels[action->scriptData.branchDiscriminant]); action->scriptData.savedState = 3; } break; } case 0x2c: case 0x30 ... 0x38: { if (action->scriptData.unk22 != -1) { loopContinue = FALSE; } else { action->scriptData.savedState = 3; sub_80A87AC(0, 0); } break; } case 0x39: { if (action->scriptData.unk22 != -1) { loopContinue = FALSE; } else if (sub_8099B94()) { loopContinue = FALSE; } else { action->scriptData.savedState = 3; sub_80A87AC(0, 0); } break; } case 0x3b: { s32 tmp; cmd = *action->scriptData.curPtr; tmp = sub_80A14E8(action, cmd.argByte, cmd.argShort, cmd.arg1); if (tmp < 0) { loopContinue = FALSE; } else { action->scriptData.savedState = 3; action->scriptData.script.ptr = ResolveJump(action, tmp); } break; } case 0x3c: { s32 val; if (!sub_809B260(&val)) { loopContinue = FALSE; } else { action->scriptData.script.ptr = ResolveJump(action, val); action->scriptData.savedState = 3; sub_80A87AC(0, 0); } break; } case 0x03: { s32 val; if (!sub_809B260(&val)) { loopContinue = FALSE; break; } if (val >= 0) { cmd = *action->scriptData.curPtr; GroundMainGroundRequest((s16)FriendAreaIdToMapId((u8)val), 0, cmd.argShort); } action->scriptData.script.ptr = ResolveJump(action, val); action->scriptData.savedState = 3; sub_80A87AC(0, 0); break; } case 0x04: { if (action->scriptData.branchDiscriminant == 0) { s32 val; if (!sub_809B260(&val)) { loopContinue = FALSE; break; } if (val >= 0) { SetScriptVarValue(NULL, 18, sub_80A26B8(val)); action->scriptData.branchDiscriminant = 1; } else { action->scriptData.branchDiscriminant = -1; } sub_80A87AC(0, 0); break; } if (action->scriptData.branchDiscriminant == 1) { s32 dungeonSelect; s32 dungeonEnterElt; cmd = *action->scriptData.curPtr; dungeonSelect = (s16) GetScriptVarValue(NULL, 18); dungeonEnterElt = GetScriptVarArrayValue(NULL, 48, (u16) dungeonSelect); if (dungeonSelect != 19 || dungeonEnterElt != 0) { sub_8098DCC(cmd.argShort); action->scriptData.script.ptr = ResolveJump(action, 0); sub_80A87AC(0, 0); action->scriptData.savedState = 3; break; } SetScriptVarValue(NULL, 19, 19); } // fallthrough } case 0x06: { if (action->scriptData.branchDiscriminant == 0) { s32 val; s16 disc; if (!sub_809B260(&val)) { loopContinue = FALSE; break; } if (val >= 0) { SetScriptVarValue(NULL, 19, action->scriptData.curScriptOp == 4 ? sub_80A26B8(val) : (s16)val); disc = 1; } else { disc = -1; } action->scriptData.branchDiscriminant = disc; sub_80A87AC(0, 0); break; } // fallthrough } case 0x07: { if (action->scriptData.branchDiscriminant == 1) { s32 dungeonEnter; u32 res; struct DungeonSetupInfo unkStruct; dungeonEnter = (s16)GetScriptVarValue(NULL, 19); if (sub_80990EC(&unkStruct, dungeonEnter)) { s32 val; sub_8099220(&unkStruct, dungeonEnter); val = sub_80023E4(6); res = BufferDungeonRequirementsText(unkStruct.sub0.unk0.id, 0, gUnknown_203B4B0, val, FALSE); gUnknown_2039DA4 = res; switch (res) { case 2: { action->scriptData.branchDiscriminant = 2; sub_809B1C0(9, 1, gUnknown_203B4B0); if (GroundScriptCheckLockCondition(action, 1)) { sub_80A87AC(0, 11); } break; } case 0: { action->scriptData.branchDiscriminant = 3; break; } case 1: { action->scriptData.branchDiscriminant = 4; sub_809B1C0(10, 1, gUnknown_203B4B0); if (GroundScriptCheckLockCondition(action, 1)) { sub_80A87AC(0, 11); } break; } default: { action->scriptData.branchDiscriminant = -1; break; } } break; } else { action->scriptData.branchDiscriminant = 3; break; } } case 0x05: if (action->scriptData.branchDiscriminant == 1) { unkStruct_203B480 *ret; s32 val; u32 res; ret = GetMailatIndex(GetScriptVarValue(NULL, 20)); val = sub_80023E4(6); res = BufferDungeonRequirementsText(ret->dungeonSeed.location.id, 0, gUnknown_203B4B0, val, TRUE); gUnknown_2039DA4 = res; switch (res) { case 2: { action->scriptData.branchDiscriminant = 2; sub_809B1C0(9, 1, gUnknown_203B4B0); if (GroundScriptCheckLockCondition(action, 1)) { sub_80A87AC(0, 11); } break; } case 0: { action->scriptData.branchDiscriminant = 3; break; } case 1: { action->scriptData.branchDiscriminant = 4; sub_809B1C0(10, 1, gUnknown_203B4B0); if (GroundScriptCheckLockCondition(action, 1)) { sub_80A87AC(0, 11); } break; } default: { action->scriptData.branchDiscriminant = -1; break; } } break; } if (action->scriptData.branchDiscriminant == 2) { u32 val; if (!sub_809B260(&val)) { loopContinue = FALSE; break; } if (val != 0) { action->scriptData.branchDiscriminant = 3; sub_80A87AC(0, 0); ScriptClearTextbox(); break; } else { action->scriptData.branchDiscriminant = -1; sub_80A87AC(0, 0); ScriptClearTextbox(); break; } } if (action->scriptData.branchDiscriminant == 3) { cmd = *action->scriptData.curPtr; action->scriptData.savedState = 3; sub_80999FC(cmd.argShort); GroundMap_ExecuteEvent(0x70, 0); if (action->unk8.unk0 == 0) continue; action->scriptData.script.ptr = ResolveJump(action, 1); break; } if (action->scriptData.branchDiscriminant == 4) { u32 val; if (!sub_809B260(&val)) { loopContinue = FALSE; break; } action->scriptData.branchDiscriminant = -1; sub_80A87AC(0, 0); ScriptClearTextbox(); break; } sub_8099220(0, 0); SetScriptVarValue(NULL, 19, -1); action->scriptData.script.ptr = ResolveJump(action, -1); action->scriptData.savedState = 3; break; } case 0x3d: { s32 val; cmd = *action->scriptData.curPtr; if (!sub_809B260(&val)) { loopContinue = FALSE; break; } if (val == 1) { s32 id = (s16)cmd.arg1; if (id != -1) { Pokemon *mon = sub_80A8D54((s16) id); s32 i; for (i = 0; i < POKEMON_NAME_LENGTH; i++) { mon->name[i] = sPokeNameBuffer[i]; } } } action->scriptData.script.ptr = ResolveJump(action, val); action->scriptData.savedState = 3; sub_80A87AC(0, 0); break; } case 0x3e: { s32 val; if (!sub_809B260(&val)) { loopContinue = FALSE; break; } if (val == 1) { SetRescueTeamName(sPokeNameBuffer); } action->scriptData.script.ptr = ResolveJump(action, val); action->scriptData.savedState = 3; sub_80A87AC(0, 0); break; } case 0x3f: { s32 val; const u8 *ptr; cmd = *action->scriptData.curPtr; ptr = cmd.argPtr; if (sub_809B260(&val)) { if (val == 1) { s32 i; u8 name[16]; for (i = 0; i < 16; i++) { name[i] = '\0'; } CopyStringtoBuffer(sPokeNameBuffer, name); for (i = 0; i < 16; i++) { if (name[i] != ptr[i]) { val = 2; break; } if (name[i] == '\0') break; } } action->scriptData.script.ptr = ResolveJump(action, val); action->scriptData.savedState = 3; sub_80A87AC(0, 0); } else { loopContinue = FALSE; } break; } case 0x3a: { if (action->scriptData.unk2C == 0) { if (action->scriptData.unk22 != -1) { loopContinue = FALSE; } else { action->scriptData.unk2C++; } } else { bool8 c; if (sub_809AFFC(&c)) { if (c) { cmd = *action->scriptData.curPtr; action->scriptData.script.ptr = FindLabel(action, cmd.argShort); } action->scriptData.savedState = 3; sub_80A87AC(0, 0); } else { loopContinue = FALSE; } } break; } case 0xcf: { cmd = *action->scriptData.curPtr; if (action->scriptData.unk2C == 0) { bool8 flag = FALSE; if (action->scriptData.branchDiscriminant < 0) { if (action->scriptData.script.ptr->op != 0xd1) { action->scriptData.savedState = 3; break; } } else { while (action->scriptData.script.ptr->op == 0xd0) { if (action->scriptData.script.ptr->argShort == action->scriptData.branchDiscriminant) { flag = TRUE; break; } action->scriptData.script.ptr++; } if (!flag) { while (action->scriptData.script.ptr->op == 0xd1) { action->scriptData.script.ptr++; } action->scriptData.savedState = 3; break; } } if (ScriptPrintText(cmd.argByte, (s16) cmd.arg1, action->scriptData.script.ptr->argPtr)) { sub_80A87AC(0,10); if (GroundScriptCheckLockCondition(action, 0)) { action->scriptData.unk2C = 1; } } action->scriptData.script.ptr++; } else { if (action->scriptData.unk22 != -1) { loopContinue = FALSE; } else { action->scriptData.unk2C = 0; sub_80A87AC(0, 0); } } break; } case 0xd2 ... 0xd8: { s32 tmp; if (action->scriptData.unk2C == 0) { if (action->scriptData.unk22 != -1) { loopContinue = FALSE; } else { action->scriptData.unk2C++; } } else if (sub_809B18C(&tmp)) { if (tmp > 0) { cmd = *(action->scriptData.curPtr + action->scriptData.branchDiscriminant + tmp); action->scriptData.script.ptr = FindLabel(action, cmd.argShort); } action->scriptData.savedState = 3; sub_80A87AC(0, 0); } else { loopContinue = FALSE; } break; } case 0xda: { if (action->scriptData.unk22 != -1) { loopContinue = FALSE; } else { action->scriptData.script.ptr = ResolveJump(action, gUnlockBranchLabels[1]); action->scriptData.savedState = 3; } break; } default: case 0x08 ... 0x21: case 0x29 ... 0x2b: case 0x2d ... 0x2f: case 0x40 ... 0x57: case 0x5c: case 0x5f: case 0x96: case 0x97: case 0x9a: case 0xa4 ... 0xce: case 0xd0: case 0xd1: case 0xd9: case 0xe4: case 0xe6 ... 0xf0: { loopContinue = FALSE; break; } } break; } case 3: { s32 state = ExecuteScriptCommand(action); action->scriptData.savedState = state; switch ((s16)state) { case 0: { if (action->scriptData2.savedState) { action->scriptData = action->scriptData2; if (action->callbacks->setDirection && action->scriptData.unk26 != -1) { u32 tmp; action->callbacks->getFlags(action->parentObject, &tmp); if (tmp & 0x400) { action->callbacks->setDirection(action->parentObject, action->scriptData.unk26); } } if (action->callbacks->setEventIndex) { action->callbacks->setEventIndex(action->parentObject, action->scriptData.unk24); } InitScriptData(&action->scriptData2); } else { InitScriptData(&action->scriptData); } return 3; } case 3: return 3; case 4: return 4; case 1: return 1; case 2: default: { action->scriptData.unk2C = 0; break; } } break; } case 0: case 1: case 4: { return action->scriptData.savedState; } } } return 3; } else { return 0; } } // overlay_0000.bin::021497FC // Return values: // This function returns what's likely an enum, which controls the state of the script engine state machine, and possibly provides information to code calling the engine. // The enum is shared at least with HandleAction. // This value is saved into the state field of the Action when returned from this function. // - Value 0 indicates a RET on script engine level, HandleAction copies action->scriptData2 onto action->scriptData, and reinitializes scriptData2. // If there is no active scriptData2 it clears and reinits scriptData. // Ultimately returns code 3 to the script engine caller. // Caveat: If the scripting engine is in state 0, HandleAction will immediately return 0 without performing any work. // - Value 1 is a terminal state (script success? error?), no further scripting progress will happen. This code is always returned to the caller from now on. // - Value 2 gives control back to the HandleAction function (entry point into the scripting engine state machine) // This is the only return value that does not return to the script engine caller // - Value 3 returns to the caller, but will give control back to ExecuteScriptCommand when reentering the script ("script not finished") // - Value 4 is some kind of fatal error state, no further scripting progress will happen. This code is always returned to the caller from now on. static s32 ExecuteScriptCommand(Action *action) { ScriptCommand curCmd; ScriptData *scriptData = &action->scriptData; while (1) { scriptData->curPtr = scriptData->script.ptr; curCmd = *scriptData->script.ptr++; switch (scriptData->curScriptOp = curCmd.op) { case 0x01: { u32 arg = (s16)curCmd.arg1; u32 argCopy = arg; u32 byte = (u8)curCmd.argByte; if (ScriptLoggingEnabled(TRUE)) { Log(1, " ground select %3d[%s] %3d", arg, gGroundMapConversionTable[arg].text, byte); } GroundMainGroundRequest(argCopy, byte, curCmd.argShort); break; } case 0x02: { s32 dungeonId = (s16)curCmd.arg1; if (dungeonId == -1) dungeonId = (s16)GetScriptVarValue(NULL, DUNGEON_ENTER); if (ScriptLoggingEnabled(TRUE)) { Log(1, " dungeon select %3d", dungeonId); } if (dungeonId != -1) { GroundMainRescueRequest(dungeonId, curCmd.argShort); action->scriptData.script.ptr = ResolveJump(action, 1); } else { action->scriptData.script.ptr = ResolveJump(action, 0); } break; } case 0x03: { if (sub_8021700(curCmd.arg1)) { action->scriptData.script.ptr = ResolveJump(action, -1); } else { sub_8098D80(curCmd.argShort); action->scriptData.script.ptr = ResolveJump(action, 0); } break; } case 0x04: { if (curCmd.arg1 == -1) { if (!(u8)sub_802FCF0() && sub_809B1C0(12,0,NULL)) { sub_80A87AC(0, 11); action->scriptData.branchDiscriminant = 0; } else { action->scriptData.branchDiscriminant = -1; } return 2; // do action } else { SetScriptVarValue(NULL, DUNGEON_SELECT, sub_80A26B8((s16)curCmd.arg1)); action->scriptData.branchDiscriminant = 1; return 2; // do action } break; } case 0x06: { if (curCmd.arg1 == -1) { if (sub_809B1C0(36, 0, NULL)) { sub_80A87AC(0, 11); action->scriptData.branchDiscriminant = 0; return 2; } else { action->scriptData.branchDiscriminant = -1; return 2; } } else { SetScriptVarValue(NULL, DUNGEON_ENTER, curCmd.arg1); action->scriptData.branchDiscriminant = 1; return 2; } } case 0x05: { action->scriptData.branchDiscriminant = 1; return 2; } case 0x07: { s32 tmp = (s16)curCmd.arg1; if (tmp == -1) { tmp = (s16)GetScriptVarValue(NULL, DUNGEON_ENTER); } else { SetScriptVarValue(NULL, DUNGEON_ENTER, tmp); } if (ScriptLoggingEnabled(TRUE)) { Log(1, " dungeon enter check %3d", tmp); } if (tmp != -1) { action->scriptData.branchDiscriminant = 1; return 2; } else { action->scriptData.branchDiscriminant = -1; return 2; } } case 0x08: case 0x09: { if (curCmd.op == 0x08) { gCurrentMap = curCmd.arg1; gUnknown_2039A32 = GetAdjustedGroundMap((s16)curCmd.arg1); gUnknown_2039A34 = gUnknown_2039A32; if (ScriptLoggingEnabled(TRUE)) { Log(1," map select %3d %3d[%s]",gCurrentMap,gUnknown_2039A32, gGroundMapConversionTable[gCurrentMap].text); } } else { gUnknown_2039A32 = gCurrentMap = curCmd.arg1; gUnknown_2039A34 = curCmd.arg1; if (ScriptLoggingEnabled(TRUE)) { Log(1," ground select %3d %3d[%s]",gCurrentMap,gUnknown_2039A32, gGroundMapConversionTable[gCurrentMap].text); } } SetScriptVarValue(NULL,GROUND_MAP,gCurrentMap); SetScriptVarValue(NULL,GROUND_PLACE,gGroundMapConversionTable[gCurrentMap].groundPlaceId); GroundSprite_Reset(gUnknown_2039A32); sub_809D0BC(); DeleteGroundEvents(); DeleteGroundLives(); DeleteGroundObjects(); DeleteGroundEffects(); sub_809C770(gCurrentMap, gGroundMapConversionTable[gCurrentMap].groundPlaceId); GroundMap_Select(gUnknown_2039A32); GroundLink_Select(gUnknown_2039A32); GroundLives_Select(gUnknown_2039A32,0,0); GroundObject_Select(gUnknown_2039A32,0,0); break; } case 0x0a: { const DungeonInfo *tmp; DungeonLocation loc; tmp = GetDungeonInfo_80A2608((s16)curCmd.arg1); gUnknown_2039A34 = gUnknown_2039A32 = gCurrentMap = (s16)curCmd.arg2; if (ScriptLoggingEnabled(TRUE)) { Log(1, " dungeon select %3d %3d[%s]", gCurrentMap,gUnknown_2039A32, gGroundMapConversionTable[gCurrentMap].text); } GroundSprite_Reset(gUnknown_2039A32); sub_809D0BC(); DeleteGroundEvents(); DeleteGroundLives(); DeleteGroundObjects(); DeleteGroundEffects(); loc.id = tmp->dungeonIndex; loc.floor = curCmd.argShort; GroundMap_SelectDungeon(gUnknown_2039A32, &loc, curCmd.argByte); GroundLink_Select(gUnknown_2039A32); GroundLives_Select(gUnknown_2039A32,0,0); GroundObject_Select(gUnknown_2039A32,0,0); break; } case 0x0b: { GroundWeather_Select((s16)curCmd.arg1); break; } case 0x0c ... 0x15: { s32 group; s32 sector; { s32 tmp = curCmd.argShort < 0 ? scriptData->script.group : curCmd.argShort; group = tmp; } { s32 tmp = (s8)curCmd.argByte < 0 ? scriptData->script.sector : (s8)curCmd.argByte; sector = tmp; } switch (curCmd.op) { case 0x0c: { GroundLives_Select(gUnknown_2039A32, group, sector); GroundObject_Select(gUnknown_2039A32, group, sector); GroundEffect_Select(gUnknown_2039A32, group, sector); GroundEvent_Select(gUnknown_2039A32, group, sector); break; } case 0x0d: { GroundLives_Select(gUnknown_2039A32, group, sector); break; } case 0x0e: { GroundObject_Select(gUnknown_2039A32, group, sector); break; } case 0x0f: { GroundEffect_Select(gUnknown_2039A32, group, sector); break; } case 0x10: { GroundEvent_Select(gUnknown_2039A32, group, sector); break; } case 0x11: { GroundLives_Cancel(group, sector); GroundObject_Cancel(group, sector); GroundEffect_Cancel(group, sector); GroundEvent_Cancel(group, sector); break; } case 0x12: { GroundLives_Cancel(group, sector); break; } case 0x13: { GroundObject_Cancel(group, sector); break; } case 0x14: { GroundEffect_Cancel(group, sector); break; } case 0x15: { GroundEvent_Cancel(group, sector); break; } } break; } case 0x16: { GroundLives_CancelBlank_1(); break; } case 0x17: { GroundObject_CancelBlank(); break; } case 0x18: { GroundEffect_CancelBlank(); break; } case 0x19: { s8 unk[4]; GroundObjectData *obj; PixelPos pos; s16 res; s32 group; s32 sector; action->callbacks->getDirection(action->parentObject, unk); obj = ({ GroundObjectData obj = { .unk1 = *unk, .width = 1, .height = 1, .pos = {}, .kind = curCmd.arg2, .scripts = { [3] = gFunctionScriptTable[curCmd.arg1].script }, }; group = curCmd.argShort < 0 ? scriptData->script.group : curCmd.argShort; sector = (s8)curCmd.argByte < 0 ? scriptData->script.sector : (s8)curCmd.argByte; &obj; }); res = GroundObject_Add(-1, obj, group, sector); if (res >= 0) { action->callbacks->getHitboxCenter(action->parentObject, &pos); sub_80AC49C(res, &pos); } break; } case 0x1a: { s8 unk; GroundEffectData *eff; PixelPos pos; s16 res; s32 group; s32 sector; action->callbacks->getDirection(action->parentObject, &unk); eff = ({ GroundEffectData eff = { .unk1 = unk, .width = 1, .height = 1, .pos = {}, .kind = curCmd.arg2, .script = gFunctionScriptTable[curCmd.arg1].script, }; group = curCmd.argShort < 0 ? scriptData->script.group : curCmd.argShort; sector = (s8)curCmd.argByte < 0 ? scriptData->script.sector : (s8)curCmd.argByte; &eff; }); res = (s16) GroundEffect_Add(-1, eff, (s16) group, (s8) sector); if (res >= 0) { action->callbacks->getHitboxCenter(action->parentObject, &pos); sub_80AD3B4(res, &pos); } break; } case 0x1c: { GroundMap_ExecuteEvent(curCmd.argShort, 1); break; } case 0x1b: { GroundMap_ExecuteEvent(curCmd.argShort, 0); break; } case 0x1d: case 0x1e: { s32 map; s32 group, sector; bool8 res; { s32 tmp = curCmd.arg1 != -1 ? (s16)curCmd.arg1 : gCurrentMap; map = tmp; } { s32 tmp = curCmd.argShort < 0 ? scriptData->script.group : curCmd.argShort; group = tmp; } { s32 tmp = (s8)curCmd.argByte < 0 ? scriptData->script.sector : (s8)curCmd.argByte; sector = tmp; } map = GetAdjustedGroundMap(map); res = curCmd.op == 0x1e; GroundMap_ExecuteStation(map, group, sector, res); if (gUnknown_2039A34 != map) { gUnknown_2039A34 = map; GroundCancelAllEntities(); if (action->unk8.unk0 != 0) return 4; // Fatal? } break; } case 0x1f: { s32 a = (s16)GetScriptVarValue(NULL, DUNGEON_ENTER); const DungeonInfo *ret1 = GetDungeonInfo_80A2608(a); s32 thing = GetScriptVarArrayValue(NULL, DUNGEON_ENTER_LIST, (u16) a) == 0 ? ret1->unk6 : ret1->unk8; // fakematch: this is almost certainly a range check of the form 0x37 <= a && a < 0x48 // but that loses the s32 -> u16 cast. Inlines, macros, or other schenanigans are likely involved if (!((u16)(a - 0x37) < 0x11) && (s16)sub_80A2750(a) == 1) { if (thing == -1) { if (ScriptLoggingEnabled(TRUE)) { Log(1, " dungeon rescue select %3d", a); } GroundMainRescueRequest(a, -1); } else { GroundMap_ExecuteEvent(thing, 0); break; } } else { GroundMainRescueRequest(a, -1); } break; } case 0x20: { switch (action->unkC.unk0) { case 0: GroundMap_ExecuteEvent(curCmd.argShort, 0); break; case 1: { ScriptInfoSmall info1; GetFunctionScript(action, &info1, curCmd.argShort); GroundLives_ExecuteScript(action->unkC.unk2, &action->unk8, &info1); break; } case 2: { ScriptInfoSmall info2; GetFunctionScript(action, &info2, curCmd.argShort); GroundObject_ExecuteScript(action->unkC.unk2, &action->unk8, &info2); break; } case 3: { ScriptInfoSmall info3; GetFunctionScript(action, &info3, curCmd.argShort); GroundEffect_ExecuteScript(action->unkC.unk2, &action->unk8, &info3); break; } } break; } case 0x21: { s32 ret; u32 unk; PixelPos pos1; PixelPos pos2; PixelPos pos3; PixelPos pos4; s32 tmp; ret = (s16)sub_80A7AE8((s16)curCmd.arg1); if (ret >= 0) { sub_80A8BD8(ret, &unk); if (unk & 0x200) { action->callbacks->getHitboxCenter(action->parentObject, &pos1); action->callbacks->getSize(action->parentObject, &pos2); sub_80A8FD8(ret, &pos3); sub_80A8F9C(ret, &pos4); if ((tmp = SizedDeltaDirection8(&pos3, &pos4, &pos1, &pos2)) != -1 || (tmp = SizedDeltaDirection4(&pos1, &sPixelPosZero, &pos3, &sPixelPosZero)) != -1) { sub_80A9090(ret, tmp); } } GroundLives_ExecutePlayerScriptActionLives(action->unk8.unk2, ret); return 3; } break; } case 0x22: { sub_80999E8(curCmd.argShort); if (curCmd.argByte) return 2; break; } case 0x23: { sub_80999FC(curCmd.argShort); if (curCmd.argByte) return 2; break; } case 0x24: { sub_8099A10(curCmd.argShort, curCmd.arg1, curCmd.arg2); if (curCmd.argByte) return 2; break; } case 0x25: { sub_8099A34(curCmd.argShort); if (curCmd.argByte) return 2; break; } case 0x26: { sub_8099A48(curCmd.argShort); if (curCmd.argByte) return 2; break; } case 0x27: case 0x28: { RGB_Array color = { curCmd.arg2 >> 16, curCmd.arg2 >> 8, curCmd.arg2, 0 }; switch (curCmd.op) { case 0x27: sub_8099A5C(curCmd.argShort, curCmd.arg1, color); break; case 0x28: sub_8099AFC(curCmd.argShort, curCmd.arg1, color); break; } if (curCmd.argByte) return 2; break; } case 0x29: { sub_809A6E4((u16)curCmd.argShort); break; } case 0x2a: { sub_809A6F8((u16)curCmd.argShort); break; } case 0x2b: { SetAutoPressTextboxMidEndMsgFrames(curCmd.arg1, curCmd.arg2); break; } case 0x2c: { if (!sub_809A768()) break; sub_80A87AC(0, 10); if (GroundScriptCheckLockCondition(action, 0)) return 2; break; } case 0x30: { ScriptClearTextbox(); break; } case 0x31: { ScriptClearTextbox2(); break; } case 0x2d: { switch ((u8)curCmd.argByte) { case 0: { ResetTextboxPortrait(curCmd.argShort); break; } case 1: { sub_80A2500(curCmd.argShort, &action->unk8); break; } case 2: { sub_80A2500(curCmd.argShort, &action->unkC); break; } case 3: { ActionUnkIds unk; unk.unk2 = sub_80A7AE8((s16)curCmd.arg1); unk.unk0 = 1; sub_80A2500(curCmd.argShort, &unk); break; } case 4: { sub_80A252C(curCmd.argShort, &action->unk8); break; } case 5: { sub_80A252C(curCmd.argShort, &action->unkC); break; } case 6: { ActionUnkIds unk; s16 res = sub_80A7AE8((s16)curCmd.arg1); unk.unk2 = res; if (unk.unk2 >= 0) { unk.unk0 = 1; sub_80A252C(curCmd.argShort, (void*)&unk); } else { sub_80A2584(curCmd.argShort, (s16)curCmd.arg1); } break; } case 7: { sub_80A2558(curCmd.argShort, &action->unk8); break; } case 8: { sub_80A2558(curCmd.argShort, &action->unkC); break; } case 9: { ActionUnkIds unk; s16 res = sub_80A7AE8((s16)curCmd.arg1); unk.unk2 = res; if (unk.unk2 >= 0) { unk.unk0 = 1; sub_80A2558(curCmd.argShort, (void*)&unk); } else { sub_80A2598(curCmd.argShort, (s16)curCmd.arg1); } break; } case 10: { u8 a = ScriptDungeonIdToDungeonId((s16)curCmd.arg1); s32 o = 0; switch ((s16)curCmd.arg1) { case 0: o = 1; break; case 2: o = -1; break; } gFormatArgs[curCmd.argShort] = GetDungeonFloorCount(a) + o; break; } } break; } case 0x2e: { ScriptSetPortraitInfo(curCmd.argShort, (s8)curCmd.arg1, (u8)curCmd.argByte); break; } case 0x2f: { PixelPos pos; pos.x = curCmd.arg1; pos.y = curCmd.arg2; ScriptSetPortraitPosDelta(curCmd.argShort, &pos); break; } case 0x32 ... 0x38: { s8 ret = 0; switch (scriptData->curScriptOp) { case 0x32: ret = ScriptPrintText(SCRIPT_TEXT_TYPE_INSTANT, curCmd.argShort, curCmd.argPtr); break; case 0x33: ret = ScriptPrintText(SCRIPT_TEXT_TYPE_PLAYER, curCmd.argShort, curCmd.argPtr); break; case 0x34: ret = ScriptPrintText(SCRIPT_TEXT_TYPE_NPC, curCmd.argShort, curCmd.argPtr); break; case 0x35: ret = ScriptPrintText(SCRIPT_TEXT_TYPE_LETTER, curCmd.argShort, curCmd.argPtr); break; case 0x36: ret = ScriptPrintText(SCRIPT_TEXT_TYPE_4, curCmd.argShort, curCmd.argPtr); break; case 0x37: ret = ScriptPrintTextOnBg(curCmd.argPtr); break; case 0x38: ret = ScriptPrintTextOnBg2(curCmd.argPtr); break; } if (ret) { sub_80A87AC(0, 10); if (GroundScriptCheckLockCondition(action, 0)) return 2; } break; } case 0x39: { if ((s8)ScriptPrintTextOnBgAuto(curCmd.argShort, curCmd.argPtr) && curCmd.argShort >= 0) { sub_80A87AC(0, 10); if (GroundScriptCheckLockCondition(action, 0)) return 2; } break; } case 0x3a: { sub_809AFC8((u8)curCmd.argByte > 0, curCmd.arg1, (s16)curCmd.arg2, curCmd.argPtr); if (GroundScriptCheckLockCondition(action, 1)) { sub_80A87AC(0, 11); return 2; } break; } case 0x3c: { sub_809B1D4(curCmd.argByte, curCmd.arg1, curCmd.arg2, (void *) curCmd.argPtr); sub_80A87AC(0, 11); return 2; } case 0x3b: { scriptData->unk2A = 0; return 2; } case 0x3d: { int i; if ((s16)curCmd.arg1 != -1) { Pokemon *mon = sub_80A8D54((s16) curCmd.arg1); if (mon != NULL) { for (i = 0; i < POKEMON_NAME_LENGTH; i++) { sPokeNameBuffer[i] = mon->name[i]; } sPokeNameBuffer[POKEMON_NAME_LENGTH] = 0; sub_809B1C0(4, 0, sPokeNameBuffer); sub_80A87AC(0, 11); return 2; } break; } else { sub_809B1C0(4, 1, sPokeNameBuffer); sub_80A87AC(0, 11); return 2; } } case 0x3e: { sub_80920B8(sPokeNameBuffer); sPokeNameBuffer[10] = '\0'; sub_809B1C0(5, 0, sPokeNameBuffer); sub_80A87AC(0, 11); return 2; } case 0x3f: { int i; for (i = 0; i < ARRAY_COUNT_INT(sPokeNameBuffer); i++) { sPokeNameBuffer[i] = '\0'; } sub_809B1C0(6, (u8)curCmd.argByte, sPokeNameBuffer); sub_80A87AC(0, 11); return 2; } case 0x42: { StopAllMusic_1(); break; } case 0x43: { FadeOutAllMusic(curCmd.argShort < 0 ? 30 : curCmd.argShort); break; } case 0x44: { u16 id = curCmd.argByte == 0 ? sub_80A25AC((u16)curCmd.arg1) : curCmd.arg1; if (id != 999) { StartNewBGM_(id); } else { StopBGMusic(); } break; } case 0x45: { u16 id = curCmd.argByte == 0 ? sub_80A25AC((u16)curCmd.arg1) : curCmd.arg1; if (id != 999) { FadeInNewBGM_(id, curCmd.argShort); } else { StopBGMusic(); } break; } case 0x46: { u16 id = curCmd.argByte == 0 ? sub_80A25AC((u16)curCmd.arg1) : curCmd.arg1; if (id != 999) { QueueBGM_((u16)id); } break; } case 0x47: { StopBGMusic(); break; } case 0x48: { FadeOutBGM_(curCmd.argShort < 0 ? 30 : (u16)curCmd.argShort); break; } case 0x49: case 0x4c: { PlaySoundWithVolume((u16)curCmd.arg1, 256); break; } case 0x4a: case 0x4d: { StopSound((u16)curCmd.arg1); break; } case 0x4b: case 0x4e: { FadeOutSound((u16)curCmd.arg1, curCmd.argShort < 0 ? 30 : (u16)curCmd.argShort); break; } case 0x4f: { if (action->scriptData2.state == 1) { InitScriptData(&action->scriptData2); } action->callbacks->setHitboxPos(action->parentObject, 0); break; } case 0x50: { Action *ptr; PixelPos pos; s8 c; { Action *tmp = sub_809D52C(&action->unkC); ptr = tmp; } if (ptr) { ptr->callbacks->getHitboxCenter(action->parentObject, &pos); ptr->callbacks->getDirection(action->parentObject, &c); action->callbacks->moveReal(action->parentObject, &pos); action->scriptData.unk26 = c; action->callbacks->setDirection(action->parentObject, c); } break; } case 0x51: { PixelPos posIn; PixelPos posOut1; PixelPos posOut2; action->callbacks->getHitboxCenter(action->parentObject, &posIn); GroundLink_GetArea(curCmd.argShort, &posOut1, &posOut2, &posIn); action->callbacks->setPositionBounds(action->parentObject, &posOut1, &posOut2); break; } case 0x52: { action->callbacks->setFlags(action->parentObject, curCmd.arg1); break; } case 0x53: { if (curCmd.arg1 & 0x400 && action->scriptData2.state == 1) { InitScriptData(&action->scriptData2); } action->callbacks->clearFlags(action->parentObject, curCmd.arg1); break; } case 0x54: { action->callbacks->getDirection(action->parentObject, &action->scriptData.unk26); if (curCmd.argShort) { action->scriptData.unk24 = curCmd.argShort; } action->callbacks->setEventIndex(action->parentObject, (u16)curCmd.argShort); break; } case 0x55: { action->callbacks->livesOnlyNullsub(action->parentObject, (u16)curCmd.argShort); break; } case 0x56: { action->callbacks->func38(action->parentObject, (s16)curCmd.arg1, curCmd.argShort); break; } case 0x57: { action->callbacks->func44_livesOnlySpriteRelated(action->parentObject, curCmd.argShort); break; } case 0x58: { PixelPos unk; unk.x = curCmd.arg1 << 8; unk.y = curCmd.arg2 << 8; action->callbacks->moveReal(action->parentObject, &unk); scriptData->unk2A = (u8)curCmd.argByte; return 2; } case 0x59: { PixelPos unk; unk.x = curCmd.argShort << 8; unk.y = curCmd.arg1 << 8; action->callbacks->moveRelative(action->parentObject, &unk); scriptData->unk2A = (u8)curCmd.argByte; return 2; } case 0x5a: { u32 unk[2]; unk[0] = OtherRandInt(curCmd.argShort) << 8; unk[1] = OtherRandInt(curCmd.arg1) << 8; action->callbacks->moveRelative(action->parentObject, (PixelPos*)unk); scriptData->unk2A = (u8)curCmd.argByte; return 2; } case 0x5b: { PixelPos unk; action->callbacks->getHitboxCenter(action->parentObject, &unk); GroundLink_GetPos((s16)curCmd.arg1, &unk); action->callbacks->moveReal(action->parentObject, &unk); scriptData->unk2A = (u8)curCmd.argByte; return 2; } case 0x5c: { PixelPos pos, pos1, pos2; action->callbacks->getHitboxCenter(action->parentObject, &pos); GroundLink_GetArea((s16)curCmd.arg1, &pos1, &pos2, &pos); pos.x = pos1.x + OtherRandInt(pos2.x - pos1.x); pos.y = pos1.y + OtherRandInt(pos2.y - pos1.y); action->callbacks->moveReal(action->parentObject, &pos); scriptData->unk2A = (u8)curCmd.argByte; return 2; } case 0x5d: { PixelPos unk; s16 res = sub_80A7AE8((s16)curCmd.arg1); if (res >= 0) { sub_80A8FD8(res, &unk); action->callbacks->moveReal(action->parentObject, &unk); scriptData->unk2A = (u8)curCmd.argByte; return 2; } break; } case 0x5e: { PixelPos pos; s32 height; s32 dir; pos.x = GetScriptVarArrayValue(NULL, POSITION_X, (u16)curCmd.arg1); pos.y = GetScriptVarArrayValue(NULL, POSITION_Y, (u16)curCmd.arg1); height = GetScriptVarArrayValue(NULL, POSITION_HEIGHT, (u16)curCmd.arg1); dir = (s8)GetScriptVarArrayValue(NULL, POSITION_DIRECTION, (u16)curCmd.arg1); action->callbacks->moveReal(action->parentObject, &pos); action->callbacks->setPosHeight(action->parentObject, height); action->scriptData.unk26 = dir; action->callbacks->setDirection(action->parentObject, dir); scriptData->unk2A = (u8)curCmd.argByte; return 2; } case 0x5f: { PixelPos pos; u32 height; u32 wat; s8 dir; action->callbacks->getHitboxCenter(action->parentObject, &pos); action->callbacks->getPosHeightAndUnk(action->parentObject, &height, &wat); action->callbacks->getDirection(action->parentObject, &dir); SetScriptVarArrayValue(NULL, POSITION_X, (u16)curCmd.arg1, pos.x); SetScriptVarArrayValue(NULL, POSITION_Y, (u16)curCmd.arg1, pos.y); SetScriptVarArrayValue(NULL, POSITION_HEIGHT, (u16)curCmd.arg1, height); SetScriptVarArrayValue(NULL, POSITION_DIRECTION, (u16)curCmd.arg1, dir); break; } case 0x60: { action->callbacks->setPosHeight(action->parentObject, curCmd.arg1 << 8); scriptData->unk2A = (u8)curCmd.argByte; return 2; } case 0x61: case 0x69: { scriptData->pos2.x = curCmd.arg1 << 8; scriptData->pos2.y = curCmd.arg2 << 8; scriptData->unk30 = curCmd.argShort; scriptData->unk2A = -1; return 2; } case 0x62: case 0x6a: { PixelPos pos; action->callbacks->getHitboxCenter(action->parentObject, &pos); scriptData->pos2.x = pos.x + (curCmd.arg1 << 8); scriptData->pos2.y = pos.y + (curCmd.arg2 << 8); scriptData->unk30 = curCmd.argShort; scriptData->unk2A = -1; return 2; } case 0x63: case 0x6b: { action->callbacks->getHitboxCenter(action->parentObject, &scriptData->pos2); GroundLink_GetPos((s16)curCmd.arg1, &scriptData->pos2); scriptData->unk30 = curCmd.argShort; scriptData->unk2A = -1; return 2; } case 0x64: case 0x6c: { action->callbacks->getHitboxCenter(action->parentObject, &scriptData->pos2); GroundLink_GetPos((s16)curCmd.arg1, &scriptData->pos2); scriptData->unk30 = curCmd.argShort; scriptData->unk2A = (u8)curCmd.argByte; return 2; } case 0x65: case 0x6d: { action->callbacks->getHitboxCenter(action->parentObject, &scriptData->pos2); GroundLink_GetPos((s16)curCmd.arg1, &scriptData->pos2); scriptData->unk30 = curCmd.argShort; scriptData->unk2A = OtherRandInt((u8)curCmd.argByte); return 2; } case 0x66: case 0x67: case 0x6e: case 0x6f: { s16 ret = sub_80A7AE8((s16)curCmd.arg1); if (ret >= 0) { sub_80A8FD8(ret, &scriptData->pos2); scriptData->unk30 = curCmd.argShort; scriptData->unk2A = (u8)curCmd.argByte; return 2; } break; } case 0x71: case 0x77: case 0x7d: case 0x83: { #define HYPOT FP24_8_Hypot((s24_8){scriptData->pos2.x - scriptData->pos1.x}, (s24_8){scriptData->pos2.y - scriptData->pos1.y}) / curCmd.argShort action->callbacks->getHitboxCenter(action->parentObject, &scriptData->pos1); scriptData->pos2.x = curCmd.arg1 << 8; scriptData->pos2.y = curCmd.arg2 << 8; if (curCmd.op == 0x7d || curCmd.op == 0x83) { scriptData->unk2A = HYPOT; if (scriptData->unk2A <= 0) scriptData->unk2A = 1; } else { scriptData->unk2A = curCmd.argShort; } return 2; } case 0x72: case 0x78: case 0x7e: case 0x84: { action->callbacks->getHitboxCenter(action->parentObject, &scriptData->pos1); scriptData->pos2.x = scriptData->pos1.x + (curCmd.arg1 << 8); scriptData->pos2.y = scriptData->pos1.y + (curCmd.arg2 << 8); if (curCmd.op == 0x7e || curCmd.op == 0x84) { scriptData->unk2A = HYPOT; if (scriptData->unk2A <= 0) scriptData->unk2A = 1; } else { scriptData->unk2A = curCmd.argShort; } return 2; } case 0x73: case 0x79: case 0x7f: case 0x85: { // BUG: (or two): these lines use the wrong script command arguments to calculate the position offset // making the target position nonsense. But even if they were correct, // the way the cap is calculated would make the random offset biased off-center. // This doesn't affect the released version because these script commands are never used. #ifndef BUGFIX s32 cap1 = curCmd.arg1 * 2 - 1; s32 cap2 = curCmd.arg2 * 2 - 1; action->callbacks->getHitboxCenter(action->parentObject, &scriptData->pos1); scriptData->pos2.x = scriptData->pos1.x + ((OtherRandInt(cap1) - curCmd.argShort) << 8); scriptData->pos2.y = scriptData->pos1.y + ((OtherRandInt(cap2) - curCmd.arg1) << 8); #else action->callbacks->getHitboxCenter(action->parentObject, &scriptData->pos1); scriptData->pos2.x = scriptData->pos1.x + ((OtherRandInt(curCmd.arg1 * 2 + 1) - curCmd.arg1) << 8); scriptData->pos2.y = scriptData->pos1.y + ((OtherRandInt(curCmd.arg2 * 2 + 1) - curCmd.arg2) << 8); #endif if (curCmd.op == 0x7f || curCmd.op == 0x85) { scriptData->unk2A = HYPOT; if (scriptData->unk2A <= 0) scriptData->unk2A = 1; } else { scriptData->unk2A = curCmd.argShort; } return 2; } case 0x74: case 0x7a: case 0x80: case 0x86: { action->callbacks->getHitboxCenter(action->parentObject, &scriptData->pos1); scriptData->pos2 = scriptData->pos1; GroundLink_GetPos((s16)curCmd.arg1, &scriptData->pos2); if (curCmd.op == 0x80 || curCmd.op == 0x86) { scriptData->unk2A = HYPOT; if (scriptData->unk2A <= 0) scriptData->unk2A = 1; } else { scriptData->unk2A = curCmd.argShort; } return 2; } case 0x75: case 0x7b: case 0x81: case 0x87: { s32 cap = curCmd.arg1 * 2 - 1; action->callbacks->getHitboxCenter(action->parentObject, &scriptData->pos2); GroundLink_GetPos((s16)curCmd.arg2, &scriptData->pos2); scriptData->pos2.x = scriptData->pos2.x + ((OtherRandInt(cap) - curCmd.argShort) << 8); scriptData->pos2.y = scriptData->pos2.y + ((OtherRandInt(cap) - curCmd.argShort) << 8); if (curCmd.op == 0x81 || curCmd.op == 0x87) { scriptData->unk2A = HYPOT; if (scriptData->unk2A <= 0) scriptData->unk2A = 1; } else { scriptData->unk2A = curCmd.argShort; } return 2; } case 0x76: case 0x7c: case 0x82: case 0x88: { s16 ret = sub_80A7AE8((s16)curCmd.arg1); if (ret >= 0) { action->callbacks->getHitboxCenter(action->parentObject, &scriptData->pos1); sub_80A8FD8(ret, &scriptData->pos2); if (curCmd.op == 0x82 || curCmd.op == 0x88) { scriptData->unk2A = HYPOT; if (scriptData->unk2A <= 0) scriptData->unk2A = 1; } else { scriptData->unk2A = curCmd.argShort; } return 2; } break; } case 0x68: case 0x70: { scriptData->unk48 = curCmd.arg1 << 8; scriptData->unk30 = curCmd.argShort; scriptData->unk2A = -1; return 2; } case 0x89: { action->scriptData.unk26 = curCmd.arg1; action->callbacks->setDirection(action->parentObject, (s8) curCmd.arg1); scriptData->unk30 = curCmd.argShort; scriptData->unk2A = (u8)curCmd.argByte; return 2; } case 0x8a: { s8 dir; action->callbacks->getDirection(action->parentObject, &dir); action->scriptData.unk26 = sub_8002984(dir, (u8)curCmd.arg1); action->callbacks->setDirection(action->parentObject, action->scriptData.unk26); scriptData->unk30 = curCmd.argShort; scriptData->unk2A = (u8)curCmd.argByte; return 2; } case 0x8b: { action->scriptData.unk26 = curCmd.argShort; action->callbacks->setDirection(action->parentObject, action->scriptData.unk26); scriptData->unk2A = (u8)curCmd.argByte; return 2; } case 0x8c: { int ret = (s16)sub_80A7AE8((s16)curCmd.arg1); s8 dir; if (ret >= 0) { sub_80A9050(ret, &dir); action->scriptData.unk26 = sub_8002984(dir, (u8)curCmd.argShort); action->callbacks->setDirection(action->parentObject, action->scriptData.unk26); } scriptData->unk2A = (u8)curCmd.argByte; return 2; } case 0x8d: { s8 dir; action->callbacks->getDirection(action->parentObject, &dir); action->scriptData.unk26 = sub_8002984(dir, (u8)curCmd.argShort); action->callbacks->setDirection(action->parentObject, action->scriptData.unk26); scriptData->unk2A = (u8)curCmd.argByte; return 2; } case 0x8e: case 0x8f: case 0x90: { bool8 flag = FALSE; s8 dir; PixelPos pos1, pos2, pos3, pos4; switch (curCmd.op) { case 0x8e: { s32 val = (s16)sub_80A7AE8((s16)curCmd.arg1); if (val >= 0) { flag = TRUE; sub_80A8FD8(val, &pos1); sub_80A8F9C(val, &pos2); } break; } case 0x8f: { s32 val = (s16)sub_80A7AE8((s16)curCmd.arg1); if (val >= 0) { flag = TRUE; sub_80A8FD8(val, &pos1); pos2 = sPixelPosZero; } break; } case 0x90: { flag = TRUE; action->callbacks->getHitboxCenter(action->parentObject, &pos1); action->callbacks->getSize(action->parentObject, &pos2); GroundLink_GetPos((s16)curCmd.arg1, &pos1); break; } } if (flag) { s8 ret; int tmp; action->callbacks->getHitboxCenter(action->parentObject, &pos3); action->callbacks->getSize(action->parentObject, &pos4); ret = SizedDeltaDirection8(&pos3, &pos4, &pos1, &pos2); // wtf *&dir = ret; tmp = -1; if (dir == tmp) { dir = SizedDeltaDirection4(&pos3, &sPixelPosZero, &pos1, &sPixelPosZero); } if (dir == tmp) { action->callbacks->getDirection(action->parentObject, &dir); } action->scriptData.unk26 = sub_8002984(dir, (u8)curCmd.argShort); action->callbacks->setDirection(action->parentObject, action->scriptData.unk26); } scriptData->unk2A = (u8)curCmd.argByte; return 2; } case 0x93: case 0x94: case 0x95: { scriptData->unk2A = 0; return 2; } case 0x91: { action->scriptData.unk4D = (s8)curCmd.arg1; scriptData->unk2A = 0; return 2; } case 0x92: { s8 unk; action->callbacks->getDirection(action->parentObject, &unk); action->scriptData.unk4D = sub_8002984(unk, (u8)curCmd.arg1); scriptData->unk2A = 0; return 2; } case 0x97: { sub_809D124(curCmd.argShort, curCmd.arg1, curCmd.arg2); break; } case 0x98: { s32 id = action->callbacks->getIndex(action->parentObject); switch (action->unk8.unk0) { case 1: sub_809D170(1, id); break; case 2: sub_809D170(2, id); break; case 3: sub_809D170(3, id); break; } break; } case 0x99: { s32 id = action->callbacks->getIndex(action->parentObject); PixelPos unk; switch (action->unk8.unk0) { case 1: sub_80A8FD8(id, &unk); sub_809D158(0, &unk); break; case 2: sub_80AC448(id, &unk); sub_809D158(0, &unk); break; case 3: sub_80AD360(id, &unk); sub_809D158(0, &unk); break; } break; } case 0x9a: { sub_809D170(1, 0); break; } case 0x9b: { s32 id = action->callbacks->getIndex(action->parentObject); if (id < 0) break; switch (action->unk8.unk0) { case 1: sub_809D1A8(1, id, curCmd.argShort); return 2; case 2: sub_809D1A8(2, id, curCmd.argShort); return 2; case 3: sub_809D1A8(3, id, curCmd.argShort); return 2; } break; } case 0x9c: { s32 id = action->callbacks->getIndex(action->parentObject); PixelPos unk; switch (action->unk8.unk0) { case 1: sub_80A8FD8(id, &unk); sub_809D190(0, &unk, curCmd.argShort); return 2; case 2: sub_80AC448(id, &unk); sub_809D190(0, &unk, curCmd.argShort); return 2; case 3: sub_80AD360(id, &unk); sub_809D190(0, &unk, curCmd.argShort); return 2; } break; } case 0x9d: { sub_809D1A8(1, 0, curCmd.argShort); return 2; } case 0x9e: { s32 id = action->callbacks->getIndex(action->parentObject); if (id < 0) break; switch(action->unk8.unk0) { case 1: sub_809D1E4(1, id, curCmd.argShort); return 2; case 2: sub_809D1E4(2, id, curCmd.argShort); return 2; case 3: sub_809D1E4(3, id, curCmd.argShort); return 2; } break; } case 0x9f: { s32 id = action->callbacks->getIndex(action->parentObject); PixelPos unk; switch(action->unk8.unk0) { case 1: sub_80A8FD8(id, &unk); sub_809D1CC(0, &unk, curCmd.argShort); return 2; case 2: sub_80AC448(id, &unk); sub_809D1CC(0, &unk, curCmd.argShort); return 2; case 3: sub_80AD360(id, &unk); sub_809D1CC(0, &unk, curCmd.argShort); return 2; } break; } case 0xa0: { sub_809D1E4(1, 0, curCmd.argShort); return 2; } case 0xa1: { s32 id = action->callbacks->getIndex(action->parentObject); if (id < 0) break; switch(action->unk8.unk0) { case 1: sub_809D220(1, id, curCmd.argShort); return 2; case 2: sub_809D220(2, id, curCmd.argShort); return 2; case 3: sub_809D220(3, id, curCmd.argShort); return 2; } break; } case 0xa2: { s32 id = action->callbacks->getIndex(action->parentObject); PixelPos unk; switch (action->unk8.unk0) { case 1: sub_80A8FD8(id, &unk); sub_809D208(0, &unk, curCmd.argShort); return 2; case 2: sub_80AC448(id, &unk); sub_809D208(0, &unk, curCmd.argShort); return 2; case 3: sub_80AD360(id, &unk); sub_809D208(0, &unk, curCmd.argShort); return 2; } break; } case 0xa3: { sub_809D220(1, 0, curCmd.argShort); return 2; } case 0xa4: { ResetScriptVarArray(scriptData->localVars.buf, curCmd.argShort); break; } case 0xa5: { ClearScriptVarArray(scriptData->localVars.buf, curCmd.argShort); break; } case 0xa6: { UpdateScriptVarWithImmediate(scriptData->localVars.buf, curCmd.argShort, curCmd.arg1, curCmd.argByte); break; } case 0xa7: { UpdateScriptVarWithVar(scriptData->localVars.buf, curCmd.argShort, (s16)curCmd.arg1, curCmd.argByte); break; } case 0xa8: { SetScriptVarArrayValue(scriptData->localVars.buf, curCmd.argShort, (u16)curCmd.arg1, curCmd.arg2); break; } case 0xa9: { ScenarioCalc(curCmd.argShort, curCmd.arg1, curCmd.arg2); break; } case 0xaa: { s32 a, b; GetScriptVarScenario(curCmd.argShort, &a, &b); ScenarioCalc(curCmd.argShort, a, b+1); break; } case 0xab: { SetScriptVarValue(NULL, DUNGEON_ENTER, curCmd.arg1); SetScriptVarValue(NULL, DUNGEON_RESULT, curCmd.argShort); break; } case 0xac: { SetScriptVarValue(NULL, PLAYER_KIND, curCmd.argShort); break; } case 0xad: { sub_80026E8(curCmd.argShort, (u8)curCmd.argByte > 0); break; } case 0xae: { sub_809733C(curCmd.argShort, (u8)curCmd.argByte > 0); break; } case 0xaf: { sub_80973A8(curCmd.argShort, (u8)curCmd.argByte > 0); break; } case 0xb0: { sub_8097418(curCmd.argShort, (u8)curCmd.argByte > 0); break; } case 0xb1: { sub_80975A8(curCmd.argShort, (u8)curCmd.argByte > 0); break; } case 0xb2: { SetAdventureAchievement(curCmd.argShort); break; } case 0xb3: { if (JudgeVarWithImmediate(NULL, curCmd.argShort, curCmd.arg1, JUDGE_EQ)) { scriptData->script.ptr = FindLabel(action, (u8)curCmd.argByte); } break; } case 0xb4: { if (JudgeVarWithImmediate(scriptData->localVars.buf, (s16)curCmd.arg1, curCmd.arg2, (u8)curCmd.argByte)) { scriptData->script.ptr = FindLabel(action, curCmd.argShort); } break; } case 0xb5: { if (JudgeVarWithVar(scriptData->localVars.buf, (s16)curCmd.arg1, (s16)curCmd.arg2, (u8)curCmd.argByte)) { scriptData->script.ptr = FindLabel(action, curCmd.argShort); } break; } case 0xb6: { if (GetScriptVarArrayValue(scriptData->localVars.buf, (s16)curCmd.arg1, (u16)curCmd.arg2)) { scriptData->script.ptr = FindLabel(action, curCmd.argShort); } break; } case 0xb7: { if (FlagJudge(GetScriptVarArraySum(scriptData->localVars.buf, (s16)curCmd.arg1), curCmd.arg2, (u8)curCmd.argByte)) { scriptData->script.ptr = FindLabel(action, curCmd.argShort); } break; } case 0xb8: { if (ScriptVarScenarioBefore(curCmd.argShort, curCmd.arg1, curCmd.arg2)) { scriptData->script.ptr = FindLabel(action, (u8)curCmd.argByte); } break; } case 0xb9: { if (ScriptVarScenarioEqual(curCmd.argShort, curCmd.arg1, curCmd.arg2)) { scriptData->script.ptr = FindLabel(action, (u8)curCmd.argByte); } break; } case 0xba: { if (ScriptVarScenarioAfter(curCmd.argShort, curCmd.arg1, curCmd.arg2)) { scriptData->script.ptr = FindLabel(action, (u8)curCmd.argByte); } break; } case 0xbb: { if (sub_80023E4(curCmd.argShort)) { scriptData->script.ptr = FindLabel(action, (u8)curCmd.argByte); } break; } case 0xbc: { if (sub_8098100(curCmd.argShort)) { scriptData->script.ptr = FindLabel(action, (u8)curCmd.argByte); } break; } case 0xbd: { if (sub_80026CC(curCmd.arg1)) { scriptData->script.ptr = FindLabel(action, (u8)curCmd.argByte); } break; } case 0xbf: { if (HasItemInInventory(curCmd.argShort) > 0) { scriptData->script.ptr = FindLabel(action, (u8)curCmd.argByte); } break; } case 0xbe: { if (action->unk8.unk0 == 1) { if (GroundLives_IsStarterMon(action->unk8.unk2)) { scriptData->script.ptr = FindLabel(action, (u8)curCmd.argByte); } } break; } case 0x41: { s32 val; val = FindItemInInventory(curCmd.argShort); if ( val >= 0) ShiftItemsDownFrom(val); break; } case 0xc0 ... 0xcb: { s32 val; PixelPos pos, pos2, pos3; switch (curCmd.op) { case 0xc0: { val = GetScriptVarValue(scriptData->localVars.buf, curCmd.argShort); break; } case 0xc1: { val = FlagCalc( GetScriptVarValue(scriptData->localVars.buf, curCmd.argShort), curCmd.arg1, (u8)curCmd.argByte); break; } case 0xc2: { val = FlagCalc( GetScriptVarValue(scriptData->localVars.buf, curCmd.argShort), GetScriptVarValue(scriptData->localVars.buf, (s16)curCmd.arg1), (u8)curCmd.argByte); break; } case 0xc3: { val = OtherRandInt(curCmd.argShort); break; } case 0xc4: { val = GetScriptVarArrayValue(NULL, curCmd.argShort, 0); break; } case 0xc5: { val = GetScriptVarArrayValue(NULL, curCmd.argShort, 1); break; } case 0xc6: { val = (s16)sub_80A8C2C((s16)curCmd.arg1); break; } case 0xc7: { s8 dir; action->callbacks->getDirection(action->parentObject, &dir); val = dir; break; } case 0xca: { action->callbacks->getHitboxCenter(action->parentObject, &pos); pos2 = pos; GroundLink_GetPos((s16)curCmd.arg1, &pos2); pos3.x = pos2.x - pos.x; pos3.y = pos2.y - pos.y; val = (s8) VecDirection8Radial(&pos3); break; } case 0xc8: { s16 tmp = (s16)sub_80A7AE8((s16)curCmd.arg1); if (tmp >= 0) { PixelPos pos1, pos2, pos3, pos4; action->callbacks->getHitboxCenter(action->parentObject, &pos1); action->callbacks->getSize(action->parentObject, &pos2); sub_80A8FD8(tmp, &pos3); sub_80A8F9C(tmp, &pos4); val = SizedDeltaDirection8(&pos1, &pos2, &pos3, &pos4); if (val == -1) { val = SizedDeltaDirection4(&pos1, &sPixelPosZero, &pos3, &sPixelPosZero); } } else { val = -1; } break; } case 0xc9: { s16 tmp = (s16)sub_80A7AE8((s16)curCmd.arg1); if (tmp >= 0) { PixelPos pos1, pos2, pos3; action->callbacks->getHitboxCenter(action->parentObject, &pos1); action->callbacks->getSize(action->parentObject, &pos2); sub_80A8FD8(tmp, &pos3); val = SizedDeltaDirection8(&pos1, &pos2, &pos3, &sPixelPosZero); if (val == -1) { val = SizedDeltaDirection4(&pos1, &sPixelPosZero, &pos3, &sPixelPosZero); } } else { val = -1; } break; } case 0xcb: { val = CheckScriptItemSpace(curCmd.argShort); break; } default: { // The locdata says this is part of an inlined function... :/ FATAL_ERROR_ARGS2("../ground/ground_script.c", 4222, "_AnalyzeProcess", "switch type error %d", curCmd.op); } } scriptData->script.ptr = ResolveJump(action, val); break; } case 0xcf: { scriptData->branchDiscriminant = GetScriptVarValue(scriptData->localVars.buf, curCmd.argShort); while (scriptData->script.ptr->op == 0xd0) { if (scriptData->script.ptr->argShort == scriptData->branchDiscriminant) return 2; scriptData->script.ptr++; } if (scriptData->script.ptr->op == 0xd1) { scriptData->branchDiscriminant = -1; return 2; } break; } case 0xd2 ... 0xd8: { // DS: Assert(TRUE, "Script command call error SWITCH MENY") [sic] const char *out = curCmd.argPtr; sNumChoices = 0; scriptData->branchDiscriminant = 0; switch(curCmd.op) { case 0xd6: case 0xd7: case 0xd8: { s32 disc = GetScriptVarValue(scriptData->localVars.buf, (s16)curCmd.arg2); for (; scriptData->script.ptr->op == 0xd0; scriptData->script.ptr++, scriptData->branchDiscriminant++) { if (scriptData->script.ptr->argShort == disc) out = scriptData->script.ptr->argPtr; } for (; scriptData->script.ptr->op == 0xd1; scriptData->script.ptr++, scriptData->branchDiscriminant++) { if (!out) out = scriptData->script.ptr->argPtr; } } } if (!out) out = ""; for (; scriptData->script.ptr->op == 0xd9; scriptData->script.ptr++) { gChoices[sNumChoices].text = scriptData->script.ptr->argPtr; gChoices[sNumChoices].menuAction = sNumChoices + 1; sNumChoices++; } if (sNumChoices <= 0) break; gChoices[sNumChoices].text = NULL; gChoices[sNumChoices].menuAction = curCmd.argShort; switch (curCmd.op) { case 0xd2: case 0xd3: case 0xd6: { sub_809B028(gChoices, (u8)curCmd.argByte > 0, -1, 0, (s16)curCmd.arg1, out); break; } case 0xd4: case 0xd7: { sub_809B028(gChoices, (u8)curCmd.argByte > 0, -1, 1, (s16)curCmd.arg1, out); break; } case 0xd5: case 0xd8: { sub_809B028(gChoices, (u8)curCmd.argByte > 0, -1, 2, (s16)curCmd.arg1, out); break; } } if (GroundScriptCheckLockCondition(action, 1)) { sub_80A87AC(0, 11); return 2; } break; } case 0xda: { if (GroundScriptCheckLockCondition(action, 1)) { return 2; } break; } case 0xdb: { scriptData->unk2A = curCmd.argShort; return 2; } case 0xdc: { scriptData->unk2A = curCmd.argShort + OtherRandInt(curCmd.arg1 - curCmd.argShort); return 2; } case 0xdd ... 0xe2: { return 2; // do action } case 0xe3: { scriptData->branchDiscriminant = curCmd.argShort; if (GroundScriptCheckLockCondition(action, curCmd.argShort)) { return 2; } break; } case 0xe4: { GroundScriptLockJumpZero(curCmd.argShort); break; } case 0xe5: { scriptData->branchDiscriminant = curCmd.argShort; if (GroundScriptLockCond(action, curCmd.argShort, curCmd.argByte)) { return 2; } break; } case 0xe6: { scriptData->savedScript = scriptData->script; } //fallthrough case 0xe7: { scriptData->script.ptr = FindLabel(action, curCmd.argShort); break; } case 0xe8: { scriptData->savedScript = scriptData->script; } // fallthrough case 0xe9: { scriptData->script.ptr2 = scriptData->script.ptr = gFunctionScriptTable[curCmd.argShort].script; break; } case 0xea: { scriptData->savedScript = scriptData->script; } // fallthrough case 0xeb: { ScriptInfoSmall info; u32 group, sector; u32 tmp = gUnknown_2039A34; { s32 tmp = curCmd.argShort < 0 ? scriptData->script.group : curCmd.argShort; group = tmp; } { s32 tmp = (s8)curCmd.argByte < 0 ? scriptData->script.sector : (s8)curCmd.argByte; sector = tmp; } GroundMap_GetStationScript(&info, tmp, group, sector); scriptData->script.ptr = info.ptr; scriptData->script.ptr2 = info.ptr; scriptData->script.group = group; scriptData->script.sector = sector; break; } case 0xec: { gUnknown_2039A34 = GetAdjustedGroundMap((s16)GetScriptVarValue(scriptData->localVars.buf, curCmd.argShort)); GroundCancelAllEntities(); GroundMap_ExecuteEnter(gUnknown_2039A34); break; } case 0xed: { // DS: if (scriptData->savedScript.ptr == NULL) Assert(FALSE, "Script flash stack error"); scriptData->savedScript.ptr = NULL; scriptData->savedScript.ptr2 = NULL; break; } case 0xee: { if (scriptData->savedScript.ptr == NULL) { // DS: Assert(FALSE, "Script return stack error"); return 0; } scriptData->script = scriptData->savedScript; scriptData->savedScript.ptr = NULL; scriptData->savedScript.ptr2 = NULL; break; } case 0xef: // DS: if (scriptData->savedScript.ptr != NULL) Assert(FALSE, "Script end stack error"); return 0; case 0xf0: return 1; case 0xf1: return 4; // fatal error? case 0xf2: case 0xf3: case 0xf4: case 0xf5: case 0xf6: { // Debug, not in release ROM break; } } } } UNUSED static u32 sub_80A1440(s32 r0, s32 r1, s32 r2) { return sub_80A14E8(NULL, r0, r1, r2); } UNUSED static bool8 GroundScript_ExecuteTrigger(s16 r0) { s32 ret; ScriptInfoSmall scriptInfo; Action action; const ScriptRef *ptr; ptr = &gFunctionScriptTable[r0]; if(ptr->type != 0xB) return FALSE; InitActionWithParams(&action, &sNullCallbackData, NULL, 0, 0); GetFunctionScript(NULL, &scriptInfo, r0); GroundScript_ExecutePP(&action, NULL, &scriptInfo, DEBUG_LOC_PTR("../ground/ground_script.c", 4553, "GroundScript_ExecuteTrigger")); action.scriptData.savedScript = action.scriptData.script; action.scriptData.savedScript.ptr = gUnknown_81164E4; action.scriptData.savedScript.ptr2 = gUnknown_81164E4; ret = HandleAction(&action, DEBUG_LOC_PTR("../ground/ground_script.c", 4558, "GroundScript_ExecuteTrigger")); InitAction2(&action); if(ret == 0) return TRUE; else return FALSE; } static s32 sub_80A14E8(Action *action, u8 idx, u32 r2, s32 r3) { switch(idx) { case 1: sub_8098C58(); return 0; case 2: if(sub_8011C34() == -1) sub_8011C40(Rand32Bit()); sub_8011C28(1); sub_8001064(); sub_809965C(); return 0; case 3: sub_8098CC8(); return 0; case 4: return sub_80961D8() == 0 ? 0 : 1; case 5: ResetMailbox(); return 0; case 6: sub_80963FC(); return 0; case 7: sub_8096488(); return 0; case 8: return sub_80964B4() == 0 ? 0 : 1; case 9: { u8 var; if (sub_80023E4(8) == 0) { var = sub_808D4B0(); } else { var = sub_808D500(); } nullsub_104(); return var != 0; } break; case 0xA: { if ((action->unkC).unk0 == 1) { u8 text[0x100]; DungeonLocation dungLocation; s32 ret = (s16) sub_80A8C4C(action->unkC.unk2, &dungLocation); if (ret != 0) { s32 dialogueId; if (dungLocation.id == DUNGEON_HOWLING_FOREST_2 && ret == 0x104) { return 2; } dialogueId = GetFriendAreaDialogueId(action->unkC.unk2); InlineStrcpy(text, gFriendAreaDialogue[dialogueId]); if (ScriptPrintText(0, 1, text) != 0) return 1; } } } return 0; case 0xB: return (CountJobsinDungeon(ScriptDungeonIdToDungeonId(GetScriptVarValue(0, DUNGEON_ENTER_INDEX))) > 0); case 0xC: { u8 sp_104; if(sub_8099394(&sp_104) != 0) { unkStruct_203B480 *p = gUnknown_203B480; p += sp_104; if(p->rescuesAllowed > 0) return 1; } } return 0; case 0xD: return sub_8097640() ? 1 : 0; break; case 0xE: { s32 index; for(index = 0x11; index < NUM_DUNGEON_MAZE; index++) { if (IsMazeCompleted((s16) index)) { if (!GetScriptVarArrayValue(0, TRAINING_PRESENT_LIST, (u16) index)) { SetScriptVarArrayValue(0, TRAINING_PRESENT_LIST, (u16) index, 1); return index - 0x10; } } } return 0; } case 0xF: return sub_80964E4() == 0 ? 0 : 1; case 0x10: if(action->unk8.unk0 == 1) if(action->unk8.unk2 == 0) if(action->unkC.unk0 == 1) { if(sub_80A87E0(action->unk8.unk2, sub_80A8E9C(action->unkC.unk2)) != 0) return 1; } return 0; case 0x11: return sub_80A8D20() != FALSE; case 0x12: { s32 held = gRealInputs.held; if((held & (R_BUTTON | L_BUTTON))) return 1; else return 0; } case 0x13: { Pokemon *ptr = sub_80A8D54((s16) r2); if (ptr) return PokemonFlag2(ptr); } return 0; case 0x14: if(action->unk8.unk0 == 1) { if(GetCanMoveFlag(sub_80A8BFC(action->unk8.unk2))) return 1; } return 0; case 0x15: { s32 r4; PixelPos sp_318; PixelPos sp_320; s32 r5 = (s16) sub_80A7AE8(r2); if(r5 >= 0) { r4 = (r3 << 8); action->callbacks->getHitboxCenter(action->parentObject, &sp_318); sub_80A8FD8(r5, &sp_320); if(sp_318.x - r4 <= sp_320.x && sp_318.x + r4 >= sp_320.x && sp_318.y - r4 <= sp_320.y && sp_318.y + r4 >= sp_320.y) { return 1; } } } return 0; case 0x16: { s32 index; Pokemon *ptr; ptr = sub_80A8D54(1); if(ptr) { for(index = 0; index < POKEMON_NAME_LENGTH; index++) { ptr->name[index] = 0; } return 1; } } return 0; case 0x17: UnlockFriendArea(WILD_PLAINS); UnlockFriendArea(MIST_RISE_FOREST); return 0; case 0x18: sub_80A8F50(sPokeNameBuffer, 0x3C, POKEMON_NAME_LENGTH); return 0; case 0x19: UnlockFriendArea(GetFriendArea(MONSTER_MAGNEMITE)); { struct StoryMonData magnemiteData = { .name = sPokeNameBuffer, .speciesNum = MONSTER_MAGNEMITE, .itemID = ITEM_NOTHING, .dungeonLocation = {.id = DUNGEON_POKEMON_SQUARE_2, .floor = 0}, .moveID = {MOVE_METAL_SOUND, MOVE_TACKLE, MOVE_THUNDERSHOCK, MOVE_NOTHING}, .pokeHP = 38, .level = 6, .IQ = 1, .offenseAtk = {20, 18}, .offenseDef = {20, 18}, .currExp = 4560, }; Pokemon magnemiteMon; Pokemon *recruitPtr; s32 index; ConvertStoryMonToPokemon(&magnemiteMon, &magnemiteData); recruitPtr = TryAddPokemonToRecruited(&magnemiteMon); if (recruitPtr == NULL) return 1; for (index = 0; index < POKEMON_NAME_LENGTH; index++) { recruitPtr->name[index] = sPokeNameBuffer[index]; } StrncpyCustom(gFormatBuffer_Names[r2], sPokeNameBuffer, POKEMON_NAME_LENGTH); IncrementAdventureNumJoined(); return 0; } break; case 0x1A: sub_80A8F50(sPokeNameBuffer, 0x53, POKEMON_NAME_LENGTH); return 0; case 0x1B: UnlockFriendArea(GetFriendArea(MONSTER_ABSOL)); { Pokemon *recruitPtr; struct StoryMonData absolData = { .name = sPokeNameBuffer, .speciesNum = MONSTER_ABSOL, .itemID = ITEM_NOTHING, .dungeonLocation = {.id = DUNGEON_FROSTY_GROTTO_2, .floor = 0}, .moveID = {MOVE_SCRATCH, MOVE_LEER, MOVE_TAUNT, MOVE_QUICK_ATTACK}, .pokeHP = 80, .level = 20, .IQ = 1, .offenseAtk = {33, 32}, .offenseDef = {31, 32}, .currExp = 43000, }; Pokemon absolMon; ConvertStoryMonToPokemon(&absolMon, &absolData); recruitPtr = TryAddPokemonToRecruited(&absolMon); if (recruitPtr == NULL) return 1; IncrementAdventureNumJoined(); recruitPtr->flags |= POKEMON_FLAG_ON_TEAM; return 0; } case 0x1C: { Pokemon *pokemon = GetRecruitedMonBySpecies(MONSTER_ABSOL, 0); if (pokemon == NULL) return 1; pokemon->flags |= POKEMON_FLAG_ON_TEAM; return 0; } case 0x1D: { if( sub_808D278(MONSTER_SMEARGLE) == 0) return 1; else return 0; } case 0x1E: sub_80A8F50(sPokeNameBuffer, 0x7C, POKEMON_NAME_LENGTH); return 0; case 0x1F: { Pokemon *recruitPtr; s32 index; struct StoryMonData smeargleData = { .name = sPokeNameBuffer, .speciesNum = MONSTER_SMEARGLE, .itemID = ITEM_NOTHING, .dungeonLocation = {.id = DUNGEON_HOWLING_FOREST_2, .floor = 0}, .moveID = {MOVE_SKETCH, MOVE_NOTHING, MOVE_NOTHING, MOVE_NOTHING}, .pokeHP = 47, .level = 5, .IQ = 1, .offenseAtk = {16, 20}, .offenseDef = {20, 16}, .currExp = 1600, }; Pokemon smeargleMon; ConvertStoryMonToPokemon(&smeargleMon, &smeargleData); recruitPtr = TryAddPokemonToRecruited(&smeargleMon); if (!recruitPtr) return 1; for (index = 0; index < POKEMON_NAME_LENGTH; index++) { recruitPtr->name[index] = sPokeNameBuffer[index]; } StrncpyCustom(gFormatBuffer_Names[r2], sPokeNameBuffer, POKEMON_NAME_LENGTH); IncrementAdventureNumJoined(); return 0; } break; case 0x20: sub_80026E8(0x9E, 0x1); if (GetRecruitedMonBySpecies(MONSTER_ZAPDOS, 0) == NULL) { static const DungeonLocation zapdosLoc = {.id = DUNGEON_MT_THUNDER_PEAK, .floor = 99}; if (TryAddLevel1PokemonToRecruited(MONSTER_ZAPDOS, NULL, ITEM_NOTHING, &zapdosLoc, NULL)) IncrementAdventureNumJoined(); } if (GetRecruitedMonBySpecies(MONSTER_MOLTRES, 0) == NULL) { static const DungeonLocation moltresLoc = {.id = DUNGEON_MT_BLAZE_PEAK, .floor = 99}; if (TryAddLevel1PokemonToRecruited(MONSTER_MOLTRES, NULL, ITEM_NOTHING, &moltresLoc, NULL)) IncrementAdventureNumJoined(); } if (GetRecruitedMonBySpecies(MONSTER_ARTICUNO, 0) == NULL) { static const DungeonLocation articunoLoc = {.id = DUNGEON_FROSTY_GROTTO, .floor = 99}; if (TryAddLevel1PokemonToRecruited(MONSTER_ARTICUNO, NULL, ITEM_NOTHING, &articunoLoc, NULL)) IncrementAdventureNumJoined(); } return 0; case 0x21: if (HasRecruitedMon(MONSTER_ARTICUNO) && HasRecruitedMon(MONSTER_ZAPDOS) && HasRecruitedMon(MONSTER_MOLTRES)) return 1; return 0; case 0x22: { Pokemon *pokemon = GetPlayerPokemonStruct(); if (pokemon->speciesNum != MONSTER_ARTICUNO && pokemon->speciesNum != MONSTER_ZAPDOS && pokemon->speciesNum != MONSTER_MOLTRES) return 1; } return 0; case 0x23: { Pokemon *pokemon; pokemon = GetPlayerPokemonStruct(); if (pokemon != NULL && pokemon->speciesNum == MONSTER_HO_OH) return 2; else if (sub_8098134(MONSTER_HO_OH) != 0) return 1; } return 0; case 0x24: sub_80A8F50(sPokeNameBuffer, 0x79, POKEMON_NAME_LENGTH); return 0; case 0x25: if (!GetFriendAreaStatus(GetFriendArea(MONSTER_LATIOS))) UnlockFriendArea(GetFriendArea(MONSTER_LATIOS)); { Pokemon *recruitPtr; s32 index; struct StoryMonData latiosData = { .name = sPokeNameBuffer, .speciesNum = MONSTER_LATIOS, .itemID = ITEM_NOTHING, .dungeonLocation = {.id = DUNGEON_POKEMON_SQUARE, .floor = 0}, .moveID = {MOVE_PSYWAVE, MOVE_MEMENTO, MOVE_HELPING_HAND, MOVE_SAFEGUARD}, .pokeHP = 125, .level = 30, .IQ = 1, .offenseAtk = {60, 59}, .offenseDef = {42, 44}, .currExp = 273400, }; Pokemon latiosMon; ConvertStoryMonToPokemon(&latiosMon, &latiosData); recruitPtr = TryAddPokemonToRecruited(&latiosMon); if (recruitPtr == NULL) return 1; for (index = 0; index < POKEMON_NAME_LENGTH; index++) { recruitPtr->name[index] = sPokeNameBuffer[index]; } IncrementAdventureNumJoined(); return 0; } break; case 0x26: sub_80A8F50(sPokeNameBuffer, 0x7A, POKEMON_NAME_LENGTH); return 0; case 0x27: { Pokemon *recruitPtr; s32 index; struct StoryMonData latiasData = { .name = sPokeNameBuffer, .speciesNum = MONSTER_LATIAS, .itemID = ITEM_NOTHING, .dungeonLocation = {.id = DUNGEON_POKEMON_SQUARE, .floor = 0}, .moveID = {MOVE_PSYWAVE, MOVE_WISH, MOVE_HELPING_HAND, MOVE_SAFEGUARD}, .pokeHP = 120, .level = 28, .IQ = 1, .offenseAtk = {58, 57}, .offenseDef = {40, 43}, .currExp = 245400, }; Pokemon latiasMon; ConvertStoryMonToPokemon(&latiasMon, &latiasData); recruitPtr = TryAddPokemonToRecruited(&latiasMon); if (recruitPtr == NULL) return 1; for (index = 0; index < POKEMON_NAME_LENGTH; index++) { recruitPtr->name[index] = sPokeNameBuffer[index]; } IncrementAdventureNumJoined(); return 0; } break; case 0x28: { static const Item item = {.flags = 0, .quantity = 0, .id = ITEM_WISH_STONE}; if (GetNumberOfFilledInventorySlots() >= INVENTORY_SIZE) { if (IsNotMoneyOrUsedTMItem(item.id) && gTeamInventoryRef->teamStorage[item.id] < 999) gTeamInventoryRef->teamStorage[item.id] += 1; } else { AddItemIdToInventory(item.id, FALSE); FillInventoryGaps(); } return 0; } case 0x29: { s32 index = (s16)(RandInt(0x1A2) + 1); s32 r4 = RandInt(0x20); s32 r7 = 0x1A4; s32 r6 = 0; while (1) { s16 indexS16; index = (s16)(index + 1); if (index >= 0x1a4) { index = 1; } if (--r7 < 0) { if (r6 == 0) { SetScriptVarValue(NULL, NEW_FRIEND_KIND, 0); return 0; } if (r4 >= r6) { r4 = RandInt(r6); r7 = 0x1A4; } } // S16 memes AGAIN... indexS16 = index; index = indexS16; if (indexS16 == MONSTER_ARTICUNO || indexS16 == MONSTER_ZAPDOS || indexS16 == MONSTER_MOLTRES || indexS16 == MONSTER_GROUDON || indexS16 == MONSTER_RAYQUAZA || indexS16 == MONSTER_RAYQUAZA_CUTSCENE || indexS16 == MONSTER_KYOGRE || indexS16 == MONSTER_LUGIA || indexS16 == MONSTER_CASTFORM_SNOWY || indexS16 == MONSTER_CASTFORM_SUNNY || indexS16 == MONSTER_CASTFORM_RAINY || indexS16 == MONSTER_DEOXYS_NORMAL || indexS16 == MONSTER_DEOXYS_ATTACK || indexS16 == MONSTER_DEOXYS_DEFENSE || indexS16 == MONSTER_DEOXYS_SPEED || indexS16 == MONSTER_MEWTWO || indexS16 == MONSTER_JIRACHI || indexS16 == MONSTER_MEW || indexS16 == MONSTER_LATIAS || indexS16 == MONSTER_LATIOS || indexS16 == MONSTER_ENTEI || indexS16 == MONSTER_RAIKOU || indexS16 == MONSTER_SUICUNE || indexS16 == MONSTER_HO_OH || indexS16 == MONSTER_REGIROCK || indexS16 == MONSTER_REGICE || indexS16 == MONSTER_REGISTEEL || indexS16 == MONSTER_CELEBI ) continue; if(!IsExclusivePokemonUnlocked(index)) continue; if(GetFriendAreaStatus(GetFriendArea(index))) { if(HasRecruitedMon(index)) continue; if(sub_808D278(index) == 0) continue; } r6++; r4--; if (r4 < 0) break; } SetScriptVarValue(NULL, NEW_FRIEND_KIND, index); WriteFriendAreaName(gFormatBuffer_FriendArea, GetFriendArea(index), FALSE); if (GetFriendAreaStatus(GetFriendArea(index)) != 0) return 1; else return 2; } case 0x2A: { s32 id = (s16) GetScriptVarValue(0, NEW_FRIEND_KIND); WriteFriendAreaName(gFormatBuffer_FriendArea,(GetFriendArea(id)), FALSE); if (id == 0) return 0; else if(GetFriendAreaStatus(GetFriendArea(id)) != 0) return 1; else return 2; } break; case 0x2B: sub_80A8F50(sPokeNameBuffer, 0x20, POKEMON_NAME_LENGTH); return 0; case 0x2C: { Pokemon *recruitPtr; s32 index; if (r2 != 0) { static const DungeonLocation dungLoc = {.id = DUNGEON_RESCUE_TEAM_BASE_2, .floor = 0}; s32 id = (s16) GetScriptVarValue(0, NEW_FRIEND_KIND); s32 id_ = id; WriteFriendAreaName(gFormatBuffer_FriendArea,(GetFriendArea((s16)id)), FALSE); if (id == 0) return 0; if (!GetFriendAreaStatus(GetFriendArea(id))) UnlockFriendArea(GetFriendArea(id)); recruitPtr = TryAddLevel1PokemonToRecruited(id_, NULL ,ITEM_NOTHING, &dungLoc, MOVE_NOTHING); if (recruitPtr == NULL) return 0; for (index = 0; index < POKEMON_NAME_LENGTH; index++) recruitPtr->name[index] = sPokeNameBuffer[index]; IncrementAdventureNumJoined(); return 1; } else { SetScriptVarValue(NULL, NEW_FRIEND_KIND, 0); return 0; } } case 0x2D: if(GetPtsToNextRank() > 0) return 1; else return 0; case 0x2E: { s32 rankBefore = GetRescueTeamRank(); s32 points = GetPtsToNextRank(); if (points > 0) { s32 rankAfter; AddToTeamRankPts(points); rankAfter = GetRescueTeamRank(); InlineStrcpy(gFormatBuffer_Items[0], GetTeamRankString(rankBefore)); InlineStrcpy(gFormatBuffer_Items[1], GetTeamRankString(rankAfter)); if (ScriptPrintText(0, -1, _("{CENTER_ALIGN}The rescue rank went up from\n{CENTER_ALIGN}{MOVE_ITEM_0} to {MOVE_ITEM_1}!")) != 0) return 1; } else { return 0; } } // breakthrough case 0x2F: AddToTeamMoney(10000); return 0; case 0x30: if (sub_808D278(MONSTER_GARDEVOIR) == 0) return 1; else return 0; case 0x31: sub_80A8F50(sPokeNameBuffer, 0x52, POKEMON_NAME_LENGTH); return 0; case 0x32: { struct StoryMonData gardevoirData = { .name = sPokeNameBuffer, .speciesNum = MONSTER_GARDEVOIR, .itemID = ITEM_NOTHING, .dungeonLocation = {.id = DUNGEON_RESCUE_TEAM_BASE_2, .floor = 0}, .moveID = {MOVE_CONFUSION, MOVE_DOUBLE_TEAM, MOVE_TELEPORT, MOVE_GROWL}, .pokeHP = 53, .level = 5, .IQ = 1, .offenseAtk = {18, 18}, .offenseDef = {11, 10}, .currExp = 2800, }; Pokemon gardevoirMon; ConvertStoryMonToPokemon(&gardevoirMon, &gardevoirData); if (TryAddPokemonToRecruited(&gardevoirMon) == 0) { return 1; } else { IncrementAdventureNumJoined(); return 0; } } case 0x33: if (ScriptVarScenarioAfter(SCENARIO_MAIN, 0x12, -1) && GetScriptVarValue(0, GROUND_GETOUT) != 4 && GetScriptVarArrayValue(0, EVENT_GONBE, 0) <= 0) { if (OtherRandInt(0x100) == 0) { SetScriptVarArrayValue(0, EVENT_GONBE, 0, 4); return 1; } else { SetScriptVarArrayValue(0, EVENT_GONBE, 0, 1); } } return 0; case 0x34: { s32 i; static const Item appleItem = {.flags = 0, .quantity = 0, .id = ITEM_APPLE}; for (i = 0; i < 3; i++) { if (GetNumberOfFilledInventorySlots() >= INVENTORY_SIZE) { if (IsNotMoneyOrUsedTMItem(appleItem.id) && gTeamInventoryRef->teamStorage[appleItem.id] < 999) gTeamInventoryRef->teamStorage[appleItem.id] += 1; } else { AddItemIdToInventory(appleItem.id, 0); FillInventoryGaps(); } } } return 0; case 0x35: { Pokemon *pokemon = GetPlayerPokemonStruct(); if(pokemon != NULL && pokemon->speciesNum == MONSTER_CHANSEY) return 2; else if(sub_8098134(MONSTER_CHANSEY) != 0) return 1; else return 0; } break; case 0x38: sub_80A56A0(0, 1); return 0; case 0x36: { PixelPos sp_328; sp_328.x = r2; sp_328.y = r3; sub_80A56F0(&sp_328); return 0; } case 0x37: { PixelPos sp_330; sp_330.x = r2; sp_330.y = r3; sub_80A5704(&sp_330); return 0; } case 0x39: sub_809C6CC(r2); return 0; case 0x3A: sub_809C6EC(); return 0; case 0x3B: sub_809C760(); return 0; case 0x3C: { s32 index; for (index = 0; index < 0x18; index = (s16)(index + 1)) { sub_80A86C8(index, 0x400000); } for (index = 0; index < 0x10; index = (s16)(index + 1)) { sub_80AC1B0(index, 0x400000); } for (index = 0; index < 0x10; index = (s16)(index + 1)) { sub_80AD0C8(index, 0x400000); } } return 0; case 0x3D: { PixelPos sp_338 = {r2, r3}; sub_80A59A0(0, &sp_338, sub_80A5984(1, &sp_338)); return 0; } case 0x3E: { s32 ret; Action *r7; GroundEffectData sp_308; PixelPos sp_340; PixelPos sp_348; PixelPos sp_350; PixelPos sp_358; sp_308.kind = 1; sp_308.unk1 = 0; sp_308.width = 1; sp_308.height = 1; sp_308.pos = (CompactPos) {0}; sp_308.script = gFunctionScriptTable[406].script; // MOVE_DEBUG_CAMERA ret = (s16) GroundEffect_Add(-1, &sp_308, (s16) r2, (s8) r3); if(ret < 0) break; r7 = sub_80AD158(ret); sub_80A579C(&sp_340, &sp_348); sp_340.y += 0xC00; sp_348.y += 0xC00; action->callbacks->getHitboxCenter(action->parentObject, &sp_350); if(sp_350.x < sp_340.x) sp_350.x = sp_340.x; else if (sp_350.x >= sp_348.x) sp_350.x = sp_348.x - 1; if(sp_350.y < sp_340.y) sp_350.y = sp_340.y; else if (sp_350.y >= sp_348.y) sp_350.y = sp_348.y - 1; sp_340.x -= 1024; sp_340.y -= 1024; sp_348.x += 1024; sp_348.y += 1024; r7->callbacks->setPositionBounds(r7->parentObject, &sp_340, &sp_348); r7->callbacks->moveReal(r7->parentObject, &sp_350); sp_358 = (PixelPos) {0}; r7->callbacks->moveRelative(r7->parentObject, &sp_358); return 1; } break; case 0x3F: { s32 index; s32 held = gRealInputs.held; s32 pressed = gRealInputs.pressed; if(!(pressed & (START_BUTTON | SELECT_BUTTON))) { PixelPos sp_368; s32 dir = DpadToDirection(held); if((s8)dir != -1) { s32 to; sp_368 = SetVecFromDirectionSpeed((s8) dir,0x100); to = 2; if(held & B_BUTTON) { to = 4; } for(index = 0; index < to; index++) { if(action->callbacks->moveRelative(action->parentObject, &sp_368) != 0) { PixelPos pixelPos = {0, sp_368.y}; if(action->callbacks->moveRelative(action->parentObject, &pixelPos) != 0) { PixelPos pixelPos = {sp_368.x, 0}; action->callbacks->moveRelative(action->parentObject, &pixelPos); } } } } return -1; } } break; case 0x40: sub_80993C0(r2 == 0 ? 0 : 1); return 0; case 0x42: sub_8011C28(1); GroundMainGameEndRequest(r2); FadeOutAllMusic(r2); return 0; case 0x41: GroundMainGameEndRequest(r2); FadeOutAllMusic(r2); return 0; case 0x43: gUnknown_2039DA8 = GetCurrentBGSong(); if(gUnknown_2039DA8 != STOP_BGM) return 1; return 0; case 0x44: if (gUnknown_2039DA8 != STOP_BGM) { StartNewBGM_(gUnknown_2039DA8); gUnknown_2039DA8 = STOP_BGM; return 1; } return 0; case 0x45: if (gUnknown_2039DA8 != STOP_BGM) { FadeInNewBGM_(gUnknown_2039DA8, r2); gUnknown_2039DA8 = STOP_BGM; return 1; } return 0; case 0x46: if (gUnknown_2039DA8 != STOP_BGM) { QueueBGM_(gUnknown_2039DA8); gUnknown_2039DA8 = STOP_BGM; return 1; } return 0; case 0x47: sub_80997F4(r2, r3); return 0; case 0x48: sub_80997F4(0x1E, r2); return 0; case 0x49: GroundSprite_ExtendPaletteAdd(0, r2); return 0; case 0x4A: GroundSprite_ExtendPaletteDelete(0); return 0; } return 0; } void GroundScript_Unlock(void) { s32 index; bool8 cond; if (gAnyScriptLocked == 0) return; gAnyScriptLocked = 0; index = 0; for (index = 0; index < SCRIPT_LOCKS_ARR_COUNT; index++) { if (gScriptLocks[index] != 0) { Log(1, "GroundScript unlock %3d", index); cond = GroundMapNotifyAll((s16) index); cond |= GroundLivesNotifyAll((s16) index); cond |= GroundObjectsNotifyAll((s16) index); cond |= GroundEffectsNotifyAll((s16) index); if (gScriptLockConds[index] != 0) { if (cond) { GroundMapNotifyAll((s16) (index | 0x80)); GroundLivesNotifyAll((s16) (index | 0x80)); GroundObjectsNotifyAll((s16) (index | 0x80)); GroundEffectsNotifyAll((s16) (index | 0x80)); gScriptLocks[index] = gScriptLockConds[index] = 0; } } else { gScriptLocks[index] = 0; } } } } static const ScriptCommand *FindLabel(Action *action, s32 r1) { ScriptCommand script; const ScriptCommand *scriptPtr2; const ScriptCommand *scriptPtr; scriptPtr2 = action->scriptData.script.ptr2; scriptPtr = scriptPtr2 + 1; while(1) { script = *scriptPtr; scriptPtr++; if (script.op == 0xF4 && r1 == script.argShort) break; { UNUSED static const u8 maybeFuncName[] = "_SearchScriptLabel"; UNUSED static const DebugLocation unusedDebugLoc = {"../ground/ground_script.c", 5822, maybeFuncName}; UNUSED static const u8 scrLabelError[] = "Script label search error %d"; } // DS: Assert(script.op != 0, "script search label error %d", label) // DS: Assert(script.op != 0xF6, "script search label error %d", label) } return scriptPtr; } static const ScriptCommand *ResolveJump(Action *action, s32 r1) { ScriptCommand script; const ScriptCommand *scriptPtr; s32 temp; scriptPtr = action->scriptData.script.ptr; while(1) { script = *scriptPtr; if (script.op == 0xCC) { if(FlagJudge(r1, script.arg1, JUDGE_EQ)) return FindLabel(action, script.argShort); } else if (script.op == 0xCD) { if(FlagJudge(r1, script.arg1, script.argByte)) return FindLabel(action, script.argShort); } else if (script.op == 0xCE) { temp = GetScriptVarValue(action->scriptData.localVars.buf, (s16)script.arg1); if(FlagJudge(r1, temp, script.argByte)) return FindLabel(action, script.argShort); } else { return scriptPtr; } scriptPtr++; } } static void sub_80A2500(s32 param_1, ActionUnkIds *param_2) { if (param_2->unk0 == 1) { sub_809AB4C((s16) param_1, (s16) sub_80A8BBC(param_2->unk2)); } } static void sub_80A252C(s32 param_1, ActionUnkIds *param_2) { if (param_2->unk0 == 1) { sub_809ABB4((s16) param_1, (s16) sub_80A8BBC(param_2->unk2)); } } static void sub_80A2558(s32 param_1, ActionUnkIds *param_2) { if (param_2->unk0 == 1) { sub_809AC18((s16) param_1, (s16) sub_80A8BBC(param_2->unk2)); } } static void sub_80A2584(s16 r0, s16 r1) { s32 iVar2 = r1; s32 iVar1 = r0; sub_809ABB4(iVar1, iVar2); } static void sub_80A2598(s16 r0, s16 r1) { s32 iVar2 = r1; s32 iVar1 = r0; sub_809AC18(iVar1, iVar2); } static u32 sub_80A25AC(u16 param_1) { if (sub_8098F88()) return param_1; if (param_1 == 50) return 50; if (!sub_80023E4(12)) return 999; if (sub_80023E4(13)) return 19; if (param_1 != 1) return param_1; GetScriptVarValue(NULL, BASE_LEVEL); // wut??? return 1; }