[Release] Lua scripts, The ultimative thread v1 menu

User Tag List

Results 1 to 7 of 7
  1. #1
    b!atch's Avatar Member
    Reputation
    118
    Join Date
    Oct 2007
    Posts
    726
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    [Release] Lua scripts, The ultimative thread v1 Whole quel'danas scripted

    Okay guys, Welcome to my new Lua thread My mission is to post all the lua scripts ill ever find Most of them will be linked as download, But a few will be added here in code tags..


    Finally its here! The mega lua pack! This contains a huge amount of lua scripts for funservers/blizzlike/custom/misc(quests-go's-npctalk)
    And ofc a LUAscripting folder to enable lua++

    New dl link with tuts+whole isle of quel danas scripted UPDATED AGAIN ;D up - to - date


    Updated dl link with new scripts


    Readme is included in the download, You will never have to write a single script again with this pack


    ENJOY!





    Q: How do i get lua++ files?
    A: go to mmoforge.org/svn/luaplusplus

    Q: Do i have to copy/paste all the scripts from mmoforge?
    A: No, You can use Tortoise svn to download them

    Q: Why did you repost your old thread?
    A: I ran out of space, and it was messy

    Q: What is so good about this thread?
    A: It contains a zillion of lua scripts

    Q: Whats the difference between lua/lua++?
    A: Im not sure, Lua++ Requires a Lua++.h File and it has more functions, (Thats what i think)

    Q: Will lua++ scripts work without the LUAScripting folder of LUA++
    A: No

    Q: How can i see if a file is lua++ and not lua?
    A: Its written in the script.. At the top




    Q: Will there be a v2?
    A: Yes



    Let the fun begin!








    To use these scripts.. Copy them into a notepad and save it as name.lua (remember to save as "all files) and then place them in your scripts folder. if you dont have one. make one. This should be located in your folder with ascent.exe and logonserver.exe etc..

    I wont put any more scripts up if i dont get a request about it : )

    Ok guys. The first ones was not made by me. But people have been asking for them:

    Karazhan scripts + others. (Link is @ v2 aswell)

    Filebeam - Free Fast File Hosting

    Here is text examples of them

    Shade of Aran. Karazhan
    Code:
    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:GetClosestPlayer())
            Unit:FullCastSpell(32453)
            Didthat = 2
        else
        end
    end
    
    function Aran_Fireball(Unit, event, miscunit, misc)
        print "Aran Fireball"
        Unit:FullCastSpellOnTarget(20678,Unit:GetClosestPlayer())
        Unit:SendChatMessage(11, 0, "Fire ball...")
    end
    
    function Aran_Conterspell(Unit, event, miscunit, misc)
        print "Aran Conterspell"
        Unit:FullCastSpellOnTarget(29961,Unit:GetClosestPlayer())
        Unit:SendChatMessage(11, 0, "Try to cast now...")
    end
    
    function Aran_Conflagration(Unit, event, miscunit, misc)
        print "Aran Conflagration"
        Unit:FullCastSpellOnTarget(23023,Unit:GetClosestPlayer())
        Unit:SendChatMessage(11, 0, "Your so weak guys...")
    end
    
    function Aran_FrostBolt(Unit, event, miscunit, misc)
        print "Aran FrostBolt"
        Unit:FullCastSpellOnTarget(41486,Unit:GetClosestPlayer())
        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:GetClosestPlayer())
        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:GetClosestPlayer())
        Unit:SendChatMessage(11, 0, "Rain of arcane...")
    end
    
    function Aran_Flame_Wreath(Unit, event, miscunit, misc)
        print "Aran Flame Wreath"
        Unit:FullCastSpellOnTarget(30004,Unit:GetRandomPlayer())
        Unit:SendChatMessage(11, 0, "My Flame Wreath...")
    end
    
    function Aran_Circular_Blizzard(Unit, event, miscunit, misc)
        print "Aran Circular Blizzard"
        Unit:FullCastSpellOnTarget(29952,Unit:GetClosestPlayer())
        Unit:SendChatMessage(11, 0, "Blizzard...")
    end
    
    function Aran_Magnetic_Pull(Unit, event, miscunit, misc)
        print "Aran Magnetic Pull"
        Unit:FullCastSpellOnTarget(29979,Unit:GetClosestPlayer())
        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:GetClosestPlayer())
        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")
    Curotar. Karazhan

    Code:
    function Curator_Evocation(Unit, event, miscunit, misc)
        if Unit:GetManaPct() < 1 and Didthat == 0 then
            print "Curator Evocation"
            Unit:FullCastSpell(30254)
            Didthat = 1
        else
        end
    end
    
    function Curator_Enrage(Unit, event, miscunit, misc)
        if Unit:GetHealthPct() < 15 and Didthat == 1 then
            print "Curator_Enrage"
            Unit:FullCastSpell(41447)
            Didthat = 2
        else
        end
    end
    
    function Curator_Summon_Astral_Flare(Unit, event, miscunit, misc)
        print "Curator Summon Astral Flare"
        Unit:SpawnCreature(17096, -1168.601, 1699.915, 91.477, 0, 18, 96000000);
        Unit:SendChatMessage(11, 0, "Help me...")
    end
    
    function Curator_Hateful_Bolt(Unit, event, miscunit, misc)
        print "Curator Hateful Bolt"
        Unit:FullCastSpellOnTarget(30383,Unit:GetRandomPlayer())
        Unit:SendChatMessage(11, 0, "Catch that...")
    end
    
    function Curator_Berserk(Unit, event, miscunit, misc)
        print "Curator Berserk"
        Unit:FullCastSpell(35595)
        Unit:SendChatMessage(11, 0, "Now you will die...")
    end
    
    function Curator(unit, event, miscunit, misc)
        print "Curator"
        unit:RegisterEvent("Curator_Evocation",1000,0)
        unit:RegisterEvent("Curator_Enrage",1000,0)
        unit:RegisterEvent("Curator_Summon_Astral_Flare",10000,0)
        unit:RegisterEvent("Curator_Hateful_Bolt",27000,0)
        unit:RegisterEvent("Curator_Berserk",720000,0)
    end
    
    RegisterUnitEvent(15691,1,"Curator")
    Prince. Karazhan

    Code:
    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")[
    Code:
                      /code]Maiden. Karazhan
    
    [code]function Maiden_Holy_Fire(Unit, event, miscunit, misc)
        print "Maiden Holy Fire"
        Unit:FullCastSpellOnTarget(29522,Unit:GetRandomPlayer())
        Unit:SendChatMessage(11, 0, "You like Holy Fire...")
    end
    
    function Maiden_Holy_Wrath(Unit, event, miscunit, misc)
        print "Maiden Holy Wrath"
        Unit:FullCastSpellOnTarget(32445,Unit:GetClosestPlayer())
        Unit:SendChatMessage(11, 0, "Now, Holy Wrath...")
    end
    
    function Maiden_Repentance(Unit, event, miscunit, misc)
        print "Maiden Repentance"
        Unit:FullCastSpellOnTarget(29511,Unit:GetClosestPlayer())
        Unit:SendChatMessage(11, 0, "Repentance on you guys...")
    end
    
    function Maiden_Holy_Ground(Unit, event, miscunit, misc)
        print "Maiden Holy Ground"
        Unit:FullCastSpellOnTarget(29512,Unit:GetClosestPlayer())
        Unit:SendChatMessage(11, 0, "Now, Holy Ground...")
    end
    
    function Maiden(unit, event, miscunit, misc)
        print "Maiden"
        unit:RegisterEvent("Maiden_Holy_Fire",15000,0)
        unit:RegisterEvent("Maiden_Holy_Wrath",20000,0)
        unit:RegisterEvent("Maiden_Repentance",25000,0)
        unit:RegisterEvent("Maiden_Holy_Ground",30000,0)
    end
    
    RegisterUnitEvent(16457,1,"Maiden")
    Kilrek. Karazhan

    Code:
    function Kilrek_Broken_Pact(Unit, event, miscunit, misc)
        if Unit:GetHealthPct() < 2 and Didthat == 0 then
            Unit:FullCastSpellOnTarget(30065,Unit:GetUnitBySqlId(15688))
            Unit:SendChatMessage(11, 0, "You let me down Terestian, you will pay for this...")
            Didthat = 1
        else
        end
    end
    
    function Kilrek_FireBolt(Unit, event, miscunit, misc)
        print "Kilrek FireBolt"
        Unit:FullCastSpellOnTarget(15592,Unit:GetClosestPlayer())
        Unit:SendChatMessage(11, 0, "Take that...")
    end
    
    function Kilrek_Summon_Imps(Unit, event, miscunit, misc)
        print "Kilrek Summon Imps"
        Unit:FullCastSpell(34237)
        Unit:SendChatMessage(11, 0, "Help me...")
    end
    
    function Kilrek_Amplify_Flames(Unit, event, miscunit, misc)
        print "Kilrek Amplify Flames"
        Unit:FullCastSpellOnTarget(30053,Unit:GetClosestPlayer())
        Unit:SendChatMessage(11, 0, "Take fire will hurt you more...")
    end
    
    function Kilrek(unit, event, miscunit, misc)
        print "Kilrek"
        unit:RegisterEvent("Kilrek_Broken_Pact",1000,1)
        unit:RegisterEvent("Kilrek_FireBolt",8000,0)
        unit:RegisterEvent("Kilrek_Summon_Imps",30000,0)
        unit:RegisterEvent("Kilrek_Amplify_Flames",45000,0)
    end
    
    RegisterUnitEvent(17229,1,"Kilrek")
    Julianne. Karazhan

    Code:
    function Julianne_Eternal_Affection(Unit, event, miscunit, misc)
        print "Julianne Eternal Affection"
        Unit:FullCastSpell(30878)
        Unit:SendChatMessage(11, 0, "HEAL...")
    end
    
    function Julianne_Powerful_Attraction(Unit, event, miscunit, misc)
        print "Julianne Powerful Attraction"
        Unit:FullCastSpellOnTarget(30889,Unit:GetClosestPlayer())
        Unit:SendChatMessage(11, 0, "You love me...HOooo...")
    end
    
    function Julianne_Blinding_Passion(Unit, event, miscunit, misc)
        print "Julianne Blinding Passion"
        Unit:FullCastSpellOnTarget(30890,Unit:GetClosestPlayer())
        Unit:SendChatMessage(11, 0, "Some passion...")
    end
    
    function Julianne_Devotion(Unit, event, miscunit, misc)
        print "Julianne Devotion"
        Unit:FullCastSpell(30887)
        Unit:SendChatMessage(11, 0, "I will kill you...")
    end
    
    function Julianne(unit, event, miscunit, misc)
        print "Julianne"
        unit:RegisterEvent("Julianne_Eternal_Affection",10000,0)
        unit:RegisterEvent("Julianne_Powerful_Attraction",15000,0)
        unit:RegisterEvent("Julianne_Blinding_Passion",20000,0)
        unit:RegisterEvent("Julianne_Devotion",25000,0)
    end
    
    RegisterUnitEvent(117534,1,"Julianne")
    Code:
    function Hyakiss_Hyakiss_Web(Unit, event, miscunit, misc)
        print "Hyakiss Hyakiss Web"
        Unit:FullCastSpellOnTarget(29896,Unit:GetClosestPlayer())
        Unit:SendChatMessage(11, 0, "I will show you my Web design...")
    end
    
    function Hyakiss_Acidic_Wound(Unit, event, miscunit, misc)
        print "Hyakiss Acidic Wound"
        Unit:FullCastSpellOnTarget(40481,Unit:GetClosestPlayer())
        Unit:SendChatMessage(11, 0, "HO, a bad wound...")
    end
    function Hyakiss(unit, event, miscunit, misc)
        print "Hyakiss"
        unit:RegisterEvent("Hyakiss_Hyakiss_Web",15000,0)
        unit:RegisterEvent("Hyakiss_Acidic_Wound",25000,0)
    end
    
    RegisterUnitEvent(16179,1,"Hyakiss")
    Nightbane. Karazhan

    Code:
    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")
    Netherspite. Karazhan

    Code:
    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")
    Moroes. Karazhan

    Code:
    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")
    If there is any other scripts you need. Tell me. I might be able to provide them..


    REMEMBER THAT I DID NOT MAKE THOSE SCRIPTS!

    Now for the scripts that I made

    Code:
    function Heigan_Eruption(Unit, event, miscunit, misc)
            Unit:FullCastSpell(29371)
            print "Heigan Eruption"
    end
    
    function Heigan_Fever(Unit, event, miscunit, misc)
        print "Heigan Fever"
        Unit:FullCastSpell(29998)
    end
    
    function Heigan_Adds(Unit, event, miscunit, misc)
        print "Heigan Adds"
        Unit:SpawnCreature(1553777, -10472.964844, -2535.159668, 23.280212, 0.402232, 21, 120000);
            Unit:SpawnCreature(1553777, -10472.964844, -2535.159668, 23.280212, 0.402232, 21, 120000);
    end
    
    function Heigan_Addstwo(Unit, event, miscunit, misc)
        print "Heigan Addstwo"
        Unit:SpawnCreature(1553711, -10472.964844, -2535.159668, 23.280212, 0.402232, 21, 120000);
            Unit:SpawnCreature(1553711, -10472.964844, -2535.159668, 23.280212, 0.402232, 21, 120000);
    end
    
    function Heigan(unit, event, miscunit, misc)
        print "Heigan"
        unit:RegisterEvent("Heigan_Eruption",10000,0)
        unit:RegisterEvent("Heigan_Fever",15000,0)
        unit:RegisterEvent("Heigan_Adds",40000,0)
            unit:RegisterEvent("Heigan_Addstwo",55000,0)
    end
    
    
    RegisterUnitEvent(Npc id here,1,"Heigan")
    That is pretty much like heigan in naxx. But not
    compeltely the same. I made him for my custom heigan..


    Here is the scripts for his adds..

    Code:
    function Plaguebat_Disease(Unit, event, miscunit, misc)
            Unit:FullCastSpellOnTarget(30113,Unit:GetClosestPlayer())
            print "Plaguebat Disease"
    
    end
    
    function Plaguebat(unit, event, miscunit, misc)
        print "Plaguebat"
        unit:RegisterEvent("Plaguebat_Disease",50,0)
    end
    
    RegisterUnitEvent(1553711,1,"Plaguebat")

    Here is one for a shadownpc...

    Code:
    function Shadownpc_Voidbolt(Unit, event, miscunit, misc)
        print "Shadownpc Voidbolt"
        Unit:FullCastSpellOnTarget(39252,Unit:GetMainTank())
    end
    
    function Shadownpc_Berserkerstance(Unit, event, miscunit, misc)
        print "Shadownpc Berserkerstance"
        Unit:FullCastSpell(7366)
    end
    
    function Shadownpc_Fear(Unit, event, miscunit, misc)
        print "Shadownpc Fear"
        Unit:FullCastSpellOnTarget(13704,Unit:GetMainTank())
    end
    
    function Shadownpc_Shadowboltvalley(Unit, event, miscunit, misc)
        print "Shadownpc Shadowboltvalley"
        Unit:FullCastSpell(32963)
    end
    
    function Shadownpc_Empoweringshadow(Unit, event, miscunit, misc)
        print "Shadownpc Empoweringshadow"
        Unit:FullCastSpell(39364)
    end
    
    function Shadownpc_Shadownovatwo(Unit, event, miscunit, misc)
        print "Shadownpc Shadownovatwo"
        Unit:FullCastSpell(33846)
    end
    
    function Shadownpc_Shadownova(Unit, event, miscunit, misc)
        print "Shadownpc Shadownova"
        Unit:FullCastSpell(30852)
    end
    
    function Shadownpc_leavecombat(Unit, event, miscunit, misc)
        unit:RemoveEvents()
    end
    
    function Shadownpc(unit, event, miscunit, misc)
        print "Shadownpc"
        unit:RegisterEvent("Shadownpc_Voidbolt",15000,0)
        unit:RegisterEvent("Shadownpc_Shadowboltvalley",30000,0)
        unit:RegisterEvent("Shadownpc_Berserkerstance",50000,0)
        unit:RegisterEvent("Shadownpc_Fear",51000,0)
        unit:RegisterEvent("Shadownpc_Empoweringshadow",60000,0)
        unit:RegisterEvent("Shadownpc_Shadownovatwo",40000,0)
        unit:RegisterEvent("Shadownpc_Shadownova",17000,0)
    end
    
    RegisterUnitEvent(Mob Entryid Here, 2, "Shadownpc_leavecombat")
    RegisterUnitEvent(Mob Entryid Here,1,"Shadownpc")




    Enjoy guys v2 will be up ina sec
    Last edited by b!atch; 07-01-2008 at 08:44 AM.
    Spectrum-X is win! Rep People That Help You and Candybones Wont Eat Your Brain:>

    [Release] Lua scripts, The ultimative thread v1
  2. #2
    SectorSeven's Avatar Banned
    Reputation
    444
    Join Date
    Oct 2007
    Posts
    1,948
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    +Rep x2 but I suggest that you cut down on the font size to give you more room and a more professional look.

  3. #3
    b!atch's Avatar Member
    Reputation
    118
    Join Date
    Oct 2007
    Posts
    726
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Thx, And thx for the support s7 Ima do that.
    Spectrum-X is win! Rep People That Help You and Candybones Wont Eat Your Brain:>

  4. #4
    b!atch's Avatar Member
    Reputation
    118
    Join Date
    Oct 2007
    Posts
    726
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Second add for Heigan bugged up so here it is:

    Code:
    function Plaguebeast_Disease(Unit, event, miscunit, misc)
    Unit:FullCastSpellOnTarget(30109,Unit:GetClosestPlayer())
            print "Plaguebeast Disease"
    
    end
    
    function Plaguebeast(unit, event, miscunit, misc)
        print "Plaguebeast"
        unit:RegisterEvent("Plaguebeast_Disease",50,0)
    end
    
    RegisterUnitEvent(1553777,1,"Plaguebeast")
    Spectrum-X is win! Rep People That Help You and Candybones Wont Eat Your Brain:>

  5. #5
    1ns0mnia's Avatar Active Member
    Reputation
    67
    Join Date
    Nov 2007
    Posts
    428
    Thanks G/R
    0/1
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    GJ again B, ur doing well, id rep but still gotta spread =.=

  6. #6
    b!atch's Avatar Member
    Reputation
    118
    Join Date
    Oct 2007
    Posts
    726
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Hehe thx
    Spectrum-X is win! Rep People That Help You and Candybones Wont Eat Your Brain:>

  7. #7
    b!atch's Avatar Member
    Reputation
    118
    Join Date
    Oct 2007
    Posts
    726
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Updated with whole of quel danas scripted+other new scripts.. soon every mob in azeroth is scripted in this pack. it contains about 500 scripts by now


    EDIT: updated dl link in all 3 threads
    Last edited by b!atch; 05-26-2008 at 10:33 AM.
    Spectrum-X is win! Rep People That Help You and Candybones Wont Eat Your Brain:>

Similar Threads

  1. [Release] LUA Script Pad
    By mager1794 in forum WoW EMU Programs
    Replies: 20
    Last Post: 10-14-2008, 11:46 AM
  2. [RELEASE]LUA scripted boss! <EPIC!>
    By nickelo in forum WoW EMU General Releases
    Replies: 8
    Last Post: 10-04-2008, 03:03 PM
  3. [Release] Lua scripts, The ultimative thread v3
    By b!atch in forum World of Warcraft Emulator Servers
    Replies: 35
    Last Post: 07-01-2008, 09:05 AM
  4. Replies: 9
    Last Post: 06-19-2008, 03:55 AM
  5. [Release] Lua scripts, The ultimative thread v2
    By b!atch in forum World of Warcraft Emulator Servers
    Replies: 8
    Last Post: 05-25-2008, 08:03 AM
All times are GMT -5. The time now is 05:08 AM. Powered by vBulletin® Version 4.2.3
Copyright © 2024 vBulletin Solutions, Inc. All rights reserved. User Alert System provided by Advanced User Tagging (Pro) - vBulletin Mods & Addons Copyright © 2024 DragonByte Technologies Ltd.
Digital Point modules: Sphinx-based search