[Non-Blizzlike/LUA/SQL]Chess Master Boss

[Zachy 11]

CHANGELOG :

2 - Cleaned up the code a bit.
1 - Released.

 

LUA :

--Written by Erathorn

function ChessMaster_Combat(Unit, Event)
Num1 = 0
Unit:SendChatMessage(14, 0, "Are you ready for a game of chess?")
Unit:RegisterEvent("ChessMaster_Phase1", 13000, 0)
end

function Master_1(Unit, Event)
Rand1 = math.random(0,3)
Plr1 = Unit:GetRandomPlayer(0)
    
    if Rand1 == 0 then
    Unit:FullCastSpellOnTarget(38892, Plr1)
    end
    
    if Rand1 == 2 then
    Unit:FullCastSpellOnTarget(38892, Plr1)
    end

    if Rand1 == 3 then
    Unit:FullCastSpellOnTarget(30937, Plr1)
    Unit:FullCastSpellOnTarget(38892, Plr1)
    end

    if Rand1 == 1 then
    Unit:FullCastSpellOnTarget(36275, Plr1)
    end
end

function Master_2(Unit, Event)
Plr1 = Unit:GetRandomPlayer(0)
Unit:CastSpellOnTarget(30937, Plr1)
Unit:FullCastSpellOnTarget(38892, Plr1)
end

function ManaDrain(Unit, Event)

Plr1 = Unit:GetRandomPlayer(4)

    if Plr1~=nil == false then
    Unit:FullCastSpellOnTarget(46153, Plr1)
    end
        
end

function Enrage(Unit, Event)
Unit:CastSpell(26662)
Unit:SendChatMessage(14, 0, "Your king is mine!")
end

function ChessMaster_Phase1(Unit, Event)

    if Unit:GetHealthPct() < 100 then
    Unit:RemoveEvents()
    Unit:RegisterEvent("Master_1", math.random(15000,17000), 0)
    Unit:RegisterEvent("ChessMaster_Phase2", 1000, 0)
    end
        
end

function ChessMaster_Phase2(Unit, Event)

    if Unit:GetHealthPct() < 75 then
    Unit:RemoveEvents()
    Unit:RegisterEvent("Petrify", 63000, 0)
    end
end


function Petrify(Unit, Event)

Num1 = Num1 + 1

if Num1 == 1 then
Unit:SendChatMessage(14, 0, "Pawns are one of the most valuable pieces, you know!")
Unit:CastSpell(17624)
Unit:SetCombatCapable(1)
Unit:StopMovement(60000)
Unit:SpawnCreature(90002, Unit:GetX(), Unit:GetY() + 5, Unit:GetZ(), Unit:GetO(), 16, 60000)
Unit:SpawnCreature(90002, Unit:GetX(), Unit:GetY() - 5, Unit:GetZ(), Unit:GetO(), 16, 60000)
Unit:SpawnCreature(90002, Unit:GetX() - 5, Unit:GetY(), Unit:GetZ(), Unit:GetO(), 16, 60000)
end
if Num1 == 2 then
Unit:CastSpell(17624)
Unit:SetCombatCapable(1)
Unit:StopMovement(60000)
Unit:SpawnCreature(90002, Unit:GetX(), Unit:GetY() + 5, Unit:GetZ(), Unit:GetO(), 16, 60000)
Unit:SpawnCreature(90002, Unit:GetX(), Unit:GetY() - 5, Unit:GetZ(), Unit:GetO(), 16, 60000)
Unit:SpawnCreature(90002, Unit:GetX() - 5, Unit:GetY(), Unit:GetZ(), Unit:GetO(), 16, 60000)
end
if Num1 == 3 then
Unit:CastSpell(17624)
Unit:SetCombatCapable(1)
Unit:StopMovement(60000)
Unit:SpawnCreature(90002, Unit:GetX(), Unit:GetY() + 5, Unit:GetZ(), Unit:GetO(), 16, 60000)
Unit:SpawnCreature(90002, Unit:GetX(), Unit:GetY() - 5, Unit:GetZ(), Unit:GetO(), 16, 60000)
Unit:SpawnCreature(90002, Unit:GetX() - 5, Unit:GetY(), Unit:GetZ(), Unit:GetO(), 16, 60000)
end
if Num1 == 4 then
Unit:SetCombatCapable(0)
Unit:RemoveEvents()
Unit:RegisterEvent("Master_2", 10000, 0)
Unit:RegisterEvent("Enrage", 300000, 1)
Unit:RegisterEvent("ManaDrain", 16000, 0)
end

end


function Imp_Spawn(Unit, Event)
Unit:CastSpell(11350)
Unit:SendChatMessage(12, 0, "For the King!")
end

function Imp_Died(Unit, Event)
Unit:CastSpell(30852)
end

function ChessMaster_Wipe(Unit, Event)
Unit:RemoveEvents()
end

function ChessMaster_Kill(Unit, Event)
Unit:SendChatMessage(14, 0, "Check...")
end

function ChessMaster_Died(Unit, Event)
Unit:RemoveEvents()
Unit:SendChatMessage(14, 0, "My King has fallen...")
end

RegisterUnitEvent(90001, 1, "ChessMaster_Combat")
RegisterUnitEvent(90001, 2, "ChessMaster_Wipe")
RegisterUnitEvent(90001, 3, "ChessMaster_Kill")
RegisterUnitEvent(90001, 4, "ChessMaster_Died")
RegisterUnitEvent(90002, 6, "Imp_Spawn")
RegisterUnitEvent(90002, 4, "Imp_Died")

 

BOSS :

INSERT INTO creature_names (entry, name, subname, info_str, Flags1, type, family, rank, male_displayid, female_displayid, male_displayid2, female_displayid2, civilian, leader) VALUES ('90001','Lak'thros','The Chess Master','','0','3','0','3','19991','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 ('90001','72','72','16','950000','950000','60000','0','2500','7000','8000','0','0','0','0','0','0','0','500000000','23000','0','150','0','0','400','150','3','0','1','5000000','0','0','2.5','8','14')

 

IMP :

INSERT INTO creature_names (entry, name, subname, info_str, Flags1, type, family, rank, male_displayid, female_displayid, male_displayid2, female_displayid2, civilian, leader) VALUES ('90002','Shadowy Imp','','','0','3','0','1','911','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 ('90002','72','72','16','16000','16000','6000','0','1800','800','1000','0','0','0','0','0','0','0','50000000','10000','0','100','0','0','300','100','1','0','1','0','0','0','2.5','8','14')

 

LOOT :

DELETE FROM `creatureloot` WHERE `entryid` = 90001;
DELETE FROM `creatureloot` WHERE `entryid` = 90002;
INSERT INTO `creatureloot` (`entryid`, `itemid`, `percentchance`, `heroicpercentchance`, `mincount`, `maxcount`) VALUES ('90001', '28745', '16', '16', '1', '1');
INSERT INTO `creatureloot` (`entryid`, `itemid`, `percentchance`, `heroicpercentchance`, `mincount`, `maxcount`) VALUES ('90001', '28746', '16', '16', '1', '1');
INSERT INTO `creatureloot` (`entryid`, `itemid`, `percentchance`, `heroicpercentchance`, `mincount`, `maxcount`) VALUES ('90001', '28747', '16', '16', '1', '1');
INSERT INTO `creatureloot` (`entryid`, `itemid`, `percentchance`, `heroicpercentchance`, `mincount`, `maxcount`) VALUES ('90001', '28748', '16', '16', '1', '1');
INSERT INTO `creatureloot` (`entryid`, `itemid`, `percentchance`, `heroicpercentchance`, `mincount`, `maxcount`) VALUES ('90001', '28749', '15', '15', '1', '1');
INSERT INTO `creatureloot` (`entryid`, `itemid`, `percentchance`, `heroicpercentchance`, `mincount`, `maxcount`) VALUES ('90001', '28750', '15', '15', '1', '1');
INSERT INTO `creatureloot` (`entryid`, `itemid`, `percentchance`, `heroicpercentchance`, `mincount`, `maxcount`) VALUES ('90001', '28751', '16', '16', '1', '1');
INSERT INTO `creatureloot` (`entryid`, `itemid`, `percentchance`, `heroicpercentchance`, `mincount`, `maxcount`) VALUES ('90001', '28752', '16', '16', '1', '1');
INSERT INTO `creatureloot` (`entryid`, `itemid`, `percentchance`, `heroicpercentchance`, `mincount`, `maxcount`) VALUES ('90001', '28753', '15', '15', '1', '1');
INSERT INTO `creatureloot` (`entryid`, `itemid`, `percentchance`, `heroicpercentchance`, `mincount`, `maxcount`) VALUES ('90001', '28754', '15', '15', '1', '1');
INSERT INTO `creatureloot` (`entryid`, `itemid`, `percentchance`, `heroicpercentchance`, `mincount`, `maxcount`) VALUES ('90001', '28755', '15', '15', '1', '1');
INSERT INTO `creatureloot` (`entryid`, `itemid`, `percentchance`, `heroicpercentchance`, `mincount`, `maxcount`) VALUES ('90001', '28756', '16', '16', '1', '1');
INSERT INTO `creatureloot` (`entryid`, `itemid`, `percentchance`, `heroicpercentchance`, `mincount`, `maxcount`) VALUES ('90001', '29434', '67', '67', '2', '2');
INSERT INTO `creatureloot` (`entryid`, `itemid`, `percentchance`, `heroicpercentchance`, `mincount`, `maxcount`) VALUES ('90002', '22846', '30', '30', '1', '5');