#include "global.h" #include "code_8002774.h" #include "debug.h" #include "event_flag.h" #include "ground_link.h" #include "ground_script.h" #include "ground_sprite.h" #include "ground_map.h" #include "dungeon.h" #include "other_random.h" #include "rescue_team_info.h" #include "code_80118A4.h" #include "code_8097670.h" #include "exclusive_pokemon.h" #include "items.h" #include "math.h" #include "ground_main.h" #include "code_80A26CC.h" #include "wigglytuff_shop1.h" // Size: unknown typedef struct UnkAction3D { u8 fill0[0x4C]; u8 unk4C[10]; } UnkAction3D; void GroundMap_Select(s16); void GroundMap_SelectDungeon(s16, DungeonLocation*, u8); void GroundMap_ExecuteEnter(s16); void GroundMap_ExecuteEvent(s16, bool8); void GroundMap_GetStationScript(ScriptInfoSmall *out, s16, s32, s32); void GroundMap_ExecuteStation(s32, s32, s32, bool8); void GroundLives_ExecuteScript(s32, s16 *, ScriptInfoSmall *); void GroundObject_ExecuteScript(s32, s16 *, ScriptInfoSmall *); void GroundEffect_ExecuteScript(s32, s16 *, ScriptInfoSmall *); void GroundLives_Select(s16, s32 group, s32 sector); void GroundObject_Select(s16, s32 group, s32 sector); void GroundEffect_Select(s16, s32 group, s32 sector); void GroundEvent_Select(s16, s32 group, s32 sector); void GroundLives_Cancel(s32 group, s32 sector); void GroundObject_Cancel(s32 group, s32 sector); void GroundEffect_Cancel(s32 group, s32 sector); void GroundEvent_Cancel(s32 group, s32 sector); void GroundLives_CancelBlank_1(void); void GroundObject_CancelBlank(void); void GroundEffect_CancelBlank(void); void GroundWeather_Select(s16); u32 GroundLives_ExecutePlayerScriptActionLives(); s16 GroundObject_Add(s16 id, GroundObjectData*, s16 group, s8 sector); s16 GroundEffect_Add(s16 id, GroundEffectData*, s16 group, s8 sector); // 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 char sub_8002984(s32, u8); bool8 sub_802FCF0(void); void sub_809733C(s16, bool8); void sub_80973A8(s16, bool8); void sub_8097418(s16, bool8); void sub_80975A8(s16, bool8); void sub_8098D1C(s32, u32, s32); void sub_8098E18(s32, s32); u32 sub_80999E8(); void sub_80999FC(s32); u32 sub_8099A10(); u32 sub_8099A34(); u32 sub_8099A48(); u32 sub_8099A5C(); u32 sub_8099AFC(); u32 sub_809A6E4(); u32 sub_809A6F8(); u32 sub_809A738(); u32 sub_809A768(); bool8 ScriptPrintNullTextbox(void); bool8 ScriptPrintEmptyTextbox(void); void sub_809A83C(s16); u32 sub_809AC7C(); u32 sub_809ADD8(); bool8 ScriptPrintText(s32, s16, const char*); bool8 sub_809AEEC(const char*); bool8 sub_809AF2C(const char*); bool8 sub_809AF6C(s16, const char*); void sub_809AFC8(bool8, s32, s32, const char*); u32 sub_809B028(); bool8 sub_809B1C0(s32, s32, char[12]); void sub_809B1D4(u8, s32, s32, const char*); void sub_809C770(s16, s16); s32 HasItemInInventory(u8); u32 sub_809CC90(); void sub_809D0BC(void); void sub_809D124(s32, s32, s32); void sub_809D158(s32, PixelPos*); void sub_809D170(s32, s32); void sub_809D190(s32, PixelPos*, s32); void sub_809D1A8(s32, s32, s32); void sub_809D1CC(s32, PixelPos*, s32); void sub_809D1E4(s32, s32, s32); void sub_809D208(s32, PixelPos*, s32); void sub_809D220(s32, s32, s32); u32 sub_809D52C(); bool8 GroundCancelAllEntities(void); void GroundScriptLockJumpZero(s16); s16 GetAdjustedGroundMap(s32); s16 sub_80A7AE8(s16); void sub_80A87AC(s32, s32); void sub_80A8BD8(s16, s32*); u32 sub_80A8C2C(); u32 sub_80A8C98(); UnkAction3D *sub_80A8D54(s16); s16 sub_80A8FD8(s32, PixelPos*); s16 sub_80A8F9C(s32, PixelPos*); u32 sub_80A9050(); u32 sub_80A9090(); s16 sub_80AC448(s16, PixelPos*); s32 sub_80AC49C(s16, PixelPos*); s16 sub_80AD360(s16, PixelPos*); s16 sub_80AD3B4(s16, PixelPos*); void DeleteGroundEvents(void); void DeleteGroundLives(void); void DeleteGroundObjects(void); void DeleteGroundEffects(void); s32 sub_80A14E8(Action *, u8, s32, s32); s16 HandleAction(void *, DebugLocation *); extern int gFormatArgs[10]; extern s16 gCurrentMap; extern s16 gUnknown_2039A32; extern s16 gUnknown_2039A34; extern struct { const char *unk0; s32 unk4; } gChoices[9]; extern u8 gUnknown_2039D98[12]; extern PixelPos gUnknown_81164DC; extern char gUnknown_81165D4[]; extern char gUnknown_81165F4[]; extern char gUnknown_811660C[]; extern char gUnknown_8116628[]; extern char gUnknown_8116644[]; extern char gUnknown_8116664[]; extern char gUnknown_8116684[]; extern char gUnknown_81166C0[]; extern char gUnknown_81166D8[]; extern const CallbackData gGroundScriptTriggerCallbacks; extern DebugLocation gUnknown_81166B4; extern DebugLocation gUnknown_81166F8; extern DebugLocation gUnknown_8116704; extern ScriptCommand gUnknown_81164E4; EWRAM_INIT static int sNumChoices = 0; // 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. 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)) { // " ground select %3d[%s] %3d" Log(1, gUnknown_81165D4, arg, gGroundConversion_811BAF4[arg].text, byte); } GroundMainGroundRequest(argCopy, byte, curCmd.argShort); break; } case 0x02: { s32 arg = (s16)curCmd.arg1; if (arg == -1) arg = (s16)GetScriptVarValue(NULL, DUNGEON_ENTER); if (ScriptLoggingEnabled(TRUE)) { // " dungeon select %3d" Log(1, gUnknown_81165F4, arg); } if (arg != -1) { GroundMainRescueRequest(arg, 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() && (u8)sub_809B1C0(12,0,0)) { 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 ((s8)sub_809B1C0(36, 0, 0)) { 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, gUnknown_811660C, 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)) { // " map select %3d %3d[%s]" Log(1,gUnknown_8116628,gCurrentMap,gUnknown_2039A32, gGroundConversion_811BAF4[gCurrentMap].text); } } else { gUnknown_2039A32 = gCurrentMap = curCmd.arg1; gUnknown_2039A34 = curCmd.arg1; if (ScriptLoggingEnabled(TRUE)) { // " ground select %3d %3d[%s]" Log(1,gUnknown_8116644,gCurrentMap,gUnknown_2039A32, gGroundConversion_811BAF4[gCurrentMap].text); } } SetScriptVarValue(NULL,GROUND_MAP,gCurrentMap); SetScriptVarValue(NULL,GROUND_PLACE,gGroundConversion_811BAF4[gCurrentMap].unk2); GroundSprite_Reset(gUnknown_2039A32); sub_809D0BC(); DeleteGroundEvents(); DeleteGroundLives(); DeleteGroundObjects(); DeleteGroundEffects(); sub_809C770(gCurrentMap, gGroundConversion_811BAF4[gCurrentMap].unk2); 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)) { // " dungeon select %3d %3d[%s]" Log(1, gUnknown_8116664, gCurrentMap,gUnknown_2039A32, gGroundConversion_811BAF4[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 = GroundEffect_Add(-1, eff, group, 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[0] != 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)) { // " dungeon rescue select %3d" Log(1, gUnknown_8116684, a); } GroundMainRescueRequest(a, -1); } else { GroundMap_ExecuteEvent(thing, 0); break; } } else { GroundMainRescueRequest(a, -1); } break; } case 0x20: { switch (action->unkC.arr[0]) { case 0: GroundMap_ExecuteEvent(curCmd.argShort, 0); break; case 1: { ScriptInfoSmall info1; GetFunctionScript(action, &info1, curCmd.argShort); GroundLives_ExecuteScript(action->unkC.arr[1], action->unk8, &info1); break; } case 2: { ScriptInfoSmall info2; GetFunctionScript(action, &info2, curCmd.argShort); GroundObject_ExecuteScript(action->unkC.arr[1], action->unk8, &info2); break; } case 3: { ScriptInfoSmall info3; GetFunctionScript(action, &info3, curCmd.argShort); GroundEffect_ExecuteScript(action->unkC.arr[1], action->unk8, &info3); break; } } break; } case 0x21: { s32 ret; s32 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, &gUnknown_81164DC, &pos3, &gUnknown_81164DC)) != -1) { sub_80A9090(ret, tmp); } } GroundLives_ExecutePlayerScriptActionLives(action->unk8[1], 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, (u16)curCmd.arg1, (u16)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: { // THANK YOU pidgey, only an array *inside* a struct works // TODO: Define this struct globally, so it can be passed to sub_8099A5C and sub_8099AFC // This kind of hackiness is used at all callsites (or they load from a global) s32 color = ({ struct color { u8 arr[4]; } color = {{ curCmd.arg2 >> 16, curCmd.arg2 >> 8, curCmd.arg2, 0, }}; *(s32*)&color; }); 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: { sub_809A738(curCmd.arg1, curCmd.arg2); break; } case 0x2c: { if (!(s8)sub_809A768()) break; sub_80A87AC(0, 10); if (GroundScriptCheckLockCondition(action, 0)) return 2; break; } case 0x30: { ScriptPrintNullTextbox(); break; } case 0x31: { ScriptPrintEmptyTextbox(); break; } case 0x2d: { switch ((u8)curCmd.argByte) { case 0: { sub_809A83C(curCmd.argShort); break; } case 1: { sub_80A2500(curCmd.argShort, action->unk8); break; } case 2: { sub_80A2500(curCmd.argShort, action->unkC.arr); break; } case 3: { struct {s16 unk0; s16 unk2;} unk; unk.unk2 = sub_80A7AE8((s16)curCmd.arg1); unk.unk0 = 1; sub_80A2500(curCmd.argShort, (void*)&unk); break; } case 4: { sub_80A252C(curCmd.argShort, action->unk8); break; } case 5: { sub_80A252C(curCmd.argShort, action->unkC.arr); break; } case 6: { struct {s16 unk0; s16 unk2;} 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.arr); break; } case 9: { struct {s16 unk0; s16 unk2;} 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 = sub_80A2740((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: { sub_809AC7C(curCmd.argShort, (s8)curCmd.arg1, (u8)curCmd.argByte); break; } case 0x2f: { s32 unk[2]; unk[0] = curCmd.arg1; unk[1] = curCmd.arg2; sub_809ADD8(curCmd.argShort, unk); break; } case 0x32 ... 0x38: { s8 ret = 0; switch (scriptData->curScriptOp) { case 0x32: ret = ScriptPrintText(0, curCmd.argShort, curCmd.argPtr); break; case 0x33: ret = ScriptPrintText(1, curCmd.argShort, curCmd.argPtr); break; case 0x34: ret = ScriptPrintText(2, curCmd.argShort, curCmd.argPtr); break; case 0x35: ret = ScriptPrintText(3, curCmd.argShort, curCmd.argPtr); break; case 0x36: ret = ScriptPrintText(4, curCmd.argShort, curCmd.argPtr); break; case 0x37: ret = sub_809AEEC(curCmd.argPtr); break; case 0x38: ret = sub_809AF2C(curCmd.argPtr); break; } if (ret) { sub_80A87AC(0, 10); if (GroundScriptCheckLockCondition(action, 0)) return 2; } break; } case 0x39: { if ((s8)sub_809AF6C(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, curCmd.argPtr); sub_80A87AC(0, 11); return 2; } case 0x3b: { scriptData->unk2A = 0; return 2; } case 0x3d: { UnkAction3D *unk; int i; if ((s16)curCmd.arg1 != -1) { unk = sub_80A8D54(curCmd.arg1); if (unk != NULL) { for (i = 0; i < 10; i++) { gUnknown_2039D98[i] = unk->unk4C[i]; } gUnknown_2039D98[10] = 0; sub_809B1C0(4, 0, gUnknown_2039D98); sub_80A87AC(0, 11); return 2; } break; } else { sub_809B1C0(4, 1, gUnknown_2039D98); sub_80A87AC(0, 11); return 2; } } case 0x3e: { sub_80920B8(gUnknown_2039D98); gUnknown_2039D98[10] = 0; sub_809B1C0(5, 0, gUnknown_2039D98); sub_80A87AC(0, 11); return 2; } case 0x3f: { int i; for (i = 0; i < 12; i++) { gUnknown_2039D98[i] = 0; } sub_809B1C0(6, (u8)curCmd.argByte, gUnknown_2039D98); sub_80A87AC(0, 11); return 2; } case 0x42: { StopAllMusic_1(); break; } case 0x43: { FadeOutAllMusic(curCmd.argShort < 0 ? 30 : (u16)curCmd.argShort); break; } case 0x44: { u16 id = curCmd.argByte == 0 ? sub_80A25AC((u16)curCmd.arg1) : curCmd.arg1; if (id != 999) { xxx_call_start_new_bgm((u16)id); } else { xxx_call_stop_bgm(); } break; } case 0x45: { u16 id = curCmd.argByte == 0 ? sub_80A25AC((u16)curCmd.arg1) : curCmd.arg1; if (id != 999) { xxx_call_fade_in_new_bgm((u16)id, (u16)curCmd.argShort); //sub_8011900 } else { xxx_call_stop_bgm(); } break; } case 0x46: { u16 id = curCmd.argByte == 0 ? sub_80A25AC((u16)curCmd.arg1) : curCmd.arg1; if (id != 999) { xxx_call_queue_bgm((u16)id); } break; } case 0x47: { xxx_call_stop_bgm(); break; } case 0x48: { xxx_call_fade_out_bgm(curCmd.argShort < 0 ? 30 : (u16)curCmd.argShort); break; } case 0x49: case 0x4c: { xxx_call_play_fanfare_se((u16)curCmd.arg1, 256); break; } case 0x4a: case 0x4d: { xxx_call_stop_fanfare_se((u16)curCmd.arg1); break; } case 0x4b: case 0x4e: { xxx_call_fade_out_fanfare_se((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 = (Action*)sub_809D52C(action->unkC.arr); 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}).raw / 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: { s32 cap1 = curCmd.arg1 * 2 - 1; s32 cap2 = curCmd.arg2 * 2 - 1; action->callbacks->getHitboxCenter(action->parentObject, &scriptData->pos1); // 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 scriptData->pos2.x = scriptData->pos1.x + ((OtherRandInt(cap1) - curCmd.argShort) << 8); scriptData->pos2.y = scriptData->pos1.y + ((OtherRandInt(cap2) - curCmd.arg1) << 8); #else 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, (s8)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, 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, 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 = gUnknown_81164DC; } 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, &gUnknown_81164DC, &pos1, &gUnknown_81164DC); } if (dir == tmp) { action->callbacks->getDirection(action->parentObject, &dir); } action->scriptData.unk26 = sub_8002984(dir, (s8)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, (s8)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[0]) { 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[0]) { 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[0]) { 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[0]) { 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[0]) { 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[0]) { 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[0]) { 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[0]) { 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[0] == 1) { if ((s8)sub_80A8C98(action->unk8[1])) { 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 = 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, &gUnknown_81164DC, &pos3, &gUnknown_81164DC); } } 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, &gUnknown_81164DC); if (val == -1) { val = SizedDeltaDirection4(&pos1, &gUnknown_81164DC, &pos3, &gUnknown_81164DC); } } else { val = -1; } break; } case 0xcb: { val = sub_809CC90(curCmd.argShort); break; } default: { // The locdata says this is part of an inlined function... :/ // "switch type error %d" FatalError(&gUnknown_81166B4, gUnknown_81166C0, 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 = gUnknown_81166D8; // "" for (; scriptData->script.ptr->op == 0xd9; scriptData->script.ptr++) { gChoices[sNumChoices].unk0 = scriptData->script.ptr->argPtr; gChoices[sNumChoices].unk4 = sNumChoices + 1; sNumChoices++; } if (sNumChoices <= 0) break; gChoices[sNumChoices].unk0 = NULL; gChoices[sNumChoices].unk4 = 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 u32 sub_80A1440(s32 r0, s32 r1, s32 r2) { return sub_80A14E8(NULL, r0, r1, r2); } UNUSED 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, &gGroundScriptTriggerCallbacks, NULL, 0, 0); GetFunctionScript(NULL, &scriptInfo, r0); GroundScript_ExecutePP(&action, NULL, &scriptInfo, &gUnknown_81166F8); action.scriptData.savedScript = action.scriptData.script; action.scriptData.savedScript.ptr = &gUnknown_81164E4; action.scriptData.savedScript.ptr2 = &gUnknown_81164E4; ret = HandleAction(&action, &gUnknown_8116704); InitAction2(&action); if(ret == 0) return TRUE; else return FALSE; }