LUA: Understanding Gossip Menus

[Blackboy0]

Alright, here is the complete Version, exactly as the Guide says. You mentioned at the bottom that ye need the GPS' or whatever. Well, here they are:

-------------------[BlackWoW]-------------------
                -- Scripted by Blackboy0 --
                          -- 4-Fun Script --
-------------------[BlackWoW]-------------------
function On_Gossip(pUnit, event, player)
pUnit:GossipCreateMenu(100, player)
pUnit:GossipMenuAddItem(player, 0, "Horde Cities", 1, 0)
pUnit:GossipMenuAddItem(player, 0, "Alliance Cities", 2, 0)
pUnit:GossipSendMenu(player)
end
function Gossip_Submenus(pUnit, event, player, id, intid, code)
if(intid == 1) then
pUnit:GossipGossipMenuAddItem(99, player)
pUnit:GossipMenuAddItem(player, 5, "Orgrimmar", 10, 0)
pUnit:GossipMenuAddItem(player, 5, "Undercity", 11, 0)
pUnit:GossipMenuAddItem(player, 5, "Thunder Bluff", 12, 0)
pUnit:GossipMenuAddItem(player, 5, "Silvermoon", 13, 0)
pUnit:GossipMenuAddItem(player, 5, "[Back]", 50, 0)
pUnit:GossipSendMenu 
end
if(intid == 2) then
pUnit:GossipCreateMenu(99, player)
pUnit:GossipMenuAddItem(player, 5, "Stormwind", 14, 0)
pUnit:GossipMenuAddItem(player, 5, "Ironforge", 15, 0)
pUnit:GossipMenuAddItem(player, 5, "Darnassus", 16, 0)
pUnit:GossipMenuAddItem(player, 5, "Exodar", 17, 0)
pUnit:GossipMenuAddItem(player, 5, "[Back]", 50, 0)
pUnit:MenuSendToPlayer(player)
end 
if(intid == 10) then
player:Teleport(1, 1502.709961, -4415.419922, 21.552401)
end 
if(intid == 11) then
player:Teleport(0, 1641.975708, 239.871552, 62.592873)
end 
if(intid == 12) then
player:Teleport(1, -1278.849609, 126.752800, 131.329880)
end 
if(intid == 13) then
player:Teleport(530, 9414.009766, -7278.341797, 14.201572)
end 
if(intid == 14) then
player:Teleport(0, -8908.250000, 558.204956, 93.432388)
end 
if(intid == 15) then
player:Teleport(0, -4925.266602, -951.037842, 501.551971)
end 
if(intid == 16) then
player:Teleport(1, 9952.001953, 2280.712891, 1341.393921)
end 
if(intid == 17) then
player:Teleport(530, -3992.824951, -11858.342773, 0.297733)
end 
RegisterGossipEvent(ENTRYID, 1, "On_Gossip")
RegisterGossipEvent(ENTRYID, 2, "Gossip_Submenus")

[soslol]

SectorSeven, you are realy good in LUA it seems like this script, can i talk to you through MSN? you need to learn me some stuff and i want to ask you some stuff to
I wish to get more advanced with LUA's
add me : [email protected]


EDIT : i made a small version of this myself, i dont know if it works or not but :

 function WarpNPC_On_Gossip (pUnit, event, player)
pUnit:GossipCreateMenu(100, player)
pUnit:GossipMenuAddItem(player, 0, "Horde Locations", 1, 0)
pUnit:GossipMenuAddItem(player, 0, "Alliance Locations", 2, 0)
pUnit:GossipSendMenu(player)
end
 
function WarpNPC_Submenus (pUnit, event, player, id, intid, code)
if(intid == 1) then
pUnit:GossipGossipMenuAddItem(99, player)
pUnit:GossipMenuAddItem(player, 5, "Mall", 10, 0)
pUnit:GossipMenuAddItem(player, 5, "Leveling Road", 11, 0)
pUnit:GossipMenuAddItem(player, 5, "Custom Instances", 12, 0)
pUnit:GossipMenuAddItem(player, 5, "[Back]", 50, 0)
pUnit:GossipSendMenu(player)
end
 
if(intid == 2) then
pUnit:GossipCreateMenu(99, player)
pUnit:GossipMenuAddItem(player, 5, "Mall", 10, 0)
pUnit:GossipMenuAddItem(player, 5, "Leveling Road", 11, 0)
pUnit:GossipMenuAddItem(player, 5, "Custom Instances", 12, 0)
pUnit:GossipMenuAddItem(player, 5, "[Back]", 50, 0)
pUnit:MenuSendToPlayer(player)
end
 
if(intid == 10) then
player:Teleport(1, -1657.646973, 3096.333008, 32.558029)
end
 
if(intid == 11) then
player:Teleport(580, 1713.559937, 600.632690, 29.677027)
end
 
function WarpNPC_Submenus2 (pUnit, event, player, id, intid, code)
if(intid == 12) then
pUnit:GossipCreateMenu(99, player)
pUnit:GossipMenuAddItem(player, 5, "Malygos' Lair(10-15Man)", 13, 0)
pUnit:GossipMenuAddItem(player, 5, "Scarlet Monastery(5-10Man)", 14, 0)
pUnit:GossipMenuAddItem(player, 5, "The Deadmines(10Man)", 15, 0)
pUnit:GossipMenuAddItem(player, 5, "[Back]", 50, 0)
pUnit:GossipSendMenu(player)
end
 
if(intid == 13) then
player:Teleport(530, 3099.646729, 1513.975342, 192.195267)
end
 
if(intid == 14) then
player:Teleport(0, 2888.867188, -810.674438, 162.649765)
end
 
if(intid == 15) then
player:Teleport(0, -11211.107422, 1661.814087, 26.746098)
end
 
RegisterGossipEvent(32000 , 1, "WarpNPC_On_Gossip")(32000 , 2,"WarpNPC_Submenus")(32000 , 2,"WarpNPC_Submenus2")

Should this work or? and also is there any way to test the LUA's on if they work or not without hosting an actual server?

LOL why add two menus when you only need one? xD