walker.qc

Go to the documentation of this file.

#include "walker.qh"
 
#ifdef SVQC
 
float autocvar_g_turrets_unit_walker_melee_damage;
float autocvar_g_turrets_unit_walker_melee_force;
float autocvar_g_turrets_unit_walker_melee_range;
float autocvar_g_turrets_unit_walker_rocket_damage;
float autocvar_g_turrets_unit_walker_rocket_radius;
float autocvar_g_turrets_unit_walker_rocket_force;
float autocvar_g_turrets_unit_walker_rocket_speed;
float autocvar_g_turrets_unit_walker_rocket_range;
float autocvar_g_turrets_unit_walker_rocket_range_min;
float autocvar_g_turrets_unit_walker_rocket_refire;
float autocvar_g_turrets_unit_walker_rocket_turnrate;
float autocvar_g_turrets_unit_walker_speed_stop;
float autocvar_g_turrets_unit_walker_speed_walk;
float autocvar_g_turrets_unit_walker_speed_run;
float autocvar_g_turrets_unit_walker_speed_jump;
float autocvar_g_turrets_unit_walker_speed_swim;
float autocvar_g_turrets_unit_walker_speed_roam;
float autocvar_g_turrets_unit_walker_turn;
float autocvar_g_turrets_unit_walker_turn_walk;
float autocvar_g_turrets_unit_walker_turn_strafe;
float autocvar_g_turrets_unit_walker_turn_swim;
float autocvar_g_turrets_unit_walker_turn_run;
 
const int ANIM_NO        = 0;
const int ANIM_TURN      = 1;
const int ANIM_WALK      = 2;
const int ANIM_RUN       = 3;
const int ANIM_STRAFE_L  = 4;
const int ANIM_STRAFE_R  = 5;
const int ANIM_JUMP      = 6;
const int ANIM_LAND      = 7;
const int ANIM_PAIN      = 8;
const int ANIM_MELEE     = 9;
const int ANIM_SWIM      = 10;
const int ANIM_ROAM      = 11;
 
.float animflag;
.float idletime;
 
bool walker_firecheck(entity this)
{
    if (this.animflag == ANIM_MELEE)
        return false;
    return turret_firecheck(this);
}
 
void walker_melee_do_dmg(entity this)
{
    makevectors(this.angles);
 
    for (entity e = findradius(this.origin + v_forward * 128, 32); e; e = e.chain)
    {
        if (turret_validate_target(this, e, this.target_validate_flags)
        && e != this && e.owner != this)
            Damage(e, this, this,
                autocvar_g_turrets_unit_walker_melee_damage,
                DEATH_TURRET_WALK_MELEE.m_id,
                DMG_NOWEP,
                '0 0 0',
                v_forward * autocvar_g_turrets_unit_walker_melee_force
            );
    }
}
 
void walker_setnoanim(entity this)
{
    turrets_setframe(this, ANIM_NO, false);
    this.animflag = this.frame;
}
void walker_rocket_explode(entity this)
{
    RadiusDamage(this, this.owner,
        autocvar_g_turrets_unit_walker_rocket_damage,
        0,
        autocvar_g_turrets_unit_walker_rocket_radius,
        this,
        NULL,
        autocvar_g_turrets_unit_walker_rocket_force,
        DEATH_TURRET_WALK_ROCKET.m_id,
        DMG_NOWEP,
        NULL
    );
    delete(this);
}
 
void walker_rocket_touch(entity this, entity toucher)
{
    walker_rocket_explode(this);
}
 
void walker_rocket_damage(entity this, entity inflictor, entity attacker, float damage, float deathtype, .entity weaponentity, vector hitloc, vector vforce)
{
    TakeResource(this, RES_HEALTH, damage);
    this.velocity += vforce;
 
    if (GetResource(this, RES_HEALTH) <= 0)
        W_PrepareExplosionByDamage(this, this.owner, walker_rocket_explode);
}
 
#define WALKER_ROCKET_MOVE(s) \
    movelib_move_simple((s), newdir, autocvar_g_turrets_unit_walker_rocket_speed, autocvar_g_turrets_unit_walker_rocket_turnrate); \
    UpdateCSQCProjectile(s)
void walker_rocket_loop(entity this);
void walker_rocket_think(entity this)
{
    this.nextthink = time;
 
    float edist = vlen(this.enemy.origin - this.origin);
 
    // Simulate crude guidance
    if (this.cnt < time)
    {
        this.tur_shotorg = randomvec() * min(edist, (edist < 1000 ? 64 : 256));
        this.cnt = time + 0.5;
    }
 
    if (edist < 128)
        this.tur_shotorg = '0 0 0';
 
    if (this.max_health < time)
    {
        setthink(this, walker_rocket_explode);
        this.nextthink = time;
        return;
    }
 
    if (this.shot_dmg != 1337 && random() < 0.01)
    {
        walker_rocket_loop(this);
        return;
    }
 
    // Enemy dead? just keep on the current heading then.
    if (this.enemy == NULL || IS_DEAD(this.enemy))
        this.enemy = NULL;
 
    vector newdir;
    if (this.enemy)
    {
        //float itime = max(edist / vlen(this.velocity), 1);
        newdir = steerlib_pull(this, this.enemy.origin + this.tur_shotorg);
    }
    else
        newdir  = normalize(this.velocity);
 
    WALKER_ROCKET_MOVE(this);
}
 
void walker_rocket_loop3(entity this)
{
    this.nextthink = time;
 
    if (this.max_health < time)
    {
        setthink(this, walker_rocket_explode);
        return;
    }
 
    if (vdist(this.origin - this.tur_shotorg, <, 100))
    {
        setthink(this, walker_rocket_think);
        return;
    }
 
    vector newdir = steerlib_pull(this, this.tur_shotorg);
    WALKER_ROCKET_MOVE(this);
 
    this.angles = vectoangles(this.velocity);
}
 
void walker_rocket_loop2(entity this)
{
    this.nextthink = time;
 
    if (this.max_health < time)
    {
        setthink(this, walker_rocket_explode);
        return;
    }
 
    if (vdist(this.origin - this.tur_shotorg, <, 100))
    {
        this.tur_shotorg = this.origin - '0 0 200';
        setthink(this, walker_rocket_loop3);
        return;
    }
 
    vector newdir = steerlib_pull(this, this.tur_shotorg);
    WALKER_ROCKET_MOVE(this);
}
 
void walker_rocket_loop(entity this)
{
    this.nextthink = time;
    this.tur_shotorg = this.origin + '0 0 300';
    setthink(this, walker_rocket_loop2);
    this.shot_dmg = 1337;
}
 
void walker_fire_rocket(entity this, vector org)
{
    fixedmakevectors(this.angles);
 
    te_explosion (org);
 
    entity rocket = new(walker_rocket);
    setorigin(rocket, org);
    rocket.solid             = SOLID_BBOX; // before setsize so it will be linked to the area grid
    sound(this, CH_WEAPON_A, SND_TUR_WALKER_FIRE, VOL_BASE, ATTEN_NORM);
    setsize(rocket, '-3 -3 -3', '3 3 3'); // give it some size so it can be shot
 
    rocket.owner             = this;
    rocket.bot_dodge         = true;
    rocket.bot_dodgerating   = 50;
    rocket.takedamage        = DAMAGE_YES;
    rocket.damageforcescale  = 2;
    SetResourceExplicit(rocket, RES_HEALTH, 25);
    rocket.tur_shotorg       = randomvec() * 512;
    rocket.cnt               = time + 1;
    rocket.enemy             = this.enemy;
 
    if (random() < 0.01)
        setthink(rocket, walker_rocket_loop);
    else
        setthink(rocket, walker_rocket_think);
 
    rocket.event_damage = walker_rocket_damage;
 
    rocket.nextthink = time;
    set_movetype(rocket, MOVETYPE_FLY);
    rocket.velocity = normalize((v_forward + v_up * 0.5) + (randomvec() * 0.2)) * autocvar_g_turrets_unit_walker_rocket_speed;
    rocket.angles = vectoangles(rocket.velocity);
    settouch(rocket, walker_rocket_touch);
    rocket.flags = FL_PROJECTILE;
    IL_PUSH(g_projectiles, rocket);
    IL_PUSH(g_bot_dodge, rocket);
    rocket.max_health = time + 9;
    rocket.missile_flags = MIF_SPLASH | MIF_PROXY | MIF_GUIDED_HEAT;
 
    CSQCProjectile(rocket, false, PROJECTILE_ROCKET, false); // no culling, has fly sound
}
 
.vector enemy_last_loc;
.float enemy_last_time;
void walker_move_to(entity this, vector _target, float _dist)
{
    switch (this.waterlevel)
    {
        case WATERLEVEL_NONE:
            if (_dist > 500)
                this.animflag = ANIM_RUN;
            else
                this.animflag = ANIM_WALK;
        case WATERLEVEL_WETFEET:
        case WATERLEVEL_SWIMMING:
            if (this.animflag != ANIM_SWIM)
                this.animflag = ANIM_WALK;
            else
                this.animflag = ANIM_SWIM;
            break;
        case WATERLEVEL_SUBMERGED:
            this.animflag = ANIM_SWIM;
    }
 
    this.moveto = _target;
    this.steerto = steerlib_attract2(this, this.moveto, 0.5, 500, 0.95);
 
    if (this.enemy)
    {
        this.enemy_last_loc = _target;
        this.enemy_last_time = time;
    }
}
 
void walker_move_path(entity this)
{
#ifdef WALKER_FANCYPATHING
    // Are we close enougth to a path node to switch to the next?
    if (turret_closetotarget(this, this.pathcurrent.origin, 64))
    {
        if (this.pathcurrent.path_next == NULL)
        {
            // Path endpoint reached
            pathlib_deletepath(this.pathcurrent.owner);
            this.pathcurrent = NULL;
 
            if (this.pathgoal)
            {
                if (this.pathgoal.use)
                    this.pathgoal.use(this, NULL, NULL);
 
                if (this.pathgoal.enemy)
                {
                    this.pathcurrent = pathlib_astar(this, this.pathgoal.origin, this.pathgoal.enemy.origin);
                    this.pathgoal = this.pathgoal.enemy;
                }
            }
            else
                this.pathgoal = NULL;
        }
        else
            this.pathcurrent = this.pathcurrent.path_next;
    }
 
    this.moveto = this.pathcurrent.origin;
    this.steerto = steerlib_attract2(this, this.moveto, 0.5, 500, 0.95);
    walker_move_to(this, this.moveto, 0);
 
#else
    if (turret_closetotarget(this, this.pathcurrent.origin, 64))
        this.pathcurrent = this.pathcurrent.enemy;
 
    if (!this.pathcurrent)
        return;
 
    this.moveto = this.pathcurrent.origin;
    this.steerto = steerlib_attract2(this, this.moveto, 0.5, 500, 0.95);
    walker_move_to(this, this.moveto, 0);
#endif
}
 
void walker_findtarget(entity this)
{
    entity e = find(NULL, targetname, this.target);
    if (!e)
    {
        LOG_TRACE("Initital waypoint for walker does NOT exist, fix your map!");
        this.target = "";
    }
 
    if (e.classname != "turret_checkpoint")
        LOG_TRACE("Warning: not a turrret path");
    else
    {
#ifdef WALKER_FANCYPATHING
        this.pathcurrent = pathlib_astar(this, this.origin, e.origin);
        this.pathgoal = e;
#else
        this.pathcurrent = e;
#endif
    }
 
    // TODO: this doesn't reset target, so tur_defend will be the checkpoint too!
}
 
spawnfunc(turret_walker)
{
    if (!turret_initialize(this, TUR_WALKER))
        delete(this);
}
 
METHOD(WalkerTurret, tr_think, void(WalkerTurret thistur, entity it))
{
    fixedmakevectors(it.angles);
 
    if ((it.spawnflags & TSF_NO_PATHBREAK) && it.pathcurrent)
        walker_move_path(it);
    else if (it.enemy == NULL)
    {
        if (it.pathcurrent)
            walker_move_path(it);
        else
        {
            if (it.enemy_last_time != 0)
            {
                if (vdist(it.origin - it.enemy_last_loc, <, 128) || time - it.enemy_last_time > 10)
                    it.enemy_last_time = 0;
                else
                    walker_move_to(it, it.enemy_last_loc, 0);
            }
            else
            {
                if (it.animflag != ANIM_NO)
                {
                    traceline(it.origin + '0 0 64', it.origin + '0 0 64' + v_forward * 128, MOVE_NORMAL, it);
 
                    if (trace_fraction != 1.0)
                        it.tur_head.idletime = -1337;
                    else
                    {
                        traceline(trace_endpos, trace_endpos - '0 0 256', MOVE_NORMAL, it);
                        if (trace_fraction == 1.0)
                            it.tur_head.idletime = -1337;
                    }
 
                    if (it.tur_head.idletime == -1337)
                    {
                        it.moveto = it.origin + randomvec() * 256;
                        it.tur_head.idletime = 0;
                    }
 
                    it.moveto = it.moveto * 0.9 + ((it.origin + v_forward * 500) + randomvec() * 400) * 0.1;
                    it.moveto.z = it.origin.z + 64;
                    walker_move_to(it, it.moveto, 0);
                }
 
                if (it.idletime < time)
                {
                    if (random() < 0.5 || !(it.spawnflags & TSL_ROAM))
                    {
                        it.idletime = time + 1 + random() * 5;
                        it.moveto = it.origin;
                        it.animflag = ANIM_NO;
                    }
                    else
                    {
                        it.animflag = ANIM_WALK;
                        it.idletime = time + 4 + random() * 2;
                        it.moveto = it.origin + randomvec() * 256;
                        it.tur_head.moveto = it.moveto;
                        it.tur_head.idletime = 0;
                    }
                }
            }
        }
    }
    else
    {
        if (it.tur_dist_enemy < autocvar_g_turrets_unit_walker_melee_range && it.animflag != ANIM_MELEE)
        {
            vector wish_angle = angleofs(it, it.enemy);
 
            if (it.animflag != ANIM_SWIM
            && fabs(wish_angle.y) < 15)
            {
                it.moveto   = it.enemy.origin;
                it.steerto  = steerlib_attract2(it, it.moveto, 0.5, 500, 0.95);
                it.animflag = ANIM_MELEE;
            }
        }
        else if (it.tur_head.attack_finished_single[0] < time)
        {
            if (it.tur_head.shot_volly)
            {
                it.animflag = ANIM_NO;
 
                --it.tur_head.shot_volly;
                if (it.tur_head.shot_volly == 0)
                    it.tur_head.attack_finished_single[0] = time + autocvar_g_turrets_unit_walker_rocket_refire;
                else
                    it.tur_head.attack_finished_single[0] = time + 0.2;
 
                walker_fire_rocket(it, gettaginfo(it, gettagindex(it, (it.tur_head.shot_volly > 1 ? "tag_rocket01" : "tag_rocket02"))));
            }
            else
            {
                if (it.tur_dist_enemy > (autocvar_g_turrets_unit_walker_rocket_range_min)
                &&  it.tur_dist_enemy < (autocvar_g_turrets_unit_walker_rocket_range))
                    it.tur_head.shot_volly = 4;
            }
        }
        else
        {
            if (it.animflag != ANIM_MELEE)
                walker_move_to(it, it.enemy.origin, it.tur_dist_enemy);
        }
    }
 
    {
        vector real_angle;
        float turny = 0, turnx = 0;
        float vz;
 
        real_angle = vectoangles(it.steerto) - it.angles;
        vz = it.velocity.z;
 
        switch (it.animflag)
        {
            case ANIM_NO:
                movelib_brake_simple(it, autocvar_g_turrets_unit_walker_speed_stop);
                break;
 
            case ANIM_TURN:
                turny = autocvar_g_turrets_unit_walker_turn;
                movelib_brake_simple(it, autocvar_g_turrets_unit_walker_speed_stop);
                break;
 
            case ANIM_WALK:
                turny = autocvar_g_turrets_unit_walker_turn_walk;
                movelib_move_simple(it, v_forward, autocvar_g_turrets_unit_walker_speed_walk, 0.6);
                break;
 
            case ANIM_RUN:
                turny = autocvar_g_turrets_unit_walker_turn_run;
                movelib_move_simple(it, v_forward, autocvar_g_turrets_unit_walker_speed_run, 0.6);
                break;
 
            case ANIM_STRAFE_L:
                turny = autocvar_g_turrets_unit_walker_turn_strafe;
                movelib_move_simple(it, -v_right, autocvar_g_turrets_unit_walker_speed_walk, 0.8);
                break;
 
            case ANIM_STRAFE_R:
                turny = autocvar_g_turrets_unit_walker_turn_strafe;
                movelib_move_simple(it, v_right, autocvar_g_turrets_unit_walker_speed_walk, 0.8);
                break;
 
            case ANIM_JUMP:
                it.velocity.z += autocvar_g_turrets_unit_walker_speed_jump;
                break;
 
            case ANIM_LAND:
                break;
 
            case ANIM_PAIN:
                if (it.frame != ANIM_PAIN)
                    defer(it, 0.25, walker_setnoanim);
                break;
 
            case ANIM_MELEE:
                if (it.frame != ANIM_MELEE)
                {
                    defer(it, 0.41, walker_setnoanim);
                    defer(it, 0.21, walker_melee_do_dmg);
                }
 
                movelib_brake_simple(it, autocvar_g_turrets_unit_walker_speed_stop);
                break;
 
            case ANIM_SWIM:
                turny = autocvar_g_turrets_unit_walker_turn_swim;
                turnx = autocvar_g_turrets_unit_walker_turn_swim;
 
                it.angles.x += bound(-10, shortangle_f(real_angle.x, it.angles.x), 10);
                movelib_move_simple(it, v_forward, autocvar_g_turrets_unit_walker_speed_swim, 0.3);
                vz = it.velocity.z + sin(time * 4) * 8;
                break;
 
            case ANIM_ROAM:
                turny = autocvar_g_turrets_unit_walker_turn_walk;
                movelib_move_simple(it, v_forward, autocvar_g_turrets_unit_walker_speed_roam, 0.5);
                break;
        }
 
        if (turny)
        {
            turny = bound(-turny, shortangle_f(real_angle.y, it.angles.y), turny);
            it.angles.y += turny;
        }
        if (turnx)
        {
            turnx = bound(-turnx, shortangle_f(real_angle.x, it.angles.x), turnx);
            it.angles.x += turnx;
        }
 
        it.velocity.z = vz;
    }
 
 
    if (it.origin != it.oldorigin)
        it.SendFlags |= TNSF_MOVE;
 
    it.oldorigin = it.origin;
    turrets_setframe(it, it.animflag, false);
}
METHOD(WalkerTurret, tr_death, void(WalkerTurret this, entity it))
{
#ifdef WALKER_FANCYPATHING
    if (it.pathcurrent)
        pathlib_deletepath(it.pathcurrent.owner);
#endif
    it.pathcurrent = NULL;
}
METHOD(WalkerTurret, tr_setup, void(WalkerTurret this, entity it))
{
    // Respawn is called & first spawn to, to set team. need to make sure we do not move the initial spawn.
    if (it.move_movetype == MOVETYPE_WALK)
    {
        if (it.pos1)
            setorigin(it, it.pos1);
        if (it.pos2)
            it.angles = it.pos2;
    }
 
    it.ammo_flags = TFL_AMMO_BULLETS | TFL_AMMO_RECHARGE | TFL_AMMO_RECIEVE;
    it.aim_flags = TFL_AIM_LEAD;
    it.turret_flags |= TUR_FLAG_HITSCAN;
 
    it.target_select_flags = TFL_TARGETSELECT_PLAYERS | TFL_TARGETSELECT_RANGELIMITS | TFL_TARGETSELECT_TEAMCHECK | TFL_TARGETSELECT_LOS;
    it.target_validate_flags = TFL_TARGETSELECT_PLAYERS | TFL_TARGETSELECT_RANGELIMITS | TFL_TARGETSELECT_TEAMCHECK | TFL_TARGETSELECT_LOS;
    it.iscreature = true;
    it.teleportable = TELEPORT_NORMAL;
    if (!it.damagedbycontents)
        IL_PUSH(g_damagedbycontents, it);
    it.damagedbycontents = true;
    it.solid = SOLID_SLIDEBOX;
    it.takedamage = DAMAGE_AIM;
    if (it.move_movetype != MOVETYPE_WALK)
    {
        setorigin(it, it.origin);
        tracebox(it.origin + '0 0 128', it.mins, it.maxs, it.origin - '0 0 10000', MOVE_NORMAL, it);
        setorigin(it, trace_endpos + '0 0 4');
        it.pos1 = it.origin;
        it.pos2 = it.angles;
    }
    set_movetype(it, MOVETYPE_WALK);
    it.idle_aim = '0 0 0';
    it.turret_firecheckfunc = walker_firecheck;
 
    if (it.target != "")
        InitializeEntity(it, walker_findtarget, INITPRIO_FINDTARGET);
}
 
#undef WALKER_ROCKET_MOVE
 
#endif // SVQC
#ifdef CSQC
 
#include <common/physics/movelib.qh>
 
void walker_draw(entity this)
{
    float dt = time - this.move_time;
    this.move_time = time;
    if (dt <= 0)
        return;
 
    fixedmakevectors(this.angles);
    movelib_groundalign4point(this, 300, 100, 0.25, 45);
    setorigin(this, this.origin + this.velocity * dt);
    this.tur_head.angles += dt * this.tur_head.avelocity;
 
    if (GetResource(this, RES_HEALTH) < 127
    && random() < 0.15)
        te_spark(this.origin + '0 0 40', randomvec() * 256 + '0 0 256', 16);
}
 
METHOD(WalkerTurret, tr_setup, void(WalkerTurret this, entity it))
{
    it.gravity = 1;
    set_movetype(it, MOVETYPE_BOUNCE);
    it.move_time = time;
    it.draw = walker_draw;
}
 
#endif // CSQC
#ifdef MENUQC
#include <common/weapons/weapon/devastator.qh>
#include <common/weapons/weapon/machinegun.qh>
 
METHOD(WalkerTurret, describe, string(WalkerTurret this))
{
    TC(WalkerTurret, this);
    PAGE_TEXT_INIT();
    PAR(_("The %s is an arachnid-like walking turret that hunts down its targets."), COLORED_NAME(this));
    PAR(_("It has two weapons, both a machinegun like the %s for medium range combat, and a rocket launcher shooting homing missiles like the %s for long range targets. "
          "It also has the ability to melee close by targets."), COLORED_NAME(WEP_MACHINEGUN), COLORED_NAME(WEP_DEVASTATOR));
    return PAGE_TEXT;
}
 
#endif // MENUQC