[Application]y2kss66's Application

1)What is your Name
Nicholas
2)How old are you?
17
3)How long have you been working with Emulation?
2 years give or take a month
4)How long have you been familiar with Lua?
4 months
5)Do you know Sql?
I can make custom items and NPCs so if that qualifies.
6)Have you been in recent or past scripting teams?
no; this is my first application.
6a)If so, Please list some of them.

7)We are looking for advanced Lua Scripters, Show us your work.
originally released on MMOwned

Code:

function Satan_p1(pUnit, Event)
 if pUnit:GetHealthPct() < 90 then
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "You have seen death, and now you must feel it!")
  pUnit:FullCastSpell(59172, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(42926, pUnit:GetRandomPlayer(0))
  pUnit:RegisterEvent("Satan_p2",1000, 0)
 end
end
 
function Satan_p2(pUnit, Event)
 if pUnit:GetHealthPct() < 80 then
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "The underworld will rise!")
  pUnit:FullCastSpell(59172, pUnit:GetRandomPlayer(0))
  pUnit:RegisterEvent("Satan_p3",1000, 0)
 end
end
 
function Satan_p3(pUnit, Event)
 if pUnit:GetHealthPct() < 72 then
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "Do you believe in heaven? Cause your in HELL!")
  pUnit:FullCastSpell(47857, pUnit:GetRandomPlayer(0))
  pUnit:RegisterEvent("Satan_p4",1000, 0)
 end
end

function Satan_p4(pUnit, Event)
 if pUnit:GetHealthPct() < 60 then
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "I am the Prince of Darkness!")
  pUnit:FullCastSpell(54322, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(47857, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(47857, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(47857, pUnit:GetRandomPlayer(0))
  pUnit:RegisterEvent("Satan_p5",1000, 0)
 end
end

function Satan_p5(pUnit, Event)
 if pUnit:GetHealthPct() < 50 then
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "I shall not be defeated!!")
  pUnit:FullCastSpell(48158, pUnit:GetRandomPlayer(0))
  pUnit:RegisterEvent("Satan_p6",1000, 0)
 end
end

function Satan_p6(pUnit, Event)
 if pUnit:GetHealthPct() < 35 then
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "You will be made to serve me!")
  pUnit:FullCastSpell(38840)
  pUnit:CastSpell(48125, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(47857, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(48125, pUnit:GetRandomPlayer(0))
  pUnit:RegisterEvent("Satan_p7",1000, 0)
 end
end

function Satan_p7(pUnit, Event)
 if pUnit:GetHealthPct() < 20 then
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "Come forth Angels of Darkness")
      x = pUnit:GetX();
      y = pUnit:GetY();
      z = pUnit:GetZ();
      o = pUnit:GetO();
  pUnit:SpawnCreature(95436, x+5, y+5, z, o, 72, 60000)
  pUnit:SpawnCreature(95436, x+4, y+4, z, o, 72, 60000)
  pUnit:SpawnCreature(95436, x+3, y+3, z, o, 72, 60000)
  pUnit:SpawnCreature(95436, x+2, y+2, z, o, 72, 60000)
  pUnit:SpawnCreature(95436, x+1, y+1, z, o, 72, 60000)
  pUnit:CastSpell(47820, pUnit:GetRandomPlayer(0))
  pUnit:FullCastSpell(42859, pUnit:GetRandomPlayer(0))
  pUnit:RegisterEvent("Satan_p8",1000, 0)
 end
end

function Satan_p8(pUnit, Event)
 if pUnit:GetHealthPct() < 7 then
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "It will take more than that to be rid of me!")
  pUnit:SetHealthPct(100)
  pUnit:RegisterEvent("Satan_p9",1000, 0)
 end
end

function Satan_p9(pUnit, Event)
 if pUnit:GetHealthPct() < 90 then
  pUnit:RemoveEvents();
  pUnit:SendChatMessage(12, 0, "Are you so Ignorant? Do you not know who I am? I am the Dark Lord Himself. I am Satan!")
  pUnit:FullCastSpell(47825, pUnit:GetRandomPlayer(0))
  pUnit:RegisterEvent("Satan_p10",1000, 0)
 end
end

function Satan_p10(pUnit, Event)
 if pUnit:GetHealthPct() < 60 then
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "Come forth Angels of Darkness and aid me once again!")
      x = pUnit:GetX();
      y = pUnit:GetY();
      z = pUnit:GetZ();
      o = pUnit:GetO();
  pUnit:SpawnCreature(95436, x+5, y+5, z, o, 72, 60000)
  pUnit:SpawnCreature(95436, x+4, y+4, z, o, 72, 60000)
  pUnit:SpawnCreature(95436, x+3, y+3, z, o, 72, 60000)
  pUnit:SpawnCreature(95436, x+2, y+2, z, o, 72, 60000)
  pUnit:SpawnCreature(95436, x+1, y+1, z, o, 72, 60000)
  pUnit:RegisterEvent("Satan_p11",1000, 0)
 end
end


function Satan_p11(pUnit, Event)
 if pUnit:GetHealthPct() < 30 then
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "Bow before your master!")
  pUnit:CastSpell(47857, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(48125, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(47862, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(47843, pUnit:GetRandomPlayer(0))
  pUnit:RegisterEvent("Satan_p12",1000, 0)
 end
end

function Satan_p12(pUnit, Event)
 if pUnit:GetHealthPct() < 20 then
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "Face me coward... In my domain!")
  pUnit:Despawn(1, 0)
  pUnit:SpawnCreature(95437, 16227, 16402, -64.38, 1.615564, 233, 0)
  local Target = pUnit:GetRandomPlayer(0)
  Target:Teleport(1, 16228, 16395, -64.37)
 end
end

function Satan_OnEnterCombat(pUnit, Event)
  pUnit:RegisterEvent("Satan_p1",1000, 0)
  pUnit:SendChatMessage (12, 0, "You stand before the power of Hell and all of its glory!")
 end

function Satan_OnLeaveCombat(pUnit, Event)
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "I am the force to reckon with. You were no match for me!")
 end

RegisterUnitEvent(95435, 1, "Satan_OnEnterCombat")
RegisterUnitEvent(95435, 2, "Satan_OnLeaveCombat")

function Satantwo_p1(pUnit, Event)
  pUnit:SetHealthPct(20)
  pUnit:RemoveEvents();
  pUnit:RegisterEvent("Satantwo_p2", 1000, 0)
end

function Satantwo_p2(pUnit, Event)
if pUnit:GetHealthPct() < 15 then
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "You should have listened. No matter, you shall perish!")
  pUnit:SetScale(2)
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:RegisterEvent("Satantwo_p3", 1000, 0)
 end
end

function Satantwo_p3(pUnit, Event)
 if pUnit:GetHealthPct() < 10 then
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "My domain is no more...")
  pUnit:Despawn(1, 0)
  pUnit:SpawnCreature(95438, 16229.85, 16295.993, 30.777, 2, 233, 0)
  local Target = pUnit:GetRandomPlayer(0)
  Target:Teleport(1, 16227.9, 16300, 30.1)
 end
end

function Satantwo_OnEnterCombat(pUnit, Event)
  pUnit:RegisterEvent("Satantwo_p1",1000, 0)
  pUnit:SendChatMessage (12, 0, "What is it you desire?")
 end


function Satantwo_OnLeaveCombat(pUnit, Event)
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "You were no match in my Domain")
 end

RegisterUnitEvent(95437, 1, "Satantwo_OnEnterCombat")
RegisterUnitEvent(95437, 2, "Satantwo_OnLeaveCombat")

function Satanthree_p1(pUnit, Event)
  pUnit:SetHealthPct(10)
  pUnit:RemoveEvents();
  pUnit:RegisterEvent("Satanthree_p2", 1000, 0)
end

function Satanthree_p2(pUnit, Event)
if pUnit:GetHealthPct() < 5 then
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "You should have listened. No matter, you shall perish!")
  pUnit:SetScale(2)
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:CastSpell(5, pUnit:GetRandomPlayer(0))
  pUnit:RegisterEvent("Satanthree_p3", 1000, 0)
 end
end

function Satanthree_p3(pUnit, Event)
if pUnit:GetHealthPct() < 1 then
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "You have not seen the last of me!")
  pUnit:FullCastSpell(50438)
  pUnitR:RegeisterEvent("Satanthree_Died", 1000, 0)
 end
end

function Satanthree_OnEnterCombat(pUnit, Event)
  pUnit:RegisterEvent("Satanthree_p1",1000, 0)
  pUnit:SendChatMessage (12, 0, "My energy where has it gone?")
 end

function Satanthree_OnLeaveCombat(pUnit, Event)
  pUnit:RemoveEvents();
  pUnit:SendChatMessage (12, 0, "Is this that all you have?")
 end

function Satanthree_Died(pUnit, Event)
  pUnit:SendChatMessage (12, 0, "It was not supposed to be this way....")
  pUnit:RemoveEvents();
 end

RegisterUnitEvent(95438, 1, "Satanthree_OnEnterCombat")
RegisterUnitEvent(95438, 2, "Satanthree_OnLeaveCombat")
RegisterUnitEvent(95438, 4, "Satanthree_Died")


8)How and What are you able to do for AscendScripting?
I am able to script lua fairly well and I can make a boss sql file to go along with it.
9)Will you show dedication towards AscendScripting?
I am constantly browsing emulation forums and would love the opportunity to give back to emulation.
10)Final Question:Do you know how to insert a Sql Code/Querie into your database from a Lua Script?
uhmm what exactly do you mean by this? I can execute sql codes into a database yes.

Application Accepted, Welcome to AscendScripting.

Code:

10)Final Question:Do you know how to insert a Sql Code/Querie into your database from a Lua Script?
uhmm what exactly do you mean by this? I can execute sql codes into a database yes.

I mean by
"Unit:WorldQuery(INSERT into ai_agents (entry...)"
And yes, WorldQuery is a command/function.
Only can be used by Ascent/AspireHearth. atm tho.

I did not know that and thanks for accepting me!