Share Pastebin
Guest
Public paste!

Untitled

By: a guest | Mar 20th, 2010 | Syntax: Lua | Size: 18.28 KB | Hits: 43 | Expires: Never
This paste has a previous version, view the difference. Copy text to clipboard
  1. --[[ Massive Rock v1.2
  2.  Made by RemusRowle
  3.  
  4.  Thanks to Kzan for Guild Options!
  5.  
  6.  What the Rock does
  7.  1.Gives you health potions.
  8.  2.Gives you mana potions.
  9.  3.Sets your home anywhere you want.
  10.  4.Removes res sickness.
  11.  5.Sets Your Level.
  12.  6.Set Health/MaxHealth.
  13.  7.Set Mana/Max Mana.
  14.  8.Trains you.
  15.  9. Changes your Gender
  16.  10.Several guild options.
  17. ]]--
  18.  
  19. local ItemRockID = EntryID Here
  20.  
  21. function Rock_OnClick(Item, Event, player)
  22.         if (player:IsInCombat() == true) then
  23.                         player:SendBroadCastMessage("You can't use this while in combat")
  24.                 else
  25.                
  26.                 item:GossipCreateMenu(1, player, 0)
  27.                                 item:GossipMenuAddItem(4, "Health", 5, 0)
  28.                                 item:GossipMenuAddItem(4, "Mana", 6, 0)
  29.                                 item:GossipMenuAddItem(3, "Set Home here", 7, 0)
  30.                                 item:GossipMenuAddItem(2, "Remove Sickness", 8, 0)
  31.                                 item:GossipMenuAddItem(4, "Set My Level", 9, 0)
  32.                                 item:GossipMenuAddItem(4, "Set My Health", 10, 0)
  33.                                 item:GossipMenuAddItem(4, "Set My Max Health", 11, 0)
  34.                                 item:GossipMenuAddItem(4, "Set My Mana", 12, 0)
  35.                                 item:GossipMenuAddItem(4, "Set My Max Mana", 13, 0)
  36.                                 item:GossipMenuAddItem(4, "My Trainer", 14, 0)
  37.                                 item:GossipMenuAddItem(4, "Gender Change", 15, 0)
  38.                                 item:GossipMenuAddItem(4, "My Guild", 16, 0)
  39.                                 item:GossipMenuAddItem(4, "Done", 999, 0)
  40.                                 item:GossipSendMenu(player)
  41.             end
  42. end
  43.                
  44. function Rock_OnSelect(item, event, player, id, intid, code)
  45.         if(intid == 5) then
  46.                   player:AddItem(3928, 5)
  47.                   player:SendBroadCastMessage("You have recieved 5 Superior Healing potions!")
  48.                   item:GossipComplete(player)
  49.                 end
  50.                
  51.                 if(intid == 6) then
  52.             player:AddItem(43530, 5)
  53.             player:SendBroadCastMessage("You have recieved 5 Argent Mana Potions")
  54.                 item:GossipComplete(player)
  55.                 end
  56.                
  57.                 if(intid == 7) then
  58.                     local PlyrX = player:GetX()
  59.                         local PlyrY = player:GetY()
  60.                         local PlyrZ = player:GetZ()
  61.                         local PlyrMapID = player:GetMapID()
  62.                         local PlyrAreaID = player:GetAreaID()
  63.                 player:SetBindPoint(PlyrX, PlyrY, PlyrZ, PlyrMapID, PlyrAreaID)
  64.                 end
  65.                
  66.                 if(intid == 8) then
  67.                 if (player:HasAura(15007) == true) then
  68.                                 player:SendBroadcastMessage("Careful, you might hurt yourself")
  69.                                         player:RemoveAura(15007)
  70.                                         player:GossipComplete()
  71.                         else
  72.                                 player:SendBroadCastMessage("You don't appear to be sickened")
  73.                                         player:GossipComplete()
  74.                 end
  75.         end
  76.      
  77.         if(intid == 9) then
  78.                 item:GossipCreateMenu(1, player, 0)
  79.                                 item:GossipMenuAddItem(4, "1-20", 100, 0)
  80.                                 item:GossipMenuAddItem(4, "20-40", 101, 0)
  81.                                 item:GossipMenuAddItem(3, "40-60", 102, 0)
  82.                                 item:GossipMenuAddItem(2, "60-79", 103, 0)
  83.                                 item:GossipMenuAddItem(4, "80", 104, 0)
  84.                                 item:GossipMenuAddItem(4, "Done", 999, 0)
  85.                                 item:GossipSendMenu(player)
  86.                 end
  87.                
  88.                 if(intid == 100) then
  89.          item:GossipCreateMenu(1, player, 0)
  90.                                 item:GossipMenuAddItem(4, "1", 201, 0)
  91.                                 item:GossipMenuAddItem(4, "2", 202, 0)
  92.                                 item:GossipMenuAddItem(3, "3", 203, 0)
  93.                                 item:GossipMenuAddItem(2, "4", 204, 0)
  94.                                 item:GossipMenuAddItem(4, "5", 205, 0)
  95.                                 item:GossipMenuAddItem(4, "6", 206, 0)
  96.                                 item:GossipMenuAddItem(3, "7", 207, 0)
  97.                                 item:GossipMenuAddItem(2, "8", 208, 0)
  98.                                 item:GossipMenuAddItem(4, "9", 209, 0)
  99.                                 item:GossipMenuAddItem(4, "10", 210, 0)
  100.                                 item:GossipMenuAddItem(4, "11", 211, 0)
  101.                                 item:GossipMenuAddItem(3, "12", 212, 0)
  102.                                 item:GossipMenuAddItem(2, "13", 213, 0)
  103.                                 item:GossipMenuAddItem(4, "14", 214, 0)
  104.                                 item:GossipMenuAddItem(4, "15", 215, 0)
  105.                                 item:GossipMenuAddItem(3, "16", 216, 0)
  106.                                 item:GossipMenuAddItem(2, "17", 217, 0)
  107.                                 item:GossipMenuAddItem(4, "18", 218, 0)
  108.                                 item:GossipMenuAddItem(2, "19", 219, 0)
  109.                                 item:GossipMenuAddItem(4, "20", 220, 0)
  110.                                 item:GossipMenuAddItem(4, "Done", 999, 0)
  111.                                 item:GossipSendMenu(player)
  112.             end
  113.                
  114.                         if(intid == 101) then
  115.          item:GossipCreateMenu(1, player, 0)
  116.                                 item:GossipMenuAddItem(4, "21", 221, 0)
  117.                                 item:GossipMenuAddItem(4, "22", 222, 0)
  118.                                 item:GossipMenuAddItem(3, "23", 223, 0)
  119.                                 item:GossipMenuAddItem(2, "24", 224, 0)
  120.                                 item:GossipMenuAddItem(4, "25", 225, 0)
  121.                                 item:GossipMenuAddItem(4, "26", 226, 0)
  122.                                 item:GossipMenuAddItem(3, "27", 227, 0)
  123.                                 item:GossipMenuAddItem(2, "28", 228, 0)
  124.                                 item:GossipMenuAddItem(4, "29", 229, 0)
  125.                                 item:GossipMenuAddItem(4, "30", 230, 0)
  126.                                 item:GossipMenuAddItem(4, "31", 231, 0)
  127.                                 item:GossipMenuAddItem(3, "32", 232, 0)
  128.                                 item:GossipMenuAddItem(2, "33", 233, 0)
  129.                                 item:GossipMenuAddItem(4, "34", 234, 0)
  130.                                 item:GossipMenuAddItem(4, "35", 235, 0)
  131.                                 item:GossipMenuAddItem(3, "36", 236, 0)
  132.                                 item:GossipMenuAddItem(2, "37", 237, 0)
  133.                                 item:GossipMenuAddItem(4, "38", 238, 0)
  134.                                 item:GossipMenuAddItem(2, "39", 239, 0)
  135.                                 item:GossipMenuAddItem(4, "40", 240, 0)
  136.                                 item:GossipMenuAddItem(4, "Done", 999, 0)
  137.                                 item:GossipSendMenu(player)
  138.             end
  139.                
  140.                         if(intid == 102) then
  141.          item:GossipCreateMenu(1, player, 0)
  142.                                 item:GossipMenuAddItem(4, "41", 241, 0)
  143.                                 item:GossipMenuAddItem(4, "42", 242, 0)
  144.                                 item:GossipMenuAddItem(3, "43", 243, 0)
  145.                                 item:GossipMenuAddItem(2, "44", 244, 0)
  146.                                 item:GossipMenuAddItem(4, "45", 245, 0)
  147.                                 item:GossipMenuAddItem(4, "46", 246, 0)
  148.                                 item:GossipMenuAddItem(3, "47", 247, 0)
  149.                                 item:GossipMenuAddItem(2, "48", 248, 0)
  150.                                 item:GossipMenuAddItem(4, "49", 249, 0)
  151.                                 item:GossipMenuAddItem(4, "50", 250, 0)
  152.                                 item:GossipMenuAddItem(4, "51", 251, 0)
  153.                                 item:GossipMenuAddItem(3, "52", 252, 0)
  154.                                 item:GossipMenuAddItem(2, "53", 253, 0)
  155.                                 item:GossipMenuAddItem(4, "54", 254, 0)
  156.                                 item:GossipMenuAddItem(4, "55", 255, 0)
  157.                                 item:GossipMenuAddItem(3, "56", 256, 0)
  158.                                 item:GossipMenuAddItem(2, "57", 257, 0)
  159.                                 item:GossipMenuAddItem(4, "58", 258, 0)
  160.                                 item:GossipMenuAddItem(2, "59", 259, 0)
  161.                                 item:GossipMenuAddItem(4, "60", 260, 0)
  162.                                 item:GossipMenuAddItem(4, "Done", 999, 0)
  163.                                 item:GossipSendMenu(player)
  164.             end
  165.                
  166.                 if(intid == 103) then
  167.          item:GossipCreateMenu(1, player, 0)
  168.                                 item:GossipMenuAddItem(4, "61", 261, 0)
  169.                                 item:GossipMenuAddItem(4, "62", 262, 0)
  170.                                 item:GossipMenuAddItem(3, "63", 263, 0)
  171.                                 item:GossipMenuAddItem(2, "64", 264, 0)
  172.                                 item:GossipMenuAddItem(4, "65", 265, 0)
  173.                                 item:GossipMenuAddItem(4, "66", 266, 0)
  174.                                 item:GossipMenuAddItem(3, "67", 267, 0)
  175.                                 item:GossipMenuAddItem(2, "68", 268, 0)
  176.                                 item:GossipMenuAddItem(4, "69", 269, 0)
  177.                                 item:GossipMenuAddItem(4, "70", 270, 0)
  178.                                 item:GossipMenuAddItem(4, "71", 271, 0)
  179.                                 item:GossipMenuAddItem(3, "72", 272, 0)
  180.                                 item:GossipMenuAddItem(2, "73", 273, 0)
  181.                                 item:GossipMenuAddItem(4, "74", 274, 0)
  182.                                 item:GossipMenuAddItem(4, "75", 275, 0)
  183.                                 item:GossipMenuAddItem(3, "76", 276, 0)
  184.                                 item:GossipMenuAddItem(2, "77", 277, 0)
  185.                                 item:GossipMenuAddItem(4, "78", 278, 0)
  186.                                 item:GossipMenuAddItem(2, "79", 279, 0)
  187.                                 item:GossipMenuAddItem(4, "Done", 999, 0)
  188.                                 item:GossipSendMenu(player)
  189.             end
  190.                
  191.                 if(intid == 104) then
  192.                 item:GossipCreateMenu(1, player, 0)
  193.                      item:GossipMenuAddItem(4, "80", 280, 0)
  194.                          item:GossipMenuAddItem(4, "Done", 999, 0)
  195.                          item:GossipSendMenu(player)
  196.                 end
  197.                
  198.                 if(intid == 201) then
  199.                 player:SetLevel(1)
  200.                 end
  201.                
  202.                 if(intid == 202) then
  203.                 player:SetLevel(2)
  204.                 end
  205.                
  206.                 if(intid == 203) then
  207.                 player:SetLevel(3)
  208.                 end
  209.                
  210.                 if(intid == 204) then
  211.                 player:SetLevel(4)
  212.                 end
  213.                
  214.                 if(intid == 205) then
  215.                 player:SetLevel(5)
  216.                 end
  217.                
  218.                 if(intid == 206) then
  219.                 player:SetLevel(6)
  220.                 end
  221.                
  222.                 if(intid == 207) then
  223.                 player:SetLevel(7)
  224.                 end
  225.                
  226.                 if(intid == 208) then
  227.                 player:SetLevel(8)
  228.                 end
  229.                
  230.                 if(intid == 209) then
  231.                 player:SetLevel(9)
  232.                 end
  233.                
  234.                 if(intid == 210) then
  235.                 player:SetLevel(10)
  236.                 end
  237.                
  238.                 if(intid == 211) then
  239.                 player:SetLevel(11)
  240.                 end
  241.                
  242.                 if(intid == 212) then
  243.                 player:SetLevel(12)
  244.                 end
  245.                
  246.                 if(intid == 213) then
  247.                 player:SetLevel(13)
  248.                 end
  249.                
  250.                 if(intid == 214) then
  251.                 player:SetLevel(14)
  252.                 end
  253.                
  254.                 if(intid == 215) then
  255.                 player:SetLevel(15)
  256.                 end
  257.                
  258.                 if(intid == 216) then
  259.                 player:SetLevel(16)
  260.                 end
  261.                
  262.                 if(intid == 217) then
  263.                 player:SetLevel(17)
  264.                 end
  265.                
  266.                 if(intid == 218) then
  267.                 player:SetLevel(18)
  268.                 end
  269.                
  270.                 if(intid == 219) then
  271.                 player:SetLevel(19)
  272.                 end
  273.                
  274.                 if(intid == 220) then
  275.                 player:SetLevel(20)
  276.                 end
  277.                
  278.                 if(intid == 221) then
  279.                 player:SetLevel(21)
  280.                 end
  281.                
  282.                 if(intid == 222) then
  283.                 player:SetLevel(22)
  284.                 end
  285.                
  286.                 if(intid == 223) then
  287.                 player:SetLevel(23)
  288.                 end
  289.                
  290.                 if(intid == 224) then
  291.                 player:SetLevel(24)
  292.                 end
  293.                
  294.                 if(intid == 225) then
  295.                 player:SetLevel(25)
  296.                 end
  297.                
  298.                 if(intid == 226) then
  299.                 player:SetLevel(26)
  300.                 end
  301.                
  302.                 if(intid == 227) then
  303.                 player:SetLevel(27)
  304.                 end
  305.                
  306.                 if(intid == 228) then
  307.                 player:SetLevel(28)
  308.                 end
  309.                
  310.                 if(intid == 229) then
  311.                 player:SetLevel(29)
  312.                 end
  313.                
  314.                 if(intid == 230) then
  315.                 player:SetLevel(30)
  316.                 end
  317.                
  318.                 if(intid == 231) then
  319.                 player:SetLevel(31)
  320.                 end
  321.                
  322.                 if(intid == 232) then
  323.                 player:SetLevel(32)
  324.                 end
  325.                
  326.                 if(intid == 233) then
  327.                 player:SetLevel(33)
  328.                 end
  329.                
  330.                 if(intid == 234) then
  331.                 player:SetLevel(34)
  332.                 end
  333.                
  334.                 if(intid == 235) then
  335.                 player:SetLevel(35)
  336.                 end
  337.                
  338.                 if(intid == 236) then
  339.                 player:SetLevel(36)
  340.                 end
  341.                
  342.                 if(intid == 237) then
  343.                 player:SetLevel(37)
  344.                 end
  345.                
  346.                 if(intid == 238) then
  347.                 player:SetLevel(38)
  348.                 end
  349.                
  350.                 if(intid == 239) then
  351.                 player:SetLevel(39)
  352.                 end
  353.                
  354.                 if(intid == 240) then
  355.                 player:SetLevel(40)
  356.                 end
  357.                
  358.                 if(intid == 241) then
  359.                 player:SetLevel(41)
  360.                 end
  361.                
  362.                 if(intid == 242) then
  363.                 player:SetLevel(42)
  364.                 end
  365.                
  366.                 if(intid == 243) then
  367.                 player:SetLevel(43)
  368.                 end
  369.                
  370.                 if(intid == 244) then
  371.                 player:SetLevel(44)
  372.                 end
  373.                
  374.                 if(intid == 245) then
  375.                 player:SetLevel(45)
  376.                 end
  377.                
  378.                 if(intid == 246) then
  379.                 player:SetLevel(46)
  380.                 end
  381.                
  382.                 if(intid == 247) then
  383.                 player:SetLevel(47)
  384.                 end
  385.                
  386.                 if(intid == 248) then
  387.                 player:SetLevel(48)
  388.                 end
  389.                
  390.                 if(intid == 249) then
  391.                 player:SetLevel(49)
  392.                 end
  393.                
  394.                 if(intid == 250) then
  395.                 player:SetLevel(50)
  396.                 end
  397.                
  398.                 if(intid == 251) then
  399.                 player:SetLevel(51)
  400.                 end
  401.                
  402.                 if(intid == 252) then
  403.                 player:SetLevel(52)
  404.                 end
  405.                
  406.                 if(intid == 253) then
  407.                 player:SetLevel(53)
  408.                 end
  409.                
  410.                 if(intid == 254) then
  411.                 player:SetLevel(54)
  412.                 end
  413.                
  414.                 if(intid == 255) then
  415.                 player:SetLevel(55)
  416.                 end
  417.                
  418.                 if(intid == 256) then
  419.                 player:SetLevel(56)
  420.                 end
  421.                
  422.                 if(intid == 257) then
  423.                 player:SetLevel(57)
  424.                 end
  425.                
  426.                 if(intid == 258) then
  427.                 player:SetLevel(58)
  428.                 end
  429.                
  430.                 if(intid == 259) then
  431.                 player:SetLevel(59)
  432.                 end
  433.                
  434.                 if(intid == 260) then
  435.                 player:SetLevel(60)
  436.                 end
  437.                
  438.                 if(intid == 261) then
  439.                 player:SetLevel(61)
  440.                 end
  441.                
  442.                 if(intid == 262) then
  443.                 player:SetLevel(62)
  444.                 end
  445.                
  446.                 if(intid == 263) then
  447.                 player:SetLevel(63)
  448.                 end
  449.                
  450.                 if(intid == 264) then
  451.                 player:SetLevel(64)
  452.                 end
  453.                
  454.             if(intid == 265) then
  455.                 player:SetLevel(65)
  456.                 end
  457.                
  458.                 if(intid == 266) then
  459.                 player:SetLevel(66)
  460.                 end
  461.                
  462.                 if(intid == 267) then
  463.                 player:SetLevel(67)
  464.                 end
  465.                
  466.                 if(intid == 268) then
  467.                 player:SetLevel(68)
  468.                 end
  469.                
  470.                 if(intid == 269) then
  471.                 player:SetLevel(69)
  472.                 end
  473.                
  474.                 if(intid == 270) then
  475.                 player:SetLevel(70)
  476.                 end
  477.                
  478.                 if(intid == 271) then
  479.                 player:SetLevel(71)
  480.                 end
  481.                
  482.                 if(intid == 272) then
  483.                 player:SetLevel(72)
  484.                 end
  485.                
  486.                 if(intid == 273) then
  487.                 player:SetLevel(73)
  488.                 end
  489.                
  490.                 if(intid == 274) then
  491.                 player:SetLevel(74)
  492.                 end
  493.                
  494.                 if(intid == 275) then
  495.                 player:SetLevel(75)
  496.                 end
  497.                
  498.                 if(intid == 276) then
  499.                 player:SetLevel(76)
  500.                 end
  501.                
  502.                 if(intid == 277) then
  503.                 player:SetLevel(77)
  504.                 end
  505.                
  506.                 if(intid == 278) then
  507.                 player:SetLevel(78)
  508.                 end
  509.                
  510.                 if(intid == 279) then
  511.                 player:SetLevel(79)
  512.                 end
  513.                
  514.                 if(intid == 280) then
  515.                 player:SetLevel(80)
  516.                 end
  517.                
  518.                 if(intid == 10) then
  519.                 item:GossipCreateMenu(1, player, 0)
  520.                                 item:GossipMenuAddItem(4, "1000", 300, 0)
  521.                                 item:GossipMenuAddItem(4, "2500", 301, 0)
  522.                                 item:GossipMenuAddItem(3, "4000", 302, 0)
  523.                                 item:GossipMenuAddItem(2, "6000", 303, 0)
  524.                                 item:GossipMenuAddItem(4, "8000", 304, 0)
  525.                                 item:GossipMenuAddItem(3, "10000", 305, 0)
  526.                                 item:GossipMenuAddItem(2, "12000", 306, 0)
  527.                                 item:GossipMenuAddItem(4, "14000", 307, 0)
  528.                                 item:GossipMenuAddItem(2, "16000", 308, 0)
  529.                                 item:GossipMenuAddItem(4, "18000", 309, 0)
  530.                                 item:GossipMenuAddItem(4, "Done", 999, 0)
  531.                                 item:GossipSendMenu(player)
  532.                 end
  533.                
  534.                 if(intid == 11) then
  535.                 item:GossipCreateMenu(1, player, 0)
  536.                                 item:GossipMenuAddItem(4, "1000", 310, 0)
  537.                                 item:GossipMenuAddItem(4, "2500", 311, 0)
  538.                                 item:GossipMenuAddItem(3, "4000", 312, 0)
  539.                                 item:GossipMenuAddItem(2, "6000", 313, 0)
  540.                                 item:GossipMenuAddItem(4, "8000", 314, 0)
  541.                                 item:GossipMenuAddItem(3, "10000", 315, 0)
  542.                                 item:GossipMenuAddItem(2, "12000", 316, 0)
  543.                                 item:GossipMenuAddItem(4, "14000", 317, 0)
  544.                                 item:GossipMenuAddItem(2, "16000", 318, 0)
  545.                                 item:GossipMenuAddItem(4, "18000", 319, 0)
  546.                                 item:GossipMenuAddItem(4, "Done", 999, 0)
  547.                                 item:GossipSendMenu(player)
  548.                 end
  549.  
  550.                 if(intid == 300) then
  551.                 player:SetHealth(1000)
  552.                 end
  553.                
  554.                 if(intid == 301) then
  555.                 player:SetHealth(2500)
  556.                 end
  557.                
  558.                 if(intid == 302) then
  559.                 player:SetHealth(4000)
  560.                 end
  561.                
  562.                 if(intid == 303) then
  563.                 player:SetHealth(6000)
  564.                 end
  565.                
  566.                 if(intid == 304) then
  567.                 player:SetHealth(8000)
  568.                 end
  569.                
  570.                 if(intid == 305) then
  571.                 player:SetHealth(10000)
  572.                 end
  573.                
  574.                 if(intid == 306) then
  575.                 player:SetHealth(12000)
  576.                 end
  577.                
  578.                 if(intid == 307) then
  579.                 player:SetHealth(14000)
  580.                 end
  581.                
  582.                 if(intid == 308) then
  583.                 player:SetHealth(16000)
  584.                 end
  585.                
  586.                 if(intid == 309) then
  587.                 player:SetHealth(18000)
  588.                 end
  589.                
  590.                 if(intid == 310) then
  591.                 player:SetMaxHealth(1000)
  592.                 end
  593.                
  594.                 if(intid == 311) then
  595.                 player:SetMaxHealth(2500)
  596.                 end
  597.                
  598.                 if(intid == 312) then
  599.                 player:SetMaxHealth(4000)
  600.                 end
  601.                
  602.                 if(intid == 313) then
  603.                 player:SetMaxHealth(6000)
  604.                 end
  605.                
  606.                 if(intid == 314) then
  607.                 player:SetMaxHealth(8000)
  608.                 end
  609.                
  610.                 if(intid == 315) then
  611.                 player:SetMaxHealth(10000)
  612.                 end
  613.                
  614.                 if(intid == 316) then
  615.                 player:SetMaxHealth(12000)
  616.                 end
  617.                
  618.                 if(intid == 317) then
  619.                 player:SetMaxHealth(14000)
  620.                 end
  621.                
  622.                 if(intid == 318) then
  623.                 player:SetMaxHealth(16000)
  624.                 end
  625.                
  626.                 if(intid == 319) then
  627.                 player:SetMaxHealth(18000)
  628.                 end
  629.                
  630.                 if(intid == 12) then
  631.                 item:GossipCreateMenu(1, player, 0)
  632.                                 item:GossipMenuAddItem(4, "1000", 320, 0)
  633.                                 item:GossipMenuAddItem(4, "2500", 321, 0)
  634.                                 item:GossipMenuAddItem(3, "4000", 322, 0)
  635.                                 item:GossipMenuAddItem(2, "6000", 323, 0)
  636.                                 item:GossipMenuAddItem(4, "8000", 324, 0)
  637.                                 item:GossipMenuAddItem(3, "10000", 325, 0)
  638.                                 item:GossipMenuAddItem(2, "12000", 326, 0)
  639.                                 item:GossipMenuAddItem(4, "14000", 327, 0)
  640.                                 item:GossipMenuAddItem(2, "16000", 328, 0)
  641.                                 item:GossipMenuAddItem(4, "18000", 329, 0)
  642.                                 item:GossipMenuAddItem(4, "Done", 999, 0)
  643.                                 item:GossipSendMenu(player)
  644.                 end
  645.                
  646.                 if(intid == 13) then
  647.                 item:GossipCreateMenu(1, player, 0)
  648.                                 item:GossipMenuAddItem(4, "1000", 339, 0)
  649.                                 item:GossipMenuAddItem(4, "2500", 340, 0)
  650.                                 item:GossipMenuAddItem(3, "4000", 341, 0)
  651.                                 item:GossipMenuAddItem(2, "6000", 342, 0)
  652.                                 item:GossipMenuAddItem(4, "8000", 343, 0)
  653.                                 item:GossipMenuAddItem(3, "10000", 344, 0)
  654.                                 item:GossipMenuAddItem(2, "12000", 345, 0)
  655.                                 item:GossipMenuAddItem(4, "14000", 346, 0)
  656.                                 item:GossipMenuAddItem(2, "16000", 347, 0)
  657.                                 item:GossipMenuAddItem(4, "18000", 348, 0)
  658.                                 item:GossipMenuAddItem(4, "Done", 999, 0)
  659.                                 item:GossipSendMenu(player)
  660.                 end
  661.                
  662.                 if(intid == 320) then
  663.                 player:SetMana(1000)
  664.                 end
  665.                
  666.                 if(intid == 321) then
  667.                 player:SetMana(2500)
  668.                 end
  669.                
  670.                 if(intid == 322) then
  671.                 player:SetMana(4000)
  672.                 end
  673.                
  674.                 if(intid == 323) then
  675.                 player:SetMana(6000)
  676.                 end
  677.                
  678.                 if(intid == 324) then
  679.                 player:SetMana(8000)
  680.                 end
  681.                
  682.                 if(intid == 325) then
  683.                 player:SetMana(10000)
  684.                 end
  685.                
  686.                 if(intid == 326) then
  687.                 player:SetMana(12000)
  688.                 end
  689.                
  690.                 if(intid == 327) then
  691.                 player:SetMana(14000)
  692.                 end
  693.                
  694.                 if(intid == 328) then
  695.                 player:SetMana(16000)
  696.                 end
  697.                
  698.                 if(intid == 329) then
  699.                 player:SetMana(18000)
  700.                 end
  701.                
  702.                 if(intid == 330) then
  703.                 player:SetMaxMana(1000)
  704.                 end
  705.                
  706.                 if(intid == 331) then
  707.                 player:SetMaxMana(2500)
  708.                 end
  709.                
  710.                 if(intid == 332) then
  711.                 player:SetMaxMana(4000)
  712.                 end
  713.                
  714.                 if(intid == 333) then
  715.                 player:SetMaxMana(6000)
  716.                 end
  717.                
  718.                 if(intid == 334) then
  719.                 player:SetMaxMana(8000)
  720.                 end
  721.                
  722.                 if(intid == 335) then
  723.                 player:SetMaxMana(10000)
  724.                 end
  725.                
  726.                 if(intid == 336) then
  727.                 player:SetMaxMana(12000)
  728.                 end
  729.                
  730.                 if(intid == 337) then
  731.                 player:SetMaxMana(14000)
  732.                 end
  733.                
  734.                 if(intid == 338) then
  735.                 player:SetMaxMana(16000)
  736.                 end
  737.                
  738.                 if(intid == 339) then
  739.                 player:SetMaxMana(18000)
  740.                 end
  741.                
  742.                 if(intid == 14) then
  743.                 player:SendTrainerWindow(unit)
  744.                 end
  745.                
  746.                 if(intid == 15) then
  747.                 item:GossipCreateMenu(1, player, 0)
  748.                                 item:GossipMenuAddItem(4, "Male", 1, 0)
  749.                                 item:GossipMenuAddItem(4, "Female", 2, 0)
  750.                                 item:GossipMenuAddItem(4, "Done", 999, 0)
  751.                                 item:GossipSendMenu(player)
  752.                 end
  753.                
  754.                 if(intid == 1) then
  755.         player:SetGender(0)
  756.         Player:SendBroadCastMessage(6, 0, "Please Relog, Thank You.")
  757.         player:GossipComplete()
  758.         end
  759.                
  760.                 if(intid == 2) then
  761.         player:SetGender(1)
  762.         Player:SendBroadCastMessage(6, 0, "Please Relog, Thank You.")
  763.         player:GossipComplete()
  764.         end
  765.                
  766.                 if(intid == 16) then
  767.                 Player:SendBroadCastMessage(6, 0, "Welcome to the Guild options panel!")
  768.                 item:GossipCreateMenu(1, player, 0)
  769.                                 item:GossipMenuAddItem(4, "Who is my Guild leader?", 400, 0)
  770.                                 item:GossipMenuAddItem(4, "What guild rank am i?", 401, 0)
  771.                                 item:GossipMenuAddItem(4, "How many members do we have?", 402, 0)
  772.                                 item:GossipMenuAddItem(4, "Veiw Guild Message of the Day", 403, 0)
  773.                                 item:GossipMenuAddItem(4, "Done", 999, 0)
  774.                                 item:GossipSendMenu(player)
  775.         end
  776.                
  777.                 if(intid == 400) then
  778.             player:GetGuildLeader()
  779.             item:GossipSendMenu(player)
  780.                 end
  781.                
  782.                 if(intid == 401) then
  783.             player:GetGuildRank()
  784.             item:GossipSendMenu(player)
  785.         end
  786.                
  787.                 if(intid == 402) then
  788.                 player:GetGuildMemberCount()
  789.                 item:GossipSendMenu(player)
  790.                 end
  791.                
  792.                 if(intid == 403)
  793.                 player:GetGuildMotd()
  794.                 item:GossipSendMenu(player)
  795.                 end
  796.                
  797.                 if(intid == 999) then
  798.                 player:GossipComplete()
  799.                 end
  800. end
  801.  
  802.  
  803.  
  804.                
  805. RegisterItemGossipEvent(PotionRockEntryID, 1,"Rock_OnClick")
  806. RegisterItemGossipEvent(PotionRockEntryID, 2,"Rock_OnSelect")