Mini-teleporter

function On_Gossip(unit, event, player)
unit:GossipCreateMenu(3000, player, 0)
unit:GossipMenuAddItem(2, "Zum World Teleporter", 1, 0)
unit:GossipMenuAddItem(2, "Zu den Portalen", 2, 0)
unit:GossipMenuAddItem(2, "Zu den T9 / S7 Vendoren", 3, 0)
unit:GossipMenuAddItem(3, "Zu den T10 / S8 Vendoren", 4, 0)
unit:GossipMenuAddItem(3, "Zu den Klassenlehrern", 5, 0)
unit:GossipMenuAddItem(3, "Zu den Reitlehrer / Vendoren", 6, 0)
unit:GossipMenuAddItem(3, "Zu den Beruflehrer", 7, 0)
unit:GossipMenuAddItem(6, "Zu der Berufskill Arena", 8, 0)
unit:GossipSendMenu(player)
end

function Gossip_Submenus(unit, event, player, id, intid, code)

if(intid == 999) then
unit:GossipCreateMenu(3000, player, 0)
unit:GossipMenuAddItem(2, "Zum World Teleporter", 1, 0)
unit:GossipMenuAddItem(2, "Zu den Portalen", 2, 0)
unit:GossipMenuAddItem(2, "Zu den T9 / S7 Vendoren", 3, 0)
unit:GossipMenuAddItem(3, "Zu den T10 / S8 Vendoren", 4, 0)
unit:GossipMenuAddItem(3, "Zu den Klassenlehrern", 5, 0)
unit:GossipMenuAddItem(3, "Zu den Reitlehrer / Vendoren", 6, 0)
unit:GossipMenuAddItem(3, "Zu den Beruflehrer", 7, 0)
unit:GossipMenuAddItem(6, "Zu der Berufskill Arena", 8, 0)
unit:GossipSendMenu(player)
end

if(intid == 1) then
unit:GossipCreateMenu(3000, player, 0)
unit:GossipMenuAddItem(2, "Zum World Teleporter", 300, 0)
unit:GossipSendMenu(player)
end

if(intid == 2) then
unit:GossipCreateMenu(3000, player, 0)
unit:GossipMenuAddItem(2, "Zu den Portalen", 301, 0)
unit:GossipSendMenu(player)
end

if(intid == 3) then
unit:GossipCreateMenu(3000, player, 0)
unit:GossipMenuAddItem(2, "Zu den T9 / S8 Vendoren", 302, 0)
unit:GossipSendMenu(player)
end

if(intid == 4) then
unit:GossipCreateMenu(3000, player, 0)
unit:GossipMenuAddItem(2, "Zu den T10 / S8 Vendoren", 303, 0)
unit:GossipSendMenu(player)
end


if(intid == 5) then
unit:GossipCreateMenu(3000, player, 0)
unit:GossipMenuAddItem(2, "Zu den Klassenlehrern", 304, 0)
unit:GossipSendMenu(player)
end


if(intid == 6) then
unit:GossipCreateMenu(3000, player, 0)
unit:GossipMenuAddItem(2, "Zu den Reitlehrer / Vendoren", 305, 0)
unit:GossipSendMenu(player)
end


if(intid == 7) then
unit:GossipCreateMenu(3000, player, 0)
unit:GossipMenuAddItem(2, "Zu den Beruflehrer", 306, 0)
unit:GossipSendMenu(player)
end


if(intid == 8) then
unit:GossipCreateMenu(3000, player, 0)
unit:GossipMenuAddItem(2, "Zu der Berufskill Arena", 307, 0)
unit:GossipSendMenu(player)
end

if(intid == 300) then
player:Teleport(0, -8252.889648, -227.061996, 268.261963)
unit:GossipComplete(player)
end

if(intid == 301) then
player:Teleport(0, -8217.881836, -227.881317, 292.612061)
unit:GossipComplete(player)
end

if(intid == 302) then
player:Teleport(0, -8193.590820, -101.023384, 236.166779)
unit:GossipComplete(player)
end

if(intid == 303) then
player:Teleport(0, -8269.948242, -110.137650, 238.207275)
unit:GossipComplete(player)
end

if(intid == 304) then
player:Teleport(0, -8271.912109, -145.023071, 236.586227)
unit:GossipComplete(player)
end

if(intid == 305) then
player:Teleport(0, -8206.937500, -82.801956, 235.703552)
unit:GossipComplete(player)
end

if(intid == 306) then
player:Teleport(0, -8261.237305, -119.081772, 238.729675)
unit:GossipComplete(player)
end

if(intid == 307) then
player:Teleport(0, -1852.376221,  -4133.567383,  10.932525)
unit:GossipComplete(player)
end
end

RegisterUnitGossipEvent(90001, 1, "On_Gossip")
RegisterUnitGossipEvent(90001, 2, "Gossip_Submenus")