Guest User

lua hearthstone

a guest
Dec 5th, 2011
181
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 4.15 KB | None | 0 0
  1. function Item_Trigger(unit, event, player)
  2. unit:GossipCreateMenu(130, player, 0)
  3. unit:GossipMenuAddItem(1, "Batlleground", 1, 0)
  4. unit:GossipMenuAddItem(0, "Bind Hearthstone(10mg)", 2, 0)
  5. unit:GossipMenuAddItem(1, "Use Hearhstone", 3, 0)
  6. unit:GossipMenuAddItem(1, "Repair", 4, 0)
  7. unit:GossipMenuAddItem(1, "Bank", 5, 0)
  8. unit:GossipMenuAddItem(0, "Combat Unstuck", 7, 0)
  9. unit:GossipMenuAddItem(0, "Buffs", 8, 0)
  10. unit:GossipMenuAddItem(0, "Sickness remover", 9, 0)
  11. unit:GossipSendMenu(player)
  12. end
  13.  
  14. function OnSelect(unit, event, player, id, intid, code)
  15. if(intid == 75) then
  16. unit:GossipCreateMenu(130, player, 0)
  17. unit:GossipCreateMenu(130, player, 0)
  18. unit:GossipMenuAddItem(1, "Batlleground", 1, 0)
  19. unit:GossipMenuAddItem(0, "Bind Hearthstone(10mg)", 2, 0)
  20. unit:GossipMenuAddItem(1, "Use Hearthstone", 3, 0)
  21. unit:GossipMenuAddItem(1, "Repair", 4, 0)
  22. unit:GossipMenuAddItem(1, "Bank", 5, 0)
  23. unit:GossipMenuAddItem(0, "Combat Unstuck", 7, 0)
  24. unit:GossipMenuAddItem(0, "Buffs", 8, 0)
  25. unit:GossipMenuAddItem(0, "Sickness remover", 9, 0)
  26. unit:GossipSendMenu(player)
  27. end
  28.  
  29. if(intid == 1) then
  30. unit:GossipCreateMenu(51, player, 0)
  31. unit:GossipMenuAddItem(1, "BG 1", 10, 0)
  32. unit:GossipMenuAddItem(1, "BG 2", 11, 0)
  33. unit:GossipMenuAddItem(1, "BG 3", 12, 0)
  34. unit:GossipMenuAddItem(1, "BG 4", 13, 0)
  35. unit:GossipMenuAddItem(0, "[Main Menu]", 75, 0)
  36. unit:GossipSendMenu(player)
  37. end
  38.  
  39.  
  40. if(intid == 4) then
  41. if(player:GetCoinage() < 10) then
  42. player:SendBroadcastMessage("Not enough copper (10 required).")
  43. player:GossipComplete()
  44. else
  45. player:RepairAllPlayerItems()
  46. player:GossipComplete()
  47. player:SendBroadcastMessage("|cff82CAFFRepair Cost: |cff00ff0010 coins of copper|r (Items repaired).")
  48. player:DealGoldCost(10)
  49. end
  50. end
  51.  
  52. if(intid == 5) then
  53. player:SendBankWindow(player)
  54. player:GossipComplete()
  55. end
  56.  
  57. if(intid == 7) then
  58. player:DisableCombat()
  59. player:SetOutOfCombatRange(range)
  60. player:SendBroadcastMessage("|cffEC3131Unstucked from combat.|r")
  61. player:GossipComplete()
  62. end
  63.  
  64. if(intid == 9) then
  65. if (player:HasAura(15007) == true) then
  66. player:SendBroadcastMessage("|cff00ff00Your Sickness has been removed.")
  67. player:RemoveAura(15007)
  68. player:GossipComplete()
  69. else
  70. player:SendAreaTriggerMessage("|cffff0000Aura not found.")
  71. player:GossipComplete()
  72. end
  73. end
  74.  
  75. if(intid == 8) then
  76. player:SendBroadcastMessage("buff")
  77. player:CastSpell(33077)
  78. player:CastSpell(33078)
  79. player:CastSpell(33079)
  80. player:CastSpell(33080)
  81. player:CastSpell(33081)
  82. player:CastSpell(33082)
  83. player:CastSpell(24705)
  84. player:CastSpell(26035)
  85. item:GossipCreateMenu(110001, player, 0)
  86. item:GossipMenuAddItem(0, "..Return", 75, 0)
  87. item:GossipMenuAddItem(0, " you have been buffed", 75, 0)
  88. item:GossipSendMenu(player)
  89. end
  90.  
  91.  
  92. if(intid == 10) then
  93. player:SendBattlegroundWindow(player, 1)
  94. player:GossipComplete()
  95. end
  96. if(intid == 11) then
  97. player:SendBattlegroundWindow(player, 2)
  98. player:GossipComplete()
  99. end
  100. if(intid == 12) then
  101. player:SendBattlegroundWindow(player, 3)
  102. player:GossipComplete()
  103. end
  104. if(intid == 13) then
  105. player:SendBattlegroundWindow(player, 4)
  106. player:GossipComplete()
  107. end
  108.  
  109. if(intid == 16) then
  110. player:Teleport(1, 9948, 2413, 1327)
  111. end
  112.  
  113. if(intid == 3) then -- Hearthstone unstuck
  114. player:ClearCooldownForSpell(7355)
  115. player:FullCastSpell(7355)
  116. player:GossipComplete()
  117. end
  118.  
  119. if(intid == 2) then -- Bind Location
  120. local GetMagicGold = WorldDBQuery("SELECT `mg` FROM logon_git.accounts WHERE `login` = '"..player:GetAccountName().."';");
  121.  
  122. local MagicGold = GetMagicGold:GetColumn(0):GetLong()
  123.  
  124. if (MagicGold < 10) then
  125. player:SendBroadcastMessage("Not enough MG.")
  126. player:GossipComplete()
  127.  
  128. else
  129.  
  130. WorldDBQuery("UPDATE logon_git.accounts SET `mg` = '"..MagicGold.."'-'10' WHERE `login` = '"..player:GetAccountName().."'; ");
  131.  
  132. player:FullCastSpell(3286)
  133. local GetMagicGoldLeft = WorldDBQuery("SELECT `mg` FROM logon_git.accounts WHERE `login` = '"..player:GetAccountName().."';");
  134.  
  135. local MagicGoldLeftz = GetMagicGoldLeft:GetColumn(0):GetString()
  136. player:SendBroadcastMessage("|cffEC3131Spent 10 MG, total left: "..MagicGoldLeftz..".|r")
  137. player:GossipComplete()
  138. end
  139. end
  140.  
  141.  
  142. RegisterItemGossipEvent(6948,1,"Item_Trigger")
  143. RegisterItemGossipEvent(6948,2,"OnSelect")
  144.  
Advertisement
Add Comment
Please, Sign In to add comment