Register for your free account! | Forgot your password?

You last visited: Today at 12:13

  • Please register to post and access all features, it's quick, easy and FREE!

 

ArcEmu TeleporterNPC

Reply
 
Old   #1
 
elite*gold: 0
Join Date: Jul 2010
Posts: 113
Received Thanks: 6
ArcEmu TeleporterNPC

Hallo Leute hier habe ich ein TeleporterNPC.

Quote:
local menunum = 33310
local menuicon = 4
local teleicon = 2
local menu =
{
{"Playertreff",
{
{"Playertreff", 0, 1593.466797, -5560.515137, 111.170998},

}
},
{"Custom Dungeons",
{
{"Custom 1", 0, -11208.299805, 1672.520020, 24.658501},
{"Custom 2", 0, 1593.466797, -5560.515137, 111.170998},

}
},
{"Do not press here.",
{
{"You were Warned", 1, -5000, 5000, 1000000},
{"I told you not to press here", 1, -5000, 5000, 1000000},
{"Touch this you die", 1, -5000, 5000, 1000000},
}
},
}

function TeleNPC_MainMenu(Unit, Player)
local i = 0
Unit:GossipCreateMenu(menunum, Player, 0)
for k,v in pairs(menu) do
i = i + 1
if type(v[2]) == "table" then
Unit:GossipMenuAddItem(menuicon, v[1], i, 0)
i = i + #(v[2])
else
Unit:GossipMenuAddItem(teleicon, v[1], i, 0)
end
end
Unit:GossipSendMenu(Player)
end
function TeleNPC_SubMenu(Unit, Player, i, Submenu)
Unit:GossipCreateMenu(menunum-i, Player, 0)
Unit:GossipMenuAddItem(7, "<--Back", 0, 0)
for k,v in pairs(Submenu) do
i = i + 1
Unit:GossipMenuAddItem(teleicon, v[1], i, 0)
end
Unit:GossipSendMenu(Player)
end
function TeleNPC_OnGossipTalk(Unit, Event, Player)
TeleNPC_MainMenu(Unit, Player)
end
function TeleNPC_OnGossipSelect(Unit, Event, Player, MenuId, Id, Code)
local i = 0
if(Id == 0) then
TeleNPC_MainMenu(Unit,Player)
else
for k,v in pairs(menu) do
i = i + 1
if (Id == i) then
if type(v[2]) == "table" then
TeleNPC_SubMenu(Unit, Player, i, v[2])
else
if Player:IsInCombat() then
Unit:SendChatMessage(12, 0, "You can't teleport while in combat!")
else
Player:Teleport(v[2], v[3], v[4], v[5])
end
Unit:GossipComplete(Player)
end
return
elseif (type(v[2]) == "table") then
for j,w in pairs(v[2]) do
i = i + 1
if (Id == i) then
if Player:IsInCombat() then
Unit:SendChatMessage(12, 0, "You can't teleport while in combat!")
else
Player:Teleport(w[2], w[3], w[4], w[5])
end
Unit:GossipComplete(Player)
return
end
end
end
end
end
end
RegisterUnitGossipEvent(99998, 1, "TeleNPC_OnGossipTalk")
RegisterUnitGossipEvent(99998, 2, "TeleNPC_OnGossipSelect")
einfach bei ArcEmu/Scripts einfügen

Rot=Coords
Grün=Hauptmenü name



davethedancer is offline  
Reply



« Previous Thread | Next Thread »

Similar Threads
Arcemu 3.3.3/ 3.3.5
Hiho Leute Ich suche schon seit 1 tag verzweifelt nach einem Arcemu 3.3.3 oder 3.3.5 Repack mit Deutsche DB Bin dabei auf...
12 Replies - WoW Private Server
ArcEMU 3.3.0a DB
Hallo, ich suche eine ArcEMU 3.3.0a DB + Scripts die Aktuelle DB von WhyDB funktioniert nicht da bekomme ich immer den fehler mit den Waffen das...
9 Replies - WoW PServer Hosting
WoW ArcEmu 3.3.3a
hallo ich habe nen Vendor gemacht mit custom items...möchte die items für 25 marken reintuen (man braucht 25 marken um sie zu kaufen)...aber wie geht...
0 Replies - WoW Private Server
Arcemu 3.3.3a need Help
hey ich versuche seit gerstern meinen Server online zu stellen mit hamachi... Ich hab auch schon andere leute gefragt die habens versucht mit Tv5 zu...
2 Replies - WoW Private Server
Arcemu +ICC
Hallo zusammen Kleine frage, weiss jemand wie man, wenn man zb ein repack hat welches auf 3.3.3a aktuellster version läuft ICC etc drauf bekommt?...
0 Replies - WoW Private Server



All times are GMT +1. The time now is 12:13.


Powered by vBulletin®
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Abuse
Copyright ©2017 elitepvpers All Rights Reserved.