Special_Abilities on the fly in Perl?

[Hateborne]

Afternoon ladies/gents/trolls,

I'm curious on how one might modify npc special_abilities on the fly through perl? I'm having issues with $npc->NPCSpecialAttacks as two comma delimited bits would trainwreck and it does not accept the special_abilities as a string:

$npc->NPCSpecialAttacks("12,1^13,1^14,1", 0);

I then tried the bit below, no luck.

$npc->ModifyNPCStat("special_abilities", "12,1^13,1^14,1");
$npc->ModifyNPCStat("special_attacks", "12,1^13,1^14,1");

Is there a way to edit these on the fly? What I'm trying to accomplish is to get a mob to ignore combat and charge at another NPC. If there are other ways to accomplish this, PLEASE LET ME KNOW. Also, if a way to handle these on-the-fly is possible, that would be incredibly helpful too.


Thank You!
-Hate

[nilbog]

I'm not sure if you've tried:

quest::modifynpcstat(identifier, value) # Changes NPC stats on the fly. Changes are not saved to DB.

Might be useful for i.e. quest::modifynpcstat("max_hit", "700"); Just make sure to name the field correctly.

[Kingly_Krab]

I don't believe special_abilities have been added to Perl yet, it is something that could be done, but I haven't seen it used any where yet.

Here's the $npc->ModifyNPCStat code (this is also used for quest::modifynpcstat):

void NPC::ModifyNPCStat(const char *identifier, const char *newValue)
{
    std::string id = identifier;
    std::string val = newValue;
    for(int i = 0; i < id.length(); ++i)
    {
        id[i] = std::tolower(id[i]);
    }

    if(id == "ac")
    {
        AC = atoi(val.c_str());
        return;
    }

    if(id == "str")
    {
        STR = atoi(val.c_str());
        return;
    }

    if(id == "sta")
    {
        STA = atoi(val.c_str());
        return;
    }

    if(id == "agi")
    {
        AGI = atoi(val.c_str());
        return;
    }

    if(id == "dex")
    {
        DEX = atoi(val.c_str());
        return;
    }

    if(id == "wis")
    {
        WIS = atoi(val.c_str());
        CalcMaxMana();
        return;
    }

    if(id == "int" || id == "_int")
    {
        INT = atoi(val.c_str());
        CalcMaxMana();
        return;
    }

    if(id == "cha")
    {
        CHA = atoi(val.c_str());
        return;
    }

    if(id == "max_hp")
    {
        base_hp = atoi(val.c_str());
        CalcMaxHP();
        if(cur_hp > max_hp)
            cur_hp = max_hp;
        return;
    }

    if(id == "max_mana")
    {
        npc_mana = atoi(val.c_str());
        CalcMaxMana();
        if(cur_mana > max_mana)
            cur_mana = max_mana;
        return;
    }

    if(id == "mr")
    {
        MR = atoi(val.c_str());
        return;
    }

    if(id == "fr")
    {
        FR = atoi(val.c_str());
        return;
    }

    if(id == "cr")
    {
        CR = atoi(val.c_str());
        return;
    }

    if(id == "pr")
    {
        PR = atoi(val.c_str());
        return;
    }

    if(id == "dr")
    {
        DR = atoi(val.c_str());
        return;
    }

    if(id == "PhR")
    {
        PhR = atoi(val.c_str());
        return;
    }

    if(id == "runspeed")
    {
        runspeed = (float)atof(val.c_str());
        CalcBonuses();
        return;
    }

    if(id == "special_attacks")
    {
        //Added reset flag.
        NPCSpecialAttacks(val.c_str(), 0, 1);
        return;
    }

    if(id == "attack_speed")
    {
        attack_speed = (float)atof(val.c_str());
        CalcBonuses();
        return;
    }

    if(id == "atk")
    {
        ATK = atoi(val.c_str());
        return;
    }

    if(id == "accuracy")
    {
        accuracy_rating = atoi(val.c_str());
        return;
    }

    if(id == "avoidance")
    {
        avoidance_rating = atoi(val.c_str());
        return;
    }

    if(id == "trackable")
    {
        trackable = atoi(val.c_str());
        return;
    }

    if(id == "min_hit")
    {
        min_dmg = atoi(val.c_str());
        return;
    }

    if(id == "max_hit")
    {
        max_dmg = atoi(val.c_str());
        return;
    }

    if(id == "attack_count")
    {
        attack_count = atoi(val.c_str());
        return;
    }

    if(id == "see_invis")
    {
        see_invis = atoi(val.c_str());
        return;
    }

    if(id == "see_invis_undead")
    {
        see_invis_undead = atoi(val.c_str());
        return;
    }

    if(id == "see_hide")
    {
        see_hide = atoi(val.c_str());
        return;
    }

    if(id == "see_improved_hide")
    {
        see_improved_hide = atoi(val.c_str());
        return;
    }

    if(id == "hp_regen")
    {
        hp_regen = atoi(val.c_str());
        return;
    }

    if(id == "mana_regen")
    {
        mana_regen = atoi(val.c_str());
        return;
    }

    if(id == "level")
    {
        SetLevel(atoi(val.c_str()));
        return;
    }

    if(id == "aggro")
    {
        pAggroRange = atof(val.c_str());
        return;
    }

    if(id == "assist")
    {
        pAssistRange = atof(val.c_str());
        return;
    }

    if(id == "slow_mitigation")
    {
        slow_mitigation = atoi(val.c_str());
        return;
    }
    if(id == "loottable_id")
    {
        loottable_id = atof(val.c_str());
        return;
    }
    if(id == "healscale")
    {
        healscale = atof(val.c_str());
        return;
    }
    if(id == "spellscale")
    {
        spellscale = atof(val.c_str());
        return;
    }
}

[Hateborne]

Well then, that was crazy fast. That will make things interesting. Thank you gents for the scary fast replies.


-Hate

[Kingly_Krab]

Haha, I wasn't aware it was fast, I had just logged in and saw a bold post and checked it out. You're welcome.

[demonstar55]

the NPCSpecialAttacks still work on the old letter system rather than the newer system.

https://github.com/EQEmu/Server/blob.../npc.cpp#L1414

[wolfwalkereci]

some servers use it, just don't think many or even any of the quests on peq do/did

[demonstar55]

Looking at the PEQ quests they do quest::modifynpcstat("special_attacks",ABfHG); my bad, still uses the old codes though.