summaryrefslogtreecommitdiff
path: root/src/battle_ai.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/battle_ai.c')
-rw-r--r--src/battle_ai.c2838
1 files changed, 2838 insertions, 0 deletions
diff --git a/src/battle_ai.c b/src/battle_ai.c
new file mode 100644
index 000000000..8f3b7cf1e
--- /dev/null
+++ b/src/battle_ai.c
@@ -0,0 +1,2838 @@
+#include "global.h"
+#include "pokemon.h"
+#include "battle.h"
+#include "species.h"
+#include "abilities.h"
+
+#define AIScriptRead32(ptr) ((ptr)[0] | (ptr)[1] << 8 | (ptr)[2] << 16 | (ptr)[3] << 24)
+#define AIScriptRead16(ptr) ((ptr)[0] | (ptr)[1] << 8)
+#define AIScriptRead8(ptr) ((ptr)[0])
+#define AIScriptReadPtr(ptr) (u8*) AIScriptRead32(ptr)
+
+#define AI_THINKING_STRUCT ((struct AI_ThinkingStruct *)(gUnknown_020244A8->ai))
+#define UNK_2016A00_STRUCT ((struct UnknownStruct2 *)(gUnknown_020244A8->unk18))
+#define UNK_2016C00_STRUCT ((struct UnknownStruct4 *)(gUnknown_020244A8->unk1C))
+#define UNK_BATTLE_STRUCT ((struct UnknownStruct1 *)(gUnknown_020244A8))
+
+#define AI_ACTION_UNK1 0x0001
+#define AI_ACTION_UNK2 0x0002
+#define AI_ACTION_UNK3 0x0004
+#define AI_ACTION_UNK4 0x0008
+#define AI_ACTION_UNK5 0x0010
+#define AI_ACTION_UNK6 0x0020
+#define AI_ACTION_UNK7 0x0040
+#define AI_ACTION_UNK8 0x0080
+
+enum
+{
+ TARGET,
+ USER
+};
+
+// AI states
+enum
+{
+ AIState_SettingUp,
+ AIState_Processing,
+ AIState_FinishedProcessing,
+ AIState_DoNotProcess
+};
+
+//Copied from pokeruby -- hopefully the same
+struct Trainer
+{
+ /*0x00*/ u8 partyFlags;
+ /*0x01*/ u8 trainerClass;
+ /*0x02*/ u8 encounterMusic:7;
+ /*0x02*/ u8 gender:1;
+ /*0x03*/ u8 trainerPic;
+ /*0x04*/ u8 trainerName[12];
+ /*0x10*/ u16 items[4];
+ /*0x18*/ bool8 doubleBattle;
+ /*0x1C*/ u32 aiFlags;
+ /*0x20*/ u8 partySize;
+ /*0x24*/ void *party;
+};
+
+#define POKEMON_NAME_LENGTH 10
+
+struct BattlePokemon
+{
+ /* 0x00 */ u16 species;
+ /* 0x02 */ u16 attack;
+ /* 0x04 */ u16 defense;
+ /* 0x06 */ u16 speed;
+ /* 0x08 */ u16 spAttack;
+ /* 0x0A */ u16 spDefense;
+ /* 0x0C */ u16 moves[4];
+ /* 0x14 */ u32 hpIV:5;
+ /* 0x14 */ u32 attackIV:5;
+ /* 0x15 */ u32 defenseIV:5;
+ /* 0x15 */ u32 speedIV:5;
+ /* 0x16 */ u32 spAttackIV:5;
+ /* 0x17 */ u32 spDefenseIV:5;
+ /* 0x17 */ u32 isEgg:1;
+ /* 0x17 */ u32 altAbility:1;
+ /* 0x18 */ s8 statStages[8];
+ /* 0x20 */ u8 ability;
+ /* 0x21 */ u8 type1;
+ /* 0x22 */ u8 type2;
+ /* 0x23 */ u8 unknown;
+ /* 0x24 */ u8 pp[4];
+ /* 0x28 */ u16 hp;
+ /* 0x2A */ u8 level;
+ /* 0x2B */ u8 friendship;
+ /* 0x2C */ u16 maxHP;
+ /* 0x2E */ u16 item;
+ /* 0x30 */ u8 nickname[POKEMON_NAME_LENGTH + 1];
+ /* 0x3B */ u8 ppBonuses;
+ /* 0x3C */ u8 otName[8];
+ /* 0x44 */ u32 experience;
+ /* 0x48 */ u32 personality;
+ /* 0x4C */ u32 status1;
+ /* 0x50 */ u32 status2;
+ /* 0x54 */ u32 otId;
+};
+
+//size should be 0x1C
+struct AI_ThinkingStruct
+{
+ u8 aiState;
+ u8 movesetIndex;
+ u16 moveConsidered;
+ s8 score[4];
+ u32 funcResult;
+ u32 aiFlags;
+ u8 aiAction;
+ u8 aiLogicId;
+ u8 filler12[6];
+ u8 unk18[4];
+};
+
+//size should be 0x54
+struct UnknownStruct2
+{
+ u16 unk0[2][8];
+ u8 unk20[2];
+ u8 filler20[0x1E];
+ u8 unk40[4];
+ u8 unk44[4];
+ u16 unk48[4];
+ u8 unk50;
+};
+
+struct UnknownStruct4
+{
+ u8 *ptr[8];
+ u8 unk20;
+};
+
+struct SimpleUnknownStruct
+{
+ u32 unkArray[4]; // unknown size
+};
+
+struct UnknownStruct1
+{
+ u8 unk0;
+ u8 filler1[0x3];
+ struct SimpleUnknownStruct *unk4;
+ u8 filler8[0xC];
+ struct AI_ThinkingStruct *ai;
+ struct UnknownStruct2 *unk18;
+ struct UnknownStruct4 *unk1C;
+};
+
+struct UnknownStruct5
+{
+ u8 filler0[0x3];
+ u16 unk4;
+ u16 unk6;
+ u8 unk8;
+ u8 unk9;
+ u8 fillerA[0x9];
+ u8 taunt:4;
+ u8 unkC:4;
+ u8 fillerD[0x2];
+ u8 unk16;
+ u8 filler17[0x4];
+};
+
+extern struct UnknownStruct5 gUnknown_020242BC[];
+
+/*
+gAIScriptPtr is a pointer to the next battle AI cmd command to read.
+when a command finishes processing, gAIScriptPtr is incremented by
+the number of bytes that the current command had reserved for arguments
+in order to read the next command correctly. refer to battle_ai_scripts.s for the
+AI scripts.
+*/
+extern u8 *gAIScriptPtr;
+
+extern u32 gBattleTypeFlags;
+extern u8 gUnknown_02024064;
+extern struct BattlePokemon gBattleMons[];
+extern u16 gUnknown_020241EA;
+extern u8 gEnemyMonIndex;
+extern u8 gUnknown_02024210;
+extern u16 gUnknown_02024248[];
+extern u8 *gUnknown_0202449C;
+extern struct UnknownStruct1 *gUnknown_020244A8;
+extern u16 gUnknown_02038BCA;
+extern u16 gUnknown_02038BCC;
+extern u8 gPlayerMonIndex;
+extern struct Trainer gTrainers[];
+extern const u32 gBitTable[];
+extern u8 *gUnknown_082DBEF8[];
+extern u32 gUnknown_020242AC[];
+extern u16 gUnknown_0202428E[];
+extern struct BattleMove gBattleMoves[];
+extern u8 gUnknown_03005D10[];
+extern u8 gUnknown_0202406E[][2];
+extern struct BaseStats gBaseStats[];
+extern u16 gUnknown_02024400;
+extern u8 gUnknown_02024474[];
+extern u8 gBattleMoveFlags;
+extern int gBattleMoveDamage;
+extern u8 gCritMultiplier;
+extern u16 gBattleWeather;
+
+extern u8 battle_get_per_side_status(u8);
+extern u8 b_first_side(u8, u8, u8);
+extern u8 battle_get_side_with_given_state(u8);
+extern void move_effectiveness_something(u16, u8, u8);
+extern u8 itemid_get_x12();
+extern void b_mc_stack_push(u8 *);
+extern bool8 b_mc_stack_pop_cursor(void);
+extern void sub_8046E7C(u8, u8);
+
+typedef void (*BattleAICmdFunc)(void);
+
+extern const BattleAICmdFunc gUnknown_085B083C[];
+
+extern u8 sub_803FECC();
+extern u16 Random();
+extern u8 battle_side_get_owner();
+extern u32 sub_8186438();
+extern u32 sub_81A6FB4();
+
+void BattleAI_SetupAIData(u8 a);
+u8 BattleAI_GetAIActionToUse(void);
+u8 sub_8130CF4(void);
+void sub_8131074(void);
+void BattleAI_DoAIProcessing(void);
+
+void BattleAI_HandleItemUseBeforeAISetup(u8 a)
+{
+ s32 i;
+ u8 *data = (u8 *)gUnknown_020244A8->unk18;
+
+ for (i = 0; (u32)i < 0x54; i++)
+ data[i] = 0;
+ if ((gBattleTypeFlags & 0x0A7F098A) == 8)
+ {
+ for (i = 0; i < 4; i++)
+ {
+ if (gTrainers[gUnknown_02038BCA].items[i] != 0)
+ {
+ gUnknown_020244A8->unk18->unk48[gUnknown_020244A8->unk18->unk50] = gTrainers[gUnknown_02038BCA].items[i];
+ gUnknown_020244A8->unk18->unk50++;
+ }
+ }
+ }
+
+ BattleAI_SetupAIData(a);
+}
+
+void BattleAI_SetupAIData(u8 a)
+{
+ s32 i;
+ u8 *data = (u8 *)AI_THINKING_STRUCT;
+ u8 r6;
+
+ // clear AI data.
+ for (i = 0; (u32)i < sizeof(struct AI_ThinkingStruct); i++)
+ data[i] = 0;
+
+ // conditional score reset, unlike Ruby.
+ for (i = 0; i < 4; i++)
+ {
+ if (a & 1)
+ AI_THINKING_STRUCT->score[i] = 100;
+ else
+ AI_THINKING_STRUCT->score[i] = 0;
+ a >>= 1;
+ }
+
+ r6 = sub_803FECC(gUnknown_02024064, 0, 0xFF);
+
+ for (i = 0; i < 4; i++)
+ {
+ if (gBitTable[i] & r6)
+ AI_THINKING_STRUCT->score[i] = 0;
+
+ AI_THINKING_STRUCT->unk18[i] = 100 - (Random() % 16);
+ }
+ gUnknown_020244A8->unk1C->unk20 = 0;
+ gPlayerMonIndex = gUnknown_02024064;
+ if (gBattleTypeFlags & 1)
+ {
+ gEnemyMonIndex = (Random() & 2) + ((u32)battle_side_get_owner(gUnknown_02024064) ^ 1);
+ if (gUnknown_02024210 & gBitTable[gEnemyMonIndex])
+ gEnemyMonIndex ^= 2;
+ }
+ else
+ {
+ //_08130A60
+ gEnemyMonIndex = gPlayerMonIndex ^ 1;
+ }
+ //_08130A68
+ if (gBattleTypeFlags & 0x1000000)
+ AI_THINKING_STRUCT->aiFlags = sub_8186438();
+ else if (gBattleTypeFlags & 0x80)
+ AI_THINKING_STRUCT->aiFlags = 0x40000000;
+ else if (gBattleTypeFlags & 0x400)
+ AI_THINKING_STRUCT->aiFlags = 0x20000000;
+ else if (gBattleTypeFlags & 0x10)
+ AI_THINKING_STRUCT->aiFlags = 0x80000000;
+ else if (gBattleTypeFlags & 0x80000)
+ AI_THINKING_STRUCT->aiFlags = sub_81A6FB4();
+ else if (gBattleTypeFlags & 0x0C3F0900)
+ AI_THINKING_STRUCT->aiFlags = 7;
+ else if (gBattleTypeFlags & 0x8000)
+ AI_THINKING_STRUCT->aiFlags = gTrainers[gUnknown_02038BCA].aiFlags | gTrainers[gUnknown_02038BCC].aiFlags;
+ else
+ AI_THINKING_STRUCT->aiFlags = gTrainers[gUnknown_02038BCA].aiFlags;
+ if (gBattleTypeFlags & 1)
+ AI_THINKING_STRUCT->aiFlags |= 0x80;
+}
+
+u8 sub_8130BA4(void)
+{
+ u16 r4 = gUnknown_020241EA;
+ u8 ret;
+
+ if (!(gBattleTypeFlags & 1))
+ ret = BattleAI_GetAIActionToUse();
+ else
+ ret = sub_8130CF4();
+
+ gUnknown_020241EA = r4;
+ return ret;
+}
+
+u8 BattleAI_GetAIActionToUse(void)
+{
+ u8 currentMoveArray[4];
+ u8 consideredMoveArray[4];
+ u8 numOfBestMoves;
+ s32 i;
+
+ sub_8131074();
+
+ while (AI_THINKING_STRUCT->aiFlags != 0)
+ {
+ if (AI_THINKING_STRUCT->aiFlags & 1)
+ {
+ AI_THINKING_STRUCT->aiState = AIState_SettingUp;
+ BattleAI_DoAIProcessing();
+ }
+ AI_THINKING_STRUCT->aiFlags >>= 1;
+ AI_THINKING_STRUCT->aiLogicId++;
+ AI_THINKING_STRUCT->movesetIndex = 0;
+ }
+
+ // special flags for safari watch/flee.
+ if (AI_THINKING_STRUCT->aiAction & 2)
+ return 4;
+ if (AI_THINKING_STRUCT->aiAction & 4)
+ return 5;
+
+ numOfBestMoves = 1;
+ currentMoveArray[0] = AI_THINKING_STRUCT->score[0];
+ consideredMoveArray[0] = 0;
+
+ for (i = 1; i < 4; i++)
+ {
+ if (gBattleMons[gPlayerMonIndex].moves[i] != 0) // emerald adds an extra move ID check for some reason.
+ {
+ // in ruby, the order of these if statements are reversed.
+ if (currentMoveArray[0] == AI_THINKING_STRUCT->score[i])
+ {
+ currentMoveArray[numOfBestMoves] = AI_THINKING_STRUCT->score[i];
+ consideredMoveArray[numOfBestMoves++] = i;
+ }
+ if (currentMoveArray[0] < AI_THINKING_STRUCT->score[i])
+ {
+ numOfBestMoves = 1;
+ currentMoveArray[0] = AI_THINKING_STRUCT->score[i];
+ consideredMoveArray[0] = i;
+ }
+ }
+ }
+ return consideredMoveArray[Random() % numOfBestMoves];
+}
+
+#ifdef NONMATCHING
+u8 sub_8130CF4(void)
+{
+ s32 i;
+ s32 j;
+ //s32 r4_2;
+ #define r4_2 r4
+ s32 r5;
+ s16 r5_2;
+ s32 r4;
+ s16 sp0[4];
+ s8 sp8[4];
+ s8 spC[4];
+ u8 sp10[4]; // definitely unsigned
+ u8 sp14[4];
+ //u8 *sp1C = spC;
+ //u8 *sp18 = sp8;
+ //u8 *sp20 = spC;
+
+ for (i = 0; i < 4; i++) //_08130D14
+ {
+ if (i == gPlayerMonIndex || gBattleMons[i].hp == 0)
+ {
+ //_08130D2E
+ spC[i] = -1;
+ sp0[i] = -1;
+ }
+ //_08130D48
+ else
+ {
+ if (gBattleTypeFlags & 0x20000)
+ BattleAI_SetupAIData(gUnknown_0202449C[0x92] >> 4);
+ else
+ BattleAI_SetupAIData(0xF);
+ //_08130D76
+ gEnemyMonIndex = i;
+ if ((i & 1) != (gPlayerMonIndex & 1))
+ sub_8131074();
+ //_08130D90
+ AI_THINKING_STRUCT->unk11 = 0;
+ AI_THINKING_STRUCT->unk1 = 0;
+ r4 = AI_THINKING_STRUCT->aiFlags;
+ while (r4 != 0)
+ {
+ if (r4 & 1)
+ {
+ AI_THINKING_STRUCT->aiState = AIState_SettingUp;
+ BattleAI_DoAIProcessing();
+ }
+ r4 >>= 1;
+ AI_THINKING_STRUCT->unk11++;
+ AI_THINKING_STRUCT->unk1 = 0;
+ }
+ //_08130DD8
+ if (AI_THINKING_STRUCT->unk10 & 2)
+ spC[i] = 4;
+ else if (AI_THINKING_STRUCT->unk10 & 4)
+ spC[i] = 5;
+ else
+ {
+ //_08130E10
+ sp10[0] = AI_THINKING_STRUCT->score[0];
+ sp14[0] = 0;
+ r5 = 1;
+ for (j = 1; j < 4; j++)
+ {
+ if (gBattleMons[gPlayerMonIndex].moves[j] != 0)
+ {
+ if (sp10[0] == AI_THINKING_STRUCT->score[j])
+ {
+ sp10[r5] = AI_THINKING_STRUCT->score[j];
+ sp14[r5] = j;
+ r5++;
+ }
+ if (sp10[0] < AI_THINKING_STRUCT->score[j])
+ {
+ sp10[0] = AI_THINKING_STRUCT->score[j];
+ sp14[0] = j;
+ r5 = 1;
+ }
+ }
+ //_08130E72
+ }
+ spC[i] = sp14[Random() % r5];
+ //asm("":::"r3");
+ sp0[i] = sp10[0];
+ if (i == (gPlayerMonIndex ^ 2) && sp0[i] < 100)
+ sp0[i] = -1;
+ }
+ }
+ //_08130EAE
+ }
+
+ //#define i r5
+
+ //_08130EC4
+ r5_2 = sp0[0];
+ sp8[0] = 0;
+ r4_2 = 1;
+ for (i = 1; i < 4; i++)
+ {
+ //_08130EDA
+ if (r5_2 == sp0[i])
+ {
+ sp8[r4_2] = i;
+ r4_2++;
+ }
+ //_08130EEE
+ if (r5_2 < sp0[i])
+ {
+ r5_2 = sp0[i];
+ sp8[0] = i;
+ r4_2 = 1;
+ }
+ }
+ gEnemyMonIndex = sp8[Random() % r4_2];
+ return spC[gEnemyMonIndex];
+}
+#else
+__attribute__((naked))
+u8 sub_8130CF4(void)
+{
+ asm(".syntax unified\n\
+ push {r4-r7,lr}\n\
+ mov r7, r10\n\
+ mov r6, r9\n\
+ mov r5, r8\n\
+ push {r5-r7}\n\
+ sub sp, 0x24\n\
+ movs r0, 0\n\
+ mov r8, r0\n\
+ mov r1, sp\n\
+ adds r1, 0xC\n\
+ str r1, [sp, 0x1C]\n\
+ mov r2, sp\n\
+ adds r2, 0x8\n\
+ str r2, [sp, 0x18]\n\
+ str r1, [sp, 0x20]\n\
+ mov r10, sp\n\
+_08130D14:\n\
+ ldr r0, =gPlayerMonIndex\n\
+ ldrb r0, [r0]\n\
+ cmp r8, r0\n\
+ beq _08130D2E\n\
+ movs r0, 0x58\n\
+ mov r7, r8\n\
+ muls r7, r0\n\
+ adds r0, r7, 0\n\
+ ldr r1, =gBattleMons\n\
+ adds r0, r1\n\
+ ldrh r0, [r0, 0x28]\n\
+ cmp r0, 0\n\
+ bne _08130D48\n\
+_08130D2E:\n\
+ movs r0, 0xFF\n\
+ ldr r2, [sp, 0x20]\n\
+ strb r0, [r2]\n\
+ ldr r0, =0x0000ffff\n\
+ mov r7, r10\n\
+ strh r0, [r7]\n\
+ b _08130EAE\n\
+ .pool\n\
+_08130D48:\n\
+ ldr r0, =gBattleTypeFlags\n\
+ ldr r0, [r0]\n\
+ movs r1, 0x80\n\
+ lsls r1, 10\n\
+ ands r0, r1\n\
+ cmp r0, 0\n\
+ beq _08130D70\n\
+ ldr r0, =gUnknown_0202449C\n\
+ ldr r0, [r0]\n\
+ adds r0, 0x92\n\
+ ldrb r0, [r0]\n\
+ lsrs r0, 4\n\
+ bl BattleAI_SetupAIData\n\
+ b _08130D76\n\
+ .pool\n\
+_08130D70:\n\
+ movs r0, 0xF\n\
+ bl BattleAI_SetupAIData\n\
+_08130D76:\n\
+ ldr r0, =gEnemyMonIndex\n\
+ mov r1, r8\n\
+ strb r1, [r0]\n\
+ movs r1, 0x1\n\
+ mov r2, r8\n\
+ ands r2, r1\n\
+ ldr r0, =gPlayerMonIndex\n\
+ ldrb r0, [r0]\n\
+ ands r1, r0\n\
+ cmp r2, r1\n\
+ beq _08130D90\n\
+ bl sub_8131074\n\
+_08130D90:\n\
+ ldr r2, =gUnknown_020244A8\n\
+ ldr r0, [r2]\n\
+ ldr r0, [r0, 0x14]\n\
+ movs r1, 0\n\
+ strb r1, [r0, 0x11]\n\
+ ldr r0, [r2]\n\
+ ldr r0, [r0, 0x14]\n\
+ strb r1, [r0, 0x1]\n\
+ ldr r0, [r2]\n\
+ ldr r0, [r0, 0x14]\n\
+ ldr r4, [r0, 0xC]\n\
+ mov r9, r2\n\
+ cmp r4, 0\n\
+ beq _08130DD8\n\
+ mov r5, r9\n\
+ movs r6, 0\n\
+_08130DB0:\n\
+ movs r0, 0x1\n\
+ ands r0, r4\n\
+ cmp r0, 0\n\
+ beq _08130DC2\n\
+ ldr r0, [r5]\n\
+ ldr r0, [r0, 0x14]\n\
+ strb r6, [r0]\n\
+ bl BattleAI_DoAIProcessing\n\
+_08130DC2:\n\
+ asrs r4, 1\n\
+ ldr r0, [r5]\n\
+ ldr r1, [r0, 0x14]\n\
+ ldrb r0, [r1, 0x11]\n\
+ adds r0, 0x1\n\
+ strb r0, [r1, 0x11]\n\
+ ldr r0, [r5]\n\
+ ldr r0, [r0, 0x14]\n\
+ strb r6, [r0, 0x1]\n\
+ cmp r4, 0\n\
+ bne _08130DB0\n\
+_08130DD8:\n\
+ mov r2, r9\n\
+ ldr r0, [r2]\n\
+ ldr r3, [r0, 0x14]\n\
+ ldrb r1, [r3, 0x10]\n\
+ movs r0, 0x2\n\
+ ands r0, r1\n\
+ cmp r0, 0\n\
+ beq _08130DFC\n\
+ movs r0, 0x4\n\
+ ldr r7, [sp, 0x20]\n\
+ strb r0, [r7]\n\
+ b _08130EAE\n\
+ .pool\n\
+_08130DFC:\n\
+ movs r0, 0x4\n\
+ ands r0, r1\n\
+ lsls r0, 24\n\
+ lsrs r2, r0, 24\n\
+ cmp r2, 0\n\
+ beq _08130E10\n\
+ movs r0, 0x5\n\
+ ldr r1, [sp, 0x20]\n\
+ strb r0, [r1]\n\
+ b _08130EAE\n\
+_08130E10:\n\
+ add r1, sp, 0x10\n\
+ ldrb r0, [r3, 0x4]\n\
+ strb r0, [r1]\n\
+ add r0, sp, 0x14\n\
+ strb r2, [r0]\n\
+ movs r5, 0x1\n\
+ movs r3, 0x1\n\
+ adds r6, r1, 0\n\
+ ldr r0, =gPlayerMonIndex\n\
+ ldrb r1, [r0]\n\
+ movs r0, 0x58\n\
+ muls r0, r1\n\
+ ldr r2, =gUnknown_02024090\n\
+ adds r0, r2\n\
+ adds r4, r0, 0x2\n\
+ add r7, sp, 0x14\n\
+_08130E30:\n\
+ ldrh r0, [r4]\n\
+ cmp r0, 0\n\
+ beq _08130E72\n\
+ ldrb r1, [r6]\n\
+ mov r2, r9\n\
+ ldr r0, [r2]\n\
+ ldr r0, [r0, 0x14]\n\
+ adds r0, 0x4\n\
+ adds r2, r0, r3\n\
+ movs r0, 0\n\
+ ldrsb r0, [r2, r0]\n\
+ cmp r1, r0\n\
+ bne _08130E56\n\
+ adds r0, r6, r5\n\
+ ldrb r1, [r2]\n\
+ strb r1, [r0]\n\
+ adds r0, r7, r5\n\
+ strb r3, [r0]\n\
+ adds r5, 0x1\n\
+_08130E56:\n\
+ ldrb r1, [r6]\n\
+ mov r2, r9\n\
+ ldr r0, [r2]\n\
+ ldr r0, [r0, 0x14]\n\
+ adds r0, 0x4\n\
+ adds r2, r0, r3\n\
+ movs r0, 0\n\
+ ldrsb r0, [r2, r0]\n\
+ cmp r1, r0\n\
+ bge _08130E72\n\
+ ldrb r0, [r2]\n\
+ strb r0, [r6]\n\
+ strb r3, [r7]\n\
+ movs r5, 0x1\n\
+_08130E72:\n\
+ adds r4, 0x2\n\
+ adds r3, 0x1\n\
+ cmp r3, 0x3\n\
+ ble _08130E30\n\
+ bl Random\n\
+ lsls r0, 16\n\
+ lsrs r0, 16\n\
+ adds r1, r5, 0\n\
+ bl __modsi3\n\
+ add r0, sp\n\
+ adds r0, 0x14\n\
+ ldrb r0, [r0]\n\
+ ldr r7, [sp, 0x20]\n\
+ strb r0, [r7]\n\
+ ldrb r2, [r6]\n\
+ mov r0, r10\n\
+ strh r2, [r0]\n\
+ ldr r0, =gPlayerMonIndex\n\
+ ldrb r1, [r0]\n\
+ movs r0, 0x2\n\
+ eors r0, r1\n\
+ cmp r8, r0\n\
+ bne _08130EAE\n\
+ cmp r2, 0x63\n\
+ bgt _08130EAE\n\
+ ldr r0, =0x0000ffff\n\
+ mov r1, r10\n\
+ strh r0, [r1]\n\
+_08130EAE:\n\
+ ldr r2, [sp, 0x20]\n\
+ adds r2, 0x1\n\
+ str r2, [sp, 0x20]\n\
+ movs r7, 0x2\n\
+ add r10, r7\n\
+ movs r0, 0x1\n\
+ add r8, r0\n\
+ mov r1, r8\n\
+ cmp r1, 0x3\n\
+ bgt _08130EC4\n\
+ b _08130D14\n\
+_08130EC4:\n\
+ mov r0, sp\n\
+ ldrh r5, [r0]\n\
+ movs r0, 0\n\
+ ldr r2, [sp, 0x18]\n\
+ strb r0, [r2]\n\
+ movs r4, 0x1\n\
+ mov r8, r4\n\
+ ldr r6, =gEnemyMonIndex\n\
+ ldr r3, [sp, 0x18]\n\
+ mov r1, sp\n\
+ adds r1, 0x2\n\
+_08130EDA:\n\
+ lsls r0, r5, 16\n\
+ asrs r2, r0, 16\n\
+ movs r7, 0\n\
+ ldrsh r0, [r1, r7]\n\
+ cmp r2, r0\n\
+ bne _08130EEE\n\
+ adds r0, r3, r4\n\
+ mov r7, r8\n\
+ strb r7, [r0]\n\
+ adds r4, 0x1\n\
+_08130EEE:\n\
+ movs r7, 0\n\
+ ldrsh r0, [r1, r7]\n\
+ cmp r2, r0\n\
+ bge _08130EFE\n\
+ ldrh r5, [r1]\n\
+ mov r0, r8\n\
+ strb r0, [r3]\n\
+ movs r4, 0x1\n\
+_08130EFE:\n\
+ adds r1, 0x2\n\
+ movs r2, 0x1\n\
+ add r8, r2\n\
+ mov r7, r8\n\
+ cmp r7, 0x3\n\
+ ble _08130EDA\n\
+ bl Random\n\
+ lsls r0, 16\n\
+ lsrs r0, 16\n\
+ adds r1, r4, 0\n\
+ bl __modsi3\n\
+ ldr r1, [sp, 0x18]\n\
+ adds r0, r1, r0\n\
+ ldrb r0, [r0]\n\
+ strb r0, [r6]\n\
+ ldrb r0, [r6]\n\
+ ldr r2, [sp, 0x1C]\n\
+ adds r0, r2, r0\n\
+ ldrb r0, [r0]\n\
+ add sp, 0x24\n\
+ pop {r3-r5}\n\
+ mov r8, r3\n\
+ mov r9, r4\n\
+ mov r10, r5\n\
+ pop {r4-r7}\n\
+ pop {r1}\n\
+ bx r1\n\
+ .pool\n\
+ .syntax divided\n");
+}
+#endif
+
+void BattleAI_DoAIProcessing(void)
+{
+ while (AI_THINKING_STRUCT->aiState != AIState_FinishedProcessing)
+ {
+ switch (AI_THINKING_STRUCT->aiState)
+ {
+ case AIState_DoNotProcess: //Needed to match.
+ break;
+ case AIState_SettingUp:
+ gAIScriptPtr = gUnknown_082DBEF8[AI_THINKING_STRUCT->aiLogicId]; // set AI ptr to logic ID.
+ if (gBattleMons[gPlayerMonIndex].pp[AI_THINKING_STRUCT->movesetIndex] == 0)
+ {
+ AI_THINKING_STRUCT->moveConsidered = 0;
+ }
+ else
+ {
+ AI_THINKING_STRUCT->moveConsidered = gBattleMons[gPlayerMonIndex].moves[AI_THINKING_STRUCT->movesetIndex];
+ }
+ AI_THINKING_STRUCT->aiState++;
+ break;
+ case AIState_Processing:
+ if (AI_THINKING_STRUCT->moveConsidered != 0)
+ gUnknown_085B083C[*gAIScriptPtr](); // run AI command.
+ else
+ {
+ AI_THINKING_STRUCT->score[AI_THINKING_STRUCT->movesetIndex] = 0;
+ AI_THINKING_STRUCT->aiAction |= 1;
+ }
+ if (AI_THINKING_STRUCT->aiAction & 1)
+ {
+ AI_THINKING_STRUCT->movesetIndex++;
+
+ if (AI_THINKING_STRUCT->movesetIndex < 4 && !(AI_THINKING_STRUCT->aiAction & 8))
+ AI_THINKING_STRUCT->aiState = AIState_SettingUp;
+ else
+ AI_THINKING_STRUCT->aiState++;
+
+ AI_THINKING_STRUCT->aiAction &= 0xFE;
+ }
+ break;
+ }
+ }
+}
+
+void sub_8131074(void)
+{
+ s32 i;
+
+ for (i = 0; i < 4; i++)
+ {
+ if (gUnknown_020244A8->unk18->unk0[gEnemyMonIndex][i] == gUnknown_02024248[gEnemyMonIndex])
+ break;
+ if (gUnknown_020244A8->unk18->unk0[gEnemyMonIndex][i] != gUnknown_02024248[gEnemyMonIndex] //HACK: This redundant condition is a hack to make the asm match.
+ && gUnknown_020244A8->unk18->unk0[gEnemyMonIndex][i] == 0)
+ {
+ gUnknown_020244A8->unk18->unk0[gEnemyMonIndex][i] = gUnknown_02024248[gEnemyMonIndex];
+ break;
+ }
+ }
+}
+
+void sub_81310F0(u8 a)
+{
+ s32 i;
+
+ for (i = 0; i < 4; i++)
+ gUnknown_020244A8->unk18->unk0[a][i] = 0;
+}
+
+void b_history__record_ability_usage_of_player(u8 a, u8 b)
+{
+ gUnknown_020244A8->unk18->unk40[a] = b;
+}
+
+void sub_8131130(u8 a)
+{
+ gUnknown_020244A8->unk18->unk40[a] = 0;
+}
+
+void b_history__record_item_x12_of_player(u8 a, u8 b)
+{
+ gUnknown_020244A8->unk18->unk44[a] = b;
+}
+
+void sub_8131160(u8 a)
+{
+ gUnknown_020244A8->unk18->unk44[a] = 0;
+}
+
+static void BattleAICmd_if_random_less_than(void)
+{
+ u16 random = Random();
+
+ if (random % 256 < gAIScriptPtr[1])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ else
+ gAIScriptPtr += 6;
+}
+
+static void BattleAICmd_if_random_greater_than(void)
+{
+ u16 random = Random();
+
+ if (random % 256 > gAIScriptPtr[1])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ else
+ gAIScriptPtr += 6;
+}
+
+static void BattleAICmd_if_random_equal(void)
+{
+ u16 random = Random();
+
+ if (random % 256 == gAIScriptPtr[1])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ else
+ gAIScriptPtr += 6;
+}
+
+static void BattleAICmd_if_random_not_equal(void)
+{
+ u16 random = Random();
+
+ if (random % 256 != gAIScriptPtr[1])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ else
+ gAIScriptPtr += 6;
+}
+
+static void BattleAICmd_score(void)
+{
+ AI_THINKING_STRUCT->score[AI_THINKING_STRUCT->movesetIndex] += gAIScriptPtr[1]; // add the result to the array of the move consider's score.
+
+ if (AI_THINKING_STRUCT->score[AI_THINKING_STRUCT->movesetIndex] < 0) // if the score is negative, flatten it to 0.
+ AI_THINKING_STRUCT->score[AI_THINKING_STRUCT->movesetIndex] = 0;
+
+ gAIScriptPtr += 2; // AI return.
+}
+
+static void BattleAICmd_if_hp_less_than(void)
+{
+ u16 index;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ if ((u32)(100 * gBattleMons[index].hp / gBattleMons[index].maxHP) < gAIScriptPtr[2])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 3);
+ else
+ gAIScriptPtr += 7;
+}
+
+static void BattleAICmd_if_hp_more_than(void)
+{
+ u16 index;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ if ((u32)(100 * gBattleMons[index].hp / gBattleMons[index].maxHP) > gAIScriptPtr[2])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 3);
+ else
+ gAIScriptPtr += 7;
+}
+
+static void BattleAICmd_if_hp_equal(void)
+{
+ u16 index;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ if ((u32)(100 * gBattleMons[index].hp / gBattleMons[index].maxHP) == gAIScriptPtr[2])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 3);
+ else
+ gAIScriptPtr += 7;
+}
+
+static void BattleAICmd_if_hp_not_equal(void)
+{
+ u16 index;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ if ((u32)(100 * gBattleMons[index].hp / gBattleMons[index].maxHP) != gAIScriptPtr[2])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 3);
+ else
+ gAIScriptPtr += 7;
+}
+
+static void BattleAICmd_if_status(void)
+{
+ u16 index;
+ u32 arg;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ arg = AIScriptRead32(gAIScriptPtr + 2);
+
+ if ((gBattleMons[index].status1 & arg) != 0)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 6);
+ else
+ gAIScriptPtr += 10;
+}
+
+static void BattleAICmd_if_not_status(void)
+{
+ u16 index;
+ u32 arg;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ arg = AIScriptRead32(gAIScriptPtr + 2);
+
+ if ((gBattleMons[index].status1 & arg) == 0)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 6);
+ else
+ gAIScriptPtr += 10;
+}
+
+static void BattleAICmd_if_status2(void)
+{
+ u16 index;
+ u32 arg;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ arg = AIScriptRead32(gAIScriptPtr + 2);
+
+ if ((gBattleMons[index].status2 & arg) != 0)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 6);
+ else
+ gAIScriptPtr += 10;
+}
+
+static void BattleAICmd_if_not_status2(void)
+{
+ u16 index;
+ u32 arg;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ arg = AIScriptRead32(gAIScriptPtr + 2);
+
+ if ((gBattleMons[index].status2 & arg) == 0)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 6);
+ else
+ gAIScriptPtr += 10;
+}
+
+static void BattleAICmd_if_status3(void)
+{
+ u16 index;
+ u32 arg;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ arg = AIScriptRead32(gAIScriptPtr + 2);
+
+ if ((gUnknown_020242AC[index] & arg) != 0)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 6);
+ else
+ gAIScriptPtr += 10;
+}
+
+static void BattleAICmd_if_not_status3(void)
+{
+ u16 index;
+ u32 arg;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ arg = AIScriptRead32(gAIScriptPtr + 2);
+
+ if ((gUnknown_020242AC[index] & arg) == 0)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 6);
+ else
+ gAIScriptPtr += 10;
+}
+
+static void BattleAICmd_if_status4(void)
+{
+ u16 index;
+ u32 arg1, arg2;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ arg1 = battle_get_per_side_status(index) & 1;
+ arg2 = AIScriptRead32(gAIScriptPtr + 2);
+
+ if ((gUnknown_0202428E[arg1] & arg2) != 0)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 6);
+ else
+ gAIScriptPtr += 10;
+}
+
+static void BattleAICmd_if_not_status4(void)
+{
+ u16 index;
+ u32 arg1, arg2;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ arg1 = battle_get_per_side_status(index) & 1;
+ arg2 = AIScriptRead32(gAIScriptPtr + 2);
+
+ if ((gUnknown_0202428E[arg1] & arg2) == 0)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 6);
+ else
+ gAIScriptPtr += 10;
+}
+
+static void BattleAICmd_if_less_than(void)
+{
+ if (AI_THINKING_STRUCT->funcResult < gAIScriptPtr[1])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ else
+ gAIScriptPtr += 6;
+}
+
+static void BattleAICmd_if_more_than(void)
+{
+ if (AI_THINKING_STRUCT->funcResult > gAIScriptPtr[1])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ else
+ gAIScriptPtr += 6;
+}
+
+static void BattleAICmd_if_equal(void)
+{
+ if (AI_THINKING_STRUCT->funcResult == gAIScriptPtr[1])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ else
+ gAIScriptPtr += 6;
+}
+
+static void BattleAICmd_if_not_equal(void)
+{
+ if (AI_THINKING_STRUCT->funcResult != gAIScriptPtr[1])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ else
+ gAIScriptPtr += 6;
+}
+
+static void BattleAICmd_if_less_than_32(void)
+{
+ u8 *temp = AIScriptReadPtr(gAIScriptPtr + 1);
+
+ if (AI_THINKING_STRUCT->funcResult < *temp)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 5);
+ else
+ gAIScriptPtr += 9;
+}
+
+static void BattleAICmd_if_more_than_32(void)
+{
+ u8 *temp = AIScriptReadPtr(gAIScriptPtr + 1);
+
+ if (AI_THINKING_STRUCT->funcResult > *temp)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 5);
+ else
+ gAIScriptPtr += 9;
+}
+
+static void BattleAICmd_if_equal_32(void)
+{
+ u8 *temp = AIScriptReadPtr(gAIScriptPtr + 1);
+
+ if (AI_THINKING_STRUCT->funcResult == *temp)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 5);
+ else
+ gAIScriptPtr += 9;
+}
+
+static void BattleAICmd_if_not_equal_32(void)
+{
+ u8 *temp = AIScriptReadPtr(gAIScriptPtr + 1);
+
+ if (AI_THINKING_STRUCT->funcResult != *temp)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 5);
+ else
+ gAIScriptPtr += 9;
+}
+
+static void BattleAICmd_if_move(void)
+{
+ u16 move = AIScriptRead16(gAIScriptPtr + 1);
+
+ if (AI_THINKING_STRUCT->moveConsidered == move)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 3);
+ else
+ gAIScriptPtr += 7;
+}
+
+static void BattleAICmd_if_not_move(void)
+{
+ u16 move = AIScriptRead16(gAIScriptPtr + 1);
+
+ if (AI_THINKING_STRUCT->moveConsidered != move)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 3);
+ else
+ gAIScriptPtr += 7;
+}
+
+static void BattleAICmd_if_in_bytes(void)
+{
+ u8 *ptr = AIScriptReadPtr(gAIScriptPtr + 1);
+
+ while (*ptr != 0xFF)
+ {
+ if (AI_THINKING_STRUCT->funcResult == *ptr)
+ {
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 5);
+ return;
+ }
+ ptr++;
+ }
+ gAIScriptPtr += 9;
+}
+
+static void BattleAICmd_if_not_in_bytes(void)
+{
+ u8 *ptr = AIScriptReadPtr(gAIScriptPtr + 1);
+
+ while (*ptr != 0xFF)
+ {
+ if (AI_THINKING_STRUCT->funcResult == *ptr)
+ {
+ gAIScriptPtr += 9;
+ return;
+ }
+ ptr++;
+ }
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 5);
+}
+
+static void BattleAICmd_if_in_words(void)
+{
+ u16 *ptr = (u16 *)AIScriptReadPtr(gAIScriptPtr + 1);
+
+ while (*ptr != 0xFFFF)
+ {
+ if (AI_THINKING_STRUCT->funcResult == *ptr)
+ {
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 5);
+ return;
+ }
+ ptr++;
+ }
+ gAIScriptPtr += 9;
+}
+
+static void BattleAICmd_if_not_in_words(void)
+{
+ u16 *ptr = (u16 *)AIScriptReadPtr(gAIScriptPtr + 1);
+
+ while (*ptr != 0xFFFF)
+ {
+ if (AI_THINKING_STRUCT->funcResult == *ptr)
+ {
+ gAIScriptPtr += 9;
+ return;
+ }
+ ptr++;
+ }
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 5);
+}
+
+static void BattleAICmd_if_user_can_damage(void)
+{
+ s32 i;
+
+ for (i = 0; i < 4; i++)
+ {
+ if (gBattleMons[gPlayerMonIndex].moves[i] != 0
+ && gBattleMoves[gBattleMons[gPlayerMonIndex].moves[i]].power != 0)
+ break;
+ }
+ if (i == 4)
+ gAIScriptPtr += 5;
+ else
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 1);
+}
+
+static void BattleAICmd_if_user_cant_damage(void)
+{
+ s32 i;
+
+ for (i = 0; i < 4; i++)
+ {
+ if (gBattleMons[gPlayerMonIndex].moves[i] != 0
+ && gBattleMoves[gBattleMons[gPlayerMonIndex].moves[i]].power != 0)
+ break;
+ }
+ if (i != 4)
+ gAIScriptPtr += 5;
+ else
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 1);
+}
+
+static void BattleAICmd_get_turn_count(void)
+{
+ AI_THINKING_STRUCT->funcResult = gUnknown_03005D10[19];
+ gAIScriptPtr += 1;
+}
+
+static void BattleAICmd_get_type(void)
+{
+ u8 typeVar = gAIScriptPtr[1];
+
+ switch (typeVar)
+ {
+ case 1: // player primary type
+ AI_THINKING_STRUCT->funcResult = gBattleMons[gPlayerMonIndex].type1;
+ break;
+ case 0: // enemy primary type
+ AI_THINKING_STRUCT->funcResult = gBattleMons[gEnemyMonIndex].type1;
+ break;
+ case 3: // player secondary type
+ AI_THINKING_STRUCT->funcResult = gBattleMons[gPlayerMonIndex].type2;
+ break;
+ case 2: // enemy secondary type
+ AI_THINKING_STRUCT->funcResult = gBattleMons[gEnemyMonIndex].type2;
+ break;
+ case 4: // type of move being pointed to
+ AI_THINKING_STRUCT->funcResult = gBattleMoves[AI_THINKING_STRUCT->moveConsidered].type;
+ break;
+ }
+ gAIScriptPtr += 2;
+}
+
+// util for double battles? whats this doing in the middle of the battle AI macros?
+u8 sub_8131E70(u8 index)
+{
+ switch (index)
+ {
+ case 1:
+ return gPlayerMonIndex;
+ case 0:
+ default:
+ return gEnemyMonIndex;
+ case 3:
+ return gPlayerMonIndex ^ 2;
+ case 2:
+ return gEnemyMonIndex ^ 2;
+ }
+}
+
+static void BattleAICmd_unk_5F(void)
+{
+ u8 index = sub_8131E70(gAIScriptPtr[1]);
+
+ if(gBattleMons[index].type1 == gAIScriptPtr[2] || gBattleMons[index].type2 == gAIScriptPtr[2])
+ {
+ AI_THINKING_STRUCT->funcResult = 1;
+ }
+ else
+ {
+ AI_THINKING_STRUCT->funcResult = 0;
+ }
+
+ gAIScriptPtr += 3;
+}
+
+static void BattleAICmd_get_move_power(void)
+{
+ AI_THINKING_STRUCT->funcResult = gBattleMoves[AI_THINKING_STRUCT->moveConsidered].power;
+ gAIScriptPtr += 1;
+}
+
+__attribute__((naked)) // not even going to try. if it doesnt match in ruby, it wont match in emerald (yet).
+static void BattleAICmd_is_most_powerful_move(void)
+{
+ asm(".syntax unified\n\
+ push {r4-r7,lr}\n\
+ mov r7, r10\n\
+ mov r6, r9\n\
+ mov r5, r8\n\
+ push {r5-r7}\n\
+ sub sp, 0x14\n\
+ movs r3, 0\n\
+ ldr r0, =gUnknown_085B09C8\n\
+ ldrh r1, [r0]\n\
+ ldr r5, =0x0000ffff\n\
+ ldr r6, =gBattleMoves\n\
+ ldr r2, =gUnknown_020244A8\n\
+ cmp r1, r5\n\
+ beq _08131F86\n\
+ ldr r0, [r2]\n\
+ ldr r0, [r0, 0x14]\n\
+ ldrh r1, [r0, 0x2]\n\
+ lsls r0, r1, 1\n\
+ adds r0, r1\n\
+ lsls r0, 2\n\
+ adds r0, r6\n\
+ ldrb r4, [r0]\n\
+ ldr r1, =gUnknown_085B09C8\n\
+_08131F76:\n\
+ ldrh r0, [r1]\n\
+ cmp r4, r0\n\
+ beq _08131F86\n\
+ adds r1, 0x2\n\
+ adds r3, 0x1\n\
+ ldrh r0, [r1]\n\
+ cmp r0, r5\n\
+ bne _08131F76\n\
+_08131F86:\n\
+ ldr r0, [r2]\n\
+ ldr r0, [r0, 0x14]\n\
+ ldrh r1, [r0, 0x2]\n\
+ lsls r0, r1, 1\n\
+ adds r0, r1\n\
+ lsls r0, 2\n\
+ adds r0, r6\n\
+ ldrb r0, [r0, 0x1]\n\
+ cmp r0, 0x1\n\
+ bhi _08131F9C\n\
+ b _08132126\n\
+_08131F9C:\n\
+ lsls r0, r3, 1\n\
+ ldr r1, =gUnknown_085B09C8\n\
+ adds r0, r1\n\
+ ldrh r3, [r0]\n\
+ ldr r0, =0x0000ffff\n\
+ cmp r3, r0\n\
+ beq _08131FAC\n\
+ b _08132126\n\
+_08131FAC:\n\
+ ldr r0, =gUnknown_02024400\n\
+ movs r1, 0\n\
+ strh r1, [r0]\n\
+ ldr r0, =gUnknown_0202449C\n\
+ ldr r0, [r0]\n\
+ strb r1, [r0, 0x13]\n\
+ ldr r0, =gUnknown_02024474\n\
+ movs r2, 0x1\n\
+ strb r2, [r0, 0xE]\n\
+ ldr r0, =gBattleMoveFlags\n\
+ strb r1, [r0]\n\
+ ldr r0, =gCritMultiplier\n\
+ strb r2, [r0]\n\
+ movs r6, 0\n\
+ mov r9, r3\n\
+ ldr r2, =gUnknown_085B09C8\n\
+ ldrh r2, [r2]\n\
+ str r2, [sp, 0x10]\n\
+_08131FD0:\n\
+ movs r3, 0\n\
+ ldr r5, =gBattleMons\n\
+ lsls r4, r6, 1\n\
+ ldr r7, =gPlayerMonIndex\n\
+ lsls r0, r6, 2\n\
+ mov r8, r0\n\
+ adds r1, r6, 0x1\n\
+ mov r10, r1\n\
+ ldr r2, [sp, 0x10]\n\
+ cmp r2, r9\n\
+ beq _08132014\n\
+ ldr r2, =gBattleMoves\n\
+ ldrb r1, [r7]\n\
+ movs r0, 0x58\n\
+ muls r0, r1\n\
+ adds r0, r4, r0\n\
+ adds r1, r5, 0\n\
+ adds r1, 0xC\n\
+ adds r0, r1\n\
+ ldrh r1, [r0]\n\
+ lsls r0, r1, 1\n\
+ adds r0, r1\n\
+ lsls r0, 2\n\
+ adds r0, r2\n\
+ ldrb r2, [r0]\n\
+ ldr r1, =gUnknown_085B09C8\n\
+_08132004:\n\
+ ldrh r0, [r1]\n\
+ cmp r2, r0\n\
+ beq _08132014\n\
+ adds r1, 0x2\n\
+ adds r3, 0x1\n\
+ ldrh r0, [r1]\n\
+ cmp r0, r9\n\
+ bne _08132004\n\
+_08132014:\n\
+ ldrb r1, [r7]\n\
+ movs r0, 0x58\n\
+ muls r0, r1\n\
+ adds r0, r4, r0\n\
+ adds r1, r5, 0\n\
+ adds r1, 0xC\n\
+ adds r1, r0, r1\n\
+ ldrh r0, [r1]\n\
+ cmp r0, 0\n\
+ beq _081320C0\n\
+ lsls r0, r3, 1\n\
+ ldr r2, =gUnknown_085B09C8\n\
+ adds r0, r2\n\
+ ldrh r0, [r0]\n\
+ cmp r0, r9\n\
+ bne _081320C0\n\
+ ldr r0, =gBattleMoves\n\
+ ldrh r2, [r1]\n\
+ lsls r1, r2, 1\n\
+ adds r1, r2\n\
+ lsls r1, 2\n\
+ adds r1, r0\n\
+ ldrb r0, [r1, 0x1]\n\
+ cmp r0, 0x1\n\
+ bls _081320C0\n\
+ ldr r5, =gUnknown_020241EA\n\
+ strh r2, [r5]\n\
+ ldrb r0, [r7]\n\
+ ldr r4, =gEnemyMonIndex\n\
+ ldrb r1, [r4]\n\
+ bl sub_8046E7C\n\
+ ldrh r0, [r5]\n\
+ ldrb r1, [r7]\n\
+ ldrb r2, [r4]\n\
+ bl move_effectiveness_something\n\
+ mov r4, sp\n\
+ add r4, r8\n\
+ ldr r2, =gBattleMoveDamage\n\
+ ldr r0, =gUnknown_020244A8\n\
+ ldr r0, [r0]\n\
+ ldr r0, [r0, 0x14]\n\
+ adds r0, 0x18\n\
+ adds r0, r6\n\
+ ldrb r1, [r0]\n\
+ ldr r0, [r2]\n\
+ muls r0, r1\n\
+ movs r1, 0x64\n\
+ bl __divsi3\n\
+ str r0, [r4]\n\
+ cmp r0, 0\n\
+ bne _081320C8\n\
+ movs r0, 0x1\n\
+ str r0, [r4]\n\
+ b _081320C8\n\
+ .pool\n\
+_081320C0:\n\
+ mov r1, sp\n\
+ add r1, r8\n\
+ movs r0, 0\n\
+ str r0, [r1]\n\
+_081320C8:\n\
+ mov r6, r10\n\
+ cmp r6, 0x3\n\
+ bgt _081320D0\n\
+ b _08131FD0\n\
+_081320D0:\n\
+ movs r6, 0\n\
+ ldr r2, =gUnknown_020244A8\n\
+ ldr r0, [r2]\n\
+ ldr r0, [r0, 0x14]\n\
+ ldrb r0, [r0, 0x1]\n\
+ lsls r0, 2\n\
+ add r0, sp\n\
+ ldr r1, [sp]\n\
+ ldr r0, [r0]\n\
+ ldr r5, =gAIScriptPtr\n\
+ cmp r1, r0\n\
+ bgt _08132106\n\
+ adds r4, r2, 0\n\
+ mov r3, sp\n\
+_081320EC:\n\
+ adds r3, 0x4\n\
+ adds r6, 0x1\n\
+ cmp r6, 0x3\n\
+ bgt _08132106\n\
+ ldr r0, [r4]\n\
+ ldr r0, [r0, 0x14]\n\
+ ldrb r0, [r0, 0x1]\n\
+ lsls r0, 2\n\
+ add r0, sp\n\
+ ldr r1, [r3]\n\
+ ldr r0, [r0]\n\
+ cmp r1, r0\n\
+ ble _081320EC\n\
+_08132106:\n\
+ cmp r6, 0x4\n\
+ bne _0813211C\n\
+ ldr r0, [r2]\n\
+ ldr r1, [r0, 0x14]\n\
+ movs r0, 0x2\n\
+ str r0, [r1, 0x8]\n\
+ b _08132130\n\
+ .pool\n\
+_0813211C:\n\
+ ldr r0, [r2]\n\
+ ldr r1, [r0, 0x14]\n\
+ movs r0, 0x1\n\
+ str r0, [r1, 0x8]\n\
+ b _08132130\n\
+_08132126:\n\
+ ldr r0, [r2]\n\
+ ldr r1, [r0, 0x14]\n\
+ movs r0, 0\n\
+ str r0, [r1, 0x8]\n\
+ ldr r5, =gAIScriptPtr\n\
+_08132130:\n\
+ ldr r0, [r5]\n\
+ adds r0, 0x1\n\
+ str r0, [r5]\n\
+ add sp, 0x14\n\
+ pop {r3-r5}\n\
+ mov r8, r3\n\
+ mov r9, r4\n\
+ mov r10, r5\n\
+ pop {r4-r7}\n\
+ pop {r0}\n\
+ bx r0\n\
+ .pool\n\
+ .syntax divided");
+}
+
+static void BattleAICmd_get_move(void)
+{
+ if (gAIScriptPtr[1] == USER)
+ AI_THINKING_STRUCT->funcResult = gUnknown_02024248[gPlayerMonIndex];
+ else
+ AI_THINKING_STRUCT->funcResult = gUnknown_02024248[gEnemyMonIndex];
+
+ gAIScriptPtr += 2;
+}
+
+static void BattleAICmd_if_arg_equal(void)
+{
+ if (gAIScriptPtr[1] == AI_THINKING_STRUCT->funcResult)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ else
+ gAIScriptPtr += 6;
+}
+
+static void BattleAICmd_if_arg_not_equal(void)
+{
+ if (gAIScriptPtr[1] != AI_THINKING_STRUCT->funcResult)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ else
+ gAIScriptPtr += 6;
+}
+
+static void BattleAICmd_if_would_go_first(void)
+{
+ if (b_first_side(gPlayerMonIndex, gEnemyMonIndex, 1) == gAIScriptPtr[1])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ else
+ gAIScriptPtr += 6;
+}
+
+static void BattleAICmd_if_would_not_go_first(void)
+{
+ if (b_first_side(gPlayerMonIndex, gEnemyMonIndex, 1) != gAIScriptPtr[1])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ else
+ gAIScriptPtr += 6;
+}
+
+static void BattleAICmd_nullsub_2A(void)
+{
+}
+
+static void BattleAICmd_nullsub_2B(void)
+{
+}
+
+static void BattleAICmd_count_alive_pokemon(void)
+{
+ u8 index;
+ u8 var, var2;
+ struct Pokemon *party;
+ int i;
+
+ AI_THINKING_STRUCT->funcResult = 0;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ if (battle_side_get_owner(index) == 0)
+ party = gPlayerParty;
+ else
+ party = gEnemyParty;
+
+ if (gBattleTypeFlags & BATTLE_TYPE_DOUBLE)
+ {
+ u32 status;
+ var = gUnknown_0202406E[index][0];
+ status = battle_get_per_side_status(index) ^ 2;
+ var2 = gUnknown_0202406E[battle_get_side_with_given_state(status)][0];
+ }
+ else
+ {
+ var = gUnknown_0202406E[index][0];
+ var2 = gUnknown_0202406E[index][0];
+ }
+
+ for (i = 0; i < 6; i++)
+ {
+ if (i != var && i != var2
+ && GetMonData(&party[i], MON_DATA_HP) != 0
+ && GetMonData(&party[i], MON_DATA_SPECIES2) != SPECIES_NONE
+ && GetMonData(&party[i], MON_DATA_SPECIES2) != SPECIES_EGG)
+ {
+ AI_THINKING_STRUCT->funcResult++;
+ }
+ }
+
+ gAIScriptPtr += 2;
+}
+
+static void BattleAICmd_get_considered_move(void)
+{
+ AI_THINKING_STRUCT->funcResult = AI_THINKING_STRUCT->moveConsidered;
+ gAIScriptPtr += 1;
+}
+
+static void BattleAICmd_get_considered_move_effect(void)
+{
+ AI_THINKING_STRUCT->funcResult = gBattleMoves[AI_THINKING_STRUCT->moveConsidered].effect;
+ gAIScriptPtr += 1;
+}
+
+static void BattleAICmd_get_ability(void)
+{
+ u8 index;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ if(gUnknown_02024064 != index)
+ {
+ if(UNK_2016A00_STRUCT->unk40[index] != 0)
+ {
+ AI_THINKING_STRUCT->funcResult = UNK_2016A00_STRUCT->unk40[index];
+ gAIScriptPtr += 2;
+ return;
+ }
+
+ // abilities that prevent fleeing.
+ if (gBattleMons[index].ability == ABILITY_SHADOW_TAG
+ || gBattleMons[index].ability == ABILITY_MAGNET_PULL
+ || gBattleMons[index].ability == ABILITY_ARENA_TRAP)
+ {
+ AI_THINKING_STRUCT->funcResult = gBattleMons[index].ability;
+ gAIScriptPtr += 2;
+ return;
+ }
+
+ if (gBaseStats[gBattleMons[index].species].ability1 != ABILITY_NONE)
+ {
+ if (gBaseStats[gBattleMons[index].species].ability2 != ABILITY_NONE)
+ {
+ // AI has no knowledge of opponent, so it guesses which ability.
+ if(Random() & 1)
+ {
+ AI_THINKING_STRUCT->funcResult = gBaseStats[gBattleMons[index].species].ability1;
+ }
+ else
+ {
+ AI_THINKING_STRUCT->funcResult = gBaseStats[gBattleMons[index].species].ability2;
+ }
+ }
+ else
+ {
+ AI_THINKING_STRUCT->funcResult = gBaseStats[gBattleMons[index].species].ability1; // it's definitely ability 1.
+ }
+ }
+ else
+ {
+ AI_THINKING_STRUCT->funcResult = gBaseStats[gBattleMons[index].species].ability2; // AI cant actually reach this part since every mon has at least 1 ability.
+ }
+ }
+ else
+ {
+ // The AI knows its own ability.
+ AI_THINKING_STRUCT->funcResult = gBattleMons[index].ability;
+ }
+ gAIScriptPtr += 2;
+}
+
+#ifdef NONMATCHING
+static void tai60_unk(void)
+{
+ u8 index = sub_8131E70(gAIScriptPtr[1]);
+ u8 arg2 = gAIScriptPtr[2];
+ u8 var;
+
+ if(gAIScriptPtr[1] == 0 || gAIScriptPtr[1] == 2)
+ {
+ // _0813253A
+ if(UNK_2016A00_STRUCT->unk40[index] != 0)
+ {
+ var = UNK_2016A00_STRUCT->unk40[index];
+ AI_THINKING_STRUCT->funcResult = var;
+ }
+ else
+ {
+ // _0813255C
+ if (gBattleMons[index].ability == ABILITY_SHADOW_TAG
+ || gBattleMons[index].ability == ABILITY_MAGNET_PULL
+ || gBattleMons[index].ability == ABILITY_ARENA_TRAP)
+ {
+ var = gBattleMons[index].ability;
+ }
+ else
+ {
+ // _08132588
+ if (gBaseStats[gBattleMons[index].species].ability1 != ABILITY_NONE)
+ {
+ if (gBaseStats[gBattleMons[index].species].ability2 != ABILITY_NONE)
+ {
+ if(gBaseStats[gBattleMons[index].species].ability1 != arg2 && gBaseStats[gBattleMons[index].species].ability2 != arg2)
+ {
+ var = 2;
+ }
+ else
+ {
+ var = gBaseStats[gBattleMons[index].species].ability1;
+ }
+ }
+ else
+ {
+ // _081325B4
+ var = gBaseStats[gBattleMons[index].species].ability1;
+ }
+ }
+ else
+ {
+ // _081325B8
+ var = gBaseStats[gBattleMons[index].species].ability2;
+ }
+ }
+ }
+ }
+ else
+ {
+ // _081325BC
+ var = gBattleMons[index].ability;
+ }
+
+ // _081325CA
+ if(var == ABILITY_NONE)
+ {
+ AI_THINKING_STRUCT->funcResult = 2;
+ }
+ else if(var == arg2)
+ {
+ AI_THINKING_STRUCT->funcResult = 1;
+ }
+ else
+ {
+ AI_THINKING_STRUCT->funcResult = 0;
+ }
+ gAIScriptPtr += 3;
+}
+#else
+__attribute__((naked))
+static void tai60_unk(void)
+{
+ asm(".syntax unified\n\
+ push {r4-r6,lr}\n\
+ ldr r4, =gAIScriptPtr\n\
+ ldr r0, [r4]\n\
+ ldrb r0, [r0, 0x1]\n\
+ bl sub_8131E70\n\
+ lsls r0, 24\n\
+ lsrs r5, r0, 24\n\
+ ldr r0, [r4]\n\
+ ldrb r3, [r0, 0x2]\n\
+ ldrb r0, [r0, 0x1]\n\
+ cmp r0, 0\n\
+ beq _0813253A\n\
+ cmp r0, 0x2\n\
+ bne _081325BC\n\
+_0813253A:\n\
+ ldr r0, =gUnknown_020244A8\n\
+ ldr r4, [r0]\n\
+ ldr r1, [r4, 0x18]\n\
+ adds r1, 0x40\n\
+ adds r2, r1, r5\n\
+ ldrb r1, [r2]\n\
+ adds r6, r0, 0\n\
+ cmp r1, 0\n\
+ beq _0813255C\n\
+ adds r3, r1, 0\n\
+ ldr r0, [r4, 0x14]\n\
+ str r3, [r0, 0x8]\n\
+ b _081325CA\n\
+ .pool\n\
+_0813255C:\n\
+ ldr r1, =gBattleMons\n\
+ movs r0, 0x58\n\
+ muls r0, r5\n\
+ adds r4, r0, r1\n\
+ adds r0, r4, 0\n\
+ adds r0, 0x20\n\
+ ldrb r0, [r0]\n\
+ cmp r0, 0x17\n\
+ beq _08132576\n\
+ cmp r0, 0x2A\n\
+ beq _08132576\n\
+ cmp r0, 0x47\n\
+ bne _08132588\n\
+_08132576:\n\
+ movs r0, 0x58\n\
+ muls r0, r5\n\
+ adds r0, r1\n\
+ adds r0, 0x20\n\
+ ldrb r3, [r0]\n\
+ b _081325CA\n\
+ .pool\n\
+_08132588:\n\
+ ldr r2, =gBaseStats\n\
+ ldrh r1, [r4]\n\
+ lsls r0, r1, 3\n\
+ subs r0, r1\n\
+ lsls r0, 2\n\
+ adds r1, r0, r2\n\
+ ldrb r4, [r1, 0x16]\n\
+ cmp r4, 0\n\
+ beq _081325B8\n\
+ ldrb r2, [r1, 0x17]\n\
+ cmp r2, 0\n\
+ beq _081325B4\n\
+ adds r0, r3, 0\n\
+ cmp r4, r0\n\
+ beq _081325CE\n\
+ cmp r2, r0\n\
+ beq _081325CE\n\
+ adds r3, r4, 0\n\
+ b _081325CA\n\
+ .pool\n\
+_081325B4:\n\
+ ldrb r3, [r1, 0x16]\n\
+ b _081325CA\n\
+_081325B8:\n\
+ ldrb r3, [r1, 0x17]\n\
+ b _081325CA\n\
+_081325BC:\n\
+ ldr r1, =gBattleMons\n\
+ movs r0, 0x58\n\
+ muls r0, r5\n\
+ adds r0, r1\n\
+ adds r0, 0x20\n\
+ ldrb r3, [r0]\n\
+ ldr r6, =gUnknown_020244A8\n\
+_081325CA:\n\
+ cmp r3, 0\n\
+ bne _081325E8\n\
+_081325CE:\n\
+ ldr r0, [r6]\n\
+ ldr r1, [r0, 0x14]\n\
+ movs r0, 0x2\n\
+ str r0, [r1, 0x8]\n\
+ ldr r2, =gAIScriptPtr\n\
+ b _08132608\n\
+ .pool\n\
+_081325E8:\n\
+ ldr r0, =gAIScriptPtr\n\
+ ldr r1, [r0]\n\
+ adds r2, r0, 0\n\
+ ldrb r1, [r1, 0x2]\n\
+ cmp r3, r1\n\
+ bne _08132600\n\
+ ldr r0, [r6]\n\
+ ldr r1, [r0, 0x14]\n\
+ movs r0, 0x1\n\
+ b _08132606\n\
+ .pool\n\
+_08132600:\n\
+ ldr r0, [r6]\n\
+ ldr r1, [r0, 0x14]\n\
+ movs r0, 0\n\
+_08132606:\n\
+ str r0, [r1, 0x8]\n\
+_08132608:\n\
+ ldr r0, [r2]\n\
+ adds r0, 0x3\n\
+ str r0, [r2]\n\
+ pop {r4-r6}\n\
+ pop {r0}\n\
+ bx r0\n\
+ .pool\n\
+ .syntax divided");
+}
+#endif
+
+static void BattleAICmd_get_highest_possible_damage(void)
+{
+ s32 i;
+
+ gUnknown_02024400 = 0;
+ gUnknown_0202449C[0x13] = 0;
+ gUnknown_02024474[0xE] = 1;
+ gBattleMoveFlags = 0;
+ gCritMultiplier = 1;
+ AI_THINKING_STRUCT->funcResult = 0;
+
+ for (i = 0; i < 4; i++)
+ {
+ gBattleMoveDamage = 40;
+ gUnknown_020241EA = gBattleMons[gPlayerMonIndex].moves[i];
+
+ if (gUnknown_020241EA)
+ {
+ move_effectiveness_something(gUnknown_020241EA, gPlayerMonIndex, gEnemyMonIndex);
+
+ // reduce by 1/3.
+ if (gBattleMoveDamage == 120)
+ gBattleMoveDamage = 80;
+ if (gBattleMoveDamage == 240)
+ gBattleMoveDamage = 160;
+ if (gBattleMoveDamage == 30)
+ gBattleMoveDamage = 20;
+ if (gBattleMoveDamage == 15)
+ gBattleMoveDamage = 10;
+
+ if (gBattleMoveFlags & 8) // if it's a status move, it wont do anything.
+ gBattleMoveDamage = 0;
+
+ if (AI_THINKING_STRUCT->funcResult < gBattleMoveDamage)
+ AI_THINKING_STRUCT->funcResult = gBattleMoveDamage;
+ }
+ }
+ gAIScriptPtr += 1;
+}
+
+static void BattleAICmd_if_damage_bonus(void)
+{
+ u8 damageVar;
+
+ gUnknown_02024400 = 0;
+ gUnknown_0202449C[0x13] = 0;
+ gUnknown_02024474[0xE] = 1;
+ gBattleMoveFlags = 0;
+ gCritMultiplier = 1;
+
+ gBattleMoveDamage = 40;
+ gUnknown_020241EA = AI_THINKING_STRUCT->moveConsidered;
+
+ move_effectiveness_something(gUnknown_020241EA, gPlayerMonIndex, gEnemyMonIndex);
+
+ if (gBattleMoveDamage == 120)
+ gBattleMoveDamage = 80;
+ if (gBattleMoveDamage == 240)
+ gBattleMoveDamage = 160;
+ if (gBattleMoveDamage == 30)
+ gBattleMoveDamage = 20;
+ if (gBattleMoveDamage == 15)
+ gBattleMoveDamage = 10;
+
+ if (gBattleMoveFlags & 8)
+ gBattleMoveDamage = 0;
+
+ // store gBattleMoveDamage in a u8 variable because gAIScriptPtr[1] is a u8.
+ damageVar = gBattleMoveDamage;
+
+ if (damageVar == gAIScriptPtr[1])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ else
+ gAIScriptPtr += 6;
+}
+
+static void BattleAICmd_nullsub_32(void)
+{
+}
+
+static void BattleAICmd_nullsub_33(void)
+{
+}
+
+static void BattleAICmd_if_status_in_party(void)
+{
+ struct Pokemon *party;
+ int i;
+ u32 statusToCompareTo;
+ u8 index;
+
+ switch(gAIScriptPtr[1])
+ {
+ case 1:
+ index = gPlayerMonIndex;
+ break;
+ default:
+ index = gEnemyMonIndex;
+ break;
+ }
+
+ party = (battle_side_get_owner(index) == 0) ? gPlayerParty : gEnemyParty;
+
+ statusToCompareTo = AIScriptRead32(gAIScriptPtr + 2);
+
+ for (i = 0; i < 6; i++)
+ {
+ u16 species = GetMonData(&party[i], MON_DATA_SPECIES);
+ u16 hp = GetMonData(&party[i], MON_DATA_HP);
+ u32 status = GetMonData(&party[i], MON_DATA_STATUS);
+
+ if (species != SPECIES_NONE && species != SPECIES_EGG && hp != 0 && status == statusToCompareTo)
+ {
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 6);
+ return;
+ }
+ }
+
+ gAIScriptPtr += 10;
+}
+
+static void BattleAICmd_if_status_not_in_party(void)
+{
+ struct Pokemon *party;
+ int i;
+ u32 statusToCompareTo;
+ u8 index;
+
+ switch(gAIScriptPtr[1])
+ {
+ case 1:
+ index = gPlayerMonIndex;
+ break;
+ default:
+ index = gEnemyMonIndex;
+ break;
+ }
+
+ party = (battle_side_get_owner(index) == 0) ? gPlayerParty : gEnemyParty;
+
+ statusToCompareTo = AIScriptRead32(gAIScriptPtr + 2);
+
+ for (i = 0; i < 6; i++)
+ {
+ u16 species = GetMonData(&party[i], MON_DATA_SPECIES);
+ u16 hp = GetMonData(&party[i], MON_DATA_HP);
+ u32 status = GetMonData(&party[i], MON_DATA_STATUS);
+
+ if (species != SPECIES_NONE && species != SPECIES_EGG && hp != 0 && status == statusToCompareTo)
+ {
+ gAIScriptPtr += 10; // still bugged in Emerald
+ }
+ }
+
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 6);
+}
+
+static void BattleAICmd_get_weather(void)
+{
+ if (gBattleWeather & 7)
+ AI_THINKING_STRUCT->funcResult = 1;
+ if (gBattleWeather & 0x18)
+ AI_THINKING_STRUCT->funcResult = 2;
+ if (gBattleWeather & 0x60)
+ AI_THINKING_STRUCT->funcResult = 0;
+ if (gBattleWeather & 0x80)
+ AI_THINKING_STRUCT->funcResult = 3;
+
+ gAIScriptPtr += 1;
+}
+
+static void BattleAICmd_if_effect(void)
+{
+ if (gBattleMoves[AI_THINKING_STRUCT->moveConsidered].effect == gAIScriptPtr[1])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ else
+ gAIScriptPtr += 6;
+}
+
+static void BattleAICmd_if_not_effect(void)
+{
+ if (gBattleMoves[AI_THINKING_STRUCT->moveConsidered].effect != gAIScriptPtr[1])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ else
+ gAIScriptPtr += 6;
+}
+
+static void BattleAICmd_if_stat_level_less_than(void)
+{
+ u32 party;
+
+ if (gAIScriptPtr[1] == USER)
+ party = gPlayerMonIndex;
+ else
+ party = gEnemyMonIndex;
+
+ if (gBattleMons[party].statStages[gAIScriptPtr[2]] < gAIScriptPtr[3])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 4);
+ else
+ gAIScriptPtr += 8;
+}
+
+static void BattleAICmd_if_stat_level_more_than(void)
+{
+ u32 party;
+
+ if (gAIScriptPtr[1] == USER)
+ party = gPlayerMonIndex;
+ else
+ party = gEnemyMonIndex;
+
+ if (gBattleMons[party].statStages[gAIScriptPtr[2]] > gAIScriptPtr[3])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 4);
+ else
+ gAIScriptPtr += 8;
+}
+
+static void BattleAICmd_if_stat_level_equal(void)
+{
+ u32 party;
+
+ if (gAIScriptPtr[1] == USER)
+ party = gPlayerMonIndex;
+ else
+ party = gEnemyMonIndex;
+
+ if (gBattleMons[party].statStages[gAIScriptPtr[2]] == gAIScriptPtr[3])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 4);
+ else
+ gAIScriptPtr += 8;
+}
+
+static void BattleAICmd_if_stat_level_not_equal(void)
+{
+ u32 party;
+
+ if (gAIScriptPtr[1] == USER)
+ party = gPlayerMonIndex;
+ else
+ party = gEnemyMonIndex;
+
+ if (gBattleMons[party].statStages[gAIScriptPtr[2]] != gAIScriptPtr[3])
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 4);
+ else
+ gAIScriptPtr += 8;
+}
+
+static void BattleAICmd_if_can_faint(void)
+{
+ if (gBattleMoves[AI_THINKING_STRUCT->moveConsidered].power < 2)
+ {
+ gAIScriptPtr += 5;
+ return;
+ }
+
+ gUnknown_02024400 = 0;
+ gUnknown_0202449C[0x13] = 0;
+ gUnknown_02024474[0xE] = 1;
+ gBattleMoveFlags = 0;
+ gCritMultiplier = 1;
+ gUnknown_020241EA = AI_THINKING_STRUCT->moveConsidered;
+ sub_8046E7C(gPlayerMonIndex, gEnemyMonIndex);
+ move_effectiveness_something(gUnknown_020241EA, gPlayerMonIndex, gEnemyMonIndex);
+
+ gBattleMoveDamage = gBattleMoveDamage * AI_THINKING_STRUCT->unk18[AI_THINKING_STRUCT->movesetIndex] / 100;
+
+ // moves always do at least 1 damage.
+ if (gBattleMoveDamage == 0)
+ gBattleMoveDamage = 1;
+
+ if (gBattleMons[gEnemyMonIndex].hp <= gBattleMoveDamage)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 1);
+ else
+ gAIScriptPtr += 5;
+}
+
+static void BattleAICmd_if_cant_faint(void)
+{
+ if (gBattleMoves[AI_THINKING_STRUCT->moveConsidered].power < 2)
+ {
+ gAIScriptPtr += 5;
+ return;
+ }
+
+ gUnknown_02024400 = 0;
+ gUnknown_0202449C[0x13] = 0;
+ gUnknown_02024474[0xE] = 1;
+ gBattleMoveFlags = 0;
+ gCritMultiplier = 1;
+ gUnknown_020241EA = AI_THINKING_STRUCT->moveConsidered;
+ sub_8046E7C(gPlayerMonIndex, gEnemyMonIndex);
+ move_effectiveness_something(gUnknown_020241EA, gPlayerMonIndex, gEnemyMonIndex);
+
+ gBattleMoveDamage = gBattleMoveDamage * AI_THINKING_STRUCT->unk18[AI_THINKING_STRUCT->movesetIndex] / 100;
+
+ // this macro is missing the damage 0 = 1 assumption.
+
+ if (gBattleMons[gEnemyMonIndex].hp > gBattleMoveDamage)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 1);
+ else
+ gAIScriptPtr += 5;
+}
+
+static void BattleAICmd_if_has_move(void)
+{
+ int i;
+ u16 *temp_ptr = (u16 *)(gAIScriptPtr + 2);
+
+ switch(gAIScriptPtr[1])
+ {
+ case 1:
+ // _08132E42
+ for (i = 0; i < 4; i++)
+ {
+ if (gBattleMons[gPlayerMonIndex].moves[i] == *temp_ptr)
+ break;
+ }
+ if (i == 4)
+ {
+ gAIScriptPtr += 8;
+ return;
+ }
+ else
+ {
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 4);
+ return;
+ }
+ case 3: // new to Emerald
+ if(gBattleMons[gPlayerMonIndex ^ 2].hp == 0)
+ {
+ gAIScriptPtr += 8;
+ return;
+ }
+ else
+ {
+ for (i = 0; i < 4; i++)
+ {
+ if (gBattleMons[gPlayerMonIndex ^ 2].moves[i] == *temp_ptr)
+ break;
+ }
+ }
+ if (i == 4)
+ {
+ gAIScriptPtr += 8;
+ return;
+ }
+ else
+ {
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 4);
+ return;
+ }
+ case 0:
+ case 2:
+ for (i = 0; i < 4; i++)
+ {
+ if (UNK_2016A00_STRUCT->unk0[gEnemyMonIndex][i] == *temp_ptr)
+ break;
+ }
+ if (i == 4)
+ {
+ gAIScriptPtr += 8;
+ return;
+ }
+ else
+ {
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 4);
+ return;
+ }
+ }
+}
+
+static void BattleAICmd_if_dont_have_move(void)
+{
+ int i;
+ u16 *temp_ptr = (u16 *)(gAIScriptPtr + 2);
+
+ switch(gAIScriptPtr[1])
+ {
+ case 1:
+ case 3: // if_dont_have_move does not have the seperate 3 case check in Emerald unlike if_has_move.
+ for (i = 0; i < 4; i++)
+ {
+ if (gBattleMons[gPlayerMonIndex].moves[i] == *temp_ptr)
+ break;
+ }
+ if (i != 4)
+ {
+ gAIScriptPtr += 8;
+ return;
+ }
+ else
+ {
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 4);
+ return;
+ }
+ case 0:
+ case 2:
+ for (i = 0; i < 4; i++)
+ {
+ if (UNK_2016A00_STRUCT->unk0[gEnemyMonIndex][i] == *temp_ptr)
+ break;
+ }
+ if (i != 4)
+ {
+ gAIScriptPtr += 8;
+ return;
+ }
+ else
+ {
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 4);
+ return;
+ }
+ }
+}
+
+static void BattleAICmd_if_move_effect(void)
+{
+ int i;
+
+ switch (gAIScriptPtr[1])
+ {
+ case 1:
+ case 3: // _08133044
+ for(i = 0; i < 4; i++)
+ {
+ if(gBattleMons[gPlayerMonIndex].moves[i] != 0 && gBattleMoves[gBattleMons[gPlayerMonIndex].moves[i]].effect == gAIScriptPtr[2])
+ break;
+ }
+ if (i == 4)
+ gAIScriptPtr += 7;
+ else
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 3);
+ break;
+ case 0:
+ case 2: // _08133090
+ for (i = 0; i < 4; i++)
+ {
+ if (gBattleMons[gPlayerMonIndex].moves[i] != 0 && gBattleMoves[UNK_2016A00_STRUCT->unk0[gEnemyMonIndex][i]].effect == gAIScriptPtr[2])
+ break;
+ }
+ if (i == 4)
+ gAIScriptPtr += 7;
+ else
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 3);
+ break;
+ }
+}
+
+static void BattleAICmd_if_not_move_effect(void)
+{
+ int i;
+
+ switch (gAIScriptPtr[1])
+ {
+ case 1:
+ case 3: // _0813313C
+ for(i = 0; i < 4; i++)
+ {
+ if(gBattleMons[gPlayerMonIndex].moves[i] != 0 && gBattleMoves[gBattleMons[gPlayerMonIndex].moves[i]].effect == gAIScriptPtr[2])
+ break;
+ }
+ if (i != 4)
+ gAIScriptPtr += 7;
+ else
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 3);
+ break;
+ case 0:
+ case 2: // _08133188
+ for (i = 0; i < 4; i++)
+ {
+ if (UNK_2016A00_STRUCT->unk0[gEnemyMonIndex][i] && gBattleMoves[UNK_2016A00_STRUCT->unk0[gEnemyMonIndex][i]].effect == gAIScriptPtr[2])
+ break;
+ }
+ if (i != 4)
+ gAIScriptPtr += 7;
+ else
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 3);
+ break;
+ }
+}
+
+static void BattleAICmd_if_last_move_did_damage(void)
+{
+ u8 index;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ if (gAIScriptPtr[2] == 0)
+ {
+ if (gUnknown_020242BC[index].unk4 == 0)
+ {
+ gAIScriptPtr += 7;
+ return;
+ }
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 3);
+ return;
+ }
+ else if (gAIScriptPtr[2] != 1) // ignore the macro if its not 0 or 1.
+ {
+ gAIScriptPtr += 7;
+ return;
+ }
+ else if (gUnknown_020242BC[index].unk6 != 0)
+ {
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 3);
+ return;
+ }
+ gAIScriptPtr += 7;
+}
+
+static void BattleAICmd_if_encored(void)
+{
+ switch (gAIScriptPtr[1])
+ {
+ case 0: // _08109348
+ if (gUnknown_020242BC[gUnknown_02024064].unk4 == AI_THINKING_STRUCT->moveConsidered)
+ {
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ return;
+ }
+ gAIScriptPtr += 6;
+ return;
+ case 1: // _08109370
+ if (gUnknown_020242BC[gUnknown_02024064].unk6 == AI_THINKING_STRUCT->moveConsidered)
+ {
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ return;
+ }
+ gAIScriptPtr += 6;
+ return;
+ default:
+ gAIScriptPtr += 6;
+ return;
+ }
+}
+
+static void BattleAICmd_flee(void)
+{
+ AI_THINKING_STRUCT->aiAction |= (AI_ACTION_UNK1 | AI_ACTION_UNK2 | AI_ACTION_UNK4); // what matters is UNK2 being enabled.
+}
+
+static void BattleAICmd_if_random_100(void)
+{
+ u8 safariFleeRate = gUnknown_0202449C[0x7B] * 5; // safari flee rate, from 0-20
+
+ if ((u8)(Random() % 100) < safariFleeRate)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 1);
+ else
+ gAIScriptPtr += 5;
+}
+
+static void BattleAICmd_watch(void)
+{
+ AI_THINKING_STRUCT->aiAction |= (AI_ACTION_UNK1 | AI_ACTION_UNK3 | AI_ACTION_UNK4); // what matters is UNK3 being enabled.
+}
+
+static void BattleAICmd_get_hold_effect(void)
+{
+ u8 index;
+ u16 status;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ if (gUnknown_02024064 != index)
+ {
+ AI_THINKING_STRUCT->funcResult = itemid_get_x12(UNK_2016A00_STRUCT->unk44[index]);
+ }
+ else
+ AI_THINKING_STRUCT->funcResult = itemid_get_x12(gBattleMons[index].item);
+
+ gAIScriptPtr += 2;
+}
+
+static void tai62_unk(void)
+{
+ u8 index = sub_8131E70(gAIScriptPtr[1]);
+ u16 item;
+ u8 var1, var2;
+
+ if((index & 1) == (gPlayerMonIndex & 1))
+ item = gBattleMons[index].item;
+ else
+ item = UNK_2016A00_STRUCT->unk44[index];
+
+ // strange way of loading a 16-bit argument from the AI command.
+ var2 = gAIScriptPtr[2];
+ var1 = gAIScriptPtr[3];
+
+ if((var1 | var2) == item)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 4);
+ else
+ gAIScriptPtr += 8;
+}
+
+static void BattleAICmd_get_gender(void)
+{
+ u8 index;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ AI_THINKING_STRUCT->funcResult = pokemon_species_get_gender_info(gBattleMons[index].species, gBattleMons[index].personality);
+
+ gAIScriptPtr += 2;
+}
+
+static void BattleAICmd_is_first_turn(void)
+{
+ u8 index;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ AI_THINKING_STRUCT->funcResult = gUnknown_020242BC[index].unk16;
+
+ gAIScriptPtr += 2;
+}
+
+static void BattleAICmd_get_stockpile_count(void)
+{
+ u8 index;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ AI_THINKING_STRUCT->funcResult = gUnknown_020242BC[index].unk9;
+
+ gAIScriptPtr += 2;
+}
+
+static void BattleAICmd_is_double_battle(void)
+{
+ AI_THINKING_STRUCT->funcResult = gBattleTypeFlags & BATTLE_TYPE_DOUBLE;
+
+ gAIScriptPtr += 1;
+}
+
+static void BattleAICmd_get_item(void)
+{
+ u8 index;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ // this hack and a half matches. whatever. i dont care. someone else fix this mess later. PS: still cant fix this.
+ AI_THINKING_STRUCT->funcResult = gUnknown_0202449C[0xB8 + (index * 2)];
+
+ gAIScriptPtr += 2;
+}
+
+static void BattleAICmd_get_move_type_from_result(void)
+{
+ AI_THINKING_STRUCT->funcResult = gBattleMoves[AI_THINKING_STRUCT->funcResult].type;
+
+ gAIScriptPtr += 1;
+}
+
+static void BattleAICmd_get_move_power_from_result(void)
+{
+ AI_THINKING_STRUCT->funcResult = gBattleMoves[AI_THINKING_STRUCT->funcResult].power;
+
+ gAIScriptPtr += 1;
+}
+
+static void BattleAICmd_get_move_effect_from_result(void)
+{
+ AI_THINKING_STRUCT->funcResult = gBattleMoves[AI_THINKING_STRUCT->funcResult].effect;
+
+ gAIScriptPtr += 1;
+}
+
+static void BattleAICmd_get_protect_count(void)
+{
+ u8 index;
+
+ if (gAIScriptPtr[1] == USER)
+ index = gPlayerMonIndex;
+ else
+ index = gEnemyMonIndex;
+
+ AI_THINKING_STRUCT->funcResult = gUnknown_020242BC[index].unk8;
+
+ gAIScriptPtr += 2;
+}
+
+static void BattleAICmd_nullsub_52(void)
+{
+}
+
+static void BattleAICmd_nullsub_53(void)
+{
+}
+
+static void BattleAICmd_nullsub_54(void)
+{
+}
+
+static void BattleAICmd_nullsub_55(void)
+{
+}
+
+static void BattleAICmd_nullsub_56(void)
+{
+}
+
+static void BattleAICmd_nullsub_57(void)
+{
+}
+
+static void BattleAICmd_call(void)
+{
+ b_mc_stack_push(gAIScriptPtr + 5);
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 1);
+}
+
+static void BattleAICmd_jump(void)
+{
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 1);
+}
+
+static void BattleAICmd_end(void)
+{
+ if (b_mc_stack_pop_cursor() == 0)
+ AI_THINKING_STRUCT->aiAction |= AI_ACTION_UNK1;
+}
+
+static void BattleAICmd_if_level_cond(void)
+{
+ switch (gAIScriptPtr[1])
+ {
+ case 0: // greater than
+ if (gBattleMons[gPlayerMonIndex].level > gBattleMons[gEnemyMonIndex].level)
+ {
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ return;
+ }
+ gAIScriptPtr += 6;
+ return;
+ case 1: // less than
+ if (gBattleMons[gPlayerMonIndex].level < gBattleMons[gEnemyMonIndex].level)
+ {
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ return;
+ }
+ gAIScriptPtr += 6;
+ return;
+ case 2: // equal
+ if (gBattleMons[gPlayerMonIndex].level == gBattleMons[gEnemyMonIndex].level)
+ {
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ return;
+ }
+ gAIScriptPtr += 6;
+ return;
+ }
+}
+
+static void BattleAICmd_if_taunted(void)
+{
+ if (gUnknown_020242BC[gEnemyMonIndex].taunt != 0)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 1);
+ else
+ gAIScriptPtr += 5;
+}
+
+static void BattleAICmd_if_not_taunted(void)
+{
+ if (gUnknown_020242BC[gEnemyMonIndex].taunt == 0)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 1);
+ else
+ gAIScriptPtr += 5;
+}
+
+static void tai5E_unk(void)
+{
+ if((gPlayerMonIndex & 1) == (gEnemyMonIndex & 1))
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 1);
+ else
+ gAIScriptPtr += 5;
+}
+
+static void tai61_unk(void)
+{
+ u8 index = sub_8131E70(gAIScriptPtr[1]);
+
+ if(UNK_BATTLE_STRUCT->unk4->unkArray[index] & 1)
+ gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+ else
+ gAIScriptPtr += 6;
+}
+
+void b_mc_stack_push(u8 *var)
+{
+ UNK_2016C00_STRUCT->ptr[UNK_2016C00_STRUCT->unk20++] = var;
+}
+
+void b_mc_stack_push_cursor(void)
+{
+ UNK_2016C00_STRUCT->ptr[UNK_2016C00_STRUCT->unk20++] = gAIScriptPtr;
+}
+
+bool8 b_mc_stack_pop_cursor(void)
+{
+ if (UNK_2016C00_STRUCT->unk20 != 0)
+ {
+ --UNK_2016C00_STRUCT->unk20;
+ gAIScriptPtr = UNK_2016C00_STRUCT->ptr[UNK_2016C00_STRUCT->unk20];
+ return TRUE;
+ }
+ else
+ return FALSE;
+}
generated by cgit v1.2.3 (git 2.25.1) at 2025-05-08 17:27:19 +0000