[Release]Lashanda the god of war

[jordddm]

heres my 2nd script i am releasing ive worked hard on this script ive written it from scratch amd once again enjoy! also thrown little speech in there

-----------------------------
--Lashanda the god of war
--Gougewow
--Made by jordddm
--Do not edit who made this
-----------------------------
local npcid=99994
function Lashanda_OnDeath(Unit, Event)
Unit:SendChatMessage(14, 0, "I cannot die... you will seee meee sooooon...")
Unit:RemoveEvents()
end
function Lashanda_OnKillTarget(Unit, Event)
Unit:SendChatMessage(14, 0, "i told you! i am the almighty god of war!")
end
function Lashanda_OnLeaveCombat(Unit, Event)
Unit:RemoveEvents()
end
RegisterUnitEvent(99994,1,"Lashanda_OnCombat")
RegisterUnitEvent(99994,4,"Lashanda_OnDeath")
RegisterUnitEvent(99994,3,"Lashanda_OnKillTarget")
RegisterUnitEvent(99994,2,"Lashanda_OnLeaveCombat")
--    On Combat   --
local plr = Unit:GetClosestPlayer()
local tank = Unit:GetMainTank()
local Mana = Unit:GetRandomPlayer(4)
local Death = Unit:GetRandomPlayer(0)
local Manarange = Unit:GetRandomPlayer(3)
local Nearplr = Unit:GetRandomPlayer(1)
function Lashanda_Oncombat(Unit,Event)
    if plr == nil then
    Unit:SendChatMessage(14, 0, "Ah the sweet sweet smell of war!")
   else
    Unit:FullCastSpell(24573,tank)
    if tank == nil then
    return
    Unit:RegisterEvent("Lashanda_Phase1", 100, 1)
end
  end
end
function Lashanda_Phase1(Unit,Event)
   if Unit:GetHealthPct() < 90 then
   Unit:SendChatMessage(15, 0, "i was once like you..pathetic..weak... but no more!")
   Unit:FullCastSpellOnTarget(30852,plr)
   Unit:SendChatMessage(14, 0, "NOW I AM ALL POWERFULL GOD OF WAR!!!")
   Unit:SetModel(762)
   Unit:SetScale(2)
   Unit:FullCastSpellOnTarget(27554,Nearplr)
   Unit:FullCastSpellOnTarget(27554,Nearplr)
   Unit:FullCastSpellOnTarget(27554,Nearplr)
   Unit:FullCastSpellOnTarget(27554,Nearplr)
   if Nearplr == nil then
   Unit:FullCastSpellonTarget(16979,Manarange)
   if Manarange == nil then
   Unit:SendChatMessage(14, 0, "ENOUGH! Lets see how you do without your petty friend here to help you!")
   Unit:Setmodel(11311)
   Unit:FullCastSpellOnTarget(43433,tank)
   Unit:RegisterEvent("Lashanda_Phase2", 100, 0)
end
  end
end
  end
function Lashanda_Phase2(Unit,Event)
   Unit:Setmodel(28009)
   Unit:FullCastSpellOnTarget(42389,Mana)
   if Mana == nil then
   Unit:FullCastSpellOnTarget(42384,Manarange)
   if Manarange == nil then
   Unit:Setmodel(11311)
   Unit:CastSpell(29448)
   Return
   Unit:RegisterEvent("Lashanda_Speech1", 10000, 1)
end
  end
end
function Lashanda_Speech1(Unit,Event)
   Unit:SendChatMessage(14, 0, "Sorry did i startle you? no matter lemme explain how i became the almighty god of war!")
   Unit:Setfaction(35)
   Unit:SetScale(1)
   Unit:SetCombatCapability(1)
   Unit:StopMovement(28000)
   Unit:SendChatMessage(12, 0, "I was once like you normal had a happy life untill that wretched lich king came in and destroyed my town! and my familly!")
   Unit:RegisterEvent("Lashanda_Speech1", 4000, 1)
end
function Lashanda_speech2(Unit,Event)
   Unit:SendChatMessage(12, 0, "So after the destruction of my town i went across azeroth outland and northrend thinking of a plan to get revenge!")
   Unit:RegisterEvent("Lashanda_Speech3", 4000, 1)
end
   
function Lashanda_speech3(Unit,Event)
   Unit:SendChatMessage(12, 0, "And one day i said to myself what if i dis***** myself as one of his minions at the time i thought my plan had no flaurs but as i was saying i went on down to his quarter luckilly he wasnt there")
   Unit:RegisterEvent("Lashanda_Speech4", 4000, 1)
end
function Lashanda_speech4(Unit,Event)
   Unit:SendChatMessage(12, 0, "i Killed many of his scourge suprisngly he didnt know of my presence atleast i think i made myself a dis***** out of there disintagrating corpses")
   Unit:RegisterEvent("Lashanda_Speech5", 4000, 1)
end
function Lashanda_speech5(Unit,Event)
   Unit:SendChatMessage(12, 0, "i went on down to his Citadel i could not see him at the time.. Untill i went up the steps and there he was in his frozen throne he said to me i knew you was gonna come ive been waiting for you")
   Unit:RegisterEvent("Lashanda_Speech6", 4000, 1)
end
function Lashanda_Speech6(Unit,Event)
   Unit:SendChatMessage(12, 0, "i was so ANGRY by just looking at him i made a grave mistake i ran in and tryed to slaughter him i was defeated easilly he tossed me around like some rag chew toy! i died sadly but not all was lost the lich king himself!")
   Unit:RegisterEvent("Lashanda_Speech7", 4000, 1)
end
function Lashanda_speech7(Unit,Event)
   Unit:SendChatMessage(12, 0, "ressurected me as one of his minions but he gave me some special powers he named me Lashanda the god of war!!! now you know my story")
   Unit:RegisterEvent("Lashanda_Enemy", 4000, 1)
end
function Lashanda_Enemy(Unit,Event)
   Unit:SendChatMessage(14, 0, "TIME TO DIE!")
   Unit:Setfaction(45)
   Unit:SetCombatCapability(0)
   Unit:StopMovement(9000)
   Unit:SetCombatCapability(1)
   Unit:RegisterEvent("Lashanda_Enemey2", 3000, 1)
end
function Lashanda_Enemy2(Unit,Event)
   Unit:SendChatMessage(14, 0, "whats that noise?")
   Unit:SpawnCreature(11311,X,Y,Z,529,0)
   Unit:SendChatMessage(14, 0, "NO IT CANT BE! I DISPOSED OF YOU LONG AGO!")
   Unit:RegisterEvent("Lashanda_Lastphase", 4000, 1)
end
function Lashanda_Lastphase(Unit,Event)
   Unit:SendChatMessage(14, 0, "No Matter.. ill destroy you both! percenely")
   Unit:Setfaction(45)
   Unit:SetCombatCapability(0)
   Unit:RegisterEvent("Lashanda_Lastphase2", 100, 0)
end
function Lashanda_Lastphase2(Unit,Event)
   Unit:SetCombatMeleeCapable(1)
   Unit:FullCastSpellOnTarget(5,Death)
   Unit:SendChatMessage(14, 0, "HA! you didnt see that coming did you!")
   Unit:FullCastSpellOnTarget(59273,Manarange)
   if Manarange == nil then
   Unit:FullCastSpellOnTarget(42024,Death)
   Unit:FullCastSpellOnTarget(42024,Death)
   Unit:FullCastSpellOnTarget(42024,Death)
   Unit:FullCastSpellOnTarget(42024,Death)
   Unit:FullCastSpellOnTarget(42024,Death)
end
  end
   
--     Friendly npc       --
function Lugufran_OnCombat(Unit,Event)
   Unit:SendChatMessage(14, 0, "Well you was wrong its time to end this!")
   Unit:RegisterEvent("Lugufran_LastPhase", 16000, 1)
end
function Lashanda_OnDeath(Unit, Event)
Unit:SendChatMessage(14, 0, "I have failed... its up to you heroes now....")
Unit:RemoveEvents()
end
function Lashanda_OnKillTarget(Unit, Event)
Unit:SendChatMessage(12, 0, "Serves you right... there you go heroes he is no more! ill be going now cya in the future!")
end
function Lashanda_OnLeaveCombat(Unit, Event)
Unit:RemoveEvents()
end
RegisterUnitEvent(11311,1,"Lugufran_OnCombat")
RegisterUnitEvent(11311,4,"Lugufran_OnDeath")
RegisterUnitEvent(11311,3,"Lugufran_OnKillTarget")
RegisterUnitEvent(11311,2,"Lugufran_OnLeaveCombat")
function Lugufran_LastPhase(Unit,Event)
   Unit:DealDamage(Lashanda,100000000000,31263)
   Unit:Despawn(1,0)
end

heres the sql files for arcemu/mangos so just put the script in script folder and upload theese sqls into database

Lashanda-god of war-arcemu

insert into `creature_names` (`entry`, `name`, `subname`, `info_str`, `Flags1`, `type`, `family`, `rank`, `unk4`, `spelldataid`, `male_displayid`, `female_displayid`, `male_displayid2`, `female_displayid2`, `unknown_float1`, `unknown_float2`, `civilian`, `leader`) 
values ('99994', "Lushanda", "The god of war", '', '0', '7', '0', '3', '0', '0', '11311', '0', '0', '0', '1', '1', '0', '0');
insert into `creature_proto` (`entry`, `minlevel`, `maxlevel`, `faction`, `minhealth`, `maxhealth`, `mana`, `scale`, `npcflags`, `attacktime`, `attacktype`, `mindamage`, `maxdamage`, `can_ranged`, `rangedattacktime`, `rangedmindamage`, `rangedmaxdamage`, `respawntime`, `armor`, `resistance1`, `resistance2`, `resistance3`, `resistance4`, `resistance5`, `resistance6`, `combat_reach`, `bounding_radius`, `auras`, `boss`, `money`, `invisibility_type`, `death_state`, `walk_speed`, `run_speed`, `fly_speed`, `extra_a9_flags`, `spell1`, `spell2`, `spell3`, `spell4`, `spell_flags`, `modImmunities`) 
values ('99994', '80', '82', '14', '7068000', '7068000', '907000', '1', '0', '2300', '0', '8000', '9212', '0', '0', '0', '0', '1800000', '15000', '0', '0', '0', '0', '0', '0', '0', '0', "0", '1', '2120000', '0', '0', '2.50', '8.00', '14.00', '0', '0', '0', '0', '0', '0', '0');

Lashanda-god of war for mangos

insert into `creature_template` (`entry`, `modelid_A`, `modelid_A2`, `modelid_H`, `modelid_H2`, `name`, `subname`, `minlevel`, `maxlevel`, `minhealth`, `maxhealth`, `minmana`, `maxmana`, `armor`, `faction_A`, `faction_H`, `npcflag`, `speed`, `scale`, `rank`, `mindmg`, `maxdmg`, `baseattacktime`, `family`, `type`, `resistance1`, `resistance2`, `resistance3`, `resistance4`, `resistance5`, `resistance6`, `mingold`, `maxgold`)
values ('99994', '11311', '0', '0', '0', "Lushanda", "The god of war", '80', '82', '7068000', '7068000', '907000', '907000', '15000', '14', '14', '0', '8.00', '1', '3', '8000', '9212', '2300', '0', '7', '0', '0', '0', '0', '0', '0', '2120000', '2120000');

Lugufran-god of peace-arcemu

insert into `creature_names` (`entry`, `name`, `subname`, `info_str`, `Flags1`, `type`, `family`, `rank`, `unk4`, `spelldataid`, `male_displayid`, `female_displayid`, `male_displayid2`, `female_displayid2`, `unknown_float1`, `unknown_float2`, `civilian`, `leader`) 
values ('11311', "Lugufran", "The god of Peace", '', '0', '7', '0', '3', '0', '0', '15217', '0', '0', '0', '1', '1', '0', '0');
insert into `creature_proto` (`entry`, `minlevel`, `maxlevel`, `faction`, `minhealth`, `maxhealth`, `mana`, `scale`, `npcflags`, `attacktime`, `attacktype`, `mindamage`, `maxdamage`, `can_ranged`, `rangedattacktime`, `rangedmindamage`, `rangedmaxdamage`, `respawntime`, `armor`, `resistance1`, `resistance2`, `resistance3`, `resistance4`, `resistance5`, `resistance6`, `combat_reach`, `bounding_radius`, `auras`, `boss`, `money`, `invisibility_type`, `death_state`, `walk_speed`, `run_speed`, `fly_speed`, `extra_a9_flags`, `spell1`, `spell2`, `spell3`, `spell4`, `spell_flags`, `modImmunities`) 
values ('11311', '80', '82', '7', '1303000', '103000', '1200000', '1', '0', '1900', '0', '2000', '3212', '0', '0', '0', '0', '1800000', '15000', '0', '0', '0', '0', '0', '0', '0', '0', "0", '1', '1', '0', '0', '2.50', '8.00', '14.00', '0', '0', '0', '0', '0', '0', '0');

and lastly

Lugufran-god of peace-mangos

insert into `creature_template` (`entry`, `modelid_A`, `modelid_A2`, `modelid_H`, `modelid_H2`, `name`, `subname`, `minlevel`, `maxlevel`, `minhealth`, `maxhealth`, `minmana`, `maxmana`, `armor`, `faction_A`, `faction_H`, `npcflag`, `speed`, `scale`, `rank`, `mindmg`, `maxdmg`, `baseattacktime`, `family`, `type`, `resistance1`, `resistance2`, `resistance3`, `resistance4`, `resistance5`, `resistance6`, `mingold`, `maxgold`)
values ('11311', '15217', '0', '0', '0', "Lugufran", "The god of Peace", '80', '82', '1303000', '103000', '1200000', '1200000', '15000', '7', '7', '0', '8.00', '1', '3', '2000', '3212', '1900', '0', '7', '0', '0', '0', '0', '0', '0', '1', '1');

[y2kss66]

pretty nice script +RepX2

[stoneharry]

Why make a mangos query if Lua is not compatable with mangos? (Unless the put it on again).
Anyway nice script, +Rep Some advice, do not make text with ALL CAPITALS AND THREE EXCLAMATION MARKS!!! like that Do you see Blizzard doing that or any other game? Just change to something like "Bla bla bla bla!". Gets across the same point depending how much you use shout

[Claiver]

I really like the God-concepts, that's why I work on them too. Will pretty sooon start developing a new one myself.

OT: Thanks for your contribution, +REP

[svedin]

Really nice script there

+Rep Ofc

//Svedin