/**
 * @file d_a_e_tk.cpp
 *
 */

#include "d/dolzel_rel.h"  // IWYU pragma: keep

#include "d/actor/d_a_e_tk.h"
#include "d/actor/d_a_e_tk_ball.h"
#include "d/d_com_inf_game.h"
#include "d/d_s_play.h"
#include "f_op/f_op_kankyo_mng.h"

enum Action {
    /* 0x0 */ ACT_TK_WAIT,
    /* 0x1 */ ACT_TK_FIND,
    /* 0x2 */ ACT_TK_ATTACK,
    /* 0x5 */ ACT_TK_PATHSWIM = 0x5,
    /* 0x9 */ ACT_TK_S_DAMAGE = 0x9,
    /* 0xA */ ACT_TK_DAMAGE,
};

enum Animation {
    /* 0x4 */ ANM_TK_APPEAR = 0x4,
    /* 0x5 */ ANM_TK_ATTACK,
    /* 0x6 */ ANM_TK_DAMAGE,
    /* 0x7 */ ANM_TK_HIDE,
    /* 0x8 */ ANM_TK_KYORO2,
    /* 0x9 */ ANM_TK_SWIM,
    /* 0xA */ ANM_TK_WAIT01,
};

enum Mode {  // Not sure if these are correct...
    /* 0x0 */ MODE_TK_NONE,
    /* 0x1 */ MODE_TK_APPEAR,
    /* 0x2 */ MODE_TK_ATTACK,
    /* 0x3 */ MODE_TK_DAMAGE,
    /* 0x4 */ MODE_TK_HIDE,
    /* 0xA */ MODE_TK_KYORO2 = 0xA,
    /* 0xB */ MODE_TK_SWIM,
    /* 0xC */ MODE_TK_WAIT01,
};

static bool hio_set;

static daE_TK_HIO_c l_HIO;

daE_TK_HIO_c::daE_TK_HIO_c() {
    mNo = -1;
    mBaseSize = 1.9f;
    mPlayerDetectionDistanceFar = 1400.0f;
    mPlayerDetectionDistanceNear = 500.0f;
    mSwimSpeedModifier = 10.0f;
    mFleeSpeedModifier = 25.0f;
}

#if DEBUG
void daE_TK_HIO_c::genMessage(JORMContext* ctext) {
    // Tadpole
    ctext->genLabel("  タドポール", 0x80000001, 0U, NULL);
    // Base Size
    ctext->genSlider("基本サイズ", &mBaseSize, 0.0f, 5.0f);
    // Player Detection Distance Far
    ctext->genSlider("PL認識距離　遠", &mPlayerDetectionDistanceFar, 0.0f, 3000.0f);
    // Player Detection Distance Near
    ctext->genSlider("PL認識距離　近", &mPlayerDetectionDistanceNear, 0.0f, 3000.0f);
    ctext->genLabel("  ", 0x80000001);
    // ↓ Behavior not guaranteed if changed
    ctext->genLabel("  ↓変更すると動作保証しません", 0x80000001);
    // Swim Speed
    ctext->genSlider("泳ぎ速度", &mSwimSpeedModifier, 0.0f, 40.0f);
    // Flee Speed
    ctext->genSlider("逃げ速度", &mFleeSpeedModifier, 0.0f, 40.0f);
}
#endif

static void anm_init(e_tk_class* i_this, int i_index, f32 i_morf, u8 i_attr, f32 i_rate) {
    i_this->mpMorf->setAnm((J3DAnmTransform*)dComIfG_getObjectRes("E_tk", i_index), i_attr, i_morf,
                           i_rate, 0.0f, -1.0f);
    i_this->mAnim = i_index;
}

static int daE_TK_Draw(e_tk_class* i_this) {
    fopAc_ac_c* actor = i_this;
    J3DModel* model = i_this->mpMorf->getModel();

    g_env_light.settingTevStruct(0, &actor->current.pos, &actor->tevStr);
    g_env_light.setLightTevColorType_MAJI(model, &actor->tevStr);
    i_this->mpMorf->entryDL();
    return 1;
}

static int other_bg_check(e_tk_class* i_this, fopAc_ac_c* i_ac) {
    fopAc_ac_c* actor = i_this;
    dBgS_LinChk line_check;
    cXyz _unk1;
    cXyz start_pos;
    cXyz end_pos;

    end_pos = i_ac->current.pos;
    end_pos.y += 100.0f;
    start_pos = actor->current.pos;
    start_pos.y = actor->eyePos.y;

    line_check.Set(&start_pos, &end_pos, actor);

    if (dComIfG_Bgsp().LineCross(&line_check)) {
        return true;
    } else {
        return false;
    }
}

static int pl_y_check(e_tk_class* i_this) {
    fopAc_ac_c* actor = i_this;
#if DEBUG  // TODO: Debug Fakematch. On retail, actor is accessed before the gameInfo.
    fopAc_ac_c* player = dComIfGp_getPlayer(0);
    if (actor->current.pos.y - player->current.pos.y > 130.0f) {
#else
    if (actor->current.pos.y - dComIfGp_getPlayer(0)->current.pos.y > 130.0f) {
#endif
        return 0;
    } else {
        return 1;
    }
}

static int pl_check(e_tk_class* i_this, f32 i_limit, s16 i_max_diff) {
    fopAc_ac_c* actor = i_this;
    fopAc_ac_c* player = dComIfGp_getPlayer(0);

    if (i_this->mPlayerDistanceLimit < i_limit) {
        s16 diff = actor->shape_angle.y - i_this->mPlayerAngleY;
        if (diff < i_max_diff && diff > (s16)-i_max_diff && !other_bg_check(i_this, player)) {
            return 1;
        }
    }

    return 0;
}

static void damage_check(e_tk_class* i_this) {
    fopAc_ac_c* actor = i_this;
    fopAc_ac_c* player = dComIfGp_getPlayer(0);

    if (i_this->mInvincibilityTimer == 0) {
        i_this->mStts.Move();

        if (i_this->mSph.ChkTgHit()) {
            i_this->mAtInfo.mpCollider = i_this->mSph.GetTgHitObj();
            at_power_check(&i_this->mAtInfo);

            if (i_this->mAtInfo.mpCollider->ChkAtType(AT_TYPE_UNK)) {
                i_this->mInvincibilityTimer = 20;
            } else {
                i_this->mInvincibilityTimer = 10;
            }

            if (i_this->mAtInfo.mpCollider->ChkAtType(AT_TYPE_HOOKSHOT)) {
                i_this->mAction = ACT_TK_FIND;
                i_this->mMode = MODE_TK_KYORO2;
                i_this->mActionTimer[0] = 50;
            } else {
                cc_at_check(actor, &i_this->mAtInfo);
                if (i_this->mAtInfo.mHitType == HIT_TYPE_STUN) {
                    i_this->mAction = ACT_TK_S_DAMAGE;
                } else {
                    i_this->mAction = ACT_TK_DAMAGE;
                }
                i_this->mMode = MODE_TK_NONE;
            }
        }

        if (actor->health <= 1) {
            actor->health = 0;
            i_this->mSph.SetTgHitMark(CcG_Tg_UNK_MARK_3);
        }
    }
}

static int way_bg_check(e_tk_class* i_this, f32 i_limit) {
    fopAc_ac_c* actor = i_this;
    dBgS_LinChk line_check;

    cXyz mtx_pos;
    cXyz start_pos;
    cXyz end_pos;
    start_pos = actor->current.pos;
    start_pos.y -= 50.0f;

    cMtx_YrotS(*calc_mtx, actor->shape_angle.y);

    mtx_pos.x = 0.0;
    mtx_pos.y = -50.0f;
    mtx_pos.z = i_limit;

    MtxPosition(&mtx_pos, &end_pos);
    end_pos += actor->current.pos;

    line_check.Set(&start_pos, &end_pos, actor);
    if (dComIfG_Bgsp().LineCross(&line_check)) {
        return 1;
    } else {
        return 0;
    }
}

static void e_tk_wait_0(e_tk_class* i_this) {
    fopAc_ac_c* actor = i_this;

    cXyz src_pos;
    f32 speed_mul = 1.0f;
    f32 speed_step = 1.0f + YREG_F(5);

    i_this->mAttentionOFF = true;

    switch (i_this->mMode) {
    case MODE_TK_NONE:
        anm_init(i_this, ANM_TK_SWIM, 5.0f, 0x2, 1.0f);
        i_this->mMode = MODE_TK_APPEAR;
        break;

    case MODE_TK_APPEAR:
        if (i_this->mActionTimer[0] == 0) {
            src_pos = actor->home.pos - actor->current.pos;
            i_this->mSomeAngle = cM_atan2s(src_pos.x, src_pos.z) + (s16)cM_rndFX(8000.0f);
            i_this->mActionTimer[0] = cM_rndF(30.0f) + 30.0f;
        }

        if (i_this->mActionTimer[2] == 0 && way_bg_check(i_this, 200.0f)) {
            i_this->mActionTimer[2] = 40;
            src_pos = actor->home.pos - actor->current.pos;
            i_this->mSomeAngle = cM_atan2s(src_pos.x, src_pos.z) + (s16)cM_rndFX(2000.0f);
            i_this->mActionTimer[0] = cM_rndF(30.0f) + 30.0f;
        }

        if (i_this->mActionTimer[1] == 0 && pl_y_check(i_this) &&
            pl_check(i_this, l_HIO.mPlayerDetectionDistanceFar, 0x4000))
        {
            i_this->mAction = ACT_TK_FIND;
            if (pl_check(i_this, l_HIO.mPlayerDetectionDistanceNear, 0x4000)) {
                i_this->mMode = MODE_TK_WAIT01;
            } else {
                i_this->mMode = MODE_TK_NONE;
            }
        }
        break;
    }

    cLib_addCalcAngleS2(&actor->shape_angle.y, i_this->mSomeAngle, 0x10, 0x400);
    cLib_addCalcAngleS2(&actor->shape_angle.x, 0, 0x10, 0x400);
    cLib_addCalc2(&actor->speedF, l_HIO.mSwimSpeedModifier * speed_mul, 1.0f, speed_step);
    cMtx_YrotS(*calc_mtx, actor->shape_angle.y);

    src_pos.x = 0.0f;
    src_pos.y = 0.0f;
    src_pos.z = actor->speedF;
    MtxPosition(&src_pos, &actor->speed);
    actor->current.pos += actor->speed;
}

static void e_tk_find(e_tk_class* i_this) {
    fopAc_ac_c* actor = i_this;

    cXyz local_58;
    f32 speed_target = 0.0f;
    f32 speed_step = 3.0f;

    switch (i_this->mMode) {
    case MODE_TK_NONE:
        anm_init(i_this, ANM_TK_APPEAR, 3.0f, 0x0, 1.0f);
        i_this->mMode = MODE_TK_APPEAR;
        break;

    case MODE_TK_APPEAR:
        if (i_this->mpMorf->isStop()) {
            anm_init(i_this, ANM_TK_WAIT01, 3.0f, 0x2, 1.0f);
            i_this->mMode = MODE_TK_ATTACK;
            i_this->mActionTimer[0] = cM_rndF(10.0f) + 10.0f;
        }
        break;

    case MODE_TK_ATTACK:
        if (i_this->mActionTimer[0] == 0) {
            i_this->mAction = ACT_TK_ATTACK;
            i_this->mMode = MODE_TK_NONE;
        } else {
            if (pl_check(i_this, l_HIO.mPlayerDetectionDistanceNear, 0x4000)) {
                i_this->mMode = MODE_TK_KYORO2;
            }
        }
        break;

    case MODE_TK_DAMAGE:
        anm_init(i_this, ANM_TK_HIDE, 3.0f, 0x0, 1.0f);
        i_this->mMode = MODE_TK_HIDE;
        break;

    case MODE_TK_HIDE:
        i_this->mAttentionOFF = true;
        if (i_this->mpMorf->isStop()) {
            if (i_this->mPathLoaded) {
                i_this->mAction = ACT_TK_PATHSWIM;
                i_this->mMode = MODE_TK_NONE;
            } else {
                i_this->mAction = ACT_TK_WAIT;
                i_this->mMode = MODE_TK_NONE;
                i_this->mActionTimer[0] = 0;
                i_this->mActionTimer[1] = cM_rndF(30.0f) + 30.0f;
            }
        }
        break;

    case MODE_TK_KYORO2:
        anm_init(i_this, ANM_TK_HIDE, 3.0f, 0x0, 3.0f);
        i_this->mMode = MODE_TK_SWIM;
        break;

    case MODE_TK_SWIM:
        ANGLE_ADD(i_this->mPlayerAngleY, 0x8000);
        i_this->mAttentionOFF = true;
        if (i_this->mpMorf->isStop()) {
            i_this->mAnimSpeed = 4.0f;
            anm_init(i_this, ANM_TK_SWIM, 0.0f, 0x2, i_this->mAnimSpeed);
            i_this->mMode = MODE_TK_WAIT01;
        }
        break;

    case MODE_TK_WAIT01:
        i_this->mAttentionOFF = true;
        cLib_addCalc2(&i_this->mAnimSpeed, 2.0f, 1.0f, 0.15f);
        i_this->mpMorf->setPlaySpeed(i_this->mAnimSpeed);
        speed_target = 1.0f + YREG_F(17);
        speed_step = 10.0f + YREG_F(18);
        if (i_this->mActionTimer[0] == 0 &&
            i_this->mPlayerDistanceLimit > l_HIO.mPlayerDetectionDistanceNear * 1.2f)
        {
            i_this->mMode = MODE_TK_NONE;
        } else {
            if (i_this->mActionTimer[1] == 0 && i_this->mAcch.ChkWallHit()) {
                i_this->mActionTimer[1] = cM_rndF(10.0f) + 20.0f;
                i_this->mSomeAngle = i_this->mPlayerAngleY + (s16)cM_rndFX(8000.0f);
            }
        }
        if (i_this->mActionTimer[1] == 0) {
            ANGLE_ADD(i_this->mPlayerAngleY, 0x8000);
        } else {
            i_this->mPlayerAngleY = i_this->mSomeAngle;
        }
        break;
    }

    cLib_addCalcAngleS2(&actor->shape_angle.y, i_this->mPlayerAngleY, 4, 0x800);
    cLib_addCalc2(&actor->speedF, l_HIO.mFleeSpeedModifier * speed_target, 1.0f, speed_step);
    cMtx_YrotS(*calc_mtx, actor->shape_angle.y);

    local_58.x = 0.0f;
    local_58.y = 0.0f;
    local_58.z = actor->speedF;
    MtxPosition(&local_58, &actor->speed);
    actor->current.pos += actor->speed;
    cLib_addCalcAngleS2(&actor->shape_angle.x, 0, 4, 0x400);
}

static void e_tk_attack(e_tk_class* i_this) {
    fopAc_ac_c* actor = i_this;

    switch (i_this->mMode) {
    case MODE_TK_NONE:
        i_this->mMode = MODE_TK_APPEAR;
        anm_init(i_this, ANM_TK_ATTACK, 3.0f, 0x0, 1.0f);
        break;

    case MODE_TK_APPEAR:
        if (pl_y_check(i_this)) {
            if ((int)i_this->mpMorf->getFrame() == 24) {
                i_this->mBallID =
                    fopAcM_createChild(PROC_E_TK_BALL, fopAcM_GetID(actor), 0, &actor->eyePos,
                                       fopAcM_GetRoomNo(actor), &actor->shape_angle, 0, -1, 0);
            }
            if ((int)i_this->mpMorf->getFrame() == 28) {
                i_this->mTKBallSpawned = true;
            }
        }
        if (i_this->mpMorf->isStop()) {
            anm_init(i_this, ANM_TK_WAIT01, 1.0f, 0x2, 1.0f);
            i_this->mActionTimer[0] = cM_rndF(30.0f) + 60.0f;
            i_this->mMode = MODE_TK_ATTACK;
        }
        break;

    case MODE_TK_ATTACK:
        if (!pl_y_check(i_this) || i_this->mActionTimer[0] == 0) {
            i_this->mAction = ACT_TK_FIND;
            i_this->mMode = MODE_TK_DAMAGE;
        }
        if (pl_check(i_this, l_HIO.mPlayerDetectionDistanceNear, 0x4000)) {
            i_this->mAction = ACT_TK_FIND;
            i_this->mMode = MODE_TK_KYORO2;
        }
        break;
    }

    cLib_addCalcAngleS2(&actor->shape_angle.y, i_this->mPlayerAngleY, 4, 0x800);
}

static void e_tk_pathswim(e_tk_class* i_this) {
    fopAc_ac_c* actor = i_this;

    cXyz local_50;
    cXyz _unk1;

    f32 speed_target = 1.0f;
    f32 speed_step = 1.0f + YREG_F(5);
    switch (i_this->mMode) {
    case MODE_TK_NONE:
        anm_init(i_this, ANM_TK_SWIM, 5.0f, 0x2, 1.0f);
        i_this->mMode = MODE_TK_APPEAR;
        /* [[fallthrough]] */;

    case MODE_TK_APPEAR: {
        i_this->mPathID += i_this->mPathDirection;
        if (i_this->mPathID >= (u8)i_this->mpPath->m_num) {
            if (dPath_ChkClose(i_this->mpPath)) {
                i_this->mPathID = 0x0;
            } else {
                i_this->mPathDirection = -1;
                i_this->mPathID = i_this->mpPath->m_num - 0x2;
            }
        } else if (i_this->mPathID < 0x0) {
            i_this->mPathDirection = 1;
            i_this->mPathID = 0x1;
        }

        dPnt* point = i_this->mpPath->m_points;
        point += i_this->mPathID;
        i_this->mPos.x = point->m_position.x + cM_rndFX(100.0f);
        i_this->mPos.z = point->m_position.z + cM_rndFX(100.0f);
        i_this->mMode = MODE_TK_ATTACK;
        break;
    }

    case MODE_TK_ATTACK:
        local_50 = i_this->mPos - actor->current.pos;
        if (JMAFastSqrt(local_50.x * local_50.x + local_50.z * local_50.z) < 100.0f) {
            dPnt* point = &i_this->mpPath->m_points[i_this->mPathID];
            if (point->mArg0 != 0x2) {
                anm_init(i_this, ANM_TK_KYORO2, 5.0, 0x2, 1.0);
                i_this->mActionTimer[0] = cM_rndF(60.0f) + 50.0f;
                i_this->mActionTimer[1] = 20;
                i_this->mMode = MODE_TK_DAMAGE;
            } else {
                i_this->mMode = MODE_TK_APPEAR;
            }
        }
        i_this->mSomeAngle = (s16)cM_atan2s(local_50.x, local_50.z);
        break;

    case MODE_TK_DAMAGE:
        speed_target = 0.0f;
        speed_step = 3.0f;
        dPnt* point;
        if (i_this->mActionTimer[1] == 0 && pl_y_check(i_this) &&
            pl_check(i_this, l_HIO.mPlayerDetectionDistanceFar, 0x4000))
        {
            i_this->mAction = ACT_TK_FIND;
            anm_init(i_this, ANM_TK_WAIT01, 5.0f, 0x2, 1.0f);
            i_this->mMode = MODE_TK_ATTACK;
            i_this->mActionTimer[0] = cM_rndF(20.0f) + 20.0f;
        }
        if (i_this->mActionTimer[0] == 0) {
            i_this->mMode = MODE_TK_NONE;
        }
        break;
    }

    cLib_addCalcAngleS2(&actor->shape_angle.y, i_this->mSomeAngle, 8, 0x400);
    cLib_addCalc2(&actor->speedF, l_HIO.mSwimSpeedModifier * speed_target, 1.0f, speed_step);
    cMtx_YrotS(*calc_mtx, actor->shape_angle.y);

    local_50.x = 0.0f;
    local_50.y = 0.0f;
    local_50.z = actor->speedF;
    MtxPosition(&local_50, &actor->speed);
    actor->current.pos += actor->speed;
}

static void e_tk_s_damage(e_tk_class* i_this) {
    fopAc_ac_c* actor = i_this;

    switch (i_this->mMode) {
    case MODE_TK_NONE:
        anm_init(i_this, ANM_TK_DAMAGE, 2.0f, 0x0, 1.0f);
        i_this->mMode = MODE_TK_APPEAR;
        break;

    case MODE_TK_APPEAR:
        if (i_this->mpMorf->getFrame() > 10.0f + YREG_F(3)) {
            i_this->mAction = ACT_TK_FIND;
            i_this->mMode = MODE_TK_DAMAGE;
        }
        break;
    }
}

static void e_tk_damage(e_tk_class* i_this) {
    fopAc_ac_c* actor = i_this;

    i_this->mInvincibilityTimer = 6;
    i_this->mAttentionOFF = true;

    switch (i_this->mMode) {
    case MODE_TK_NONE:
        anm_init(i_this, ANM_TK_DAMAGE, 2.0f, 0x0, 1.0f);
        i_this->mMode = MODE_TK_APPEAR;
        break;

    case MODE_TK_APPEAR:
        if (i_this->mpMorf->isStop()) {
            fopAcM_createDisappear(actor, &actor->eyePos, 10, 0, 0x11);
            fopAcM_delete(actor);
        }
        break;
    }
}

static void action(e_tk_class* i_this) {
    fopAc_ac_c* actor = i_this;

    cXyz _unk1;
    cXyz _unk2;

    i_this->mPlayerAngleY = fopAcM_searchPlayerAngleY(actor);
    i_this->mPlayerDistanceLimit = fopAcM_searchPlayerDistance(actor);
    damage_check(i_this);

    s8 link_search_flag = false;
    switch (i_this->mAction) {
    case ACT_TK_WAIT:
        e_tk_wait_0(i_this);
        break;
    case ACT_TK_FIND:
        e_tk_find(i_this);
        link_search_flag = true;
        break;
    case ACT_TK_ATTACK:
        e_tk_attack(i_this);
        link_search_flag = true;
        break;
    case ACT_TK_PATHSWIM:
        e_tk_pathswim(i_this);
        break;
    case ACT_TK_S_DAMAGE:
        e_tk_s_damage(i_this);
        break;
    case ACT_TK_DAMAGE:
        e_tk_damage(i_this);
        break;
    }

    if (link_search_flag) {
        i_this->mSound.setLinkSearch(true);
    } else {
        i_this->mSound.setLinkSearch(false);
    }

    if (actor->speedF < 2.0f) {
        cXyz this_pos = actor->current.pos;
        f32 emit_rate = 0.05f + KREG_F(3);
        fopAcM_effHamonSet(&i_this->mHamonSet, &this_pos, 2.3f + KREG_F(2), emit_rate);
    }
}

static int daE_TK_Execute(e_tk_class* i_this) {
    fopAc_ac_c* actor = i_this;

    cXyz cStack_94;
    cXyz cStack_a0;

    if (i_this->mExecuteState == 0x00) {
        dBgS_ObjGndChk_Spl ground_check;
        cStack_94 = actor->current.pos;
        cStack_94.y += 200.0f;
        ground_check.SetPos(&cStack_94);
        f32 ground_cross = dComIfG_Bgsp().GroundCross(&ground_check);
        actor->current.pos.y = ground_cross + KREG_F(17);
    }
    i_this->mLifetime++;
    i_this->mAttentionOFF = false;

    for (int i = 0; i < 4; i++) {
        (void)i;  // Debug Fakematch: Force i into register.
        if (i_this->mActionTimer[i] != 0) {
            i_this->mActionTimer[i]--;
        }
    }

    if (i_this->mInvincibilityTimer != 0) {
        i_this->mInvincibilityTimer--;
    }
    action(i_this);
    i_this->mAcch.CrrPos(dComIfG_Bgsp());

    mDoMtx_stack_c::transS(actor->current.pos.x, actor->current.pos.y, actor->current.pos.z);
    mDoMtx_stack_c::YrotM(actor->shape_angle.y);
    mDoMtx_stack_c::XrotM(actor->shape_angle.x);
    mDoMtx_stack_c::scaleM(l_HIO.mBaseSize, l_HIO.mBaseSize, l_HIO.mBaseSize);

    J3DModel* model = i_this->mpMorf->getModel();
    model->setBaseTRMtx(mDoMtx_stack_c::get());

    i_this->mpMorf->play(0, dComIfGp_getReverb(fopAcM_GetRoomNo(actor)));

    if (i_this->mpMorf->checkFrame(6.0f) &&
        (i_this->mAnim == ANM_TK_APPEAR || i_this->mAnim == ANM_TK_HIDE))
    {
        fopKyM_createWpillar(&actor->current.pos, 2.3f + KREG_F(6), 0);
    }

    if (i_this->mAnim == ANM_TK_SWIM) {
        if (i_this->mpMorf->checkFrame(0.0f) || i_this->mpMorf->checkFrame(6.0f) ||
            i_this->mpMorf->checkFrame(12.0f) || i_this->mpMorf->checkFrame(18.0f) ||
            i_this->mpMorf->checkFrame(24.0f))
        {
            i_this->mSound.startCreatureSound(Z2SE_EN_TK_SWIM, 0, -1);
        }
    } else if (i_this->mAnim == ANM_TK_APPEAR) {
        if (i_this->mpMorf->checkFrame(5.0f)) {
            i_this->mSound.startCreatureSound(Z2SE_EN_TK_APPEAR, 0, -1);
        } else if (i_this->mpMorf->checkFrame(20.0f)) {
            i_this->mSound.startCreatureSound(Z2SE_EN_TK_APPEAR2, 0, -1);
        }
    } else if (i_this->mAnim == ANM_TK_HIDE) {
        if (i_this->mpMorf->checkFrame(6.0f)) {
            i_this->mSound.startCreatureSound(Z2SE_EN_TK_HIDE, 0, -1);
        }
    } else if (i_this->mAnim == ANM_TK_ATTACK) {
        if (i_this->mpMorf->checkFrame(1.0f)) {
            i_this->mSound.startCreatureVoice(Z2SE_EN_TK_V_ATTACK, -1);
        } else if (i_this->mpMorf->checkFrame(27.0f)) {
            i_this->mSound.startCreatureSound(Z2SE_EN_TK_ATTACK, 0, -1);
        }
    } else if (i_this->mAnim == ANM_TK_DAMAGE) {
        if (i_this->mpMorf->checkFrame(1.0f)) {
            i_this->mSound.startCreatureVoice(Z2SE_EN_TK_V_DAMAGE, -1);
        }
    } else if (i_this->mAnim == ANM_TK_WAIT01) {
        if (i_this->mpMorf->checkFrame(1.0f)) {
            i_this->mSound.startCreatureVoice(Z2SE_EN_TK_V_WAIT, -1);
        }
    } else if (i_this->mAnim == ANM_TK_KYORO2) {
        if (i_this->mpMorf->checkFrame(1.0f) || i_this->mpMorf->checkFrame(30.0f)) {
            i_this->mSound.startCreatureVoice(Z2SE_EN_TK_KYORO, -1);
        }
    }
    i_this->mpMorf->modelCalc();

    MTXCopy(model->getAnmMtx(3), *calc_mtx);

    cStack_94.set(0.0f, 0.0f, 0.0f);
    MtxPosition(&cStack_94, &actor->eyePos);

    actor->attention_info.position = actor->eyePos;
    actor->attention_info.position.y = actor->attention_info.position.y + l_HIO.mBaseSize * 35.0f;

    if (i_this->mTKBallSpawned) {
        e_tk_ball_class* ball_actor =
            static_cast<e_tk_ball_class*>(fopAcM_SearchByID(i_this->mBallID));
        if (ball_actor != NULL) {
            ball_actor->current.pos = actor->eyePos;
            ball_actor->mSuspended = false;
        }

        cXyz scale(2.0f + TREG_F(8), 2.0f + TREG_F(8), 2.0f + TREG_F(8));
        dComIfGp_particle_set(0x819B, &actor->eyePos, &actor->shape_angle, &scale);
        dComIfGp_particle_set(0x819C, &actor->eyePos, &actor->shape_angle, &scale);
        i_this->mTKBallSpawned = false;
    }

    if (i_this->mAttentionOFF) {
        fopAcM_OffStatus(actor, 0);
        actor->attention_info.flags = 0;
    } else {
        fopAcM_OnStatus(actor, 0);
        actor->attention_info.flags = fopAc_AttnFlag_BATTLE_e;
    }

    MTXCopy(model->getAnmMtx(2), *calc_mtx);
    cStack_94.set(0.0f, 0.0f, 0.0f);

    MtxPosition(&cStack_94, &cStack_a0);
    i_this->mSph.SetC(cStack_a0);
    i_this->mSph.SetR((50.0f + JREG_F(3)) * l_HIO.mBaseSize);

    dComIfG_Ccsp()->Set(&i_this->mSph);

    return 1;
}

static int daE_TK_IsDelete(e_tk_class* i_this) {
    return 1;
}

static int daE_TK_Delete(e_tk_class* i_this) {
    fopAc_ac_c* actor = i_this;

    fopAcM_RegisterDeleteID(i_this, "E_TK");

    dComIfG_resDelete(&i_this->mPhaseReq, "E_tk");
    if (i_this->mInitHIO) {
        hio_set = false;
        mDoHIO_DELETE_CHILD(l_HIO.mNo);
    }
    if (actor->heap != NULL) {
        i_this->mpMorf->stopZelAnime();
    }
    return 1;
}

static int useHeapInit(fopAc_ac_c* actor) {
    e_tk_class* i_this = static_cast<e_tk_class*>(actor);

    i_this->mpMorf =
        new mDoExt_McaMorfSO((J3DModelData*)dComIfG_getObjectRes("E_tk", 0xE), NULL, NULL,
                             (J3DAnmTransform*)dComIfG_getObjectRes("E_tk", ANM_TK_SWIM), 2, 1.0f,
                             0, -1, &i_this->mSound, 0x80000, 0x11000084);

    if (i_this->mpMorf == NULL || i_this->mpMorf->getModel() == NULL) {
        return 0;
    }

    return 1;
}

static int daE_TK_Create(fopAc_ac_c* actor) {
    e_tk_class* i_this = (e_tk_class*)actor;
    fopAcM_ct(i_this, e_tk_class);

    cPhs_Step phase = dComIfG_resLoad(&i_this->mPhaseReq, "E_tk");
    if (phase == cPhs_COMPLEATE_e) {
        OS_REPORT("E_tk PARAM %x\n", fopAcM_GetParam(actor));
        i_this->mArg0 = (fopAcM_GetParam(actor) & 0xFF) >> 0;
        i_this->mArg1 = (fopAcM_GetParam(actor) & 0xF00) >> 8;
        i_this->mArg2 = (fopAcM_GetParam(actor) & 0xF000) >> 12;
        i_this->mParamPathIdx = (fopAcM_GetParam(actor) & 0xFF0000) >> 16;

        OS_REPORT("E_tk//////////////E_TK SET 1 !!\n");

        if (!fopAcM_entrySolidHeap(actor, useHeapInit, 0x1e20)) {
            OS_REPORT("//////////////E_TK SET NON !!\n");
            return cPhs_ERROR_e;
        }

        OS_REPORT("//////////////E_TK SET 2 !!\n");

        if (i_this->mParamPathIdx != 0xff) {
            i_this->mpPath = dPath_GetRoomPath(i_this->mParamPathIdx, fopAcM_GetRoomNo(actor));
            if (i_this->mpPath == NULL) {
                OS_REPORT("//////////////E_TK NON PATH !!!\n");
                return cPhs_ERROR_e;
            }
            i_this->mPathLoaded = i_this->mParamPathIdx + 0x1;
            i_this->mPathDirection = 0x1;
            i_this->mAction = ACT_TK_PATHSWIM;
        }
        if (hio_set == false) {
            i_this->mInitHIO = true;
            hio_set = true;
            l_HIO.mNo = mDoHIO_CREATE_CHILD("たどぽーる", &l_HIO);  // "Tadpole"
        }
        actor->attention_info.flags = fopAc_AttnFlag_BATTLE_e;

        fopAcM_SetMtx(actor, i_this->mpMorf->getModel()->getBaseTRMtx());
        fopAcM_SetMin(actor, -100.0f, -100.0f, -100.0f);
        fopAcM_SetMax(actor, 100.0f, 100.0f, 100.0f);

        actor->attention_info.distances[fopAc_attn_BATTLE_e] = 0x04;
        actor->field_0x560 = actor->health = 10;

        static dCcD_SrcSph cc_sph_src = {
            {
                {0x0, {{0x0, 0x0, 0xd}, {0xd8fbfdff, 0x3}, 0x75}},  // mObj
                {dCcD_SE_NONE, 0x0, 0x0, 0x0, 0x0},                 // mGObjAt
                {dCcD_SE_NONE, 0x0, 0x0, 0x0, 0x2},                 // mGObjTg
                {0x0},                                              // mGObjCo
            },                                                      // mObjInf
            {
                {{0.0f, 0.0f, 0.0f}, 40.0f}  // mSph
            }  // mSphAttr
        };

        i_this->mStts.Init(100, 0, actor);
        i_this->mSph.Set(cc_sph_src);
        i_this->mSph.SetStts(&i_this->mStts);

        i_this->mAcch.Set(fopAcM_GetPosition_p(actor), fopAcM_GetOldPosition_p(actor), actor, 1,
                          &i_this->mAcchCir, fopAcM_GetSpeed_p(actor), NULL, NULL);

        i_this->mAcchCir.SetWall(-50.0f, 60.0f);
        i_this->mSound.init(&actor->current.pos, &actor->eyePos, 0x3, 0x1);
        i_this->mSound.setEnemyName("E_tk");
        i_this->mAtInfo.mpSound = &i_this->mSound;
        i_this->mExecuteState = 0x14;
        daE_TK_Execute(i_this);
    }
    return phase;
}

static actor_method_class l_daE_TK_Method = {
    (process_method_func)daE_TK_Create,  (process_method_func)daE_TK_Delete,
    (process_method_func)daE_TK_Execute, (process_method_func)daE_TK_IsDelete,
    (process_method_func)daE_TK_Draw,
};

actor_process_profile_definition g_profile_E_TK = {
    fpcLy_CURRENT_e,         // mLayerID
    7,                       // mListID
    fpcPi_CURRENT_e,         // mListPrio
    PROC_E_TK,               // mProcName
    &g_fpcLf_Method.base,    // sub_method
    sizeof(e_tk_class),      // mSize
    0,                       // mSizeOther
    0,                       // mParameters
    &g_fopAc_Method.base,    // sub_method
    149,                     // mPriority
    &l_daE_TK_Method,        // sub_method
    0x00040100,              // mStatus
    fopAc_ENEMY_e,           // mActorType
    fopAc_CULLBOX_CUSTOM_e,  // cullType
};