#include "global.h"
#include "battle.h"
#include "battle_setup.h"
#include "battle_frontier_1.h"
#include "battle_message.h"
#include "event_data.h"
#include "overworld.h"
#include "util.h"
#include "malloc.h"
#include "string_util.h"
#include "random.h"
#include "constants/species.h"
#include "constants/moves.h"
#include "constants/trainers.h"
#include "constants/abilities.h"

struct Unknown_0203BC8C_Struct
{
    u16 species;
    u16 moves[4];
    u8 itemTableId;
    u8 evSpread;
    u8 nature;
};

extern struct Unknown_0203BC8C_Struct *gFacilityTrainerMons;

extern void sub_81B8558(void);
extern u32 sub_81A39C4(void);
extern u16 sub_8162548(u8, u8);
extern u16 sub_8163524(u16);
extern u8 GetFrontierEnemyMonLevel(void);
extern void sub_8195898(u8 *dst, u16 trainerId);
extern u16 sub_81A5060(u8, u8);

extern u8 gUnknown_0203CEF8[];
extern u32 gUnknown_0203CD70;
extern u32 gUnknown_0203CD74;

extern void (* const gUnknown_0860D090[])(void);
extern const u32 gUnknown_0860D0EC[][2];
extern const u32 gUnknown_0860D0FC[][2];
extern const u16 gBattleFrontierHeldItems[];

// This file's functions.
u8 GetDomeTrainerMonIvs(u16 trainerId);
void sub_818F720(u16 species, s32 level, s32 ivs, u8 evBits, u8 nature, s32 *stats);
void CreateDomeTrainerMons(u16 tournamentTrainerId);
u16 TrainerIdToTournamentId(u16 trainerId);
s32 sub_818FC78(u16 tournamentTrainerId);
s32 sub_818FCBC(u16 tournamentTrainerId, bool8 arg1);
s32 sub_818FDB8(u16 tournamentTrainerId, bool8 arg1);
s32 sub_818FFC0(s32 move, s32 species, s32 arg2);
s32 sub_818FEB4(s32 *arr, bool8 arg1);

// code
void sub_818E9AC(void)
{
    gUnknown_0860D090[gSpecialVar_0x8004]();
}

void sub_818E9CC(void)
{
    u32 lvlMode = gSaveBlock2Ptr->frontier.chosenLvl;
    u32 id = VarGet(VAR_0x40CE);

    gSaveBlock2Ptr->frontier.field_CA8 = 0;
    gSaveBlock2Ptr->frontier.field_CB2 = 0;
    gSaveBlock2Ptr->frontier.field_CA9_a = 0;
    gSaveBlock2Ptr->frontier.field_CA9_b = 0;
    if (!(gSaveBlock2Ptr->frontier.field_CDC & gUnknown_0860D0EC[id][lvlMode]))
        gSaveBlock2Ptr->frontier.field_D0C[id][lvlMode] = 0;

    saved_warp2_set(0, gSaveBlock1Ptr->location.mapGroup, gSaveBlock1Ptr->location.mapNum, -1);
    gTrainerBattleOpponent_A = 0;
}

void sub_818EA84(void)
{
    u32 lvlMode = gSaveBlock2Ptr->frontier.chosenLvl;
    u32 id = VarGet(VAR_0x40CE);

    switch (gSpecialVar_0x8005)
    {
    case 0:
        gSpecialVar_Result = gSaveBlock2Ptr->frontier.field_D0C[id][lvlMode];
        break;
    case 1:
        gSpecialVar_Result = ((gSaveBlock2Ptr->frontier.field_CDC & gUnknown_0860D0EC[id][lvlMode]) != 0);
        break;
    case 2:
        gSpecialVar_Result = gSaveBlock2Ptr->frontier.field_D08_0;
        break;
    case 3:
        gSpecialVar_Result = gSaveBlock2Ptr->frontier.field_D08_1;
        break;
    case 4:
        gSpecialVar_Result = gSaveBlock2Ptr->frontier.field_D08_2;
        break;
    case 5:
        gSpecialVar_Result = gSaveBlock2Ptr->frontier.field_D08_3;
        break;
    case 6:
        if (VarGet(VAR_0x40CE) == 1)
        {
            if (lvlMode)
                gSpecialVar_Result = gSaveBlock2Ptr->frontier.field_D08_5;
            else
                gSpecialVar_Result = gSaveBlock2Ptr->frontier.field_D08_4;
        }
        else
        {
            if (lvlMode)
                gSpecialVar_Result = gSaveBlock2Ptr->frontier.field_D08_1;
            else
                gSpecialVar_Result = gSaveBlock2Ptr->frontier.field_D08_0;
        }
        break;
    case 7:
        if (VarGet(VAR_0x40CE) == 1)
        {
            if (lvlMode)
                gSpecialVar_Result = gSaveBlock2Ptr->frontier.field_D08_7;
            else
                gSpecialVar_Result = gSaveBlock2Ptr->frontier.field_D08_6;
        }
        else
        {
            if (lvlMode)
                gSpecialVar_Result = gSaveBlock2Ptr->frontier.field_D08_3;
            else
                gSpecialVar_Result = gSaveBlock2Ptr->frontier.field_D08_2;
        }
        break;
    case 8:
        sub_81B8558();
        gUnknown_0203CEF8[0] = gSaveBlock2Ptr->frontier.field_CB0;
        gUnknown_0203CEF8[1] = gSaveBlock2Ptr->frontier.field_CB0 >> 8;
        break;
    case 9:
        gSpecialVar_Result = (gSaveBlock2Ptr->frontier.field_D0A * 2) - 3 + gSaveBlock2Ptr->frontier.field_D0B;
        break;
    }
}

void sub_818ED28(void)
{
    u32 lvlMode = gSaveBlock2Ptr->frontier.chosenLvl;
    u32 id = VarGet(VAR_0x40CE);

    switch (gSpecialVar_0x8005)
    {
    case 0:
        gSaveBlock2Ptr->frontier.field_D0C[id][lvlMode] = gSpecialVar_0x8006;
        break;
    case 1:
        if (gSpecialVar_0x8006)
            gSaveBlock2Ptr->frontier.field_CDC |= gUnknown_0860D0EC[id][lvlMode];
        else
            gSaveBlock2Ptr->frontier.field_CDC &= gUnknown_0860D0FC[id][lvlMode];
        break;
    case 2:
        gSaveBlock2Ptr->frontier.field_D08_0 = gSpecialVar_0x8006;
        break;
    case 3:
        gSaveBlock2Ptr->frontier.field_D08_1 = gSpecialVar_0x8006;
        break;
    case 4:
        gSaveBlock2Ptr->frontier.field_D08_2 = gSpecialVar_0x8006;
        break;
    case 5:
        gSaveBlock2Ptr->frontier.field_D08_3 = gSpecialVar_0x8006;
        break;
    case 6:
        if (VarGet(VAR_0x40CE) == 1)
        {
            if (lvlMode)
                gSaveBlock2Ptr->frontier.field_D08_5 = gSpecialVar_0x8006;
            else
                gSaveBlock2Ptr->frontier.field_D08_4 = gSpecialVar_0x8006;
        }
        else
        {
            if (lvlMode)
                gSaveBlock2Ptr->frontier.field_D08_1 = gSpecialVar_0x8006;
            else
                gSaveBlock2Ptr->frontier.field_D08_0 = gSpecialVar_0x8006;
        }
        break;
    case 7:
        if (VarGet(VAR_0x40CE) == 1)
        {
            if (lvlMode)
                gSaveBlock2Ptr->frontier.field_D08_7 = gSpecialVar_0x8006;
            else
                gSaveBlock2Ptr->frontier.field_D08_6 = gSpecialVar_0x8006;
        }
        else
        {
            if (lvlMode)
                gSaveBlock2Ptr->frontier.field_D08_3 = gSpecialVar_0x8006;
            else
                gSaveBlock2Ptr->frontier.field_D08_2 = gSpecialVar_0x8006;
        }
        break;
    case 8:
        gSaveBlock2Ptr->frontier.field_CB0 = T1_READ_16(gUnknown_0203CEF8);
        break;
    }
}

#ifdef NONMATCHING
// Not even close, this function is insane.
void sub_818F02C(void)
{
    s32 i, j, k, l;
    u32 array[16];
    u32 var_28;
    u32 var_24;
    s32 var_38;
    s32 monTypesBits, monTypesCount;
    u32 var_54 = 0;
    u32 var_50 = 0;
    u32 var_4C = 0;
    u32 *var_40 = AllocZeroed(0x20);
    u16 *var_44 = AllocZeroed(0x18);
    u32 var_48;

    gSaveBlock2Ptr->frontier.field_D0A = gSaveBlock2Ptr->frontier.chosenLvl + 1;
    gSaveBlock2Ptr->frontier.field_D0B = VarGet(VAR_0x40CE) + 1;
    gSaveBlock2Ptr->frontier.domeTrainers[0].trainerId = 0x3FF;
    gSaveBlock2Ptr->frontier.domeTrainers[0].unk1 = 0;
    gSaveBlock2Ptr->frontier.domeTrainers[0].unk2 = 0;
    gSaveBlock2Ptr->frontier.domeTrainers[0].unk3 = 0;

    for (i = 0; i < 3; i++)
    {
        gSaveBlock2Ptr->frontier.domeMonId[i] = GetMonData(&gPlayerParty[gSaveBlock2Ptr->frontier.field_CAA[i] - 1], MON_DATA_SPECIES, NULL);
        for (j = 0; j < 4; j++)
            gSaveBlock2Ptr->frontier.field_EFC[i].moves[j] = GetMonData(&gPlayerParty[gSaveBlock2Ptr->frontier.field_CAA[i] - 1], MON_DATA_MOVE1 + j, NULL);
        for (j = 0; j < 6; j++)
            gSaveBlock2Ptr->frontier.field_EFC[i].evs[j] = GetMonData(&gPlayerParty[gSaveBlock2Ptr->frontier.field_CAA[i] - 1], MON_DATA_HP_EV + j, NULL);

        gSaveBlock2Ptr->frontier.field_EFC[i].nature = GetNature(&gPlayerParty[gSaveBlock2Ptr->frontier.field_CAA[i] - 1]);
    }

    var_28 = 4;
    var_24 = 6;
    for (l = j; l < 16; l++)
    {
        u16 val;
        if (l > 5)
        {
            while (1)
            {
                val = sub_8162548(sub_81A39C4(), 0);
                for (k = 1; k < l; k++)
                {
                    if (gSaveBlock2Ptr->frontier.domeTrainers[k].trainerId == val)
                        break;
                }
                if (k != l)
                {
                    gSaveBlock2Ptr->frontier.domeTrainers[var_28].trainerId = val;
                    break;
                }
            }
        }
        else
        {
            while (1)
            {
                val = sub_8162548(sub_81A39C4() + 1, 0);
                for (k = 1; k < l; k++)
                {
                    if (gSaveBlock2Ptr->frontier.domeTrainers[k].trainerId == val)
                        break;
                }
                if (k != l)
                {
                    gSaveBlock2Ptr->frontier.domeTrainers[var_28].trainerId = val;
                    break;
                }
            }
        }

        for (var_38 = 0; var_38 < 3; var_38++)
        {
            u16 val2;
            do
            {
                val2 = sub_8163524(val);
                for (i = 0; i < l; i++)
                {
                    if (gSaveBlock2Ptr->frontier.domeMonId[i] == val2)
                        break;
                    if (var_54 == gFacilityTrainerMons[val2].field_0)
                        break;
                    if (var_50 == gFacilityTrainerMons[val2].field_0)
                        break;
                    if (gFacilityTrainerMons[gSaveBlock2Ptr->frontier.domeMonId[i]].field_A == gFacilityTrainerMons[val2].field_A)
                        break;
                }
            } while (i != var_38);

            gSaveBlock2Ptr->frontier.domeMonId[var_24] = val2;
            array[var_38] = gFacilityTrainerMons[val2].field_0;
        }

        gSaveBlock2Ptr->frontier.domeTrainers[var_28].unk1 = 0;
        gSaveBlock2Ptr->frontier.domeTrainers[var_28].unk2 = 0;
        gSaveBlock2Ptr->frontier.domeTrainers[var_28].unk3 = 0;
    }

    for (i = 0; i < 3; i++)
    {
        struct Pokemon *mon = &gPlayerParty[gSaveBlock2Ptr->frontier.field_CAA[i] - 1];
        var_44[0] += GetMonData(mon, MON_DATA_ATK, NULL);
        var_44[0] += GetMonData(mon, MON_DATA_DEF, NULL);
        var_44[0] += GetMonData(mon, MON_DATA_SPATK, NULL);
        var_44[0] += GetMonData(mon, MON_DATA_SPDEF, NULL);
        var_44[0] += GetMonData(mon, MON_DATA_SPEED, NULL);
        var_44[0] += GetMonData(mon, MON_DATA_MAX_HP, NULL);
        monTypesBits |= gBitTable[gBaseStats[GetMonData(mon, MON_DATA_SPECIES, NULL)].type1];
        monTypesBits |= gBitTable[gBaseStats[GetMonData(mon, MON_DATA_SPECIES, NULL)].type2];
    }

    for (monTypesCount = 0, i = 0; i < 31; i++)
    {
        if (monTypesBits & 1)
            monTypesCount++;
        monTypesBits >>= 1;
    }

    var_48 = GetFrontierEnemyMonLevel();
    var_44[0] += (monTypesCount * var_48) / 20;

    for (i = 0; i < 16; i++)
    {
        u8 r8;

        var_44[i + 1] = 0;
        r8 = GetDomeTrainerMonIvs(gSaveBlock2Ptr->frontier.domeTrainers[i].trainerId);
        for (j = 0; j < 3; j++)
        {
            sub_818F720(gSaveBlock2Ptr->frontier.domeMonId[i]);
        }
    }

    Free(var_44);
    Free(var_40);
}
#else
NAKED
void sub_818F02C(void)
{
    asm_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, 0x3C\n\
	movs r0, 0\n\
	str r0, [sp, 0x8]\n\
	str r0, [sp, 0xC]\n\
	str r0, [sp, 0x10]\n\
	movs r0, 0x20\n\
	bl AllocZeroed\n\
	str r0, [sp, 0x18]\n\
	movs r0, 0x18\n\
	bl AllocZeroed\n\
	str r0, [sp, 0x1C]\n\
	ldr r4, =gSaveBlock2Ptr\n\
	ldr r1, [r4]\n\
	ldr r2, =0x00000ca9\n\
	adds r0, r1, r2\n\
	ldrb r0, [r0]\n\
	lsls r0, 30\n\
	lsrs r0, 30\n\
	adds r0, 0x1\n\
	ldr r3, =0x00000d0a\n\
	adds r1, r3\n\
	strb r0, [r1]\n\
	ldr r0, =0x000040ce\n\
	bl VarGet\n\
	ldr r1, [r4]\n\
	adds r0, 0x1\n\
	ldr r5, =0x00000d0b\n\
	adds r1, r5\n\
	strb r0, [r1]\n\
	ldr r2, [r4]\n\
	ldr r7, =0x00000d24\n\
	adds r3, r2, r7\n\
	ldrh r0, [r3]\n\
	ldr r5, =0x000003ff\n\
	adds r1, r5, 0\n\
	orrs r0, r1\n\
	strh r0, [r3]\n\
	ldr r3, =0x00000d25\n\
	adds r2, r3\n\
	ldrb r1, [r2]\n\
	movs r0, 0x5\n\
	negs r0, r0\n\
	ands r0, r1\n\
	strb r0, [r2]\n\
	ldr r1, [r4]\n\
	adds r1, r3\n\
	ldrb r2, [r1]\n\
	movs r0, 0x19\n\
	negs r0, r0\n\
	ands r0, r2\n\
	strb r0, [r1]\n\
	ldr r1, [r4]\n\
	adds r1, r3\n\
	ldrb r2, [r1]\n\
	movs r0, 0x1F\n\
	ands r0, r2\n\
	strb r0, [r1]\n\
	movs r7, 0\n\
	mov r10, r7\n\
	mov r8, r4\n\
	ldr r0, =gBattleScripting + 0x14\n\
	mov r9, r0\n\
	movs r4, 0\n\
_0818F0BA:\n\
	mov r1, r8\n\
	ldr r0, [r1]\n\
	ldr r2, =0x00000caa\n\
	adds r0, r2\n\
	adds r0, r4\n\
	ldrh r0, [r0]\n\
	movs r3, 0x64\n\
	muls r0, r3\n\
	add r0, r9\n\
	movs r1, 0xB\n\
	movs r2, 0\n\
	bl GetMonData\n\
	mov r5, r8\n\
	ldr r1, [r5]\n\
	ldr r7, =0x00000d64\n\
	adds r1, r7\n\
	adds r1, r4\n\
	strh r0, [r1]\n\
	movs r5, 0\n\
	mov r0, r10\n\
	lsls r7, r0, 4\n\
	adds r6, r7, 0\n\
_0818F0E8:\n\
	mov r1, r8\n\
	ldr r0, [r1]\n\
	ldr r2, =0x00000caa\n\
	adds r0, r2\n\
	adds r0, r4\n\
	ldrh r0, [r0]\n\
	movs r3, 0x64\n\
	muls r0, r3\n\
	add r0, r9\n\
	adds r1, r5, 0\n\
	adds r1, 0xD\n\
	movs r2, 0\n\
	bl GetMonData\n\
	mov r2, r8\n\
	ldr r1, [r2]\n\
	ldr r3, =0x00000efc\n\
	adds r1, r3\n\
	adds r1, r6\n\
	strh r0, [r1]\n\
	adds r6, 0x2\n\
	adds r5, 0x1\n\
	cmp r5, 0x3\n\
	ble _0818F0E8\n\
	movs r5, 0\n\
	ldr r6, =gSaveBlock2Ptr\n\
_0818F11C:\n\
	ldr r0, [r6]\n\
	ldr r1, =0x00000caa\n\
	adds r0, r1\n\
	adds r0, r4\n\
	ldrh r0, [r0]\n\
	movs r2, 0x64\n\
	muls r0, r2\n\
	add r0, r9\n\
	adds r1, r5, 0\n\
	adds r1, 0x1A\n\
	movs r2, 0\n\
	bl GetMonData\n\
	ldr r1, [r6]\n\
	adds r2, r5, r7\n\
	ldr r3, =0x00000f04\n\
	adds r1, r3\n\
	adds r1, r2\n\
	strb r0, [r1]\n\
	adds r5, 0x1\n\
	cmp r5, 0x5\n\
	ble _0818F11C\n\
	mov r5, r8\n\
	ldr r0, [r5]\n\
	ldr r1, =0x00000caa\n\
	adds r0, r1\n\
	adds r0, r4\n\
	ldrh r0, [r0]\n\
	movs r2, 0x64\n\
	muls r0, r2\n\
	add r0, r9\n\
	bl GetNature\n\
	ldr r1, [r5]\n\
	adds r1, r7\n\
	ldr r3, =0x00000f0a\n\
	adds r1, r3\n\
	strb r0, [r1]\n\
	adds r4, 0x2\n\
	movs r5, 0x1\n\
	add r10, r5\n\
	mov r7, r10\n\
	cmp r7, 0x2\n\
	ble _0818F0BA\n\
	mov r10, r5\n\
	movs r0, 0x4\n\
	str r0, [sp, 0x34]\n\
	movs r1, 0x6\n\
	str r1, [sp, 0x38]\n\
_0818F17E:\n\
	mov r2, r10\n\
	cmp r2, 0x5\n\
	ble _0818F22C\n\
_0818F184:\n\
	bl sub_81A39C4\n\
	lsls r0, 24\n\
	lsrs r0, 24\n\
	movs r1, 0\n\
	bl sub_8162548\n\
	lsls r0, 16\n\
	lsrs r4, r0, 16\n\
	movs r5, 0x1\n\
	cmp r5, r10\n\
	bge _0818F1CA\n\
	ldr r3, =gSaveBlock2Ptr\n\
	ldr r0, [r3]\n\
	ldr r7, =0x00000d28\n\
	adds r0, r7\n\
	ldrh r0, [r0]\n\
	lsls r0, 22\n\
	lsrs r0, 22\n\
	adds r2, r3, 0\n\
	cmp r0, r4\n\
	beq _0818F1CA\n\
	ldr r3, =0x00000d24\n\
_0818F1B2:\n\
	adds r5, 0x1\n\
	cmp r5, r10\n\
	bge _0818F1CA\n\
	ldr r0, [r2]\n\
	lsls r1, r5, 2\n\
	adds r0, r1\n\
	adds r0, r3\n\
	ldrh r0, [r0]\n\
	lsls r0, 22\n\
	lsrs r0, 22\n\
	cmp r0, r4\n\
	bne _0818F1B2\n\
_0818F1CA:\n\
	cmp r5, r10\n\
	bne _0818F184\n\
	ldr r0, =gSaveBlock2Ptr\n\
	ldr r3, [r0]\n\
	ldr r1, [sp, 0x34]\n\
	adds r3, r1\n\
	ldr r2, =0x00000d24\n\
	adds r3, r2\n\
	ldr r5, =0x000003ff\n\
	adds r0, r5, 0\n\
	adds r2, r4, 0\n\
	ands r2, r0\n\
	ldrh r0, [r3]\n\
	ldr r7, =0xfffffc00\n\
	adds r1, r7, 0\n\
	b _0818F292\n\
	.pool\n\
_0818F22C:\n\
	bl sub_81A39C4\n\
	adds r0, 0x1\n\
	lsls r0, 24\n\
	lsrs r0, 24\n\
	movs r1, 0\n\
	bl sub_8162548\n\
	lsls r0, 16\n\
	lsrs r4, r0, 16\n\
	movs r5, 0x1\n\
	cmp r5, r10\n\
	bge _0818F274\n\
	ldr r1, =gSaveBlock2Ptr\n\
	ldr r0, [r1]\n\
	ldr r2, =0x00000d28\n\
	adds r0, r2\n\
	ldrh r0, [r0]\n\
	lsls r0, 22\n\
	lsrs r0, 22\n\
	adds r2, r1, 0\n\
	cmp r0, r4\n\
	beq _0818F274\n\
	ldr r3, =0x00000d24\n\
_0818F25C:\n\
	adds r5, 0x1\n\
	cmp r5, r10\n\
	bge _0818F274\n\
	ldr r0, [r2]\n\
	lsls r1, r5, 2\n\
	adds r0, r1\n\
	adds r0, r3\n\
	ldrh r0, [r0]\n\
	lsls r0, 22\n\
	lsrs r0, 22\n\
	cmp r0, r4\n\
	bne _0818F25C\n\
_0818F274:\n\
	cmp r5, r10\n\
	bne _0818F22C\n\
	ldr r5, =gSaveBlock2Ptr\n\
	ldr r3, [r5]\n\
	ldr r7, [sp, 0x34]\n\
	adds r3, r7\n\
	ldr r0, =0x00000d24\n\
	adds r3, r0\n\
	ldr r1, =0x000003ff\n\
	adds r0, r1, 0\n\
	adds r2, r4, 0\n\
	ands r2, r0\n\
	ldrh r0, [r3]\n\
	ldr r5, =0xfffffc00\n\
	adds r1, r5, 0\n\
_0818F292:\n\
	ands r0, r1\n\
	orrs r0, r2\n\
	strh r0, [r3]\n\
	movs r5, 0\n\
	lsls r4, 16\n\
	str r4, [sp, 0x2C]\n\
	ldr r7, [sp, 0x38]\n\
	str r7, [sp, 0x20]\n\
_0818F2A2:\n\
	lsls r0, r5, 1\n\
	mov r9, r0\n\
	adds r1, r5, 0x1\n\
	str r1, [sp, 0x24]\n\
	lsls r2, r5, 2\n\
	str r2, [sp, 0x28]\n\
_0818F2AE:\n\
	ldr r3, [sp, 0x2C]\n\
	lsrs r0, r3, 16\n\
	bl sub_8163524\n\
	lsls r0, 16\n\
	lsrs r6, r0, 16\n\
	movs r7, 0\n\
	cmp r7, r5\n\
	bge _0818F300\n\
	ldr r0, =gSaveBlock2Ptr\n\
	ldr r0, [r0]\n\
	ldr r1, [sp, 0x8]\n\
	mov r8, r1\n\
	ldr r2, [sp, 0xC]\n\
	mov r12, r2\n\
	ldr r3, =0x00000d64\n\
	adds r0, r3\n\
	ldr r1, [sp, 0x20]\n\
	adds r4, r1, r0\n\
_0818F2D4:\n\
	ldrh r3, [r4]\n\
	cmp r3, r6\n\
	beq _0818F300\n\
	ldr r2, =gFacilityTrainerMons\n\
	ldr r1, [r2]\n\
	lsls r0, r6, 4\n\
	adds r2, r0, r1\n\
	ldrh r0, [r2]\n\
	cmp r8, r0\n\
	beq _0818F300\n\
	cmp r12, r0\n\
	beq _0818F300\n\
	lsls r0, r3, 4\n\
	adds r0, r1\n\
	ldrb r0, [r0, 0xA]\n\
	ldrb r2, [r2, 0xA]\n\
	cmp r0, r2\n\
	beq _0818F300\n\
	adds r4, 0x2\n\
	adds r7, 0x1\n\
	cmp r7, r5\n\
	blt _0818F2D4\n\
_0818F300:\n\
	cmp r7, r5\n\
	bne _0818F2AE\n\
	ldr r3, =gSaveBlock2Ptr\n\
	ldr r0, [r3]\n\
	ldr r1, [sp, 0x38]\n\
	add r1, r9\n\
	ldr r5, =0x00000d64\n\
	adds r0, r5\n\
	adds r0, r1\n\
	strh r6, [r0]\n\
	ldr r2, [sp, 0x28]\n\
	add r2, sp\n\
	adds r2, 0x8\n\
	ldr r0, =gFacilityTrainerMons\n\
	ldr r1, [r0]\n\
	lsls r0, r6, 4\n\
	adds r0, r1\n\
	ldrh r0, [r0]\n\
	str r0, [r2]\n\
	ldr r5, [sp, 0x24]\n\
	cmp r5, 0x2\n\
	ble _0818F2A2\n\
	ldr r2, [r3]\n\
	ldr r7, [sp, 0x34]\n\
	adds r2, r7\n\
	ldr r0, =0x00000d25\n\
	adds r2, r0\n\
	ldrb r0, [r2]\n\
	movs r3, 0x5\n\
	negs r3, r3\n\
	adds r1, r3, 0\n\
	ands r0, r1\n\
	strb r0, [r2]\n\
	ldr r5, =gSaveBlock2Ptr\n\
	ldr r2, [r5]\n\
	adds r2, r7\n\
	ldr r7, =0x00000d25\n\
	adds r2, r7\n\
	ldrb r0, [r2]\n\
	subs r3, 0x14\n\
	adds r1, r3, 0\n\
	ands r0, r1\n\
	strb r0, [r2]\n\
	ldr r1, [r5]\n\
	ldr r5, [sp, 0x34]\n\
	adds r1, r5\n\
	adds r1, r7\n\
	ldrb r2, [r1]\n\
	movs r0, 0x1F\n\
	ands r0, r2\n\
	strb r0, [r1]\n\
	adds r5, 0x4\n\
	str r5, [sp, 0x34]\n\
	ldr r7, [sp, 0x38]\n\
	adds r7, 0x6\n\
	str r7, [sp, 0x38]\n\
	movs r0, 0x1\n\
	add r10, r0\n\
	mov r1, r10\n\
	cmp r1, 0xF\n\
	bgt _0818F37C\n\
	b _0818F17E\n\
_0818F37C:\n\
	movs r7, 0\n\
	ldr r2, [sp, 0x18]\n\
	strh r7, [r2]\n\
	movs r3, 0\n\
	mov r10, r3\n\
	ldr r6, =gBitTable\n\
	ldr r5, =gBaseStats\n\
_0818F38A:\n\
	ldr r0, =gSaveBlock2Ptr\n\
	ldr r0, [r0]\n\
	mov r2, r10\n\
	lsls r1, r2, 1\n\
	ldr r3, =0x00000caa\n\
	adds r0, r3\n\
	adds r0, r1\n\
	ldrh r0, [r0]\n\
	subs r4, r0, 0x1\n\
	movs r0, 0x64\n\
	muls r4, r0\n\
	ldr r0, =gPlayerParty\n\
	adds r4, r0\n\
	adds r0, r4, 0\n\
	movs r1, 0x3B\n\
	movs r2, 0\n\
	bl GetMonData\n\
	ldr r2, [sp, 0x18]\n\
	ldrh r1, [r2]\n\
	adds r1, r0\n\
	strh r1, [r2]\n\
	adds r0, r4, 0\n\
	movs r1, 0x3C\n\
	movs r2, 0\n\
	bl GetMonData\n\
	ldr r3, [sp, 0x18]\n\
	ldrh r1, [r3]\n\
	adds r1, r0\n\
	strh r1, [r3]\n\
	adds r0, r4, 0\n\
	movs r1, 0x3E\n\
	movs r2, 0\n\
	bl GetMonData\n\
	ldr r2, [sp, 0x18]\n\
	ldrh r1, [r2]\n\
	adds r1, r0\n\
	strh r1, [r2]\n\
	adds r0, r4, 0\n\
	movs r1, 0x3F\n\
	movs r2, 0\n\
	bl GetMonData\n\
	ldr r3, [sp, 0x18]\n\
	ldrh r1, [r3]\n\
	adds r1, r0\n\
	strh r1, [r3]\n\
	adds r0, r4, 0\n\
	movs r1, 0x3D\n\
	movs r2, 0\n\
	bl GetMonData\n\
	ldr r2, [sp, 0x18]\n\
	ldrh r1, [r2]\n\
	adds r1, r0\n\
	strh r1, [r2]\n\
	adds r0, r4, 0\n\
	movs r1, 0x3A\n\
	movs r2, 0\n\
	bl GetMonData\n\
	ldr r3, [sp, 0x18]\n\
	ldrh r1, [r3]\n\
	adds r1, r0\n\
	strh r1, [r3]\n\
	adds r0, r4, 0\n\
	movs r1, 0xB\n\
	movs r2, 0\n\
	bl GetMonData\n\
	lsls r1, r0, 3\n\
	subs r1, r0\n\
	lsls r1, 2\n\
	adds r1, r5\n\
	ldrb r0, [r1, 0x6]\n\
	lsls r0, 2\n\
	adds r0, r6\n\
	ldr r0, [r0]\n\
	orrs r7, r0\n\
	adds r0, r4, 0\n\
	movs r1, 0xB\n\
	movs r2, 0\n\
	bl GetMonData\n\
	lsls r1, r0, 3\n\
	subs r1, r0\n\
	lsls r1, 2\n\
	adds r1, r5\n\
	ldrb r0, [r1, 0x7]\n\
	lsls r0, 2\n\
	adds r0, r6\n\
	ldr r0, [r0]\n\
	orrs r7, r0\n\
	movs r0, 0x1\n\
	add r10, r0\n\
	mov r1, r10\n\
	cmp r1, 0x2\n\
	ble _0818F38A\n\
	movs r4, 0\n\
	movs r1, 0x1\n\
	movs r5, 0x1F\n\
_0818F458:\n\
	adds r0, r7, 0\n\
	ands r0, r1\n\
	cmp r0, 0\n\
	beq _0818F462\n\
	adds r4, 0x1\n\
_0818F462:\n\
	asrs r7, 1\n\
	subs r5, 0x1\n\
	cmp r5, 0\n\
	bge _0818F458\n\
	bl GetFrontierEnemyMonLevel\n\
	lsls r0, 24\n\
	lsrs r0, 24\n\
	str r0, [sp, 0x14]\n\
	adds r2, r0, 0\n\
	adds r0, r4, 0\n\
	muls r0, r2\n\
	movs r1, 0x14\n\
	bl __divsi3\n\
	ldr r3, [sp, 0x18]\n\
	ldrh r1, [r3]\n\
	adds r1, r0\n\
	strh r1, [r3]\n\
	movs r5, 0x1\n\
	mov r10, r5\n\
	adds r6, r3, 0\n\
	adds r6, 0x2\n\
	movs r7, 0x2\n\
	str r7, [sp, 0x30]\n\
_0818F494:\n\
	movs r7, 0\n\
	strh r7, [r6]\n\
	ldr r1, =gSaveBlock2Ptr\n\
	ldr r0, [r1]\n\
	mov r2, r10\n\
	lsls r1, r2, 2\n\
	adds r0, r1\n\
	ldr r3, =0x00000d24\n\
	adds r0, r3\n\
	ldrh r0, [r0]\n\
	lsls r0, 22\n\
	lsrs r0, 22\n\
	bl GetDomeTrainerMonIvs\n\
	lsls r0, 24\n\
	lsrs r0, 24\n\
	mov r8, r0\n\
	movs r5, 0\n\
	ldr r0, [sp, 0x30]\n\
	mov r9, r0\n\
_0818F4BC:\n\
	ldr r1, =gSaveBlock2Ptr\n\
	ldr r0, [r1]\n\
	mov r4, r9\n\
	add r4, r10\n\
	adds r4, r5\n\
	lsls r4, 1\n\
	ldr r2, =0x00000d64\n\
	adds r0, r2\n\
	adds r0, r4\n\
	ldrh r1, [r0]\n\
	ldr r3, =gFacilityTrainerMons\n\
	ldr r0, [r3]\n\
	lsls r1, 4\n\
	adds r1, r0\n\
	ldrh r0, [r1]\n\
	ldrb r3, [r1, 0xB]\n\
	ldrb r1, [r1, 0xC]\n\
	str r1, [sp]\n\
	ldr r1, [sp, 0x1C]\n\
	str r1, [sp, 0x4]\n\
	ldr r1, [sp, 0x14]\n\
	mov r2, r8\n\
	bl sub_818F720\n\
	ldr r2, [sp, 0x1C]\n\
	ldr r1, [r2, 0x4]\n\
	ldrh r0, [r6]\n\
	adds r0, r1\n\
	ldr r1, [r2, 0x8]\n\
	adds r0, r1\n\
	ldr r1, [r2, 0x10]\n\
	adds r0, r1\n\
	ldr r1, [r2, 0x14]\n\
	adds r0, r1\n\
	ldr r1, [r2, 0xC]\n\
	adds r0, r1\n\
	ldr r1, [r2]\n\
	adds r0, r1\n\
	strh r0, [r6]\n\
	ldr r3, =gSaveBlock2Ptr\n\
	ldr r0, [r3]\n\
	ldr r1, =0x00000d64\n\
	adds r0, r1\n\
	adds r0, r4\n\
	ldrh r0, [r0]\n\
	ldr r2, =gFacilityTrainerMons\n\
	ldr r1, [r2]\n\
	lsls r0, 4\n\
	adds r0, r1\n\
	ldrh r0, [r0]\n\
	lsls r1, r0, 3\n\
	subs r1, r0\n\
	lsls r1, 2\n\
	ldr r3, =gBaseStats\n\
	adds r1, r3\n\
	ldrb r0, [r1, 0x6]\n\
	lsls r0, 2\n\
	ldr r2, =gBitTable\n\
	adds r0, r2\n\
	ldr r0, [r0]\n\
	orrs r7, r0\n\
	ldrb r0, [r1, 0x7]\n\
	lsls r0, 2\n\
	adds r0, r2\n\
	ldr r0, [r0]\n\
	orrs r7, r0\n\
	adds r5, 0x1\n\
	cmp r5, 0x2\n\
	ble _0818F4BC\n\
	movs r4, 0\n\
	movs r1, 0x1\n\
	movs r5, 0x1F\n\
_0818F54C:\n\
	adds r0, r7, 0\n\
	ands r0, r1\n\
	cmp r0, 0\n\
	beq _0818F556\n\
	adds r4, 0x1\n\
_0818F556:\n\
	asrs r7, 1\n\
	subs r5, 0x1\n\
	cmp r5, 0\n\
	bge _0818F54C\n\
	ldr r3, [sp, 0x14]\n\
	adds r0, r4, 0\n\
	muls r0, r3\n\
	movs r1, 0x14\n\
	bl __divsi3\n\
	ldrh r1, [r6]\n\
	adds r1, r0\n\
	strh r1, [r6]\n\
	adds r6, 0x2\n\
	ldr r5, [sp, 0x30]\n\
	adds r5, 0x2\n\
	str r5, [sp, 0x30]\n\
	movs r7, 0x1\n\
	add r10, r7\n\
	mov r0, r10\n\
	cmp r0, 0xF\n\
	ble _0818F494\n\
	movs r1, 0\n\
	mov r10, r1\n\
	ldr r2, =0x000003ff\n\
	mov r8, r2\n\
_0818F58A:\n\
	mov r5, r10\n\
	adds r5, 0x1\n\
	adds r7, r5, 0\n\
	cmp r5, 0xF\n\
	bgt _0818F626\n\
	mov r3, r10\n\
	lsls r0, r3, 1\n\
	ldr r1, [sp, 0x18]\n\
	adds r6, r0, r1\n\
	lsls r0, r5, 1\n\
	adds r4, r0, r1\n\
_0818F5A0:\n\
	ldrh r1, [r6]\n\
	ldrh r0, [r4]\n\
	cmp r1, r0\n\
	bcc _0818F5C2\n\
	cmp r1, r0\n\
	bne _0818F61E\n\
	ldr r0, =gSaveBlock2Ptr\n\
	ldr r1, [r0]\n\
	lsls r0, r5, 2\n\
	adds r0, r1, r0\n\
	ldr r2, =0x00000d24\n\
	adds r0, r2\n\
	ldrh r0, [r0]\n\
	lsls r2, r0, 22\n\
	lsrs r0, r2, 22\n\
	cmp r0, r8\n\
	bne _0818F602\n\
_0818F5C2:\n\
	mov r0, r10\n\
	adds r1, r5, 0\n\
	ldr r2, [sp, 0x18]\n\
	bl sub_818F904\n\
	b _0818F600\n\
	.pool\n\
_0818F600:\n\
	b _0818F61E\n\
_0818F602:\n\
	mov r3, r10\n\
	lsls r0, r3, 2\n\
	adds r0, r1, r0\n\
	ldr r1, =0x00000d24\n\
	adds r0, r1\n\
	ldrh r0, [r0]\n\
	lsls r0, 22\n\
	cmp r0, r2\n\
	bls _0818F61E\n\
	mov r0, r10\n\
	adds r1, r5, 0\n\
	ldr r2, [sp, 0x18]\n\
	bl sub_818F904\n\
_0818F61E:\n\
	adds r4, 0x2\n\
	adds r5, 0x1\n\
	cmp r5, 0xF\n\
	ble _0818F5A0\n\
_0818F626:\n\
	mov r10, r7\n\
	mov r2, r10\n\
	cmp r2, 0xE\n\
	ble _0818F58A\n\
	bl sub_81A3610\n\
	lsls r0, 24\n\
	cmp r0, 0\n\
	beq _0818F6EE\n\
	movs r3, 0\n\
	mov r10, r3\n\
	ldr r0, =gSaveBlock2Ptr\n\
	ldr r1, [r0]\n\
	ldr r4, =0x00000d24\n\
	adds r1, r4\n\
	ldrh r1, [r1]\n\
	lsls r1, 22\n\
	lsrs r1, 22\n\
	ldr r3, =0x000003ff\n\
	adds r2, r0, 0\n\
	ldr r6, =gUnknown_0860D3F1\n\
	cmp r1, r3\n\
	beq _0818F674\n\
	adds r5, r2, 0\n\
_0818F656:\n\
	movs r7, 0x1\n\
	add r10, r7\n\
	mov r0, r10\n\
	cmp r0, 0xF\n\
	bgt _0818F674\n\
	ldr r0, [r5]\n\
	mov r7, r10\n\
	lsls r1, r7, 2\n\
	adds r0, r1\n\
	adds r0, r4\n\
	ldrh r0, [r0]\n\
	lsls r0, 22\n\
	lsrs r0, 22\n\
	cmp r0, r3\n\
	bne _0818F656\n\
_0818F674:\n\
	mov r1, r10\n\
	lsls r0, r1, 1\n\
	adds r0, r6\n\
	ldrb r0, [r0]\n\
	cmp r0, 0\n\
	beq _0818F6AC\n\
	movs r5, 0\n\
	ldr r2, [r2]\n\
	ldr r3, =0x00000d24\n\
	adds r2, r3\n\
	ldrh r1, [r2]\n\
	ldr r0, =0xfffffc00\n\
	ands r0, r1\n\
	ldr r7, =0x000003fe\n\
	adds r1, r7, 0\n\
	b _0818F6BE\n\
	.pool\n\
_0818F6AC:\n\
	movs r5, 0x1\n\
	ldr r2, [r2]\n\
	ldr r0, =0x00000d28\n\
	adds r2, r0\n\
	ldrh r1, [r2]\n\
	ldr r0, =0xfffffc00\n\
	ands r0, r1\n\
	ldr r3, =0x000003fe\n\
	adds r1, r3, 0\n\
_0818F6BE:\n\
	orrs r0, r1\n\
	strh r0, [r2]\n\
	movs r7, 0\n\
	mov r10, r7\n\
	lsls r0, r5, 1\n\
	adds r0, r5\n\
	lsls r4, r0, 1\n\
_0818F6CC:\n\
	mov r1, r10\n\
	lsls r0, r1, 24\n\
	lsrs r0, 24\n\
	bl sub_81A4FF0\n\
	ldr r1, =gSaveBlock2Ptr\n\
	ldr r1, [r1]\n\
	ldr r2, =0x00000d64\n\
	adds r1, r2\n\
	adds r1, r4\n\
	strh r0, [r1]\n\
	adds r4, 0x2\n\
	movs r3, 0x1\n\
	add r10, r3\n\
	mov r5, r10\n\
	cmp r5, 0x2\n\
	ble _0818F6CC\n\
_0818F6EE:\n\
	ldr r0, [sp, 0x18]\n\
	bl Free\n\
	ldr r0, [sp, 0x1C]\n\
	bl Free\n\
	add sp, 0x3C\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\
\n\
        ");
}
#endif // NONMATCHING

#define CALC_STAT(base, statIndex)                                                          \
{                                                                                           \
    u8 baseStat = gBaseStats[species].base;                                                 \
    stats[statIndex] = (((2 * baseStat + ivs + evs[statIndex] / 4) * level) / 100) + 5;     \
    stats[statIndex] = (u8) ModifyStatByNature(nature, stats[statIndex], statIndex);        \
}

void sub_818F720(u16 species, s32 level, s32 ivs, u8 evBits, u8 nature, s32 *stats)
{
    s32 i, count;
    u8 bits;
    u16 resultingEvs;
    s32 evs[6];

    count = 0, bits = evBits;
    for (i = 0; i < 6; bits >>= 1, i++)
    {
        if (bits & 1)
            count++;
    }

    resultingEvs = 510 / count;
    for (i = 0; i < 6; bits <<= 1, i++)
    {
        evs[i] = 0;
        if (evBits & bits)
            evs[i] = resultingEvs;
    }

    if (species == SPECIES_SHEDINJA)
    {
        stats[STAT_HP] = 1;
    }
    else
    {
        s32 n = 2 * gBaseStats[species].baseHP;
        stats[STAT_HP] = (((n + ivs + evs[STAT_HP] / 4) * level) / 100) + level + 10;
    }

    CALC_STAT(baseAttack, STAT_ATK);
    CALC_STAT(baseDefense, STAT_DEF);
    CALC_STAT(baseSpeed, STAT_SPEED);
    CALC_STAT(baseSpAttack, STAT_SPATK);
    CALC_STAT(baseSpDefense, STAT_SPDEF);
}

#define SWAP_16(x, y)   \
{                       \
    temp = x;           \
    x = y;              \
    y = temp;           \
}

void sub_818F904(s32 id1, s32 id2, u16 *dst)
{
    s32 i;
    u16 temp;

    SWAP_16(dst[id1], dst[id2]);
    SWAP_16(gSaveBlock2Ptr->frontier.domeTrainers[id1].trainerId, gSaveBlock2Ptr->frontier.domeTrainers[id2].trainerId);

    for (i = 0; i < 3; i++)
        SWAP_16(gSaveBlock2Ptr->frontier.domeMonId[id1][i], gSaveBlock2Ptr->frontier.domeMonId[id2][i]);
}

void sub_818F9B0(void)
{
    StringCopy(gStringVar1, gRoundsStringTable[gSaveBlock2Ptr->frontier.field_CB2]);
}

void sub_818F9E0(void)
{
    StringCopy(gStringVar1, gRoundsStringTable[gSaveBlock2Ptr->frontier.field_CB2]);
    sub_8195898(gStringVar2, gTrainerBattleOpponent_A);
}

void sub_818FA20(void)
{
    gUnknown_0203CD70 = 0;
    gUnknown_0203CD74 =  GetMonData(&gPlayerParty[0], MON_DATA_MAX_HP, NULL);
    gUnknown_0203CD74 += GetMonData(&gPlayerParty[1], MON_DATA_MAX_HP, NULL);
    CalculatePlayerPartyCount();
    CreateDomeTrainerMons(TrainerIdToTournamentId(gTrainerBattleOpponent_A));
}

void CreateDomeMon(u8 monPartyId, u16 tournamentTrainerId, u8 tournamentMonId, u32 otId)
{
    s32 i;
    u8 happiness = 0xFF;
    u8 fixedIv = GetDomeTrainerMonIvs(tournamentTrainerId); // UB: Should be using trainerId instead of tournamentTrainerId. As a result, all Pokemon have ivs of 3.
    u8 level = GetFrontierEnemyMonLevel();
    CreateMonWithEVSpreadPersonalityOTID(&gEnemyParty[monPartyId],
                                         gFacilityTrainerMons[gSaveBlock2Ptr->frontier.domeMonId[tournamentTrainerId][tournamentMonId]].species,
                                         level,
                                         gFacilityTrainerMons[gSaveBlock2Ptr->frontier.domeMonId[tournamentTrainerId][tournamentMonId]].nature,
                                         fixedIv,
                                         gFacilityTrainerMons[gSaveBlock2Ptr->frontier.domeMonId[tournamentTrainerId][tournamentMonId]].evSpread, otId);

    happiness = 0xFF;
    for (i = 0; i < 4; i++)
    {
        SetMonMoveSlot(&gEnemyParty[monPartyId],
                       gFacilityTrainerMons[gSaveBlock2Ptr->frontier.domeMonId[tournamentTrainerId][tournamentMonId]].moves[i], i);
        if (gFacilityTrainerMons[gSaveBlock2Ptr->frontier.domeMonId[tournamentTrainerId][tournamentMonId]].moves[i] == MOVE_FRUSTRATION)
            happiness = 0;
    }

    SetMonData(&gEnemyParty[monPartyId], MON_DATA_FRIENDSHIP, &happiness);
    SetMonData(&gEnemyParty[monPartyId], MON_DATA_HELD_ITEM,
               &gBattleFrontierHeldItems[gFacilityTrainerMons[gSaveBlock2Ptr->frontier.domeMonId[tournamentTrainerId][tournamentMonId]].itemTableId]);
}

void CreateDomeTrainerMons(u16 tournamentTrainerId)
{
    u8 monsCount = 0;
    u32 otId = 0;
    s32 i, bits;

    ZeroEnemyPartyMons();
    bits = sub_818FC78(tournamentTrainerId);
    otId = Random32();
    if (Random() % 10 > 5)
    {
        for (i = 0; i < 3; i++)
        {
            if (bits & 1)
            {
                CreateDomeMon(monsCount, tournamentTrainerId, i, otId);
                monsCount++;
            }
            bits >>= 1;
        }
    }
    else
    {
        for (i = 2; i >= 0; i--)
        {
            if (bits & 4)
            {
                CreateDomeMon(monsCount, tournamentTrainerId, i, otId);
                monsCount++;
            }
            bits <<= 1;
        }
    }
}

s32 sub_818FC78(u16 tournamentTrainerId)
{
    s32 bits;
    if (Random() & 1)
    {
        bits = sub_818FCBC(tournamentTrainerId, FALSE);
        if (bits == 0)
            bits = sub_818FDB8(tournamentTrainerId, TRUE);
    }
    else
    {
        bits = sub_818FDB8(tournamentTrainerId, FALSE);
        if (bits == 0)
            bits = sub_818FCBC(tournamentTrainerId, TRUE);
    }

    return bits;
}

s32 sub_818FCBC(u16 tournamentTrainerId, bool8 arg1)
{
    s32 i, moveId, playerMonId;
    s32 array[3];

    for (i = 0; i < 3; i++)
    {
        array[i] = 0;
        for (moveId = 0; moveId < 4; moveId++)
        {
            for (playerMonId = 0; playerMonId < 3; playerMonId++)
            {
                if (gSaveBlock2Ptr->frontier.domeTrainers[tournamentTrainerId].trainerId == TRAINER_FRONTIER_BRAIN)
                {
                    array[i] += sub_818FFC0(sub_81A5060(i, moveId),
                                            GetMonData(&gPlayerParty[playerMonId], MON_DATA_SPECIES, NULL), 0);
                }
                else
                {
                    array[i] += sub_818FFC0(gFacilityTrainerMons[gSaveBlock2Ptr->frontier.domeMonId[tournamentTrainerId][i]].moves[moveId],
                                            GetMonData(&gPlayerParty[playerMonId], MON_DATA_SPECIES, NULL), 0);
                }
            }
        }
    }
    return sub_818FEB4(array, arg1);
}

s32 sub_818FDB8(u16 tournamentTrainerId, bool8 arg1)
{
    s32 i, moveId, playerMonId;
    s32 array[3];

    for (i = 0; i < 3; i++)
    {
        array[i] = 0;
        for (moveId = 0; moveId < 4; moveId++)
        {
            for (playerMonId = 0; playerMonId < 3; playerMonId++)
            {
                if (gSaveBlock2Ptr->frontier.domeTrainers[tournamentTrainerId].trainerId == TRAINER_FRONTIER_BRAIN)
                {
                    array[i] += sub_818FFC0(sub_81A5060(i, moveId),
                                            GetMonData(&gPlayerParty[playerMonId], MON_DATA_SPECIES, NULL), 1);
                }
                else
                {
                    array[i] += sub_818FFC0(gFacilityTrainerMons[gSaveBlock2Ptr->frontier.domeMonId[tournamentTrainerId][i]].moves[moveId],
                                            GetMonData(&gPlayerParty[playerMonId], MON_DATA_SPECIES, NULL), 1);
                }
            }
        }
    }
    return sub_818FEB4(array, arg1);
}

s32 sub_818FEB4(s32 *arr, bool8 arg1)
{
    s32 i, j;
    s32 bits = 0;
    s32 array[3];

    for (i = 0; i < 3; i++)
        array[i] = i;

    if (arr[0] == arr[1] && arr[0] == arr[2])
    {
        if (arg1)
        {
            i = 0;
            while (i != 2)
            {
                u32 rand = Random() & 3;
                if (rand != 3 && !(bits & gBitTable[rand]))
                {
                    bits |= gBitTable[rand];
                    i++;
                }
            }
        }
    }
    else
    {
        for (i = 0; i < 2; i++)
        {
            for (j = i + 1; j < 3; j++)
            {
                s32 temp;

                if (arr[i] < arr[j])
                {
                    temp = arr[i];
                    arr[i] = arr[j];
                    arr[j] = temp;

                    temp = array[i];
                    array[i] = array[j];
                    array[j] = temp;
                }

                if (arr[i] == arr[j] && (Random() & 1))
                {
                    temp = arr[i];
                    arr[i] = arr[j];
                    arr[j] = temp;

                    temp = array[i];
                    array[i] = array[j];
                    array[j] = temp;
                }
            }
        }

        for (i = 0; i < 2; i++)
        {
            bits |= gBitTable[array[i]];
        }
    }

    return bits;
}

s32 sub_818FFC0(s32 move, s32 species, s32 arg2)
{
    s32 type1, type2, ability, moveType;
    s32 i = 0;
    s32 typePower = 20;

    if (move == MOVE_NONE || move == 0xFFFF || gBattleMoves[move].power == 0)
        return 0;

    type1 = gBaseStats[species].type1;
    type2 = gBaseStats[species].type2;
    ability = gBaseStats[species].ability1;
    moveType = gBattleMoves[move].type;

    if (ability == ABILITY_LEVITATE && moveType == TYPE_GROUND)
    {
        if (arg2 == 1)
            typePower = 8;
    }
    else
    {
        while (gTypeEffectiveness[i + 0] != TYPE_ENDTABLE)
        {
            if (gTypeEffectiveness[i + 0] == TYPE_FORESIGHT)
            {
                i += 3;
            }
            else
            {
                u8 val = gTypeEffectiveness[i + 0];
                if (val == moveType)
                {
                    // BUG: * 2 is not necessary and makes the condition always false if the ability is wonder guard.
                    if (gTypeEffectiveness[i + 1] == type1 && (ability != ABILITY_WONDER_GUARD || gTypeEffectiveness[i + 2] == TYPE_MUL_SUPER_EFFECTIVE * 2))
                        typePower = (gTypeEffectiveness[i + 2] * typePower) / 10;
                    if (gTypeEffectiveness[i + 1] == type2 && type1 != type2 && (ability != ABILITY_WONDER_GUARD || gTypeEffectiveness[i + 2] == TYPE_MUL_SUPER_EFFECTIVE * 2))
                        typePower = (gTypeEffectiveness[i + 2] * typePower) / 10;
                }
                i += 3;
            }
        }
    }

    switch (arg2)
    {
    case 0:
        switch (typePower)
        {
        case 10:
        case 5:
        case 0:
        default:
            typePower = 0;
            break;
        case 20:
            typePower = 2;
            break;
        case 40:
            typePower = 4;
            break;
        case 80:
            typePower = 8;
            break;
        }
        break;
    case 1:
        switch (typePower)
        {
        default:
        case 20:
            typePower = 0;
            break;
        case 5:
            typePower = 4;
            break;
        case 0:
            typePower = 8;
            break;
        case 10:
            typePower = 2;
            break;
        case 40:
            typePower = -2;
            break;
        case 80:
            typePower = -4;
            break;
        }
        break;
    case 2:
        switch (typePower)
        {
        case 0:
            typePower = -16;
            break;
        case 5:
            typePower = -8;
            break;
        case 10:
        default:
            typePower = 0;
            break;
        case 20:
            typePower = 4;
            break;
        case 40:
            typePower = 12;
            break;
        case 80:
            typePower = 20;
            break;
        }
        break;
    }

    return typePower;
}