using your original code, try this:
Code:
sub EVENT_SAY {
if ($text=~/hail/i) {
quest::say("Hail to you, lesser being!");
}
elsif ($text=~/Set/i) {
quest::say("Setting your stupid var human !");
quest::delglobal("AVAR");
quest::setglobal("AVAR", 1, 7, "Y50");
}
elsif ($text=~/Get/i) {
quest::say("Here is your results $AVAR");
}
}