Merge pull request #15 from camthesaxman/battle_ai

start decompiling battle_ai

1 files changed, 789 insertions, 0 deletions

diff --git a/src/battle_ai.c b/src/battle_ai.c
new file mode 100644
index 000000000..7f020fd75
--- /dev/null
+++ b/src/battle_ai.c
@@ -0,0 +1,789 @@
+#include "global.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)
+
+//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 UnknownStruct3
+{
+    u8 unk0;
+    u8 unk1;
+    u16 unk2;
+    s8 unk4[4];
+    u8 filler8[4];
+    u32 unkC;
+    u8 unk10;
+    u8 unk11;
+    u8 filler12[6];
+    u8 unk18[4];
+};
+
+//size should be 0x54
+struct UnknownStruct2
+{
+    u16 unk0[2][8];
+    u8 filler20[0x20];
+    u8 unk40[4];
+    u8 unk44[4];
+    u16 unk48[4];
+    u8 unk50;
+};
+
+struct UnknownStruct4
+{
+    u8 filler0[0x20];
+    u8 unk20;
+};
+
+struct UnknownStruct1
+{
+    u8 unk0;
+    u8 filler1[0x13];
+    struct UnknownStruct3 *unk14;
+    struct UnknownStruct2 *unk18;
+    struct UnknownStruct4 *unk1C;
+};
+
+extern u32 gBattleTypeFlags;
+extern u8 gUnknown_02024064;
+extern struct BattlePokemon gBattleMons[];
+extern u16 gUnknown_020241EA;
+extern u8 gUnknown_0202420C;
+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 const u8 *gAIScriptPtr;
+extern u8 gUnknown_0203AB3C;
+extern struct Trainer gTrainers[];
+extern const u32 gBitTable[];
+extern const u8 *const gUnknown_082DBEF8[];
+
+typedef void (*BattleAICmdFunc)(void);
+
+extern const BattleAICmdFunc gUnknown_085B083C[];
+
+extern u8 sub_803FECC();
+extern u16 Random();
+extern u32 battle_side_get_owner();
+extern u32 sub_8186438();
+extern u32 sub_81A6FB4();
+
+void BattleAI_SetupAIData(u8 a);
+u8 sub_8130BDC(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 *)gUnknown_020244A8->unk14;
+    u8 r6;
+    
+    for (i = 0; (u32)i < 0x1C; i++)
+        data[i] = 0;
+    for (i = 0; i < 4; i++)
+    {
+        if (a & 1)
+            gUnknown_020244A8->unk14->unk4[i] = 100;
+        else
+            gUnknown_020244A8->unk14->unk4[i] = 0;
+        a >>= 1;
+    }
+    r6 = sub_803FECC(gUnknown_02024064, 0, 0xFF);
+    for (i = 0; i < 4; i++)
+    {
+        if (gBitTable[i] & r6)
+            gUnknown_020244A8->unk14->unk4[i] = 0;
+        gUnknown_020244A8->unk14->unk18[i] = 100 - (Random() % 16);
+    }
+    gUnknown_020244A8->unk1C->unk20 = 0;
+    gUnknown_0203AB3C = gUnknown_02024064;
+    if (gBattleTypeFlags & 1)
+    {
+        gUnknown_0202420C = (Random() & 2) + (battle_side_get_owner(gUnknown_02024064) ^ 1);
+        if (gUnknown_02024210 & gBitTable[gUnknown_0202420C])
+            gUnknown_0202420C ^= 2;
+    }
+    else
+    {
+        //_08130A60
+        gUnknown_0202420C = gUnknown_0203AB3C ^ 1;
+    }
+    //_08130A68
+    if (gBattleTypeFlags & 0x1000000)
+        gUnknown_020244A8->unk14->unkC = sub_8186438();
+    else if (gBattleTypeFlags & 0x80)
+        gUnknown_020244A8->unk14->unkC = 0x40000000;
+    else if (gBattleTypeFlags & 0x400)
+        gUnknown_020244A8->unk14->unkC = 0x20000000;
+    else if (gBattleTypeFlags & 0x10)
+        gUnknown_020244A8->unk14->unkC = 0x80000000;
+    else if (gBattleTypeFlags & 0x80000)
+        gUnknown_020244A8->unk14->unkC = sub_81A6FB4();
+    else if (gBattleTypeFlags & 0x0C3F0900)
+        gUnknown_020244A8->unk14->unkC = 7;
+    else if (gBattleTypeFlags & 0x8000)
+        gUnknown_020244A8->unk14->unkC = gTrainers[gUnknown_02038BCA].aiFlags | gTrainers[gUnknown_02038BCC].aiFlags;
+    else
+        gUnknown_020244A8->unk14->unkC = gTrainers[gUnknown_02038BCA].aiFlags;
+    if (gBattleTypeFlags & 1)
+        gUnknown_020244A8->unk14->unkC |= 0x80;
+}
+
+u8 sub_8130BA4(void)
+{
+    u16 r4 = gUnknown_020241EA;
+    u8 ret;
+    
+    if (!(gBattleTypeFlags & 1))
+        ret = sub_8130BDC();
+    else
+        ret = sub_8130CF4();
+    gUnknown_020241EA = r4;
+    return ret;
+}
+
+u8 sub_8130BDC(void)
+{
+    u8 r6;
+    s32 i;
+    u8 arr1[4];
+    u8 arr2[4];
+    
+    sub_8131074();
+    while (gUnknown_020244A8->unk14->unkC != 0)
+    {
+        if (gUnknown_020244A8->unk14->unkC & 1)
+        {
+            gUnknown_020244A8->unk14->unk0 = 0;
+            BattleAI_DoAIProcessing();
+        }
+        gUnknown_020244A8->unk14->unkC >>= 1;
+        gUnknown_020244A8->unk14->unk11++;
+        gUnknown_020244A8->unk14->unk1 = 0;
+    }
+    //_08130C2C
+    if (gUnknown_020244A8->unk14->unk10 & 2)
+        return 4;
+    if (gUnknown_020244A8->unk14->unk10 & 4)
+        return 5;
+    r6 = 1;
+    arr1[0] = gUnknown_020244A8->unk14->unk4[0];
+    arr2[0] = 0;
+    for (i = 1; i < 4; i++)
+    {
+        if (gBattleMons[gUnknown_0203AB3C].moves[i] != 0)
+        {
+            if (arr1[0] == gUnknown_020244A8->unk14->unk4[i])
+            {
+                arr1[r6] = gUnknown_020244A8->unk14->unk4[i];
+                arr2[r6++] = i;
+            }
+            //_08130CAA
+            if (arr1[0] < gUnknown_020244A8->unk14->unk4[i])
+            {
+                r6 = 1;
+                arr1[0] = gUnknown_020244A8->unk14->unk4[i];
+                arr2[0] = i;
+            }
+        }
+        //_08130CC6
+    }
+    return arr2[Random() % r6];
+}
+
+#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 == gUnknown_0203AB3C || 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
+            gUnknown_0202420C = i;
+            if ((i & 1) != (gUnknown_0203AB3C & 1))
+                sub_8131074();
+            //_08130D90
+            gUnknown_020244A8->unk14->unk11 = 0;
+            gUnknown_020244A8->unk14->unk1 = 0;
+            r4 = gUnknown_020244A8->unk14->unkC;
+            while (r4 != 0)
+            {
+                if (r4 & 1)
+                {
+                    gUnknown_020244A8->unk14->unk0 = 0;
+                    BattleAI_DoAIProcessing();
+                }
+                r4 >>= 1;
+                gUnknown_020244A8->unk14->unk11++;
+                gUnknown_020244A8->unk14->unk1 = 0;
+            }
+            //_08130DD8
+            if (gUnknown_020244A8->unk14->unk10 & 2)
+                spC[i] = 4;
+            else if (gUnknown_020244A8->unk14->unk10 & 4)
+                spC[i] = 5;
+            else
+            {
+                //_08130E10
+                sp10[0] = gUnknown_020244A8->unk14->unk4[0];
+                sp14[0] = 0;
+                r5 = 1;
+                for (j = 1; j < 4; j++)
+                {
+                    if (gBattleMons[gUnknown_0203AB3C].moves[j] != 0)
+                    {
+                        if (sp10[0] == gUnknown_020244A8->unk14->unk4[j])
+                        {
+                            sp10[r5] = gUnknown_020244A8->unk14->unk4[j];
+                            sp14[r5] = j;
+                            r5++;
+                        }
+                        if (sp10[0] < gUnknown_020244A8->unk14->unk4[j])
+                        {
+                            sp10[0] = gUnknown_020244A8->unk14->unk4[j];
+                            sp14[0] = j;
+                            r5 = 1;
+                        }
+                    }
+                    //_08130E72
+                }
+                spC[i] = sp14[Random() % r5];
+                //asm("":::"r3");
+                sp0[i] = sp10[0];
+                if (i == (gUnknown_0203AB3C ^ 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;
+        }
+    }
+    gUnknown_0202420C = sp8[Random() % r4_2];
+    return spC[gUnknown_0202420C];
+}
+#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, =gUnknown_0203AB3C\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, =gUnknown_0202420C\n\
+    mov r1, r8\n\
+    strb r1, [r0]\n\
+    movs r1, 0x1\n\
+    mov r2, r8\n\
+    ands r2, r1\n\
+    ldr r0, =gUnknown_0203AB3C\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, =gUnknown_0203AB3C\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, =gUnknown_0203AB3C\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, =gUnknown_0202420C\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 (gUnknown_020244A8->unk14->unk0 != 2)
+    {
+        switch (gUnknown_020244A8->unk14->unk0)
+        {
+            case 3: //Needed to match.
+                break;
+            case 0:
+                gAIScriptPtr = gUnknown_082DBEF8[gUnknown_020244A8->unk14->unk11];
+                if (gBattleMons[gUnknown_0203AB3C].pp[gUnknown_020244A8->unk14->unk1] == 0)
+                {
+                    gUnknown_020244A8->unk14->unk2 = 0;
+                }
+                else
+                {
+                    gUnknown_020244A8->unk14->unk2 = gBattleMons[gUnknown_0203AB3C].moves[gUnknown_020244A8->unk14->unk1];
+                }
+                gUnknown_020244A8->unk14->unk0++;
+                break;
+            case 1:
+                if (gUnknown_020244A8->unk14->unk2 != 0)
+                    gUnknown_085B083C[*gAIScriptPtr]();
+                else
+                {
+                    gUnknown_020244A8->unk14->unk4[gUnknown_020244A8->unk14->unk1] = 0;
+                    gUnknown_020244A8->unk14->unk10 |= 1;
+                }
+                if (gUnknown_020244A8->unk14->unk10 & 1)
+                {
+                    gUnknown_020244A8->unk14->unk1++;
+                    if (gUnknown_020244A8->unk14->unk1 < 4 && !(gUnknown_020244A8->unk14->unk10 & 8))
+                        gUnknown_020244A8->unk14->unk0 = 0;
+                    else
+                        gUnknown_020244A8->unk14->unk0++;
+                    gUnknown_020244A8->unk14->unk10 &= 0xFE;
+                }
+                break;
+        }
+    }
+}
+
+void sub_8131074(void)
+{
+    s32 i;
+    
+    for (i = 0; i < 4; i++)
+    {
+        if (gUnknown_020244A8->unk18->unk0[gUnknown_0202420C][i] == gUnknown_02024248[gUnknown_0202420C])
+            break;
+        if (gUnknown_020244A8->unk18->unk0[gUnknown_0202420C][i] != gUnknown_02024248[gUnknown_0202420C]  //HACK: This redundant condition is a hack to make the asm match.
+         && gUnknown_020244A8->unk18->unk0[gUnknown_0202420C][i] == 0)
+        {
+            gUnknown_020244A8->unk18->unk0[gUnknown_0202420C][i] = gUnknown_02024248[gUnknown_0202420C];
+            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;
+}
+
+void BattleAICmd_if_random(void)
+{
+    u16 random = Random();
+    
+    if ((random & 0xFF) < gAIScriptPtr[1])
+        gAIScriptPtr = AIScriptReadPtr(gAIScriptPtr + 2);
+    else
+        gAIScriptPtr += 6;
+}