kusanagy

Hearthstone Teleporter

Jan 2nd, 2020
301
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 36.64 KB | None | 0 0
  1.     local itemid =6948
  2.     function Tele_Book(event, player, item)
  3.             if (player:IsInCombat() == true) then
  4.                     player:SendAreaTriggerMessage("U can't use this while u are in combat!")
  5.             else
  6.                     Tele_Menu(item, player)
  7.             end
  8.     end
  9.  
  10.     function Tele_Menu(item, player) -- Home Page
  11.     player:Dismount()
  12.     player:GossipMenuAddItem(6, "Global GPS Teleport", 1,  100)
  13.     player:GossipMenuAddItem(2, "Main Cities", 1,  101)
  14.     player:GossipMenuAddItem(2, "PvP Areas|r", 1, 102)
  15.     player:GossipMenuAddItem(2, "Customs Zones|r", 1, 103)
  16.     player:GossipMenuAddItem(2, "Pocket bank", 1, 105)
  17.     player:GossipMenuAddItem(2, "Gear Repair", 1, 106)
  18.     player:GossipMenuAddItem(2, "VIP Service", 1, 108)
  19.     player:SendNotification("|r|cff00ccffSystem |cffff0000[Hearthstone]|r")
  20.     player:GossipSendMenu(1, item)
  21.     end
  22.      
  23.     function Tele_Select(event, player, item, sender, intid, code)
  24.     if (intid == 999) then
  25.     Tele_Menu(item, player)
  26.     elseif (intid == 100) then -- Home Page Cont.
  27.     player:GossipMenuAddItem(2, "|cFF191970Azeroth Locations|r", 1,  2)
  28.     player:GossipMenuAddItem(2, "|cFF191970Azeroth Instances|r", 1,  3)
  29.     player:GossipMenuAddItem(2, "|cFF191970Azeroth Raids|r", 1,  4)
  30.     player:GossipMenuAddItem(2, "|cFF191970Outland Locations|r", 1,  5)
  31.     player:GossipMenuAddItem(2, "|cFF191970Outland Instances|r", 1,  6)
  32.     player:GossipMenuAddItem(2, "|cFF191970Outland Raids|r", 1,  7)
  33.     player:GossipMenuAddItem(2, "|cFF191970Northrend Locations|r", 1,  8)
  34.     player:GossipMenuAddItem(2, "|cFF191970Northrend Instances|r", 1,  9)
  35.     player:GossipMenuAddItem(2, "|cFF191970Northrend Raids|r", 1,  10)
  36.     player:GossipMenuAddItem(5, "|cFF191970Shattrath City|r", 1,  11)
  37.     player:GossipMenuAddItem(0, "|cFF191970Home Page", 1, 999)
  38.     player:GossipSendMenu(1, item)
  39.     elseif (intid == 101) then -- Alliance Cities
  40.         if (player:IsAlliance()) then
  41.         player:GossipMenuAddItem(2, "Mall Alliance", 1, 55641)
  42.         player:GossipMenuAddItem(2, "Stormwind", 1,  19)
  43.         player:GossipMenuAddItem(2, "Ironforge", 1,  20)
  44.         player:GossipMenuAddItem(2, "Darnassus", 1,  21)
  45.         player:GossipMenuAddItem(2, "Exodar", 1,  22)
  46.         player:GossipMenuAddItem(0, "|c99006600Home Page|r", 1,  999)
  47.         player:GossipSendMenu(1, item)
  48.         else                                    -- Horde Cities
  49.         player:GossipMenuAddItem(2, "Mall Horde", 1, 55642)
  50.         player:GossipMenuAddItem(2, "Orgrimmar", 1,  23)
  51.         player:GossipMenuAddItem(2, "Thunder bluff", 1,  24)
  52.         player:GossipMenuAddItem(2, "Undercity", 1,  25)
  53.         player:GossipMenuAddItem(2, "Silvermoon city", 1,  26)
  54.         player:GossipMenuAddItem(0, "|c99006600Home Page|r", 1,  999)
  55.         player:GossipSendMenu(1, item)
  56.         end
  57.     elseif (intid == 102) then -- PVP arenas.
  58.         player:GossipMenuAddItem(2, "Gurubashi arena", 1, 10001)
  59.         player:GossipMenuAddItem(2, "Dire Maul Arena", 1, 10002)
  60.         player:GossipMenuAddItem(2, "Nagrand Arena", 1, 10003)
  61.         player:GossipMenuAddItem(2, "Blade's Edge Arena", 1, 10004)
  62.         player:GossipMenuAddItem(0, "<<Back>>", 1, 999)
  63.         player:GossipSendMenu(1, item)     
  64.     elseif (intid == 103) then -- Customs Zones
  65.         player:GossipMenuAddItem(2, "[Well of the Forgotten]", 1, 9999)
  66.         player:GossipMenuAddItem(2, "[Dalaran Tournament]", 1, 10000)
  67.         player:GossipMenuAddItem(0, "<<Back>>", 1, 999)
  68.         player:GossipSendMenu(1, item)
  69.     elseif (intid == 105) then -- Send Bank Window
  70.         player:SendShowBank(player)
  71.     elseif (intid == 106) then -- repair items
  72.         player:GossipMenuAddItem(7, "|cffffff00 < Previous Page", 1, 999)
  73.         player:GossipMenuAddItem(0, "Items Repaired", 1, 999)
  74.         player:DurabilityRepairAll( true )
  75.         player:GossipSendMenu(1, item)
  76.     elseif (intid == 108) then -- vip service
  77.         player:GossipMenuAddItem(0, "Main menu ..", 1, 0)
  78.         --if (player:GetPremiumType() >= 1 ) then
  79.         player:GossipMenuAddItem(8, "Customs Buffs", 1, 30002)
  80.         --else
  81.             --player:GossipMenuAddItem(0, "need vip level 1", 1, 0)
  82.         --end
  83.         player:GossipMenuAddItem(0, "<<Back>>", 1, 999)
  84.         player:GossipSendMenu(1, item)
  85.     elseif(intid == 10000) then --Toc
  86.         player:Teleport(571, 5830.139160, 477.591949, 658.930054, 4)
  87.         player:GossipComplete()
  88.     elseif(intid == 9999) then --Well of the forgotten
  89.         player:Teleport(0, -11068.8, -1808.7, 52.7, 0)
  90.         player:GossipComplete()
  91.         -- gurubashi arena
  92.     elseif (intid == 10001) then
  93.             player:Teleport(0, -13229, 226, 33, 0)
  94.             player:GossipComplete()
  95.         -- dire maul arena
  96.     elseif (intid == 10002) then
  97.             player:Teleport(1, -3669, 1094, 160, 0)
  98.             player:GossipComplete()
  99.         -- Nagrand arena
  100.     elseif (intid == 10003) then
  101.             player:Teleport(530, -1983, 6562, 12, 0)
  102.             player:GossipComplete()
  103.         -- blade's edge arena
  104.     elseif (intid == 10004) then
  105.             player:Teleport(530, 2084, 247, 68, 0)
  106.             player:GossipComplete()
  107.     elseif (intid == 2) then -- Azeroth Continets
  108.             player:GossipMenuAddItem(2, "|c00FF0000Eastern Kingdoms|r", 1,  27)
  109.             player:GossipMenuAddItem(2, "|c00FF0000Kalimdor|r", 1,  28)
  110.             player:GossipMenuAddItem(0, "|c99006600Back Menu|r", 1,  100)
  111.             player:GossipSendMenu(1, item)
  112.     elseif (intid == 3) then -- Azeroth Instances
  113.             player:GossipMenuAddItem(2, "|c00FF0000Blackfathom Deeps|r", 1,  29)
  114.             player:GossipMenuAddItem(2, "|c00FF0000Blackrock Depths|r", 1,  30)
  115.             player:GossipMenuAddItem(2, "|c00FF0000Dire Maul|r", 1,  31)
  116.             player:GossipMenuAddItem(2, "|c00FF0000Gnomeregan|r", 1,  32)
  117.             player:GossipMenuAddItem(2, "|c00FF0000Maraudon|r", 1,  33)
  118.             if (player:IsAlliance()) then
  119.                     player:GossipMenuAddItem(2, "|c00FF0000Ragefire Chasm|r", 1,  34)
  120.             end
  121.             player:GossipMenuAddItem(2, "|c00FF0000Razorfen Downs|r", 1,  35)
  122.             player:GossipMenuAddItem(2, "|c00FF0000Razorfen Kraul|r", 1,  36)
  123.             player:GossipMenuAddItem(2, "|c00FF0000Scarlet Monastery|r", 1,  37)
  124.             player:GossipMenuAddItem(2, "|c00FF0000Scholomance|r", 1,  38)
  125.             player:GossipMenuAddItem(2, "|c00FF0000Shadowfang Keep|r", 1,  39)
  126.             player:GossipMenuAddItem(2, "|c00FF0000Stratholme|r", 1,  40)
  127.             player:GossipMenuAddItem(2, "|c00FF0000Sunken Temple|r", 1,  41)
  128.             player:GossipMenuAddItem(2, "|c00FF0000The Deadmines|r", 1,  42)
  129.             if (player:IsHorde()) then
  130.                     player:GossipMenuAddItem(2, "|c00FF0000The Stockade|r", 1,  43)
  131.             end
  132.             player:GossipMenuAddItem(0, "|c99006600Next Page|r", 1,  994)
  133.             player:GossipMenuAddItem(0, "|c99006600Home Page|r", 1,  100)
  134.             player:GossipSendMenu(1, item)    
  135.     elseif (intid == 994) then -- Azeroth Instances Cont.
  136.             player:GossipMenuAddItem(2, "|c00FF0000Uldaman|r", 1,  44)
  137.             player:GossipMenuAddItem(2, "|c00FF0000Wailing Caverns|r", 1,  45)
  138.             player:GossipMenuAddItem(2, "|c00FF0000Zul'Farrak|r", 1,  46)
  139.             player:GossipMenuAddItem(0, "|c99006600Previous Page|r", 1,  3)
  140.             player:GossipMenuAddItem(0, "|c99006600Back Menu|r", 1,  100)
  141.             player:GossipSendMenu(1, item)
  142.     elseif (intid == 4) then -- Azeroth Raids
  143.             player:GossipMenuAddItem(2, "|c00FF0000Blackwing Lair|r", 1,  47)
  144.             player:GossipMenuAddItem(2, "|c00FF0000Molten Core|r", 1,  48)
  145.             player:GossipMenuAddItem(2, "|c00FF0000Onyxia's Lair|r", 1,  49)
  146.             player:GossipMenuAddItem(2, "|c00FF0000Ruins of Ahn'Qiraj|r", 1,  50)
  147.             player:GossipMenuAddItem(2, "|c00FF0000Temple of Ahn'Qiraj|r", 1,  51)
  148.             player:GossipMenuAddItem(2, "|c00FF0000Zul'Gurub|r", 1, 52)
  149.             player:GossipMenuAddItem(0, "|c99006600Back Menu|r", 1,  100)
  150.             player:GossipSendMenu(1, item)
  151.     elseif (intid == 5) then -- Outland Locations
  152.             player:GossipMenuAddItem(2, "|c00FF0000Blade's Edge Mountains|r", 1,  53)
  153.             player:GossipMenuAddItem(2, "|c00FF0000Hellfire Peninsula|r", 1,  54)
  154.             player:GossipMenuAddItem(2, "|c00FF0000Nagrand|r", 1,  55)
  155.             player:GossipMenuAddItem(2, "|c00FF0000Netherstorm|r", 1,  56)
  156.             player:GossipMenuAddItem(2, "|c00FF0000Shadowmoon Valley|r", 1,  57)
  157.             player:GossipMenuAddItem(2, "|c00FF0000Terokkar Forest|r", 1,  58)
  158.             player:GossipMenuAddItem(2, "|c00FF0000Zangarmarsh|r", 1,  59)
  159.             player:GossipMenuAddItem(0, "|c99006600Back Menu|r", 1,  100)
  160.             player:GossipSendMenu(1, item)
  161.     elseif (intid == 6) then -- Outland Instances
  162.             player:GossipMenuAddItem(2, "|c00FF0000Auchindoun|r", 1,  60)
  163.             player:GossipMenuAddItem(2, "|c00FF0000Caverns of Time|r", 1,  61)
  164.             player:GossipMenuAddItem(2, "|c00FF0000Coilfang Reservoir|r", 1,  62)
  165.             player:GossipMenuAddItem(2, "|c00FF0000Hellfire Citadel|r", 1,  63)
  166.             player:GossipMenuAddItem(2, "|c00FF0000Magisters' Terrace|r", 1,  64)
  167.             player:GossipMenuAddItem(2, "|c00FF0000Tempest Keep|r", 1,  65)
  168.             player:GossipMenuAddItem(0, "|c99006600Back Menu|r", 1,  100)
  169.             player:GossipSendMenu(1, item)
  170.     elseif (intid == 7) then -- Outland Raids
  171.             player:GossipMenuAddItem(2, "|c00FF0000Black Temple|r", 1,  66)
  172.             player:GossipMenuAddItem(2, "|c00FF0000Hyjal Summit|r", 1,  67)
  173.             player:GossipMenuAddItem(2, "|c00FF0000Serpentshrine Cavern|r", 1,  68)
  174.             player:GossipMenuAddItem(2, "|c00FF0000Gruul's Lair|r", 1,  69)
  175.             player:GossipMenuAddItem(2, "|c00FF0000Magtheridon's Lair|r", 1,  70)
  176.             player:GossipMenuAddItem(2, "|c00FF0000Karazhan|r", 1, 71)
  177.             player:GossipMenuAddItem(2, "|c00FF0000Sunwell Plateau|r", 1,  72)
  178.             player:GossipMenuAddItem(2, "|c00FF0000The Eye|r", 1,  73)
  179.             player:GossipMenuAddItem(2, "|c00FF0000Zul'Aman|r", 1,  74)
  180.             player:GossipMenuAddItem(0, "|c99006600Back Menu|r", 1,  100)
  181.             player:GossipSendMenu(1, item)
  182.     elseif (intid == 8) then -- Northrend Locations
  183.             player:GossipMenuAddItem(2, "|c00FF0000Borean Tundra|r", 1, 75)
  184.             player:GossipMenuAddItem(2, "|c00FF0000Crystalsong Forest|r", 1, 76)
  185.             player:GossipMenuAddItem(2, "|c00FF0000DragonBlight|r", 1, 77)
  186.             player:GossipMenuAddItem(2, "|c00FF0000Grizzly Hills|r", 1, 78)
  187.             player:GossipMenuAddItem(2, "|c00FF0000Howling Fjord|r", 1, 79)
  188.             player:GossipMenuAddItem(2, "|c00FF0000Icecrown|r", 1, 80)
  189.             player:GossipMenuAddItem(2, "|c00FF0000Sholazar Basin|r", 1, 81)
  190.             player:GossipMenuAddItem(2, "|c00FF0000The Storm Peaks|r", 1, 82)
  191.             player:GossipMenuAddItem(2, "|c00FF0000WinterGrasp|r", 1, 83)
  192.             player:GossipMenuAddItem(2, "|c00FF0000Zul'Drak|r", 1, 84)
  193.             player:GossipMenuAddItem(0, "|c99006600Back Menu|r", 1, 100)
  194.             player:GossipSendMenu(1, item)
  195.     elseif (intid == 9) then -- Northrend Instances
  196.             player:GossipMenuAddItem(2, "|c00FF0000Azjol-Nerub|r", 1, 85)
  197.             player:GossipMenuAddItem(2, "|c00FF0000Drak'Tharon Keep|r", 1, 86)
  198.             player:GossipMenuAddItem(2, "|c00FF0000Gundrak|r", 1, 87)
  199.             player:GossipMenuAddItem(2, "|c00FF0000The Culling of Stratholme|r", 1, 88)
  200.             player:GossipMenuAddItem(2, "|c00FF0000The Halls of Lightning|r", 1, 89)
  201.             player:GossipMenuAddItem(2, "|c00FF0000The Halls of Stone|r", 1, 90)
  202.             player:GossipMenuAddItem(2, "|c00FF0000The Nexus|r", 1, 91)
  203.             player:GossipMenuAddItem(2, "|c00FF0000The Violet Hold|r", 1, 92)
  204.             player:GossipMenuAddItem(2, "|c00FF0000Utgarde Keep|r", 1, 93)
  205.             player:GossipMenuAddItem(2, "|c00FF0000Utgarde Pinnacle|r", 1, 94)
  206.             player:GossipMenuAddItem(0, "|c99006600Back Menu|r", 1, 100)
  207.             player:GossipSendMenu(1, item)
  208.     elseif (intid == 10) then -- Northrend Raids
  209.             player:GossipMenuAddItem(2, "|c00FF0000Naxxramas|r", 1, 95)
  210.             player:GossipMenuAddItem(2, "|c00FF0000The Eye of Eternity|r", 1, 96)
  211.             player:GossipMenuAddItem(2, "|c00FF0000The Obsidian Sanctum|r", 1, 97)
  212.             player:GossipMenuAddItem(2, "|c00FF0000Ulduar|r", 1, 98)
  213.             player:GossipMenuAddItem(2, "|c00FF0000Vault of Archavon|r", 1, 99)
  214.             player:GossipMenuAddItem(0, "|c99006600Back Menu|r", 1, 100)
  215.             player:GossipSendMenu(1, item)
  216.     -- Shattrath
  217.     elseif (intid == 11) then
  218.             player:Teleport(530, -1817.82, 5453.04, -12.42, 0)
  219.             player:SendNotification("|r|cff00ccffSystem |cffff0000Teleport To [Shattrath City]|r")
  220.             player:GossipComplete()
  221.        --zona de profesiones
  222.     elseif (intid == 5567) then
  223.             player:Teleport(530, -248.646118, 934.131592, 85.260094, 1.5)
  224.             player:SendNotification("|r|cff00ccffSystem |cffff0000Teleport To [The Dark Portal]|r")
  225.             player:GossipComplete()
  226.         --mallzone alliance
  227.      elseif (intid == 55641) then
  228.             player:Teleport(0, -3785.020020, -750.935974, 8.105550, 4.886920)
  229.             player:SendNotification("|r|cff00ccffSystem |cffff0000Teleport To [Mall Zone Horde]|r")
  230.             player:GossipComplete()
  231.         --mallzone horde
  232.     elseif (intid == 55642) then
  233.             player:Teleport(0, -917.687988, -3489.743652, 70.450500, 4.685705)
  234.             player:SendNotification("|r|cff00ccffSystem |cffff0000Teleport To [Mall Zone Horde]|r")
  235.             player:GossipComplete()
  236.     -- Alliance Cities
  237.     elseif (intid == 19) then -- Stormwind
  238.             player:Teleport(0, -8913.23, 554.63, 93.79, 0)
  239.             player:GossipComplete()
  240.     elseif (intid == 20) then -- Ironforge
  241.             player:Teleport(0, -4923.826660, -957.8259, 502.673767, 0)
  242.             player:GossipComplete()
  243.     elseif (intid == 21) then -- Darnassus
  244.             player:Teleport(1, 9945.49, 2609.89, 1316.26, 0)
  245.             player:GossipComplete()
  246.     elseif (intid == 22) then -- Exodar
  247.             player:Teleport(530, -4002.67, -11875.54, -0.71, 0)
  248.             player:GossipComplete()
  249.     -- Horde Cities
  250.     elseif (intid == 23) then -- Orgimmar
  251.             player:Teleport(1, 1571.830322, -4414.051758, 7.721913, 0)
  252.             player:GossipComplete()
  253.     elseif (intid == 24) then -- Thunderbluff
  254.             player:Teleport(1, -1285.23, 117.86, 129.99, 0)
  255.             player:GossipComplete()
  256.     elseif (intid == 25) then -- Undercity
  257.             player:Teleport(0, 1831.26, 238.52, 60.52, 0)
  258.             player:GossipComplete()
  259.     elseif (intid == 26) then -- Silvermoon
  260.             player:Teleport(530, 9398.75, -7277.41, 14.21, 0)
  261.             player:GossipComplete()
  262.     -- Azeroth Locations
  263.     elseif (intid == 27) then -- Eastern Kingdoms
  264.             player:GossipMenuAddItem(2, "Alterac Mountains", 1, 112)
  265.             player:GossipMenuAddItem(2, "Arathi Highlands", 1, 113)
  266.             player:GossipMenuAddItem(2, "Badlands", 1, 114)
  267.             player:GossipMenuAddItem(2, "Blasted Lands", 1, 115)
  268.             player:GossipMenuAddItem(2, "Burning Steppes", 1, 116)
  269.             player:GossipMenuAddItem(2, "Deadwind Pass", 1, 117)
  270.             player:GossipMenuAddItem(2, "Dun Morogh", 1, 118)
  271.             player:GossipMenuAddItem(2, "Duskwood", 1, 119)
  272.             player:GossipMenuAddItem(2, "Eastern Plaguelands", 1, 120)
  273.             player:GossipMenuAddItem(2, "Elwynn Forest", 1, 121)
  274.             player:GossipMenuAddItem(2, "Eversong Woods", 1, 122)
  275.             player:GossipMenuAddItem(2, "Ghostlands", 1, 123)
  276.             player:GossipMenuAddItem(2, "Hillsbrad Foothills", 1, 124)
  277.             player:GossipMenuAddItem(2, "Isle of Quel'Danas", 1, 125)
  278.             player:GossipMenuAddItem(0, "Next Page", 1, 996)
  279.             player:GossipMenuAddItem(0, "Home Page", 1, 999)
  280.             player:GossipSendMenu(1, item)
  281.     elseif (intid == 996) then -- Eastern Kingdoms Cont.
  282.             player:GossipMenuAddItem(2, "Loch Modan", 1, 126)
  283.             player:GossipMenuAddItem(2, "Redridge Mountains", 1, 127)
  284.             player:GossipMenuAddItem(2, "Searing Gorge", 1, 128)
  285.             player:GossipMenuAddItem(2, "Silverpine Forest", 1, 129)
  286.             player:GossipMenuAddItem(2, "Stranglethorn Vale", 1, 130)
  287.             player:GossipMenuAddItem(2, "Swamp of Sorrows", 1, 131)
  288.             player:GossipMenuAddItem(2, "The Hinterlands", 1, 132)
  289.             player:GossipMenuAddItem(2, "Tirisfal Glades", 1, 133)
  290.             player:GossipMenuAddItem(2, "Western Plaguelands", 1, 134)
  291.             player:GossipMenuAddItem(2, "Westfall", 1, 135)
  292.             player:GossipMenuAddItem(2, "Wetlands", 1, 136)
  293.             player:GossipMenuAddItem(0, "Previous Page", 1, 27)
  294.             player:GossipMenuAddItem(0, "Home Page", 1, 999)
  295.             player:GossipSendMenu(1, item)
  296.     elseif (intid == 28) then -- Kalimdor
  297.             player:GossipMenuAddItem(2, "Ashenvale", 1, 137)
  298.             player:GossipMenuAddItem(2, "Azshara", 1, 138)
  299.             player:GossipMenuAddItem(2, "Azuremyst Isle", 1, 139)
  300.             player:GossipMenuAddItem(2, "Bloodmyst Isle", 1, 140)
  301.             player:GossipMenuAddItem(2, "Darkshore", 1, 141)
  302.             player:GossipMenuAddItem(2, "Desolace", 1, 142)
  303.             player:GossipMenuAddItem(2, "Durotar", 1, 143)
  304.             player:GossipMenuAddItem(2, "Dustwallow Marsh", 1, 144)
  305.             player:GossipMenuAddItem(2, "Felwood", 1, 145)
  306.             player:GossipMenuAddItem(2, "Feralas", 1, 146)
  307.             player:GossipMenuAddItem(2, "Moonglade", 1, 147)
  308.             player:GossipMenuAddItem(2, "Mulgore", 1, 148)
  309.             player:GossipMenuAddItem(2, "Silithus", 1, 149)
  310.             player:GossipMenuAddItem(0, "Next Page", 1, 995)
  311.             player:GossipMenuAddItem(0, "Home Page", 1, 999)
  312.             player:GossipSendMenu(1, item)
  313.     elseif (intid == 995) then -- Kalimdor Cont.
  314.             player:GossipMenuAddItem(2, "Stonetalon Mountains", 1, 150)
  315.             player:GossipMenuAddItem(2, "Tanaris", 1, 151)
  316.             player:GossipMenuAddItem(2, "Teldrassil", 1, 152)
  317.             player:GossipMenuAddItem(2, "The Barrens", 1, 153)
  318.             player:GossipMenuAddItem(2, "Thousand Needles", 1, 154)
  319.             player:GossipMenuAddItem(2, "Un'Goro Crater", 1, 0, 155)
  320.             player:GossipMenuAddItem(2, "Winterspring", 1, 156)
  321.             player:GossipMenuAddItem(0, "Previous Page", 1, 28)
  322.             player:GossipMenuAddItem(0, "Home Page", 1, 999)
  323.             player:GossipSendMenu(1, item)
  324.     elseif (intid == 29) then -- Blackfathom Deeps
  325.             player:Teleport(1, 4247.34, 744.05, -24.71, 0)
  326.             player:GossipComplete()
  327.     elseif (intid == 30) then -- Blackrock Depths
  328.             player:Teleport(0, -7576.74, -1126.68, 262.26, 0)
  329.             player:GossipComplete()
  330.     elseif (intid == 31) then -- Dire Maul
  331.             player:Teleport(1, -3879.52, 1095.26, 154.78, 0)
  332.             player:GossipComplete()
  333.     elseif (intid == 32) then -- Gnomeregan
  334.             player:Teleport(0, -5162.63, 923.21, 257.17, 0)
  335.             player:GossipComplete()
  336.     elseif (intid == 33) then -- Maraudon
  337.             player:Teleport(1, -1412.73, 2816.92, 112.64, 0)
  338.             player:GossipComplete()
  339.     elseif (intid == 34) then -- Ragefire Chasm
  340.             player:Teleport(1, 1814.17, -4401.13, -17.67, 0)
  341.             player:GossipComplete()
  342.     elseif (intid == 35) then -- Razorfen Downs
  343.             player:Teleport(1, -4378.32, -1949.14, 88.57, 0)
  344.             player:GossipComplete()
  345.     elseif (intid == 36) then -- Razorfen Kraul
  346.             player:Teleport(1, -4473.31, -1810.05, 86.11, 0)
  347.             player:GossipComplete()
  348.     elseif (intid == 37) then -- Scarlet Monastery
  349.             player:Teleport(0, 2881.84, -816.23, 160.33, 0)
  350.             player:GossipComplete()
  351.     elseif (intid == 38) then -- Scholomance
  352.             player:Teleport(0, 1229.45, -2576.66, 90.43, 0)
  353.             player:GossipComplete()
  354.     elseif (intid == 39) then -- Shadowfang Keep
  355.             player:Teleport(0, -243.85, 1517.21, 76.23, 0)
  356.             player:GossipComplete()
  357.     elseif (intid == 40) then -- Stratholme
  358.             player:Teleport(0, 3362.14, -3380.05, 144.78, 0)
  359.             player:GossipComplete()
  360.     elseif (intid == 41) then -- Sunken Temple
  361.             player:Teleport(0, -10452.32, -3817.51, 18.06, 0)
  362.             player:GossipComplete()
  363.     elseif (intid == 42) then -- The Deadmines
  364.             player:Teleport(0, -11084.10, 1556.17, 48.12, 0)
  365.             player:GossipComplete()
  366.     elseif (intid == 43) then -- The Stockade
  367.             player:Teleport(0, -8797.29, 826.67, 97.63, 0)
  368.             player:GossipComplete()
  369.     elseif (intid == 44) then -- Uldaman
  370.             player:Teleport(0, -6072.23, -2955.94, 209.61, 0)
  371.             player:GossipComplete()
  372.     elseif (intid == 45) then -- Wailing Caverns
  373.             player:Teleport(1, -735.11, -2214.21, 16.83, 0)
  374.             player:GossipComplete()
  375.     elseif (intid == 46) then -- Zul'Farrak
  376.             player:Teleport(1, -6825.69, -2882.77, 8.91, 0)
  377.             player:GossipComplete()
  378.     -- Azeroth Raids
  379.     elseif (intid == 47) then -- Blackwing Lair
  380.             player:Teleport(469, -7666.11, -1101.53, 399.67, 0)
  381.             player:GossipComplete()
  382.     elseif (intid == 48) then -- Molten Core
  383.             player:Teleport(230, 1117.61, -457.36, -102.49, 0)
  384.             player:GossipComplete()
  385.     elseif (intid == 49) then -- Onyxia's Lair
  386.             player:Teleport(1, -4697.81, -3720.44, 50.35, 0)
  387.             player:GossipComplete()
  388.     elseif (intid == 50) then -- Ruins of Ahn'Qiraj
  389.             player:Teleport(1, -8380.47, 1480.84, 14.35, 0)
  390.             player:GossipComplete()
  391.     elseif (intid == 51) then -- Temple of Ahn'Qiraj
  392.             player:Teleport(1, -8258.27, 1962.73, 129.89, 0)
  393.             player:GossipComplete()
  394.     elseif (intid == 52) then -- Zul'Gurub
  395.             player:Teleport(0, -11916.74, -1203.32, 92.28, 0)
  396.             player:GossipComplete()
  397.     -- Outland Locations
  398.     elseif (intid == 53) then -- Blade's Edge Mountains
  399.             player:Teleport(530, 2039.24, 6409.27, 134.30, 0)
  400.             player:GossipComplete()
  401.     elseif (intid == 54) then -- Hellfire Peninsula
  402.             player:Teleport(530, -247.37, 964.77, 84.33, 0)
  403.             player:GossipComplete()
  404.     elseif (intid == 55) then -- Nagrand
  405.             player:Teleport(530, -605.84, 8442.39, 60.76, 0)
  406.             player:GossipComplete()
  407.     elseif (intid == 56) then -- Netherstorm
  408.             player:Teleport(530, 3055.70, 3671.63, 142.44, 0)
  409.             player:GossipComplete()
  410.     elseif (intid == 57) then -- Shadowmoon Valley
  411.             player:Teleport(530, -2859.75, 3184.24, 9.76, 0)
  412.             player:GossipComplete()
  413.     elseif (intid == 58) then -- Terokkar Forest
  414.             player:Teleport(530, -1917.17, 4879.45, 2.10, 0)
  415.             player:GossipComplete()
  416.     elseif (intid == 59) then -- Zangarmarsh
  417.             player:Teleport(530, -206.61, 5512.90, 21.58, 0)
  418.             player:GossipComplete()
  419.     -- Outland Instances
  420.     elseif (intid == 60) then -- Auchindoun
  421.             player:Teleport(530, -3323.76, 4934.31, -100.21, 0)
  422.             player:GossipComplete()
  423.     elseif (intid == 61) then -- Caverns of Time
  424.             player:Teleport(1, -8187.16, -4704.91, 19.33, 0)
  425.             player:GossipComplete()
  426.     elseif (intid == 62) then -- Coilfang Reservoir
  427.             player:Teleport(530, 731.04, 6849.35, -66.62, 0)
  428.             player:GossipComplete()
  429.     elseif (intid == 63) then -- Hellfire Citadel
  430.             player:Teleport(530, -331.87, 3039.30, -16.66, 0)
  431.             player:GossipComplete()
  432.     elseif (intid == 64) then -- Magisters' Terrace
  433.             player:Teleport(530, 12884.92, -7333.78, 65.48, 0)
  434.             player:GossipComplete()
  435.     elseif (intid == 65) then -- Tempest Keep
  436.             player:Teleport(530, 3088.25, 1388.17, 185.09, 0)
  437.             player:GossipComplete()
  438.     -- Outland Raids
  439.     elseif (intid == 66) then -- Black Temple
  440.             player:Teleport(530, -3638.16, 316.09, 35.40, 0)
  441.             player:GossipComplete()
  442.     elseif (intid == 67) then -- Hyjal Summit
  443.             player:Teleport(1, -8175.94, -4178.52, -166.74, 0)
  444.             player:GossipComplete()
  445.     elseif (intid == 68) then -- Serpentshrine Cavern
  446.             player:Teleport(530, 731.04, 6849.35, -66.62, 0)
  447.             player:GossipComplete()
  448.     elseif (intid == 69) then -- Gruul's Lair
  449.             player:Teleport(530, 3528.99, 5133.50, 1.31, 0)
  450.             player:GossipComplete()
  451.     elseif (intid == 70) then -- Magtheridon's Lair
  452.             player:Teleport(530, -337.50, 3131.88, -102.92, 0)
  453.             player:GossipComplete()
  454.     elseif (intid == 71) then -- Karazhan
  455.             player:Teleport(0, -11119.22, -2010.73, 47.09, 0)
  456.             player:GossipComplete()
  457.     elseif (intid == 72) then -- Sunwell Plateau
  458.             player:Teleport(530, 12560.79, -6774.58, 15.08, 0)
  459.             player:GossipComplete()
  460.     elseif (intid == 73) then -- The Eye
  461.             player:Teleport(530, 3088.25, 1388.17, 185.09, 0)
  462.             player:GossipComplete()
  463.     elseif (intid == 74) then -- Zul'Aman
  464.             player:Teleport(530, 6850, -7950, 170, 0)
  465.             player:GossipComplete()
  466.     -- Northrend Locations
  467.     elseif (intid == 75) then -- Borean Tundra
  468.             player:Teleport(571, 2920.15, 4043.40, 1.82, 0)
  469.             player:GossipComplete()
  470.     elseif (intid == 76) then -- Crystalsong Forest
  471.             player:Teleport(571, 5371.18, 109.11, 157.65, 0)
  472.             player:GossipComplete()
  473.      elseif (intid == 77) then -- Dragonblight
  474.             player:Teleport(571, 2729.59, 430.70, 66.98, 0)
  475.             player:GossipComplete()
  476.     elseif (intid == 78) then -- Grizzly Hills
  477.             player:Teleport(571, 3587.20, -4545.12, 198.75, 0)
  478.             player:GossipComplete()
  479.     elseif (intid == 79) then -- Howling Fjord
  480.             player:Teleport(571, 154.39, -4896.33, 296.14, 0)
  481.             player:GossipComplete()
  482.     elseif (intid == 80) then -- Icecrown
  483.             player:Teleport(571, 8406.89, 2703.79, 665.17, 0)
  484.             player:GossipComplete()
  485.     elseif (intid == 81) then -- Sholazar Basin
  486.             player:Teleport(571, 5569.49, 5762.99, -75.22, 0)
  487.             player:GossipComplete()
  488.     elseif (intid == 82) then -- The Storm Peaks
  489.             player:Teleport(571, 6180.66, -1085.65, 415.54, 0)
  490.             player:GossipComplete()
  491.     elseif (intid == 83) then -- Wintergrasp
  492.             player:Teleport(571, 5044.03, 2847.23, 392.64, 0)
  493.             player:GossipComplete()
  494.     elseif (intid == 84) then -- Zul'Drak
  495.             player:Teleport(571, 4700.09, -3306.54, 292.41, 0)
  496.             player:GossipComplete()
  497.     -- Northrend Instances
  498.     elseif (intid == 85) then -- Azjol-Nerub
  499.             player:Teleport(571, 3738.93, 2164.14, 37.29, 0)
  500.             player:GossipComplete()
  501.     elseif (intid == 86) then -- Drak'Tharon
  502.             player:Teleport(571, 4772.13, -2035.85, 229.38, 0)
  503.             player:GossipComplete()
  504.     elseif (intid == 87) then -- Gundrak
  505.             player:Teleport(571, 6937.12, -4450.80, 450.90, 0)
  506.             player:GossipComplete()
  507.     elseif (intid == 88) then -- The Culling of Stratholme
  508.             player:Teleport(1, -8746.94, -4437.69, -199.98, 0)
  509.             player:GossipComplete()
  510.     elseif (intid == 89) then -- The Halls of Lightning
  511.             player:Teleport(571, 9171.01, -1375.94, 1099.55, 0)
  512.             player:GossipComplete()
  513.     elseif (intid == 90) then -- The Halls of Stone
  514.             player:Teleport(571, 8921.35, -988.56, 1039.37, 0)
  515.             player:GossipComplete()
  516.     elseif (intid == 91) then -- The Nexus
  517.             player:Teleport(571, 3784.76, 6941.97, 104.49, 0)
  518.             player:GossipComplete()
  519.     elseif (intid == 92) then -- The Violet Hold
  520.             player:Teleport(571, 5695.19, 505.38, 652.68, 0)
  521.             player:GossipComplete()
  522.     elseif (intid == 93) then -- Utgarde Keep
  523.             player:Teleport(571, 1222.44, -4862.61, 41.24, 0)
  524.             player:GossipComplete()
  525.     elseif (intid == 94) then -- Utgarde Pinnacle
  526.             player:Teleport(571, 1251.10, -4856.31, 215.86, 0)
  527.             player:GossipComplete()
  528.     -- Northrend Raids
  529.     elseif (intid == 95) then -- Naxxramas
  530.             player:Teleport(571, 3669.77, -1275.48, 243.51, 0)
  531.             player:GossipComplete()
  532.     elseif (intid == 96) then -- The Eye of Eternity
  533.             player:Teleport(571, 3873.50, 6974.83, 152.04, 0)
  534.             player:GossipComplete()
  535.     elseif (intid == 97) then -- The Obsidian Sanctum
  536.             player:Teleport(571, 3547.39, 267.95, -115.96, 0)
  537.             player:GossipComplete()
  538.     elseif (intid == 98) then -- Ulduar
  539.             player:Teleport(571, 9330.53, -1115.40, 1245.14, 0)
  540.             player:GossipComplete()
  541.     elseif (intid == 99) then -- Vault of Archavon
  542.             player:Teleport(571, 5410.21, 2842.37, 418.67, 0)
  543.             player:GossipComplete()
  544.     -- Eastern Kingdoms
  545.     elseif (intid == 112) then -- Alterac Mountains
  546.             player:Teleport(0, 353.79, -607.08, 150.76, 0)
  547.             player:GossipComplete()
  548.     elseif (intid == 113) then -- Arathi Highlands
  549.             player:Teleport(0, -2269.78, -2501.06, 79.04, 0)
  550.             player:GossipComplete()
  551.     elseif (intid == 114) then -- Badlands
  552.             player:Teleport(0, -6026.58, -3318.27, 260.64, 0)
  553.             player:GossipComplete()
  554.     elseif (intid == 115) then -- Blasted Lands
  555.             player:Teleport(0, -10797.67, -2994.29, 44.42, 0)
  556.             player:GossipComplete()
  557.     elseif (intid == 116) then -- Burning Steppes
  558.             player:Teleport(0, -8357.72, -2537.49, 135.01, 0)
  559.             player:GossipComplete()
  560.     elseif (intid == 117) then -- Deadwind Pass
  561.             player:Teleport(0, -10460.22, -1699.33, 81.85, 0)
  562.             player:GossipComplete()
  563.     elseif (intid == 118) then -- Dun Morogh
  564.             player:Teleport(0, -6234.99, 341.24, 383.22, 0)
  565.             player:GossipComplete()
  566.     elseif (intid == 119) then -- Duskwood
  567.             player:Teleport(0, -10068.30, -1501.07, 28.41, 0)
  568.             player:GossipComplete()
  569.     elseif (intid == 120) then -- Eastern Plaguelands
  570.             player:Teleport(0, 1924.70, -2653.54, 59.70, 0)
  571.             player:GossipComplete()
  572.     elseif (intid == 121) then -- Elwynn Forest
  573.             player:Teleport(0, -8939.71, -131.22, 83.62, 0)
  574.             player:GossipComplete()
  575.     elseif (intid == 122) then -- Eversong Woods
  576.             player:Teleport(530, 10341.73, -6366.29, 34.31, 0)
  577.             player:GossipComplete()
  578.     elseif (intid == 123) then -- Ghostlands
  579.             player:Teleport(530, 7969.87, -6872.63, 58.66, 0)
  580.             player:GossipComplete()
  581.     elseif (intid == 124) then -- Hillsbrad Foothills
  582.             player:Teleport(0, -585.70, 612.18, 83.80, 0)
  583.             player:GossipComplete()
  584.     elseif (intid == 125) then -- Isle of Quel'Danas
  585.             player:Teleport(530, 12916.81, -6867.82, 7.69, 0)
  586.             player:GossipComplete()
  587.     elseif (intid == 126) then -- Loch Modan
  588.             player:Teleport(0, -4702.59, -2698.61, 318.75, 0)
  589.             player:GossipComplete()
  590.     elseif (intid == 127) then -- Redridge Mountains
  591.             player:Teleport(0, -9600.62, -2123.21, 66.23, 0)
  592.             player:GossipComplete()
  593.     elseif (intid == 128) then -- Searing Gorge
  594.             player:Teleport(0, -6897.73, -1821.58, 241.16, 0)
  595.             player:GossipComplete()
  596.     elseif (intid == 129) then -- Silverpine Forest
  597.             player:Teleport(0, 1499.57, 623.98, 47.01, 0)
  598.             player:GossipComplete()
  599.     elseif (intid == 130) then -- Stranglethorn Vale
  600.             player:Teleport(0, -11355.90, -383.40, 65.14, 0)
  601.             player:GossipComplete()
  602.     elseif (intid == 131) then -- Swamp of Sorrows
  603.             player:Teleport(0, -10552.60, -2355.25, 85.95, 0)
  604.             player:GossipComplete()
  605.     elseif (intid == 132) then -- The Hinterlands
  606.             player:Teleport(0, 92.63, -1942.31, 154.11, 0)
  607.             player:GossipComplete()
  608.     elseif (intid == 133) then -- Tirisfal Glades
  609.             player:Teleport(0, 1676.13, 1669.37, 137.02, 0)
  610.             player:GossipComplete()
  611.     elseif (intid == 134) then -- Western Plaguelands
  612.             player:Teleport(0, 1635.57, -1068.50, 66.57, 0)
  613.             player:GossipComplete()
  614.     elseif (intid == 135) then -- Westfall
  615.             player:Teleport(0, -9827.95, 865.80, 25.80, 0)
  616.             player:GossipComplete()
  617.     elseif (intid == 136) then -- Wetlands
  618.             player:Teleport(0, -4086.32, -2620.72, 43.55, 0)
  619.             player:GossipComplete()
  620.     -- Kalimdor
  621.     elseif (intid == 137) then -- Ashenvale
  622.             player:Teleport(1, 3474.41, 853.47, 5.76, 0)
  623.             player:GossipComplete()
  624.     elseif (intid == 138) then -- Azshara
  625.             player:Teleport(1, 2763.93, -3881.34, 92.52, 0)
  626.             player:GossipComplete()
  627.     elseif (intid == 139) then -- Azuremyst Isle
  628.             player:Teleport(530, -3972.72, -13914.99, 98.88, 0)
  629.             player:GossipComplete()
  630.     elseif (intid == 140) then -- Bloodmyst Isle
  631.             player:Teleport(530, -2721.67, -12208.90, 9.08, 0)
  632.             player:GossipComplete()
  633.     elseif (intid == 141) then -- Darkshore
  634.             player:Teleport(1, 4336.61, 173.83, 46.84, 0)
  635.             player:GossipComplete()
  636.     elseif (intid == 142) then -- Desolace
  637.             player:Teleport(1, 47.28, 1684.64, 93.55, 0)
  638.             player:GossipComplete()
  639.     elseif (intid == 143) then -- Durotar
  640.             player:Teleport(1, -611.61, -4263.16, 38.95, 0)
  641.             player:GossipComplete()
  642.     elseif (intid == 144) then -- Dustwallow Marsh
  643.             player:Teleport(1, -3682.58, -2556.93, 58.43, 0)
  644.             player:GossipComplete()
  645.     elseif (intid == 145) then -- Felwood
  646.             player:Teleport(1, 3590.56, -1516.69, 169.98, 0)
  647.             player:GossipComplete()
  648.     elseif (intid == 146) then -- Feralas
  649.             player:Teleport(1, -4300.02, -631.56, -9.35, 0)
  650.             player:GossipComplete()
  651.     elseif (intid == 147) then -- Moonglade
  652.             player:Teleport(1, 7999.68, -2670.19, 512.09, 0)
  653.             player:GossipComplete()
  654.     elseif (intid == 148) then -- Mulgore
  655.             player:Teleport(1, -2931.49, -262.82, 53.25, 0)
  656.             player:GossipComplete()
  657.     elseif (intid == 149) then -- Silithus
  658.             player:Teleport(1, -6814.57, 833.77, 49.74, 0)
  659.             player:GossipComplete()
  660.     elseif (intid == 150) then -- Stonetalon Mountains
  661.             player:Teleport(1, -225.34, -765.16, 6.4, 0)
  662.             player:GossipComplete()
  663.     elseif (intid == 151) then -- Tanaris
  664.             player:Teleport(1, -6999.47, -3707.94, 26.44, 0)
  665.             player:GossipComplete()
  666.     elseif (intid == 152) then -- Teldrassil
  667.             player:Teleport(1, 8754.06, 949.62, 25.99, 0)
  668.             player:GossipComplete()
  669.     elseif (intid == 153) then -- The Barrens
  670.             player:Teleport(1, -948.46, -3738.60, 5.98, 0)
  671.             player:GossipComplete()
  672.     elseif (intid == 154) then -- Thousand Needles
  673.             player:Teleport(1, -4685.72, -1836.24, -44.04, 0)
  674.             player:GossipComplete()
  675.     elseif (intid == 155) then -- Un'Goro Crater
  676.             player:Teleport(1, -6162.47, -1098.74, -208.99, 0)
  677.             player:GossipComplete()
  678.     elseif (intid == 156) then -- Winterspring
  679.             player:Teleport(1, 6896.27, -2302.51, 586.69, 0)
  680.             player:GossipComplete()
  681.     -- Foothills
  682.     elseif(intid == 9997) then
  683.         if (player:IsAlliance()) then
  684.             player:GossipMenuAddItem(2, "Qurantis", 1, 1235)
  685.             player:GossipSendMenu(1, item)
  686.         else    
  687.             player:GossipMenuAddItem(2, "Mulderan", 1, 1236)
  688.             player:GossipSendMenu(1, item)
  689.         end    
  690.     elseif(intid == 1235) then -- Qurantis
  691.             player:Teleport(560, 3611.490723, 2288.865967, 59.283901, 0)
  692.     elseif(intid == 1236) then -- Mulderan
  693.             player:Teleport(560, 2539.483643, 2423.052734, 63.581509, 0)
  694.     -------------------------BUFFOS CUSTOMS , PROMOCION-------------------------------------------------
  695.     elseif (intid == 30002) then --Buffs Customs
  696.             player:AddAura(48162, player)
  697.             player:AddAura(48074, player)
  698.             player:AddAura(48170, player)
  699.             player:AddAura(43223, player)
  700.             player:AddAura(48934, player)
  701.             player:AddAura(48938, player)
  702.             player:AddAura(25899, player)
  703.             player:AddAura(36880, player)
  704.             player:AddAura(43015, player)
  705.             player:AddAura(43017, player)
  706.             player:AddAura(69381, player)
  707.             player:AddAura(467, player)
  708.             player:AddAura(69994, player)
  709.             player:GossipComplete()
  710.     end
  711. end
  712.      
  713.     RegisterItemGossipEvent(itemid, 1, Tele_Book)
  714.     RegisterItemGossipEvent(itemid, 2, Tele_Select)
Add Comment
Please, Sign In to add comment