Stats Calculator.

[kmra247]

All right, so I'm wanting to set up a stats calculator, but my only issue you is it won't calculate Mana or Health, all the other things work, when I put this two in it refuses to tell you anything, will post current code below that works.

sub EVENT_SAY
{

my $stats = quest::saylink("stats", 1);


if($text=~/hail/i)
{
quest::say("Hey there $name, I'm really good at guessing your $stats. Go on, try me!");
}
elsif($text=~/stats/i)
{
$str = $client->GetSTR();
$sta = $client->GetSTA();
$agi = $client->GetAGI();
$dex = $client->GetDEX();
$wis = $client->GetWIS();
$intel = $client->GetINT();
$cha = $client->GetCHA();
$ac = $client->GetAC();
$atk = $client->GetATK();;
quest::say("$name: AC: $ac ATK: $atk");
quest::say("$name: Str: $str Sta: $sta Agi: $agi");
quest::say("$name: Dex: $dex Wis: $wis Int: $intel Cha: $cha ");
}
}

[lerxst2112]

Show us what you tried. There are GetMana() and GetHP() functions exported to perl.

[kmra247]

I tried $client->GetMaxHP and $client->GetMP.

$hp = $client->GetMaxHP();
$mana = $client->GetMP();

[kmra247]

Would there happen to be a list of the things for "$client->" anywhere?

Edit: Found a list I believe, http://www.eqemulator.net/wiki/wikka.php?wakka=QuestObjects.

Edit 2: In that url it lists GetHP();,GetMana();, GetMaxHP();, GetMaxMana();, so I don't understand why it wouldn't work, will test and see if it works.

Edit 3: Works.

[sorvani]

Is this just for display? You can give everyone access to #mystats

[kmra247]

I know, just for display. It's an optional stat checker, incase they don't want to use #mystats or don't know how.

[kmra247]

Completed script below:

sub EVENT_SAY
{

my $stats = quest::saylink("stats", 1);
my $NPCNAME = $npc->GetCleanName();


if($text=~/hail/i)
{
$client->Message(315, "$NPCNAME whispers to you, 'Hey there $name, I'm really good at guessing your $stats. Go on, try me!'");
}
elsif($text=~/stats/i)
{
$str = $client->GetSTR();
$sta = $client->GetSTA();
$agi = $client->GetAGI();
$dex = $client->GetDEX();
$wis = $client->GetWIS();
$intel = $client->GetINT();
$cha = $client->GetCHA();
$ac = $client->GetAC();
$atk = $client->GetATK();
$hp = $client->GetHP();
$hp2 = $client->GetMaxHP();
$mana = $client->GetMana();
$mana2 = $client->GetMaxMana();
$end = $client->GetEndurance();
$end2 = $client->GetMaxEndurance();
$aa = $client->GetAAPoints();
$aa2 = $client->GetSpentAA();

$client->Message(314, "----------------------------------------------------------------");
$client->Message(315, "$NPCNAME whispers to you, '$name: Current Health: $hp Max Health: $hp2'");
$client->Message(315, "$NPCNAME whispers to you, '$name: Current Endurance: $end Max Endurance: $end2'");
$client->Message(315, "$NPCNAME whispers to you, '$name: Current Mana: $mana Max Mana: $mana2'");
$client->Message(315, "$NPCNAME whispers to you, '$name: Total AA Points: $aa Spent AA Points: $aa2'");
$client->Message(315, "$NPCNAME whispers to you, '$name: Armor Class: $ac Attack: $atk'");
$client->Message(315, "$NPCNAME whispers to you, '$name: Strength: $str Stamina: $sta Agility: $agi'");
$client->Message(315, "$NPCNAME whispers to you, '$name: Dexterity: $dex Wisdom: $wis Intelligence: $intel Charisma: $cha'");
$client->Message(314, "----------------------------------------------------------------");
}
}

sub EVENT_ITEM
{
quest::say("I do not need this.");
quest::givecash($copper,$silver,$gold,$platinum);
plugin::return_items(\%itemcount);
}

[thepoetwarrior]

Any way via perl to get players Resist and Heroic Resist?

[thepoetwarrior]

Never mind, did GetMR() GetFR() get and seems to work.

Wasn't listed on the object client page for quest.

[NatedogEZ]

inline virtual int16 GetMR() const { return MR; }
inline virtual int16 GetFR() const { return FR; }
inline virtual int16 GetDR() const { return DR; }
inline virtual int16 GetPR() const { return PR; }
inline virtual int16 GetCR() const { return CR; }
inline virtual int16 GetCorrup() const { return Corrup; }



I just search the code on GITHub

https://github.com/search?q=%40EQEmu+GetMR%28%29&type=Code&ref=searchresults