STEP12：敵AIの実装（HP割合で回復優先・ランダム性・防御行動）

#include "enemies.h"
#include <stdlib.h>

static int hp_ratio_percent(const Enemy* e) {
    if (e->max_hp <= 0) return 0;
    return (e->hp * 100) / e->max_hp;
}

static int has_heal_spell(const Enemy* e, int* out_index) {
    for (int i = 0; i < ENEMY_SPELL_MAX; i++) {
        if (e->spells[i].mp_cost <= 0) continue;
        if (e->spells[i].type == SPELL_HEAL) {
            if (out_index) *out_index = i;
            return 1;
        }
    }
    return 0;
}

static int has_damage_spell(const Enemy* e, int* out_index) {
    /* 複数あるならランダムで1つ選ぶ（簡易） */
    int list[ENEMY_SPELL_MAX];
    int n = 0;

    for (int i = 0; i < ENEMY_SPELL_MAX; i++) {
        if (e->spells[i].mp_cost <= 0) continue;
        if (e->spells[i].type == SPELL_DMG) {
            list[n++] = i;
        }
    }
    if (n == 0) return 0;

    if (out_index) *out_index = list[rand() % n];
    return 1;
}

/* 重み付き抽選：0..sum-1 を引いて決める */
static int pick_weighted3(int w0, int w1, int w2) {
    int sum = w0 + w1 + w2;
    if (sum <= 0) return 0;
    int r = rand() % sum;
    if (r < w0) return 0;
    r -= w0;
    if (r < w1) return 1;
    return 2;
}

EnemyAction enemies_decide_action(const Enemy* e) {
    EnemyAction a;
    a.type = EA_ATTACK;
    a.spell_index = -1;
    a.target_index = -1;

    int hp = hp_ratio_percent(e);

    /* 1) 低HPなら回復優先 */
    if (hp <= 35) {
        int heal_i = -1;
        if (has_heal_spell(e, &heal_i) && e->mp >= e->spells[heal_i].mp_cost) {
            int r = rand() % 100;

            /* 80%で回復、20%でフェイント（防御or攻撃） */
            if (r < 80) {
                a.type = EA_CAST_HEAL;
                a.spell_index = heal_i;
                return a;
            }

            /* フェイント：半々で防御/攻撃 */
            if (r < 90) {
                a.type = EA_DEFEND;
                return a;
            }

            a.type = EA_ATTACK;
            return a;
        }
        /* 回復できないなら防御寄りにする */
        if ((rand() % 100) < 35) {
            a.type = EA_DEFEND;
            return a;
        }
    }

    /* 2) 通常時：攻撃/攻撃魔法/防御を重みで選ぶ */
    int dmg_i = -1;
    int can_dmg_spell = has_damage_spell(e, &dmg_i) && (e->mp >= e->spells[dmg_i].mp_cost);

    int w_attack = 60;
    int w_spell  = can_dmg_spell ? 25 : 0;
    int w_defend = 15;

    /* 3) ランダム性：15%で重みを崩す（予測不能にする） */
    if ((rand() % 100) < 15) {
        w_attack = 45;
        w_spell  = can_dmg_spell ? 35 : 0;
        w_defend = 20;
    }

    int pick = pick_weighted3(w_attack, w_spell, w_defend);

    if (pick == 1 && can_dmg_spell) {
        a.type = EA_CAST_DAMAGE;
        a.spell_index = dmg_i;
        return a;
    }
    if (pick == 2) {
        a.type = EA_DEFEND;
        return a;
    }

    a.type = EA_ATTACK;
    return a;
}

static void enemy_take_turn(Enemy* enemy, Character party[PARTY_SIZE]) {
    EnemyAction act = enemies_decide_action(enemy);

    if (act.type == EA_DEFEND) {
        enemy->defending = 1;
        printf("%s is defending!\n", enemy->name);
        sfx_beep(0);
        return;
    }

    if (act.type == EA_CAST_HEAL) {
        Spell sp = enemy->spells[act.spell_index];
        if (enemy->mp >= sp.mp_cost) {
            enemy->mp -= sp.mp_cost;

            int before = enemy->hp;
            enemy->hp += sp.power;
            if (enemy->hp > enemy->max_hp) enemy->hp = enemy->max_hp;

            printf("%s casts %s! HP +%d\n", enemy->name, sp.name, enemy->hp - before);
            sfx_beep(2);
            return;
        }
        /* MP足りないなら通常攻撃にフォールバック */
    }

    if (act.type == EA_CAST_DAMAGE) {
        Spell sp = enemy->spells[act.spell_index];
        if (enemy->mp >= sp.mp_cost) {
            enemy->mp -= sp.mp_cost;

            int t = pick_random_alive_index(party);
            if (t >= 0) {
                int base = enemy->base_mag * sp.power - party[t].def;
                base = clamp_min(base, 1);
                int dmg = apply_variance(base);

                printf("%s casts %s!\n", enemy->name, sp.name);
                apply_damage_to_char(&party[t], dmg);
                return;
            }
        }
        /* 失敗なら通常攻撃へ */
    }

    enemy_attack_party(enemy, party);
}

printf("\nEnemy turn\n");
enemy_take_turn(enemy, party);

if (hp <= 15) {
    int heal_i = -1;
    int can_heal = has_heal_spell(e, &heal_i) && e->mp >= e->spells[heal_i].mp_cost;

    int r = rand() % 100;

    if (can_heal && r < 40) {
        a.type = EA_CAST_HEAL;
        a.spell_index = heal_i;
        return a;
    }
    if (r < 80) {
        a.type = EA_DEFEND;
        return a;
    }
    a.type = EA_ATTACK;
    return a;
}