Bonjour, je vous présente mon d'aide pour crée des serveur privée et autres...
 
AccueilCalendrierFAQRechercherMembresGroupesS'enregistrerConnexion

Partagez | 
 

 [LUA] Teleporteur

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage




Date d'inscription : 01/01/1970

MessageSujet: [LUA] Teleporteur   Dim 18 Juil - 19:24

Voila un teleporteur pour un serveur arcemu ou ascent
ID 991198


Code :

local npcid = 991198
local race = {}

race[1] = 1 --Human
race[2] = 2 --Orc
race[3] = 1 --Dwarf
race[4] = 1 --Night elf
race[5] = 2 --Undead
race[6] = 2 --Tauren
race[7] = 1 --Gnome
race[8] = 2 --Troll
race[10] = 2 --Blood Elf
race[11] = 1 --Draenei

function Teleport_main_menu(pUnit, player)

local prace = player:GetPlayerRace()
pUnit:GOssipCreateMenu(3544, player, 0)
if ( race[prace] == 1 ) then --Alliance Only Menu
pUnit:GossipMenuAddItem)0, "Ville de l'alliance", 1, 0)
end
if ( race[prace] == 2) then --Horde Only Menu
pUnit:GossipMenuAddItem(,0 "Ville de la Horde", 7, 0)
end --Everyones menu
pUnit:GossipMenuAddItem(0, "Arènes", 13, 0)
pUnit:GossipMenuAddItem(0, "Villes neutres, 15, 0)
pUnit:GossipMenuAddItem(8, "Buffs", 18
pUnit:GossipMenuAddItem(5, "Enlever mal de résurrection", 19, 0)
pUnit:GossipMenuAddItem(8, "Heal moi !", 20, 0)
pUnit:GossipMenuAddItem(8, "Suicide!", 21, 0)
pUnit:GossipSendMenu(player)
end

function Teleport_on_gossip_talk(pUnit, event, player)
Teleporter_main_menu(pUnit, player)
end

function Teleport_on_gossip_select(pUnit, event, player, id, intid, code, pMisc)

if(intid == 1) then
pUnit:GossipCreateMenu(3543, player, 0) --Villes de l'Alliance
pUnit:GossipMenuAddItem(1, "Hurlevent", 2, 0)
pUnit:GossipMenuAddItem(1, "Forgefer", 3, 0)
pUnit:GossipMenuAddItem(1, "Darnassus", 4, 0)
pUnit:GossipMenuAddItem(1, "Exodar", 5, 0)
pUnit:GossipMenuAddItem(2, "[Retour]", 100, 0)
pUnit:GossipSendMenu(player)
end
if(intid == 2) then
player:Teleport(0, -4981.250000, -881.541992, 501.660004) --Hurlevent
end
if(intid == 3) then
player:Teleport(0, -4977.095215, -888.452942, 501.621216) --Forgefer
end
if(intid == 4) then
player:Teleport(1, 9951.519531, 2280.320068, 1341.390015) --Darnassus
end
if(intid == 5) then
player:Teleport(530, -3987.566895, -11847.509766, -1.572268) --Exodar
end

if(intid == 7) then
pUnit:GossipCreateMenu(3543, player, 0) --Villes de la Horde
pUnit:GossipMenuAddItem(1, "Orgrimmar", 8, 0)
pUnit:GossipMenuAddItem(1, "Fossoyeuse", 9, 0)
pUnit:GossipMenuAddItem(1, "Pitons du tonerre", 10, 0)
pUnit:GossipMenuAddItem(1, "Lune d'argent", 11, 0)
pUnit:GossipMenuAddItem(2, "[Retour]", 100, 0)
pUnit:GossipSendMenu(player)
end
if(intid == Cool then
player:Teleport(1, 1500.200684, -4414.373047, 21.898052) --Orgrimmar
end
if(intid == 9) then
player:Teleport(0, 1586.479980, 239.561996, -52.148998) --Fossoyeuse
end
if(intid == 10) then
player:Teleport(1, -1196.219971, 29.094101, 176.949005) --Pitons du tonnerre
end
if(intid == 11) then
player:Teleport(530, 9473.030273, -7279.669922, 14.228500) --Lune d'argent
end

if(intid == 13) then
pUnit:GossipCreateMenu(3543, player, 0) Arenes
pUnit:GossipMenuAddItem(1, "Arene gurubashi", 14, 0)
pUnit:GossipMenuAddItem(2, "[Retour]", 100, 0)
pUnit:GossipSendMenu(player)
end
if(intid == 14) then
player:Teleport( 0, -13235.083008, 214.377319, 31.313320) -- Arene Gurubashi
if(intid == 15) then
pUnit:GossipMenuAddItem(1, "Dalaran", 16, 0)
pUnit:GossipMenuAddItem(1, "Shattarath", 17, 0)
end
if(intid == 16) then
player:Teleporter(571, 5795.55029, 630.275879, 647.402893) --Dalaran
end
if(intid == 17) then
player:Teleporter(530, -1864.526001, 5429.183105, -9.704865) --Shattarath
end

if(intid == 100) then
Teleport_main_menu(pUnit, player)
end
if(intid == 18) then
pUnit:FullCastSpellOnTarget(61316, player) --Brillance de Dalaran
pUnit:FullCastSpellOnTarget(48161, player) --Mot de pouvoir : Robustesse
pUnit:FullCastSpellOnTarget(58054, player) --Benediction des rois
player:GossipComplete()
end

if(intid == 19) then
pUnit:FullCastSpellOnTarget(71131, player) --Bon heal !
player:GossipComplete()
end

if(intid == 20) then --Res Sickness
if(player:HasAura(15007) == true) then
player:RemoveAura(15007)
player:SendBroadcastMessage("Mal de resurrection enlevé")
else
player:SendBroadcastMessage("Vous n'avez pas le mal de resurrection !")
end
player:GossipComplete()
end
if(intid == 21) then
pUnit:FullCastSpellOnTarget(41080, player) --Suicide!!!
end

RegisterUnitGossipEvent(991198, 1, "Teleport_on_gossip_talk")
RegisterUnitGossipEvent(991198, 2, "Teleport_on_gossip_selec


Revenir en haut Aller en bas
Voir le profil de l'utilisateur
 
[LUA] Teleporteur
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Teleporteur ?
» Teleporteur controlinateur =D
» CUIRASSIER ET TELEPORTEUR
» Frigost : ça bouge ! (un peu)
» TDU 2

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
Aide et tutoriaux pour les serveur privée :: Aide et Tutoriaux serveur privée :: World of Warcraft :: Ascent (ex Antrix) :: Fichiers & Tutoriels-
Sauter vers: