Register for your free account! | Forgot your password?

You last visited: Today at 16:12

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

Advertisement



Custom Lua

Discussion on Custom Lua within the WoW Private Server forum part of the World of Warcraft category.

Reply
 
Old   #1
 
elite*gold: 0
Join Date: May 2008
Posts: 334
Received Thanks: 32
Custom Lua

Hallo zusammen,

ich habe mir da mal eine Lua zusammengebastelt, bekomme es aber irgendwie nicht hin:

-Instand Level 80
-Instand Maxskill
-Wiederbelebungsnachwirkungen Entfernen

Quote:
local Npc_ID = 200000

function MaxSkillNPC_OnGossip(pUnit,event,player)
pUnit:GossipCreateMenu(100, player, 0)
pUnit:GossipMenuAddItem(0,"Ich moechte bitte maximalen Waffenskill.",1,0)
pUnit:GossipMenuAddItem(0, "Ich will Level 80!.",2, 0)
pUnit:GossipMenuAddItem(1,"Wiederbelebungsnachwirk ungen entfernen.",3, 0)
pUnit:GossipMenuAddItem(0,"Ich moechte nichts, auf Wiedersehen!",4,0)
pUnit:GossipSendMenu(player)
end

function MaxSkillNPC_OnSelect(pUnit,event,player,id,intid,c ode)
if (intid == 1) then
player:AdvanceSkill (43, 400) --Swords
player:AdvanceSkill (44, 400) --Axes
player:AdvanceSkill (45, 400) --Bows
player:AdvanceSkill (46, 400) --Guns
player:AdvanceSkill (54, 400) --Maces
player:AdvanceSkill (55, 400) --Two Handed Swords
player:AdvanceSkill (95, 400) --Defense
player:AdvanceSkill (136, 400) --Staves
player:AdvanceSkill (160, 400) --Two Handed Maces
player:AdvanceSkill (162, 400) --Unarmed
player:AdvanceSkill (172, 400) --Two Handed Axes
player:AdvanceSkill (173, 400) --Daggers
player:AdvanceSkill (176, 400) --Thrown
player:AdvanceSkill (226, 400) --Crossbows
player:AdvanceSkill (228, 400) --Wands
player:AdvanceSkill (229, 400) --Polearms
player:AdvanceSkill (473, 400) --Fist Weapons
player:SendBroadcastMessage("Dein Waffenskill ist nun auf die maximale Stufe gesetzt.")
player:GossipComplete()
end

function MaxSkillNPC_OnGossip(Unit, Event, player, id, intid, code, pMisc)
if (intid == 2) then
player:SetLevel(80)
player:GossipComplete()
end

function MaxSkillNPC_OnSelect(pUnit,event,player,id,intid,c ode)
if (intid == 3) then
if (player:HasAura(15007) == true) then
player:SendBroadcastMessage("Resurrection Sickness has been Removed")
player:RemoveAura(15007)
player:GossipComplete()

else

player:SendBroadcastMessage("You do not have Resurrection Sickness!")
player:GossipComplete()
end

if (intid == 4) then
player:GossipComplete()
end
end
end
end
end
RegisterUnitGossipEvent(Npc_ID, 1, "MaxSkillNPC_OnGossip")
RegisterUnitGossipEvent(Npc_ID, 2, "MaxSkillNPC_OnSelect")

Was ist Falsch???

Ascent + NCDB
NuclearFighter is offline  
Old 01/11/2011, 22:19   #2
 
elite*gold: 0
Join Date: Feb 2010
Posts: 13
Received Thanks: 2
Mhm du hast die Bedingungen und die Funktionen garnicht richtig beendet. So sollte es glaub ich funktionieren.

Code:
local Npc_ID = 200000

function MaxSkillNPC_OnGossip(pUnit,event,player)
	pUnit:GossipCreateMenu(100, player, 0)
	pUnit:GossipMenuAddItem(0,"Ich moechte bitte maximalen Waffenskill.",1,0)
	pUnit:GossipMenuAddItem(0, "Ich will Level 80!.",2, 0)
	pUnit:GossipMenuAddItem(1,"Wiederbelebungsnachwirk ungen entfernen.",3, 0)
	pUnit:GossipMenuAddItem(0,"Ich moechte nichts, auf Wiedersehen!",4,0)
	pUnit:GossipSendMenu(player)
end

function MaxSkillNPC_OnSelect(pUnit,event,player,id,intid,c ode)
	if (intid == 1) then	
		player:AdvanceSkill (43, 400) --Swords
		player:AdvanceSkill (44, 400) --Axes
		player:AdvanceSkill (45, 400) --Bows
		player:AdvanceSkill (46, 400) --Guns
		player:AdvanceSkill (54, 400) --Maces
		player:AdvanceSkill (55, 400) --Two Handed Swords
		player:AdvanceSkill (95, 400) --Defense
		player:AdvanceSkill (136, 400) --Staves
		player:AdvanceSkill (160, 400) --Two Handed Maces
		player:AdvanceSkill (162, 400) --Unarmed
		player:AdvanceSkill (172, 400) --Two Handed Axes
		player:AdvanceSkill (173, 400) --Daggers
		player:AdvanceSkill (176, 400) --Thrown
		player:AdvanceSkill (226, 400) --Crossbows
		player:AdvanceSkill (228, 400) --Wands
		player:AdvanceSkill (229, 400) --Polearms
		player:AdvanceSkill (473, 400) --Fist Weapons
		player:SendBroadcastMessage("Dein Waffenskill ist nun auf die maximale Stufe gesetzt.")
		player:GossipComplete()
	end
end

function MaxSkillNPC_OnGossip(Unit, Event, player, id, intid, code, pMisc)
	if (intid == 2) then
		player:SetLevel(80)
		player:GossipComplete()
	end
end

function MaxSkillNPC_OnSelect(pUnit,event,player,id,intid,c ode)
	if (intid == 3) then
		if (player:HasAura(15007) == true) then
			player:SendBroadcastMessage("Resurrection Sickness has been Removed")
			player:RemoveAura(15007)
			player:GossipComplete()
		else
			player:SendBroadcastMessage("You do not have Resurrection Sickness!")
			player:GossipComplete()
		end
	end
	if (intid == 4) then
		player:GossipComplete()
	end
end

RegisterUnitGossipEvent(Npc_ID, 1, "MaxSkillNPC_OnGossip")
RegisterUnitGossipEvent(Npc_ID, 2, "MaxSkillNPC_OnSelect")
Zerpd is offline  
Thanks
1 User
Old 01/11/2011, 23:05   #3
 
elite*gold: 0
Join Date: May 2008
Posts: 334
Received Thanks: 32
Und jetzt geht Garnichts mehr.......
NuclearFighter is offline  
Old 01/12/2011, 22:13   #4
 
elite*gold: 0
Join Date: Feb 2010
Posts: 13
Received Thanks: 2
Naja du hast auch 2 Funktionen die gleich heißen. Ich bin grad selber etwas verwirrt was du da machen willst.
Zerpd is offline  
Old 01/13/2011, 14:10   #5
 
elite*gold: 0
Join Date: May 2008
Posts: 334
Received Thanks: 32
Einen Npc Für alles ----

-- Auf level 80 Setzen

-- Maxskill setzen

-- Teleporter

-- Wiederbelebungsnachwirkungen entfernen
NuclearFighter is offline  
Reply


Similar Threads Similar Threads
Rappelz-CO Is one of the best Custom server with out lag custom Drop rates Have Alook
02/02/2011 - CO2 PServer Archive - 15 Replies
Rappelz-CO Online Online 24/7 Hours AnitCheat System 13 Types of Pvp Custom DropRates
[AD] -LegalMs ★ v.62★ |500|500|10★ Hamachi 24/7★ Custom Npc's ★ Custom Starter Pack ★
11/04/2009 - MapleStory - 5 Replies
http://img405.imageshack.us/img405/4382/logogb.png Welcome to LegalMs ★ Details ★ LegalMs was created one week ago, and released today. We have finished customizing all the npc and player commands. We run on Hamachi :( but don't let that stop you! Server Name: LegalMs Rates: 500Exp
FierceMS - 2 Custom Jobs, 100+ Custom Quests, and so much more!
10/22/2008 - MapleStory - 0 Replies
http://img262.imageshack.us/img262/3594/bannerfz2. png Website Rates 150x Exp 150x Meso 20x Drop What makes us the best?



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


Powered by vBulletin®
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2024 elitepvpers All Rights Reserved.