Iceknight001's LUA Scripting Service!

[Mr.Jebus Christ]

Can you please script for me tempest keep, (bg)warsong gulch and (bg)altrac valley
edit: if you can make it a .lua file and rar it cause i dont know how to put it in a .lua file

[St_Anger]

Darn-.-

I've tried to create a NPC + Using this script:

function Illi_Drunk (pUnit, Event)
pUnit:RemoveEvents()
pUnit:Emote(64)
pUnit:RegisterEvent("Illi_onDrink", 7000, 3)
pUnit:SendChatMessage(11, 0, "OMFG :-!")
pUnit:FullCastSpell(24839)
pUnit:RegisterEvent("Illi_Retard", 6000, 4)
end

function Illi_onDrink (pUnit, Event)
pUnit:FullCastSpell(11009)
end

function Illi_onDied (pUnit, Event)
pUnit:RemoveEvents()
pUnit:SendChatMessage(11, 0, "Hic!")
end

function Illi_Retard (pUnit, Event)
pUnit:RemoveEvents()
pUnit:FullCastSpell(40585)
end

RegisterUnitEvent (999998, 6, "Illi_Drunk")
RegisterUnitEvent (999998, 4, "Illi_onDied")
RegisterUnitEvent (999998, 10, "Illi_Drunk")

But then I found out that there is no Drink Emote oO
and Illi is not doing ANY Emotes^^ That Sh%t suxx
What can I do to make my NPC's drink?^^

St_Anger

[b!atch]

Whole tempest keep?! thank god im not Iceknight001 ;b

Err, I dont know what you mean by script the bgs but if u wanna enter them you should write .worldport 30 1 1 1 (thats av)

WSG is .worldport 489 1 1 1 the 1's can be changed, to configure your landing inside the bg:P


Just checked my scripts folder.. I have Arcatraz, Botanica And Mechanar scripts.. No scripts for The eye;<

[b!atch]

err, i think i read somewhere that emotes is broken:P but probs fixed in the 2.4 when that ones out

[b!atch]

ofc you could do .mod emotestate ID 1 on him..

[Arthas117]

Erm.. Is the pUnit:GetClosestPlayer()) command broken or is it just me noobing it up? pUnit:FullCastSpellOnTarget(ID, pUnit:GetClosestPlayer())

Try using

 
function Satan_Spell(Unit, event, miscevent, misc)
      Unit:FullCastSpellOnTarget(ID,Unit:GetClosestPlayer())
end

Hope it helped, I script stuff this way

[Mr.Jebus Christ]

No not the whole tempest keep mainly just alar keal and Ill update my post later if i worldport in there
edit with the bg i mean the gos like wsg's flags and av's caps

[Arthas117]

Can you please script for me tempest keep, (bg)warsong gulch and (bg)altrac valley
edit: if you can make it a .lua file and rar it cause i dont know how to put it in a .lua file

Tempest Keep is fully C++ scripted in hardcore DB's.

Only a few servers got all bg's working...

Okay, guide to make your own lua file

1. Copy-Paste an old lua file.
2. Change name of the lua file to whatever you want.
3. Open the file in notepad.
4. Delete everything in it and copy-paste the script he give you.

[TheSpidey]

Triple post ftl.

Can you please script for me tempest keep, (bg)warsong gulch and (bg)altrac valley
edit: if you can make it a .lua file and rar it cause i dont know how to put it in a .lua file

BGs can't be scripted in LUA.
And I don't think he'll actually make all of TK for you.

[Mr.Jebus Christ]

dam bgs can't be scripted well time to work on areatriggers then to make them work

[b!atch]

Try using

 
function Satan_Spell(Unit, event, miscevent, misc)
      Unit:FullCastSpellOnTarget(ID,Unit:GetClosestPlayer())
end

Hope it helped, I script stuff this way

Thx arthas, but ill just use GetRandom instead, that works 2:b

[devilat]

Hi all i dont know if you can help me but many bosses in ascent are not spawned im talking ofcourse about
Zul'Aman
Akil'zon <Eagle Avatar>
Jan'alai <Dragonhawk Avatar>
Hex Lord Malacrass
Zul'jin

Karazhan
Moroes <Tower Steward>
Barnes <The Stage Manager> (AKA. Opera Events)
Chess Event
Terestian Illhoof
Shade of Aran
Netherspite
Nightbane
Prince Malchezaar

I heard that no one in ascentemu can make them use spells if someone can make them ill be very glad and rep you ofcourse

[b!atch]

I can make them cast spells, almost like in retail.. but ofc it wont be 100% the same

[b!atch]

Here is Shade of Aran..(I didnt make this script.)

function Aran_Water_Elementals(Unit, event, miscunit, misc)
    if Unit:GetHealthPct() < 40 and Didthat == 0 then
        Unit:SpawnCreature(21160, -11167.2, -1914.13, 232.009, 0, 18, 96000000);
        Unit:SpawnCreature(21160, -11163.2, -1910.13, 232.009, 0, 18, 96000000);
        Unit:SpawnCreature(21160, -11165.2, -1916.13, 232.009, 0, 18, 96000000);
        Unit:SpawnCreature(21160, -11162.2, -1911.13, 232.009, 0, 18, 96000000);
        Didthat = 1
    else
    end
end

function Aran_Polymorph(Unit, event, miscunit, misc)
    if Unit:GetManaPct() < 20 and Didthat == 1 then
        Unit:FullCastSpellOnTarget(23603,Unit:GetMainTank())
        FullCastSpellOnTarget(32453,Unit:GetMainTank())
        Didthat = 2
    else
    end
end

function Aran_Fireball(Unit, event, miscunit, misc)
    print "Aran Fireball"
    Unit:FullCastSpellOnTarget(20678,Unit:GetMainTank())
    Unit:SendChatMessage(11, 0, "Fire ball...")
end

function Aran_Conterspell(Unit, event, miscunit, misc)
    print "Aran Conterspell"
    Unit:FullCastSpellOnTarget(29961,Unit:GetMainTank())
    Unit:SendChatMessage(11, 0, "Try to cast now...")
end

function Aran_Conflagration(Unit, event, miscunit, misc)
    print "Aran Conflagration"
    Unit:FullCastSpellOnTarget(23023,Unit:GetMainTank())
    Unit:SendChatMessage(11, 0, "Your so weak guys...")
end

function Aran_FrostBolt(Unit, event, miscunit, misc)
    print "Aran FrostBolt"
    Unit:FullCastSpellOnTarget(41486,Unit:GetMainTank())
    Unit:SendChatMessage(11, 0, "Catch that, if you can...")
end

function Aran_Chains_Ice(Unit, event, miscunit, misc)
    print "Aran Chains Ice"
    Unit:FullCastSpellOnTarget(29991,Unit:GetMainTank())
    Unit:SendChatMessage(11, 0, "Ho, guys you cannot move...")
end

function Aran_Arcane_Missiles(Unit, event, miscunit, misc)
    print "Aran Arcane Missiles"
    Unit:FullCastSpellOnTarget(29955,Unit:GetMainTank())
    Unit:SendChatMessage(11, 0, "Rain of arcane...")
end

function Aran_Flame_Wreath(Unit, event, miscunit, misc)
    print "Aran Flame Wreath"
    Unit:FullCastSpellOnTarget(30004,Unit:GetMainTank())
    Unit:SendChatMessage(11, 0, "My Flame Wreath...")
end

function Aran_Circular_Blizzard(Unit, event, miscunit, misc)
    print "Aran Circular Blizzard"
    Unit:FullCastSpellOnTarget(29952,Unit:GetManTank())
    Unit:SendChatMessage(11, 0, "Blizzard...")
end

function Aran_Magnetic_Pull(Unit, event, miscunit, misc)
    print "Aran Magnetic Pull"
    Unit:FullCastSpellOnTarget(29979,Unit:GetMainTank())
    Unit:SendChatMessage(11, 0, "Come to me guys...")
end

function Aran_Arcane_Explosion(Unit, event, miscunit, misc)
    print "Aran Arcane Explosion"
    Unit:FullCastSpellOnTarget(29973,Unit:GetMainTank())
    Unit:SendChatMessage(11, 0, "Now, the arcane Explosion...")
end

function Aran(unit, event, miscunit, misc)
    print "Aran"
    unit:RegisterEvent("Aran_Water_Elementals",1000,1)
    unit:RegisterEvent("Aran_Polymorph",1000,1)
    unit:RegisterEvent("Aran_Fireball",9000,0)
    unit:RegisterEvent("Aran_Conterspell",13000,0)
    unit:RegisterEvent("Aran_Conflagration",15000,0)
    unit:RegisterEvent("Aran_FrostBolt",17000,0)
    unit:RegisterEvent("Aran_Chains_Ice",20000,0)
    unit:RegisterEvent("Aran_Arcane_Missiles",25000,0)
    unit:RegisterEvent("Aran_Flame_Wreath",30000,0)
    unit:RegisterEvent("Aran_Circular_Blizzard",60000,0)
    unit:RegisterEvent("Aran_Magnetic_Pull",90000,0)
    unit:RegisterEvent("Aran_Arcane_Explosion",91000,0)
end

RegisterUnitEvent(16524,1,"Aran")

Here is Nightbane.. I didnt make this script.

function Nightbane_Cleave(Unit, event, miscunit, misc)
    print "Nightbane Cleave"
    Unit:FullCastSpellOnTarget(42587,Unit:GetClosestPlayer())
    Unit:SendChatMessage(11, 0, "Cleave on you...")
end

function Nightbane_Tail_Sweep(Unit, event, miscunit, misc)
    print "Nightbane Tail Sweep"
    Unit:FullCastSpellOnTarget(25653,Unit:GetRandomPlayer())
    Unit:SendChatMessage(11, 0, "Take that...")
end

function Nightbane_Bone_Shards(Unit, event, miscunit, misc)
    print "Nightbane Bone Shards"
    Unit:FullCastSpell(17014)
    Unit:SendChatMessage(11, 0, "Bones protect me...")
end

function Nightbane_Distracting_Ash(Unit, event, miscunit, misc)
    print "Nightbane Distracting Ash"
    Unit:FullCastSpellOnTarget(30130,Unit:GetRandomPlayer())
    Unit:SendChatMessage(11, 0, "Ho, your are distracting...")
end

function Nightbane_Bellowing_Roar(Unit, event, miscunit, misc)
    print "Nightbane Bellowing Roar"
    Unit:FullCastSpellOnTarget(37066,Unit:GetClosestPlayer())
    Unit:SendChatMessage(11, 0, "FEAR on you guys...")
end

function Nightbane_Charred_Earth(Unit, event, miscunit, misc)
    print "Nightbane Charred Earth"
    Unit:FullCastSpellOnTarget(30129,Unit:GetClosestPlayer())
    Unit:SendChatMessage(11, 0, "FIRE...")
end

function Nightbane_Smoldering_Breath(Unit, event, miscunit, misc)
    print "Nightbane Smoldering Breath"
    Unit:FullCastSpellOnTarget(39385,Unit:GetClosestPlayer())
    Unit:SendChatMessage(11, 0, "A Good breath...")
end

function Nightbane(unit, event, miscunit, misc)
    print "Nightbane"
    unit:RegisterEvent("Nightbane_Cleave",10000,0)
    unit:RegisterEvent("Nightbane_Tail_Sweep",13000,0)
    unit:RegisterEvent("Nightbane_Bone_Shards",17000,0)
    unit:RegisterEvent("Nightbane_Distracting_Ash",23000,0)
    unit:RegisterEvent("Nightbane_Bellowing_Roar",31000,0)
    unit:RegisterEvent("Nightbane_Charred_Earth",37000,0)
    unit:RegisterEvent("Nightbane_Smoldering_Breath",43000,0)
end

RegisterUnitEvent(17225,1,"Nightbane")

Here is Netherspite.. I didnt make this script

function Netherspite_Portal_PhaseA(Unit, event, miscunit, misc)
    print "Netherspite Portal PhaseA"
    Unit:SendAreaTriggerMessage("PORTAL PHASE")
    Unit:FullCastSpell(30400)
    Unit:FullCastSpell(30401)
    Unit:FullCastSpell(30402)
end

function Netherspite_Nether_Burn(Unit, event, miscunit, misc)
    print "Netherspite Nether Burn"
    Unit:FullCastSpellOnTarget(30523,Unit:GetClosestPlayer())
    Unit:SendChatMessage(11, 0, "BURN...")
end

function Netherspite_Vode_Zone(Unit, event, miscunit, misc)
    print "Netherspite Vode Zone"
    Unit:FullCastSpellOnTarget(30533,Unit:GetRandomPlayer())
    Unit:SendChatMessage(11, 0, "Bad Zone...")
end

function Netherspite_Banish_Phase(Unit, event, miscunit, misc)
    print "Netherspite Banish Phase"
    Unit:SendAreaTriggerMessage("BANISH PHASE")
    Unit:FullCastSpell(35182)
    Unit:FullCastSpellOnTarget(38524,Unit:GetClosestPlayer())
end

function Netherspite_Portal_PhaseB(Unit, event, miscunit, misc)
    print "Netherspite Portal PhaseB"
    Unit:SendAreaTriggerMessage("PORTAL PHASE")
    Unit:FullCastSpell(30400)
    Unit:FullCastSpell(30401)
    Unit:FullCastSpell(30402)
end

function Netherspite_Enrage(Unit, event, miscunit, misc)
    print "Netherspite Enrage"
    Unit:FullCastSpell(35595)
    Unit:SendChatMessage(11, 0, "You will all die...")
end

function Netherspite(unit, event, miscunit, misc)
    print "Netherspite"
    unit:RegisterEvent("Netherspite_Portal_PhaseA",1000,1)
    unit:RegisterEvent("Netherspite_Nether_Burn",10000,0)
    unit:RegisterEvent("Netherspite_Vode_Zone",20000,0)
    unit:RegisterEvent("Netherspite_Banish_Phase",30000,0)
    unit:RegisterEvent("Netherspite_Portal_PhaseB",60000,0)
    unit:RegisterEvent("Netherspite_Enrage",540000,0)
end

RegisterUnitEvent(15689,1,"Netherspite")

Here is Terestian.. err. just for the record, i didnt make any of them:P

function Terestian_Shadow_Bolt(Unit, event, miscunit, misc)
    print "Terestian Shadow Bolt"
    Unit:FullCastSpellOnTarget(36868,Unit:GetClosestPlayer())
    Unit:SendChatMessage(11, 0, "I like shadow...")
end

function Terestian_Sacrifice(Unit, event, miscunit, misc)
    print "Terestian Sacrifice"
    Unit:FullCastSpellOnTarget(30115,Unit:GetRandomPlayer())
    Unit:SendChatMessage(11, 0, "Sacrifice you for me...")
end

function Terestian_Kilrek(Unit, event, miscunit, misc)
    if Unit:GetHealthPct(17229) < 0 and Didthat == 0 then
        Unit:SpawnCreature(17229, -11236.9, -1695.81, 179.237, 0, 18, 96000000);
        Unit:SendChatMessage(11, 0, "Come to help me Kilrek...")
        Didthat = 1
    else
    end
end

function Terestian_Berserk(Unit, event, miscunit, misc)
    print "Terestian Berserk"
    Unit:FullCastSpell(38110)
    Unit:SendChatMessage(11, 0, "Now, i'am verry mad...")
end

function Terestian(unit, event, miscunit, misc)
    print "Terestian"
    unit:RegisterEvent("Terestian_Shadow_Bolt",8000,0)
    unit:RegisterEvent("Terestian_Sacrifice",33000,0)
    unit:RegisterEvent("Terestian_Kilrek",45000,0)
    unit:RegisterEvent("Terestian_Berserk",600000,0)
end

RegisterUnitEvent(15688,1,"Terestian")

Here is moroes

function Moroes_Enrage(Unit, event, miscunit, misc)
    if Unit:GetHealthPct() < 30 and Didthat == 0 then
        Unit:FullCastSpell(44779)
        Didthat = 1
    else
    end
end

function Moroes_Gouge(Unit, event, miscunit, misc)
    print "Moroes Gouge"
    Unit:FullCastSpellOnTarget(28456,Unit:GetClosestPlayer())
    Unit:SendChatMessage(11, 0, "Gouge on you...")
end

function Moroes_Blind(Unit, event, miscunit, misc)
    print "Moroes Blind"
    Unit:FullCastSpellOnTarget(34654,Unit:GetClosestPlayer())
    Unit:SendChatMessage(11, 0, "Ho, your blind...")
end

function Moroes_Vanish(Unit, event, miscunit, misc)
    print "Moroes Vanish"
    Unit:FullCastSpell(41476)
    Unit:SendChatMessage(11, 0, "You dont see me anymore...")
end

function Moroes_Garrote(Unit, event, miscunit, misc)
    print "Moroes Garrote"
    Unit:FullCastSpellOnTarget(37066,Unit:GetRandomPlayer())
    Unit:SendChatMessage(11, 0, "I choose you...")
end

function Moroes(unit, event, miscunit, misc)
    print "Moroes"
    unit:RegisterEvent("Moroes_Enrage",1000,1)
    unit:RegisterEvent("Moroes_Gouge",15000,0)
    unit:RegisterEvent("Moroes_Blind",20000,0)
    unit:RegisterEvent("Moroes_Vanish",60000,0)
    unit:RegisterEvent("Moroes_Garrote",75000,0)
end

RegisterUnitEvent(15687,1,"Moroes")

Here is prince

function Malchezaar_Hellfire(Unit, event, miscunit, misc)
    print "Malchezaar Hellfire"
    Unit:FullCastSpellOnTarget(43465,Unit:GetClosestPlayer())
    Unit:SendChatMessage(11, 0, "BURN...")
end

function Malchezaar_Thrash(Unit, event, miscunit, misc)
    print "Malchezaar Thrash"
    Unit:FullCastSpell(21919)
    Unit:SendChatMessage(11, 0, "Watch the speed...")
end

function Malchezaar_Parry(Unit, event, miscunit, misc)
    print "Malchezaar Parry"
    Unit:FullCastSpell(13668)
    Unit:SendChatMessage(11, 0, "Miss...")
end

function Malchezaar_Sunder_Armor(Unit, event, miscunit, misc)
    print "Malchezaar Sunder Armor"
    Unit:FullCastSpellOnTarget(30901,Unit:GetClosestPlayer())
    Unit:SendChatMessage(11, 0, "You lose some protection!...")
end

function Malchezaar_Cleave(Unit, event, miscunit, misc)
    print "Malchezaar Cleave"
    Unit:FullCastSpellOnTarget(39174,Unit:GetClosestPlayer())
    Unit:SendChatMessage(11, 0, "Cleave...")
end

function Malchezaar_Amplify(Unit, event, miscunit, misc)
    print "Malchezaar Amplify"
    Unit:FullCastSpellOnTarget(39095,Unit:GetRandomPlayer())
    Unit:SendChatMessage(11, 0, "More damage to you...")
end


function Malchezaar_Flying_Axes(Unit, event, miscunit, misc)
    print "Malchezaar Flying_Axes"
    Unit:FullCastSpell(17650)
    Unit:SendChatMessage(11, 0, "My Axes will kill you...")
end

function Malchezaar_Shadow_Word_Pain(Unit, event, miscunit, misc)
    print "Malchezaar Shadow_Word Pain"
    Unit:FullCastSpellOnTarget(30854,Unit:GetClosestPlayer())
    Unit:SendChatMessage(11, 0, "More Pain...")
end

function Malchezaar_Shadow_Word_Pain2(Unit, event, miscunit, misc)
    print "Malchezaar Shadow_Word Pain2"
    Unit:FullCastSpellOnTarget(30854,Unit:GetRandomPlayer())
    Unit:SendChatMessage(11, 0, "More Pain...")
end

function Malchezaar_Summon_Infernal(Unit, event, miscunit, misc)
    print "Malchezaar Summon Infernal"
         Unit:SpawnCreature(17646, -10924.5, -1974.66, 275.522, 0, 18, 180000);
    Unit:SendChatMessage(11, 0, "Help me infernal creature...")
end

function Malchezaar_Enfeeble(Unit, event, miscunit, misc)
    print "Malchezaar Enfeeble"
    Unit:FullCastSpellOnTarget(30843,Unit:GetRandomPlayer())
    Unit:FullCastSpellOnTarget(30843,Unit:GetRandomPlayer())
    Unit:FullCastSpellOnTarget(30843,Unit:GetRandomPlayer())
    Unit:FullCastSpellOnTarget(30843,Unit:GetRandomPlayer())
    Unit:FullCastSpellOnTarget(30843,Unit:GetRandomPlayer())
    Unit:SendChatMessage(11, 0, "More Pain...")
end

function Malchezaar_Shadow_Nova(Unit, event, miscunit, misc)
    print "Malchezaar Shadow Nova"
    Unit:FullCastSpellOnTarget(30852,Unit:GetClosestPlayer())
    Unit:SendChatMessage(11, 0, "A big blast to finish this fight...")
end

function Malchezaar(unit, event, miscunit, misc)
    print "Malchezaar"

    if unit:GetHealthPct() < 100 and Didthat == 0 then
        unit:SendAreaTriggerMessage("PHASE 1")
        unit:SendChatMessage(11, 0, "You face not Malchezaar alone, but the legions I command!")
        unit:RegisterEvent("Malchezaar_Hellfire",2000,0)
        unit:RegisterEvent("Malchezaar_Shadow_Word_Pain",25000,0)
        unit:RegisterEvent("Malchezaar_Summon_Infernal",35000,0)
        unit:RegisterEvent("Malchezaar_Enfeeble",45000,0)
        unit:RegisterEvent("Malchezaar_Shadow_Nova",47000,0)
        Didthat = 1
    else
    end

    if unit:GetHealthPct() < 60 and Didthat == 1 then
        unit:SendAreaTriggerMessage("PHASE 2")
        unit:RegisterEvent("Malchezaar_Hellfire",2000,0)
        unit:RegisterEvent("Malchezaar_Thrash",5000,0)
        unit:RegisterEvent("Malchezaar_Parry",6000,0)
        unit:RegisterEvent("Malchezaar_Sunder_Armor",7000,0)
        unit:RegisterEvent("Malchezaar_Cleave",8000,0)
        unit:RegisterEvent("Malchezaar_Summon_Infernal",45000,0)
        unit:RegisterEvent("Malchezaar_Enfeeble",46000,0)
        unit:RegisterEvent("Malchezaar_Shadow_Nova",47000,0)
        Didthat = 2
    else
    end

    if unit:GetHealthPct() < 30 and Didthat == 2 then
        unit:SendAreaTriggerMessage("PHASE 3")
        unit:RegisterEvent("Malchezaar_Hellfire",2000,0)
        unit:RegisterEvent("Malchezaar_Amplify",10000,0)
        unit:RegisterEvent("Malchezaar_Summon_Infernal",15000,0)
        unit:RegisterEvent("Malchezaar_Shadow_Word_Pain2",25000,0)
        unit:RegisterEvent("Malchezaar_Flying_Axes",17000,0)
        unit:RegisterEvent("Malchezaar_Shadow_Nova",47000,0)
        Didthat = 3
    else
    end

end

RegisterUnitEvent(15690,1,"Malchezaar")

Thats all.. And again, I didnt make any.. Dont know who did tbh Enjoy.. I tried fixing some stuff@aran so try him first.. If it still bugs up lemme know

[Mr.Jebus Christ]

hmm I just need the spirit healers for wsg and av to be scripted