pokeemerald/src/battle_ai.c

2839 lines
67 KiB
C
Raw Normal View History

2017-02-02 05:15:38 +01:00
#include "global.h"
#include "pokemon.h"
#include "battle.h"
#include "species.h"
#include "abilities.h"
2017-02-02 05:15:38 +01:00
#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
};
2017-02-02 05:15:38 +01:00
//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
2017-02-02 05:15:38 +01:00
{
u8 aiState;
u8 movesetIndex;
u16 moveConsidered;
s8 score[4];
u32 funcResult;
u32 aiFlags;
u8 aiAction;
u8 aiLogicId;
2017-02-02 05:15:38 +01:00
u8 filler12[6];
u8 unk18[4];
};
//size should be 0x54
struct UnknownStruct2
{
u16 unk0[2][8];
u8 unk20[2];
u8 filler20[0x1E];
2017-02-02 05:15:38 +01:00
u8 unk40[4];
u8 unk44[4];
u16 unk48[4];
u8 unk50;
};
struct UnknownStruct4
{
u8 *ptr[8];
2017-02-02 05:15:38 +01:00
u8 unk20;
};
struct SimpleUnknownStruct
{
u32 unkArray[4]; // unknown size
};
2017-02-02 05:15:38 +01:00
struct UnknownStruct1
{
u8 unk0;
u8 filler1[0x3];
struct SimpleUnknownStruct *unk4;
u8 filler8[0xC];
struct AI_ThinkingStruct *ai;
2017-02-02 05:15:38 +01:00
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;
2017-02-02 05:15:38 +01:00
extern u32 gBattleTypeFlags;
extern u8 gUnknown_02024064;
extern struct BattlePokemon gBattleMons[];
extern u16 gUnknown_020241EA;
extern u8 gEnemyMonIndex;
2017-02-02 05:15:38 +01:00
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;
2017-02-02 05:15:38 +01:00
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);
2017-02-02 05:15:38 +01:00
typedef void (*BattleAICmdFunc)(void);
extern const BattleAICmdFunc gUnknown_085B083C[];
extern u8 sub_803FECC();
extern u16 Random();
extern u8 battle_side_get_owner();
2017-02-02 05:15:38 +01:00
extern u32 sub_8186438();
extern u32 sub_81A6FB4();
void BattleAI_SetupAIData(u8 a);
u8 BattleAI_GetAIActionToUse(void);
2017-02-02 05:15:38 +01:00
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;
2017-02-02 05:15:38 +01:00
u8 r6;
// clear AI data.
for (i = 0; (u32)i < sizeof(struct AI_ThinkingStruct); i++)
2017-02-02 05:15:38 +01:00
data[i] = 0;
// conditional score reset, unlike Ruby.
2017-02-02 05:15:38 +01:00
for (i = 0; i < 4; i++)
{
if (a & 1)
AI_THINKING_STRUCT->score[i] = 100;
2017-02-02 05:15:38 +01:00
else
AI_THINKING_STRUCT->score[i] = 0;
2017-02-02 05:15:38 +01:00
a >>= 1;
}
2017-02-02 05:15:38 +01:00
r6 = sub_803FECC(gUnknown_02024064, 0, 0xFF);
2017-02-02 05:15:38 +01:00
for (i = 0; i < 4; i++)
{
if (gBitTable[i] & r6)
AI_THINKING_STRUCT->score[i] = 0;
AI_THINKING_STRUCT->unk18[i] = 100 - (Random() % 16);
2017-02-02 05:15:38 +01:00
}
gUnknown_020244A8->unk1C->unk20 = 0;
gPlayerMonIndex = gUnknown_02024064;
2017-02-02 05:15:38 +01:00
if (gBattleTypeFlags & 1)
{
gEnemyMonIndex = (Random() & 2) + ((u32)battle_side_get_owner(gUnknown_02024064) ^ 1);
if (gUnknown_02024210 & gBitTable[gEnemyMonIndex])
gEnemyMonIndex ^= 2;
2017-02-02 05:15:38 +01:00
}
else
{
//_08130A60
gEnemyMonIndex = gPlayerMonIndex ^ 1;
2017-02-02 05:15:38 +01:00
}
//_08130A68
if (gBattleTypeFlags & 0x1000000)
AI_THINKING_STRUCT->aiFlags = sub_8186438();
2017-02-02 05:15:38 +01:00
else if (gBattleTypeFlags & 0x80)
AI_THINKING_STRUCT->aiFlags = 0x40000000;
2017-02-02 05:15:38 +01:00
else if (gBattleTypeFlags & 0x400)
AI_THINKING_STRUCT->aiFlags = 0x20000000;
2017-02-02 05:15:38 +01:00
else if (gBattleTypeFlags & 0x10)
AI_THINKING_STRUCT->aiFlags = 0x80000000;
2017-02-02 05:15:38 +01:00
else if (gBattleTypeFlags & 0x80000)
AI_THINKING_STRUCT->aiFlags = sub_81A6FB4();
2017-02-02 05:15:38 +01:00
else if (gBattleTypeFlags & 0x0C3F0900)
AI_THINKING_STRUCT->aiFlags = 7;
2017-02-02 05:15:38 +01:00
else if (gBattleTypeFlags & 0x8000)
AI_THINKING_STRUCT->aiFlags = gTrainers[gUnknown_02038BCA].aiFlags | gTrainers[gUnknown_02038BCC].aiFlags;
2017-02-02 05:15:38 +01:00
else
AI_THINKING_STRUCT->aiFlags = gTrainers[gUnknown_02038BCA].aiFlags;
2017-02-02 05:15:38 +01:00
if (gBattleTypeFlags & 1)
AI_THINKING_STRUCT->aiFlags |= 0x80;
2017-02-02 05:15:38 +01:00
}
u8 sub_8130BA4(void)
{
u16 r4 = gUnknown_020241EA;
u8 ret;
if (!(gBattleTypeFlags & 1))
ret = BattleAI_GetAIActionToUse();
2017-02-02 05:15:38 +01:00
else
ret = sub_8130CF4();
2017-02-02 05:15:38 +01:00
gUnknown_020241EA = r4;
return ret;
}
u8 BattleAI_GetAIActionToUse(void)
2017-02-02 05:15:38 +01:00
{
u8 currentMoveArray[4];
u8 consideredMoveArray[4];
u8 numOfBestMoves;
2017-02-02 05:15:38 +01:00
s32 i;
sub_8131074();
while (AI_THINKING_STRUCT->aiFlags != 0)
2017-02-02 05:15:38 +01:00
{
if (AI_THINKING_STRUCT->aiFlags & 1)
2017-02-02 05:15:38 +01:00
{
AI_THINKING_STRUCT->aiState = AIState_SettingUp;
2017-02-02 05:15:38 +01:00
BattleAI_DoAIProcessing();
}
AI_THINKING_STRUCT->aiFlags >>= 1;
AI_THINKING_STRUCT->aiLogicId++;
AI_THINKING_STRUCT->movesetIndex = 0;
2017-02-02 05:15:38 +01:00
}
// special flags for safari watch/flee.
if (AI_THINKING_STRUCT->aiAction & 2)
2017-02-02 05:15:38 +01:00
return 4;
if (AI_THINKING_STRUCT->aiAction & 4)
2017-02-02 05:15:38 +01:00
return 5;
numOfBestMoves = 1;
currentMoveArray[0] = AI_THINKING_STRUCT->score[0];
consideredMoveArray[0] = 0;
2017-02-02 05:15:38 +01:00
for (i = 1; i < 4; i++)
{
if (gBattleMons[gPlayerMonIndex].moves[i] != 0) // emerald adds an extra move ID check for some reason.
2017-02-02 05:15:38 +01:00
{
// in ruby, the order of these if statements are reversed.
if (currentMoveArray[0] == AI_THINKING_STRUCT->score[i])
2017-02-02 05:15:38 +01:00
{
currentMoveArray[numOfBestMoves] = AI_THINKING_STRUCT->score[i];
consideredMoveArray[numOfBestMoves++] = i;
2017-02-02 05:15:38 +01:00
}
if (currentMoveArray[0] < AI_THINKING_STRUCT->score[i])
2017-02-02 05:15:38 +01:00
{
numOfBestMoves = 1;
currentMoveArray[0] = AI_THINKING_STRUCT->score[i];
consideredMoveArray[0] = i;
2017-02-02 05:15:38 +01:00
}
}
}
return consideredMoveArray[Random() % numOfBestMoves];
2017-02-02 05:15:38 +01:00
}
#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)
2017-02-02 05:15:38 +01:00
{
//_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))
2017-02-02 05:15:38 +01:00
sub_8131074();
//_08130D90
AI_THINKING_STRUCT->unk11 = 0;
AI_THINKING_STRUCT->unk1 = 0;
r4 = AI_THINKING_STRUCT->aiFlags;
2017-02-02 05:15:38 +01:00
while (r4 != 0)
{
if (r4 & 1)
{
AI_THINKING_STRUCT->aiState = AIState_SettingUp;
2017-02-02 05:15:38 +01:00
BattleAI_DoAIProcessing();
}
r4 >>= 1;
AI_THINKING_STRUCT->unk11++;
AI_THINKING_STRUCT->unk1 = 0;
2017-02-02 05:15:38 +01:00
}
//_08130DD8
if (AI_THINKING_STRUCT->unk10 & 2)
2017-02-02 05:15:38 +01:00
spC[i] = 4;
else if (AI_THINKING_STRUCT->unk10 & 4)
2017-02-02 05:15:38 +01:00
spC[i] = 5;
else
{
//_08130E10
sp10[0] = AI_THINKING_STRUCT->score[0];
2017-02-02 05:15:38 +01:00
sp14[0] = 0;
r5 = 1;
for (j = 1; j < 4; j++)
{
if (gBattleMons[gPlayerMonIndex].moves[j] != 0)
2017-02-02 05:15:38 +01:00
{
if (sp10[0] == AI_THINKING_STRUCT->score[j])
2017-02-02 05:15:38 +01:00
{
sp10[r5] = AI_THINKING_STRUCT->score[j];
2017-02-02 05:15:38 +01:00
sp14[r5] = j;
r5++;
}
if (sp10[0] < AI_THINKING_STRUCT->score[j])
2017-02-02 05:15:38 +01:00
{
sp10[0] = AI_THINKING_STRUCT->score[j];
2017-02-02 05:15:38 +01:00
sp14[0] = j;
r5 = 1;
}
}
//_08130E72
}
spC[i] = sp14[Random() % r5];
//asm("":::"r3");
sp0[i] = sp10[0];
if (i == (gPlayerMonIndex ^ 2) && sp0[i] < 100)
2017-02-02 05:15:38 +01:00
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];
2017-02-02 05:15:38 +01:00
}
#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\
2017-02-02 05:15:38 +01:00
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\
2017-02-02 05:15:38 +01:00
mov r1, r8\n\
strb r1, [r0]\n\
movs r1, 0x1\n\
mov r2, r8\n\
ands r2, r1\n\
ldr r0, =gPlayerMonIndex\n\
2017-02-02 05:15:38 +01:00
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\
2017-02-02 05:15:38 +01:00
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\
2017-02-02 05:15:38 +01:00
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\
2017-02-02 05:15:38 +01:00
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)
2017-02-02 05:15:38 +01:00
{
switch (AI_THINKING_STRUCT->aiState)
2017-02-02 05:15:38 +01:00
{
case AIState_DoNotProcess: //Needed to match.
2017-02-02 05:15:38 +01:00
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)
2017-02-02 05:15:38 +01:00
{
AI_THINKING_STRUCT->moveConsidered = 0;
2017-02-02 05:15:38 +01:00
}
else
{
AI_THINKING_STRUCT->moveConsidered = gBattleMons[gPlayerMonIndex].moves[AI_THINKING_STRUCT->movesetIndex];
2017-02-02 05:15:38 +01:00
}
AI_THINKING_STRUCT->aiState++;
2017-02-02 05:15:38 +01:00
break;
case AIState_Processing:
if (AI_THINKING_STRUCT->moveConsidered != 0)
gUnknown_085B083C[*gAIScriptPtr](); // run AI command.
2017-02-02 05:15:38 +01:00
else
{
AI_THINKING_STRUCT->score[AI_THINKING_STRUCT->movesetIndex] = 0;
AI_THINKING_STRUCT->aiAction |= 1;
2017-02-02 05:15:38 +01:00
}
if (AI_THINKING_STRUCT->aiAction & 1)
2017-02-02 05:15:38 +01:00
{
AI_THINKING_STRUCT->movesetIndex++;
if (AI_THINKING_STRUCT->movesetIndex < 4 && !(AI_THINKING_STRUCT->aiAction & 8))
AI_THINKING_STRUCT->aiState = AIState_SettingUp;
2017-02-02 05:15:38 +01:00
else
AI_THINKING_STRUCT->aiState++;
AI_THINKING_STRUCT->aiAction &= 0xFE;
2017-02-02 05:15:38 +01:00
}
break;
}
}
}
void sub_8131074(void)
{
s32 i;
for (i = 0; i < 4; i++)
{
if (gUnknown_020244A8->unk18->unk0[gEnemyMonIndex][i] == gUnknown_02024248[gEnemyMonIndex])
2017-02-02 05:15:38 +01:00
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)
2017-02-02 05:15:38 +01:00
{
gUnknown_020244A8->unk18->unk0[gEnemyMonIndex][i] = gUnknown_02024248[gEnemyMonIndex];
2017-02-02 05:15:38 +01:00
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)
2017-02-02 05:15:38 +01:00
{
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])
2017-02-02 05:15:38 +01:00
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;
}