[Custom LUA] You Make It!

[y2kss66]

Hello all!

Well this is my most recent release. I decided that I would make another stunning release now that my Finals are over. Oh why thanks for asking. Yes I did quite fine on them. 6 A's and 1 C (Stupid AP Chemistry). Alright, unlike all of my other releases which have been LUA NPC scripts, this one does not have values in it which allows for it to be edited by anybody. Any one can edit it EVEN NOOBS. Please leave me some comments and ideas on any other LUA Scripts you would like to see.

Thanks and have a great day.
Y2KSS66
:wave::wave::wave:

Here it is:

function world_OnEnterCombat(pUnit, Event)
  pUnit:SendChatMessage(12, 0, "what do you want him to say")
  pUnit:RegisterEvent("world_p1",1000, 0)
end

function world_p1(pUnit, Event)
 if pUnit:GetHealthPct() < 90 then
  pUnit:RemoveEvents()
  pUnit:SendChatMessage (12, 0, "what do you want him to say")
  pUnit:RegisterEvent("world_Spell1", casttime, 0)
  pUnit:RegisterEvent("world_Spell2", casttime, 0)
  pUnit:RegisterEvent("world_Spell3", casttime, 0)
  pUnit:RegisterEvent("world_p2",1000, 0)
 end
end

function world_p2(pUnit, Event)
 if pUnit:GetHealthPct() < 70 then
  pUnit:RemoveEvents()
  pUnit:SendChatMessage (12, 0, "what do you want him to say")
  pUnit:RegisterEvent("world_Spell1", casttime, 0)
  pUnit:RegisterEvent("world_Spell3", casttime, 0)
  pUnit:RegisterEvent("world_Spell5", casttime, 0)
  pUnit:RegisterEvent("world_p3",1000, 0)
 end
end

function world_p3(pUnit, Event)
 if pUnit:GetHealthPct() < 50 then
  pUnit:RemoveEvents()
  pUnit:SendChatMessage (12, 0, "what do you want him to say")
  pUnit:RegisterEvent("world_Spell4", casttime, 0)
  pUnit:RegisterEvent("world_Spell4", casttime, 0)
  pUnit:RegisterEvent("world_Spell3", casttime, 0)
  pUnit:RegisterEvent("world_p4",1000, 0)
 end
end

function world_p4(pUnit, Event)
 if pUnit:GetHealthPct() < 30 then
  pUnit:RemoveEvents()
  pUnit:SendChatMessage (12, 0, "what do you want him to say")
  pUnit:RegisterEvent("world_Spell2", casttime, 0)
  pUnit:RegisterEvent("world_Spell5", casttime, 0)
  pUnit:RegisterEvent("world_Spell6", casttime, 0)
  pUnit:RegisterEvent("boss_p5",1000, 0)
 end
end

function world_p5(pUnit, Event)
 if pUnit:GetHealthPct() < 10 then
  pUnit:RemoveEvents()
  pUnit:SendChatMessage (12, 0, "what do you want him to say")
  pUnit:RegisterEvent("world_Spell6", casttime, 0)
  pUnit:RegisterEvent("world_Spell6", casttime, 0)
  pUnit:RegisterEvent("world_Spell1", casttime, 0)
  pUnit:RegisterEvent("world_p6",1000, 0)
 end
end

function world_p6(pUnit, Event)
 if pUnit:GetHealthPct() < 5 then
  pUnit:RemoveEvents()
  pUnit:SendChatMessage (12, 0, "what do you want him to say")
  Choice=Math.Random(1, 6)
  if Choice==1 then
  pUnit:RegisterEvent("world_Spell1", casttime, 0)
  end
  if Choice==2 then
  pUnit:RegisterEvent("world_Spell2", casttime, 0)
  end
  if Choice==3 then
  pUnit:RegisterEvent("world_Spell3", casttime, 0)
  end
  if Choice==4 then
  pUnit:RegisterEvent("world_Spell4", casttime, 0)
  end
  if Choice==5 then
  pUnit:RegisterEvent("world_Spell5", casttime, 0)
  end
  if Choice==6 then
  pUnit:RegisterEvent("world_Spell6", casttime, 0)
  end
  pUnit:RegisterEvent("world_Died",1000, 0)
 end
end

function world_Spell1(pUnit, Event)
 pUnit:FullCastSpell(spellid, pUnit:GetMainTank())
end

function world_Spell2(pUnit, Event)
 pUnit:FullCastSpell(spellid, pUnit:GetMainTank())
end

function world_Spell1(pUnit, Event)
 pUnit:FullCastSpell(spellid, pUnit:GetRandomPlayer(0))
end

function world_Spell3(pUnit, Event)
 pUnit:FullCastSpell(spellid, pUnit:GetRandomPlayer(0))
end

function world_Spell4(pUnit, Event)
 pUnit:FullCastSpell(spellid, pUnit:GetRandomPlayer(0))
end

function world_Spell5(pUnit, Event)
 pUnit:FullCastSpell(spellid, pUnit:GetMainTank())
end

function world_Spell6(pUnit, Event)
 pUnit:FullCastSpell(spellid, pUnit:GetRandomPlayer(0))
end

function world_Spell7(pUnit, Event)
 pUnit:FullCastSpell(spellid, pUnit:GetRandomPlayer(0))
end

function world_OnKill(pUnit, Event)
 pUnit:RemoveEvents()
 pUnit:SendChatMessage(12, 0, "what do you want him to say")
end

function world_Died(pUnit, Event)
 pUnit:RemoveEvents()
 if pUnit:GetFaction() = 1801
  pUnit:SpawnCreature(entryID, x, y, z, o, faction, duration)
  pUnit:SpawnCreature(entryID, x, y, z, o, faction, duration) 
  pUnit:SpawnCreature(entryID, x, y, z, o, faction, duration)
  pUnit:SpawnCreature(entryID, x, y, z, o, faction, duration)
  pUnit:SpawnCreature(entryID, x, y, z, o, faction, duration)
 end
 if pUnit:GetFaction() = 1802
  pUnit:SpawnCreature(entryID, x, y, z, o, faction, duration)
  pUnit:SpawnCreature(entryID, x, y, z, o, faction, duration) 
  pUnit:SpawnCreature(entryID, x, y, z, o, faction, duration)
  pUnit:SpawnCreature(entryID, x, y, z, o, faction, duration)
  pUnit:SpawnCreature(entryID, x, y, z, o, faction, duration)
 end
 pUnit:SendChatMessage(12, 0, "what do you want him to say")
end

function world_OnLeaveCombat(pUnit, Event)
 pUnit:RemoveEvents()
 pUnit:SendChatMessage(12, 0, "what do you want him to say") 
end

RegisterUnitEvent(95438, 1, "world_OnEnterCombat")
RegisterUnitEvent(95438, 2, "world_OnLeaveCombat")
RegisterUnitEvent(95438, 3, "world_OnKill")
RegisterUnitEvent(95438, 4, "world_Died")

just copy the stuff in code tags and place it in a test file named "world.lua" without the "". Hope this helps. Here is a guide on how to create an npc to go along with this customizable boss script.

http://www.mmowned.com/forums/ascent...ustom-npc.html

credits:
MMOwned - World of Warcraft Exploits, Hacks, Bots and Guides - View Profile: Forgerai -- for guide
MMOwned - World of Warcraft Exploits, Hacks, Bots and Guides - View Profile: y2kss66 -- for script
MMOwned - World of Warcraft Exploits, Hacks, Bots and Guides - View Profile: Nymphx -- for help in understanding the Math.Random syntax.

Thank you all and enjoy!!

[stoneharry]

Nice But it is still a lot easier imo for people to write from scratch. For example there editing the text and accidently delete one of the " by mistake. +Rep

[Link_S]

I can almost understand it :P, +Rep

[Nymphx]

It looks quite nice for people to understand Lua, but not necesarrily for a script template. I like the idea and thanks for recognition . +Rep

[y2kss66]

thanks for the responses. I understand what you mean Stoneharry. No problem Nymphx after all I did study your script. yes! it is good if you can almost understand it. well at least if you are not very good with lua.

Thanks for the replies.

[sasoritail]

hmmm could be usefull.
But cant understand LUA fully gonna learn a bit
+Rep for nice threath

[y2kss66]

Thanks! and good luck!

[bsod-staff14]

Once again wonderful bro!

[y2kss66]

Thanks alot bsod. That means alot! Any other ideas for scripts?

[~Jagris]

Nice job, good idea.

[y2kss66]

Thanks for the positive comments anyone got anymore ideas for me to script?