Log in

View Full Version : Taskselector seems to not work on NPC Perl Script


djeryv
01-16-2010, 03:37 PM
A few versions ago was when I last knew this worked. Now, the NPC does not respond to the "serve" phrase with the TASKSELECTOR. The NPC does respond to "bind" and will bind you. When I remove TASKSELECTOR and put in a simple QUEST:SAY...then they resond. Has anything changed with dealing with PERL and TASKS?

sub EVENT_SAY {

if($text=~/hail/i){
quest::say("Greetings, $name. Have you come to [serve] the Velvet Order? Maybe you wish for me to [bind] you here?");
}

if($text=~/bind/i){
quest::say("Binding your soul. You will return here when you die.");
quest::selfcast(2049);
}

if($text=~/serve/i){
quest::taskselector(7985, 7986, 7991, 7994, 7998, 7999, 8000, 8001, 8002, 8003, 8004, 8005, 8006, 8007, 8008, 8009, 8010, 8011);
}

}

sub EVENT_ITEM {
if ($itemcount{16769} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(68245);} #202
if ($itemcount{68245} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(89167);} #202
if ($itemcount{89167} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(16769);} #202
if ($itemcount{16755} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(82700);} #202
if ($itemcount{82700} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(89175);} #202
if ($itemcount{89175} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(16755);} #202
if ($itemcount{6204} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(16761);} #202
if ($itemcount{16761} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(31187);} #202
if ($itemcount{31187} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(6204);} #202
if ($itemcount{29296} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(55068);} #202
if ($itemcount{55068} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(85573);} #202
if ($itemcount{85573} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(29296);} #202
if ($itemcount{16795} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(89159);} #202
if ($itemcount{89159} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(16795);} #202
if ($itemcount{25438} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(67625);} #202
if ($itemcount{67625} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(25438);} #202
if ($itemcount{16691} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(31237);} #202
if ($itemcount{31237} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(16691);} #202
if ($itemcount{31462} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(89238);} #202
if ($itemcount{89238} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(31462);} #202
if ($itemcount{7386} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(15773);} #202
if ($itemcount{15773} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(7386);} #202
if ($itemcount{29558} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(31085);} #202
if ($itemcount{31085} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(29558);} #202
if ($itemcount{15764} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(51865);} #202
if ($itemcount{51865} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(15764);} #202
if ($itemcount{15474} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(29559);} #202
if ($itemcount{29559} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(15474);} #202
if ($itemcount{31183} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(31358);} #202
if ($itemcount{31358} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(31183);} #202
if ($itemcount{15758} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(15770);} #202
if ($itemcount{15770} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(15758);} #202
if ($itemcount{15119} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(25434);} #202
if ($itemcount{25434} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(15119);} #202
if ($itemcount{15751} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(15761);} #202
if ($itemcount{15761} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(15751);} #202
if ($itemcount{8358} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(11001);} #202
if ($itemcount{11001} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(8358);} #202
if ($itemcount{29551} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(82703);} #202
if ($itemcount{82703} == 1 ){quest::say("This item does not please you? How about this one?"); quest::summonitem(29551);} #202
}

Derision
01-16-2010, 04:47 PM
What version are you running ? It may have been broken for a short time several revisions back, but it is working in the current version (I just tested with Rev1111).

djeryv
01-17-2010, 09:02 AM
I am running the last binary release ... 1052. I don't compile my own.

-djeryv

KLS
01-17-2010, 11:24 PM
There was a short time when you needed to enable the tasks for them to work via that manner but it was short. I don't remember the revision offhand but you could try enabling them first.

djeryv
01-18-2010, 08:45 AM
I did check that already...they are set to TRUE. Someone also just reported that they reverted to 1036 and the Tasks I made now work. Something may have happened in 1052 and may have gone away in 1111. I see that 1114 binaries are released so I will try those and see what happens.

- Djeryv

djeryv
01-18-2010, 08:43 PM
1114 is running at my home...and the TASKSELECTOR is working again.

-Djeryv