[LUA and SQL] Necrodragon Kalish menu

These ads disappear when you log in.

Results 1 to 12 of 12
  1. #1
    kreegoth's Avatar Contributor
    Reputation
    122
    Join Date
    Jun 2008
    Posts
    810
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)

    [LUA and SQL] Necrodragon Kalish

    Here is another boss script i made with Sqls

    Its an Undead Dragon who casts Various( some very damaging) fire spells and also summons undead ghouls to his aid various times in the fight.

    He will also at time fly into the air a little making it harder to hit him with certain attacks..

    At some point he will start casting a spell that makes it 30% harder to hit him with any attacks or spells..

    Heres the LUAs

    Code:
    function NecroKali_EnterCombat (pUnit, event)
             pUnit:SendChatMessage(14, 0, "This is Sacrilige! You dare to defile my domain!")
    	 X = pUnit:GetX();
    	 Y = pUnit:GetY();
    	 Z = pUnit:GetZ();
    	 O = pUnit:GetO();
    	 X = X - 4
    	 Y = Y + 4
    	 pUnit:SpawnCreature(250281, X, Y, Z, O, 73, 0);
    	 X = pUnit:GetX();
    	 Y = pUnit:GetY();
    	 Z = pUnit:GetZ();
    	 O = pUnit:GetO();
    	 X = X + 4
    	 Y = Y - 4
    	 pUnit:SpawnCreature(250281, X, Y, Z, O, 73, 0);
             pUnit:RegisterEvent("NecroKali_Breath", 1000, 1)
             pUnit:RegisterEvent("NecroKali_Flame", 2000, 0) 
             pUnit:RegisterEvent("NecroKali_Sear", 5000, 0) 
             pUnit:RegisterEvent("NecroKali_Phase2", 1000, 0)
    	 pUnit:SetFlying()
    end
    
    function NecroKali_Breath (pUnit, event)
             pUnit:FullCastSpellOnTarget(38813, pUnit:GetClosestPlayer())
    end
    
    function NecroKali_Flame (pUnit, event)
             pUnit:CastSpell(15636)
    end
    
    function NecroKali_Sear (pUnit, event)
             pUnit:FullCastSpellOnTarget(38445, pUnit:GetMainTank())
    end
    
    function NecroKali_Phase2 (pUnit, event)
          if pUnit:GetHealthPct() < 76 then
             pUnit:RemoveEvents()        
             pUnit:SendChatMessage(14, 0, "The souls of the dead will deter you from this path!")
    	 X = pUnit:GetX();
    	 Y = pUnit:GetY();
    	 Z = pUnit:GetZ();
    	 O = pUnit:GetO();
    	 X = X - 4
    	 Y = Y + 4
    	 pUnit:SpawnCreature(250281, X, Y, Z, O, 73, 0);
    	 X = pUnit:GetX();
    	 Y = pUnit:GetY();
    	 Z = pUnit:GetZ();
    	 O = pUnit:GetO();
    	 X = X + 4
    	 Y = Y - 4
    	 pUnit:SpawnCreature(250281, X, Y, Z, O, 73, 0);
             pUnit:RegisterEvent("NecroKali_Terror", 50000, 0)
             pUnit:RegisterEvent("NecroKali_Ash", 15000, 0)
             pUnit:RegisterEvent("NecroKali_Rain", 17000, 0)
             pUnit:RegisterEvent("NecroKali_Phase3", 1000, 0)
    	 pUnit:Land()
      end
    end
    
    function NecroKali_Terror (pUnit, event)
             pUnit:FullCastSpellOnTarget(39048, pUnit:GetMainTank())
    end
    
    function NecroKali_Ash (pUnit, event)
             pUnit:FullCastSpellOnTarget(30130, pUnit:GetMainTank())
    end
    
    function NecroKali_Rain (pUnit, event)
             pUnit:CastSpell(39671)
    end
    
    function NecroKali_Phase3 (pUnit, event)
          if pUnit:GetHealthPct() < 49 then
             pUnit:RemoveEvents()
    	 X = pUnit:GetX();
    	 Y = pUnit:GetY();
    	 Z = pUnit:GetZ();
    	 O = pUnit:GetO();
    	 X = X - 4
    	 Y = Y + 4
    	 pUnit:SpawnCreature(250281, X, Y, Z, O, 73, 0);
    	 X = pUnit:GetX();
    	 Y = pUnit:GetY();
    	 Z = pUnit:GetZ();
    	 O = pUnit:GetO();
    	 X = X + 4
    	 Y = Y - 4
    	 pUnit:SpawnCreature(250281, X, Y, Z, O, 73, 0);        
             pUnit:RegisterEvent("NecroKali_Blast", 20000, 0)
             pUnit:RegisterEvent("NecroKali_Torrent", 15000, 0)
             pUnit:RegisterEvent("NecroKali_Calamity", 50000, 0)
             pUnit:RegisterEvent("NecroKali_Ire", 35000, 0)
             pUnit:RegisterEvent("NecroKali_Phase4", 1000, 0)
    	 pUnit:SetFlying()
      end
    end
    
    function NecroKali_Blast (pUnit, event)
             pUnit:CastSpell(17689)
    end
    
    function NecroKali_Torrent (pUnit, event)
             pUnit:FullCastSpellOnTarget(22920, pUnit:GetMainTank())
    end
    
    function NecroKali_Calamity (pUnit, event)
             pUnit:CastSpell(32964)
    end
    
    function NecroKali_Ire (pUnit, event)
             pUnit:FullCastSpellOnTarget(30926, pUnit:GetRandomPlayer(0))
    end
    
    function NecroKali_Phase4 (pUnit, event)
          if pUnit:GetHealthPct() < 20 then
             pUnit:RemoveEvents()
             pUnit:SendChatMessage(14, 0, "You cannot defeat me here...This is my sanctuary of POWER!")
    	 X = pUnit:GetX();
    	 Y = pUnit:GetY();
    	 Z = pUnit:GetZ();
    	 O = pUnit:GetO();
    	 X = X + 4
    	 Y = Y - 4
    	 pUnit:SpawnCreature(250281, X, Y, Z, O, 73, 0);
    	 X = pUnit:GetX();
    	 Y = pUnit:GetY();
    	 Z = pUnit:GetZ();
    	 O = pUnit:GetO();
    	 X = X - 4
    	 Y = Y + 4
    	 pUnit:SpawnCreature(250281, X, Y, Z, O, 73, 0);
    	 X = pUnit:GetX();
    	 Y = pUnit:GetY();
    	 Z = pUnit:GetZ();
    	 O = pUnit:GetO();
    	 X = X - 4
    	 Y = Y - 4
    	 pUnit:SpawnCreature(250281, X, Y, Z, O, 73, 0);
             pUnit:CastSpell(20474)
    	 pUnit:Land()
      end
    end
    
    function NecroKali_LeaveCombat (pUnit, event)
             pUnit:RemoveEvents()
    end
    
    function NecroKali_Die (pUnit, event)
             pUnit:RemoveEvents()
             pUnit:SendChatMessage(14, 0, "Death... It is only the...Beginning")     
    end
    
    RegisterUnitEvent(885432, 1, "NecroKali_EnterCombat")
    RegisterUnitEvent(885432, 2, "NecroKali_LeaveCombat")
    RegisterUnitEvent(885432, 4, "NecroKali_Die")
    Minion
    Code:
    function Necadd_Combat(Unit, Event)
        Unit:CastSpell(30843)
        Unit:SendChatMessage(14, 0, "You will not leave this place alive!")
        Unit:RegisterEvent("Hero_Cleave", 4000, 0)
    end
    
    function Necadd_Cleave(Unit, Event)
        Unit:CastSpell(15284)
    end
    
    function Necadd_Wipe(Unit, Event)
        Unit:RemoveEvents()
    end
    
    RegisterUnitEvent(250281, 1, "Necadd_Combat")
    RegisterUnitEvent(250281, 2, "Necadd_Wipe")
    Here are the Sqls
    Code:
    INSERT INTO creature_names (entry, name, subname, info_str, Flags1, type, family, rank, male_displayid, female_displayid, male_displayid2, female_displayid2, civilian, leader) VALUES ('885432','Necrodragon Kalish','','','0','6','0','3','18062','0','0','0','0','0')
    
    INSERT INTO creature_proto (entry, minlevel, maxlevel, faction, minhealth, maxhealth, mana, scale, npcflags, attacktime, mindamage, maxdamage, rangedattacktime, rangedmindamage, rangedmaxdamage, mountdisplayid, equipmodel1, equipmodel2, equipmodel3, respawntime, armor, resistance1, resistance2, resistance3, resistance4, resistance5, resistance6, combat_reach, auras, boss, money, invisibility_type, death_state, walk_speed, run_speed, fly_speed) VALUES ('885432','71','71','1769','123122','123123','45567','0.75','2800','3123','4211','0','0','0','0','0','0','0','36000','2312','0','0','0','0','99','0','1','0','1','0','0','0','2.5','8','14','0')
    
    INSERT INTO creature_names (entry, name, subname, info_str, Flags1, type, family, rank, male_displayid, female_displayid, male_displayid2, female_displayid2, civilian, leader) VALUES ('250281','Minion of Kalish','','','0','6','0','3','10627','0','0','0','0','0')
    
    INSERT INTO creature_proto (entry, minlevel, maxlevel, faction, minhealth, maxhealth, mana, scale, npcflags, attacktime, mindamage, maxdamage, rangedattacktime, rangedmindamage, rangedmaxdamage, mountdisplayid, equipmodel1, equipmodel2, equipmodel3, respawntime, armor, resistance1, resistance2, resistance3, resistance4, resistance5, resistance6, combat_reach, auras, boss, money, invisibility_type, death_state, walk_speed, run_speed, fly_speed) VALUES ('250281','70','70','0','19232','20121','100','1','1500','1203','1734','0','0','0','0','0','0','0','36000','1445','0','0','0','0','0','0','1','0','1','0','0','0','2.5','8','14','0')

    and some screenshots







    Last edited by kreegoth; 09-27-2008 at 11:28 PM.

    These ads disappear when you log in.

  2. #2
    Arthas117's Avatar Contributor
    Reputation
    151
    Join Date
    Mar 2007
    Posts
    483
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Great job! This looks very blizzmade, the scripts most people love! Keep scripting, and keep getting better! =D

    World best PvP Paladin=Me? GG ;D


  3. #3
    *TraPStaR*'s Avatar Contributor
    Reputation
    164
    Join Date
    Aug 2007
    Posts
    275
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    nice script looks promising

  4. #4
    TheZaronz's Avatar Knight-Champion
    Reputation
    97
    Join Date
    Dec 2007
    Posts
    567
    Thanks G/R
    0/1
    Trade Feedback
    0 (0%)
    Pro made, +Rep

  5. #5
    Performer's Avatar Contributor
    Reputation
    212
    Join Date
    Nov 2007
    Posts
    874
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Looking good mate. Your LUA skills are getting pro +Rep if i can.


  6. #6
    dRACE's Avatar Master Sergeant CoreCoins User
    Reputation
    21
    Join Date
    May 2008
    Posts
    80
    Thanks G/R
    0/0
    Trade Feedback
    1 (100%)
    Nice, maked.


    Good job!

  7. #7
    AzolexX's Avatar Contributor
    Reputation
    179
    Join Date
    May 2007
    Posts
    587
    Thanks G/R
    0/1
    Trade Feedback
    0 (0%)
    its looking Blizzmade Indeed its realy cool +Rep x2!

    Find about scripting, programming and music! My blog: https://worldofsmth.wordpress.com!

  8. #8
    Silverwipe's Avatar Private
    Reputation
    1
    Join Date
    Sep 2008
    Posts
    3
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Your sql files tend to do not work... ishfar i think didn't ...

  9. #9
    kreegoth's Avatar Contributor
    Reputation
    122
    Join Date
    Jun 2008
    Posts
    810
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    They didnt work as i stated because i didnt modify them to work with current database i have r735.. if it doesnt work you can simply add a ,'0' to the end of creatures proto comments...

    This one already has it added..

    Its very hard to create a SQL that will work for everyone as so many people have different revision of arcemu

  10. #10
    Silverwipe's Avatar Private
    Reputation
    1
    Join Date
    Sep 2008
    Posts
    3
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Hey its not working for me the flying part i mean care to tell me why oh and on row 131 there is a mistake x = * - * ... just look there :P

  11. #11
    kreegoth's Avatar Contributor
    Reputation
    122
    Join Date
    Jun 2008
    Posts
    810
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    yeah i edited that after posting so that it would spawn the adds in different spots.. thanks for reminding me ill fix it now


    and as for the flying he doesnt actually FLY away he just lifts off the ground which takes him out of range for some combat attacks.

  12. #12
    Fireblast's Avatar Contributor
    Reputation
    195
    Join Date
    Aug 2008
    Posts
    883
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    kreegoth keep em coming!

Similar Threads

  1. LUA and SQL - Vakama, Earth Warden
    By kreegoth in forum WoW EMU General Releases
    Replies: 5
    Last Post: 09-23-2008, 02:24 AM
  2. [Release] Gnome Elementalists Lua and SQL
    By kreegoth in forum WoW EMU General Releases
    Replies: 11
    Last Post: 09-10-2008, 08:58 PM
  3. NEW Twink pvp level 19 Lua and Sql files
    By runiker in forum World of Warcraft Emulator Servers
    Replies: 9
    Last Post: 07-21-2008, 01:56 PM
  4. [release] Battle Ground Flag LUA and SQL files
    By runiker in forum World of Warcraft Emulator Servers
    Replies: 9
    Last Post: 06-12-2008, 01:36 PM
  5. [Help] Need some DB's and SQL files..
    By UnKnowN- in forum World of Warcraft Emulator Servers
    Replies: 6
    Last Post: 11-22-2007, 12:22 AM
All times are GMT -5. The time now is 03:56 AM. Powered by vBulletin® Version 4.2.3
Copyright © 2019 vBulletin Solutions, Inc. All rights reserved. Digital Point modules: Sphinx-based search