Advertisement
Guest User

Untitled

a guest
Jul 3rd, 2019
79
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 5.35 KB | None | 0 0
  1. sub EVENT_SAY {
  2. $charid = 0;
  3. $corpse = 0;
  4. $charid = $client->CharacterID();
  5. my $link1 = quest::saylink("Draco",1);
  6. if($text=~/hail/i) {
  7. if(defined quest::get_data($client->CharacterID()."_Stage1Sleeper") && defined quest::get_data($client->CharacterID()."_Stage2Sleeper") && defined quest::get_data($client->CharacterID()."_Stage3Sleeper") && defined $qglobals{"Stage4Sleeper"}  && defined $qglobals{"Stage5Sleeper"}) {#CHANGEME
  8. plugin::Whisper("So you beat them? That is amazing! I can now go ahead and upgrade your weapons from An Ancient One , be sure you remove the augs from it before you hand it to me! You might also now be looked at as a Member of the Council of [$link1]");
  9. quest::set_data($client->CharacterID()."_SleeperPhase1Completed", 1);#CHANGEME
  10. }
  11. if($text=~/Draco/i) {
  12. if(!defined quest::get_data($client->CharacterID()."_DracoFaction") && defined quest::get_data($client->CharacterID()."_SleeperPhase1Completed")) {#CHANGEME
  13. plugin::Whisper("Very good yes , you have been approved by the Council to purchase some of my wares.");
  14. $client->SetFactionLevel2($charid, 5030, -1, -1, -1, 400);
  15. quest::set_data($client->CharacterID()."_DracoFaction", 1);#CHANGEME
  16. }
  17. if($text=~/Draco/i) {
  18. if(defined quest::get_data($client->CharacterID()."_DracoFaction")) {#CHANGEME
  19. plugin::Whisper("I've done all I can do for you");
  20. }
  21. }
  22. else {
  23. plugin::Whisper("You need stagee 1-5 sleeper missions to activate my features.");
  24. }
  25. }
  26. sub EVENT_ITEM {
  27. if (!defined quest::get_data($client->CharacterID()."_SleeperPhase1Completed") && !defined quest::get_data($client->CharacterID()."_DracoFaction") && plugin::check_handin(\%itemcount, 100811 => 1) ) {#CHANGEME
  28. plugin::Whisper("Well, you must know someone important, you can now view my wares and turn in your old weapon for a new one.");
  29. $client->SetFactionLevel2($charid, 5030, -1, -1, -1, 400);
  30. quest::set_data($client->CharacterID()."_DracoFaction", 1, "F");#CHANGEME
  31. quest::set_data($client->CharacterID()."_Stage1Sleeper", 1, "F");#CHANGEME
  32. quest::set_data($client->CharacterID()."_Stage2Sleeper", 1, "F");#CHANGEME
  33. quest::set_data($client->CharacterID()."_Stage3Sleeper", 1, "F");#CHANGEME
  34. quest::set_data($client->CharacterID()."_Stage4Sleeper", 1, "F");#CHANGEME
  35. quest::set_data($client->CharacterID()."_Stage5Sleeper", 1, "F");#CHANGEME
  36. quest::set_data($client->CharacterID()."_SleeperPhase1Completed", 1);#CHANGEME
  37. if (defined quest::get_data($client->CharacterID()."_SleeperPhase1Completed") &&  plugin::check_handin(\%itemcount, 100728 => 1) ) {#CHANGEME
  38. plugin::Whisper("You were very brave to defeat the five solo trials , here is your new weapon!");
  39. plugin::Emote("reaches into her pack and pulls out a " . quest::varlink(100753) . ".");
  40. quest::summonitem(100753);
  41. quest::set_data($client->CharacterID()."_SwappedSTWarsword", 1);#CHANGEME
  42. if (defined quest::get_data($client->CharacterID()."_SleeperPhase1Completed") &&  plugin::check_handin(\%itemcount, 100729 => 1) ) {#CHANGEME
  43. plugin::Whisper("You were very brave to defeat the five solo trials , here is your new weapon!");
  44. plugin::Emote("reaches into her pack and pulls out a " . quest::varlink(100754) . ".");
  45. quest::summonitem(100754);
  46. quest::set_data($client->CharacterID()."_SwappedSTClaymore", 1);#CHANGEME
  47. if (defined quest::get_data($client->CharacterID()."_SleeperPhase1Completed") &&  plugin::check_handin(\%itemcount, 100730 => 1) ) {#CHANGEME
  48. plugin::Whisper("You were very brave to defeat the five solo trials , here is your new weapon!");
  49. plugin::Emote("reaches into her pack and pulls out a " . quest::varlink(100755) . ".");
  50. quest::summonitem(100755);
  51. quest::set_data($client->CharacterID()."_SwappedSTBow", 1);#CHANGEME
  52. if (defined quest::get_data($client->CharacterID()."_SleeperPhase1Completed") &&  plugin::check_handin(\%itemcount, 100731 => 1) ) {#CHANGEME
  53. plugin::Whisper("You were very brave to defeat the five solo trials , here is your new weapon!");
  54. plugin::Emote("reaches into her pack and pulls out a " . quest::varlink(100756) . ".");
  55. quest::summonitem(100756);
  56. quest::set_data($client->CharacterID()."_SwappedSTFists", 1);#CHANGEME
  57. if (defined quest::get_data($client->CharacterID()."_SleeperPhase1Completed") &&  plugin::check_handin(\%itemcount, 100732 => 1) ) {#CHANGEME
  58. plugin::Whisper("You were very brave to defeat the five solo trials , here is your new weapon!");
  59. plugin::Emote("reaches into her pack and pulls out a " . quest::varlink(100757) . ".");
  60. quest::summonitem(100757);
  61. quest::set_data($client->CharacterID()."_SwappedSTBoStaff", 1);#CHANGEME
  62. if (defined quest::get_data($client->CharacterID()."_SleeperPhase1Completed") &&  plugin::check_handin(\%itemcount, 100733 => 1) ) {#CHANGEME
  63. plugin::Whisper("You were very brave to defeat the five solo trials , here is your new weapon!");
  64. plugin::Emote("reaches into her pack and pulls out a " . quest::varlink(100758) . ".");
  65. quest::summonitem(100758);
  66. quest::set_data($client->CharacterID()."_SwappedSTWand", 1);#CHANGEME
  67. if (defined quest::get_data($client->CharacterID()."_SleeperPhase1Completed") &&  plugin::check_handin(\%itemcount, 100734 => 1) ) {#CHANGEME
  68. plugin::Whisper("You were very brave to defeat the five solo trials , here is your new weapon!");
  69. plugin::Emote("reaches into her pack and pulls out a " . quest::varlink(100759) . ".");
  70. quest::summonitem(100759);
  71. quest::set_data($client->CharacterID()."_SwappedSTShiv", 1);#CHANGEME else {
  72. plugin::return_items(\%itemcount);
  73. }
  74. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement