Here is a list of AA quest objects from the wiki page:
http://www.eqemulator.net/wiki/wikka...=QuestTutorial
Code:
AddAAPoints(number)
GetAAPoints()
GetSpentAA()
RefundAA()
ResetAA()
SetAAPoints(points)
SetAATitle(txt, save = 0)
SetEXP(set_exp, set_aaxp, resexp=false)
GetAA(aa_id)
To use them, you would do something like this:
Code:
$client->GetAAPoints();
And, I haven't tested it, but maybe something like this would work to add 50 AA like you seem to be wanting to do:
Code:
sub EVENT_SAY {
my $give = quest::saylink("Yes, please give me 50 AA points!", 0, "give");
if ($text=~/hail/i)
{
quest::say("Would you like me to try to [$give] you 50 AA points?");
}
if ($text=~/give/i)
{
quest::say("Ok, here goes nothing!");
#Get their current total AA points
#my $CurAA = $client->GetAAPoints();
#Set their AA to their current total, plus 50 more.
#$client->SetAAPoints($CurAA + 50);
#Just add the 50 AA points without doing any of the above noted stuff
$client->AddAAPoints(50);
quest::say("Did that work???");
}
}