Lua Script Problem menu

User Tag List

Page 3 of 3 FirstFirst 123
Results 31 to 36 of 36
  1. #31
    Diemen's Avatar Member
    Reputation
    1
    Join Date
    Nov 2006
    Posts
    41
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Ahh Now i get it

    So 1 under _OnCombat
    And The other one under _Phase*

    Thnx ! (Y)

    Think this will work !

    Lua Script Problem
  2. #32
    Diemen's Avatar Member
    Reputation
    1
    Join Date
    Nov 2006
    Posts
    41
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Code:
    function Lucius_OnCombat(Unit, Event)
    Unit:SendChatMessage(14, 0, "Die you foul humans !")
    Unit:RegisterEvent("Lucius_Phase1", 5000, 0)
    Unit:RegisterEvent("Lucius_Phase2", 5000, 0) -- next
    Unit:RegisterEvent("Lucius_Summon1", 12000, 1)
    Unit:RegisterEvent("Lucius_Phase3", 5000, 0)
    Unit:RegisterEvent("Lucius_Phase4", 5000, 0)
        Unit:RegisterEvent("Lucius_Phase5", 5000, 0)
       Unit:RegisterEvent("Lucius_Summon2", 5000, 0)
      Unit:RegisterEvent("Lucius_Phase6", 5000, 0)
     Unit:RegisterEvent("Lucius_Phase7", 5000, 0)
    Unit:RegisterEvent("Lucius_Phase8", 5000, 0)
    Unit:RegisterEvent("Lucius_Phase9", 5000, 0)
    end
    
    RegisterUnitEvent(210801, 1, "Lucius_OnCombat")
    
    function Lucius_Phase1(Unit, Event)
    if Unit:GetHealthPct() <90 then
    Unit:SendChatMessage(14, 0, "TAKE THIS !")
    Unit:RemoveEvents()
    Unit:CastSpell(42945)
    Unit:RegisterEvent("Lucius_Phase2", 5000, 2)
    end
    end
    
    function Lucius_Phase2(Unit, Event)
    if Unit:GetHealthPct() <80 then
    Unit:RemoveEvents()
    Unit:RegisterEvent("Lucius_Phase2", 5000, 2)
    Unit:SendChatMessage(14, 0, "YOU ARE SO WEAK !")
    Unit:FullCastSpellOnTarget(48127, Unit:GetMainTank(0)) -- You missed the closing )
    Unit:RegisterEvent("Lucius_Summon1", 12000, 1)
    end
    end
    
    function Lucius_Summon1(Unit, Event)
    local x = Unit:GetX()
    local y = Unit:GetY()
    local z = Unit:GetZ() -- We don't need ; this isn't C++
    local o = Unit:GetO()
    Unit:SpawnCreature (210803, 10149.490234, 2551.358887, 1321.909180, 3.536894, 14 ,120000)
    Unit:SpawnCreature (210803, 10149.490234, 2551.358887, 1321.909180, 3.536894, 14 ,120000) -- npcid, x, y, z, o, faction, time (correct I think)
    Unit:SpawnCreature (210803, 10149.490234, 2551.358887, 1321.909180, 3.536894, 14 ,120000)
    Unit:SendChatMessage(12, 0, "Let's see if you can handle this !")
    Unit:RegisterEvent("Lucius_Phase3", 5000, 2)
    end
    
    function Lucius_Phase3(Unit, Event)
    if Unit:GetHealthPct() <70 then
    Unit:SendChatMessage(14, 0, "KNEEL FOR ME YOU STUPID HUMANS")
    Unit:CastSpell(42921)
    Unit:RemoveEvents()
    Unit:RegisterEvent("Lucius_Phase4", 5000, 2)
    end
    end
    
    function Lucius_Phase4(Unit, Event)
    if Unit:GetHealthPct() <60 then
    Unit:SendChatMessage(14, 0, "Enough of this ! , UNGREADIAL TRANSFORM !")
    Unit:SetModel(14508)
    Unit:SetScale(2)
    Unit:CastSpell(42926)
    Unit:RemoveEvents()
    Unit:RegisterEvent("Lucius_Phase5", 9000, 3)
    end
    end
    
    function Lucius_Phase5(Unit, Event)
    if Unit:GetHealthPct() <50 then
    Unit:SendChatMessage(14, 0, "NO ONE CAN STOP ME !")
    Unit:RemoveEvents()
    Unit:CastSpell(42950)
    Unit:RegisterEvent("Lucius_Summon2", 8000, 3)
    end
    end
    
    function Lucius_Summon2(Unit, Event)
    local x = Unit:GetX()
    local y = Unit:GetY()
    local z = Unit:GetZ() -- Again this isn't C++ no ;
    local o = Unit:GetO()
    Unit:SpawnCreature (210804, 10149.490234, 2551.358887, 1321.909180, 3.536894, 14 ,120000)
    Unit:SpawnCreature (210804, 10149.490234, 2551.358887, 1321.909180, 3.536894, 14 ,120000)
    Unit:SpawnCreature (210804, 10149.490234, 2551.358887, 1321.909180, 3.536894, 14 ,120000)
    Unit:RemoveEvents()
    Unit:RegisterEvent("Lucius_Phase6", 5000, 1)
    end
    
    function Lucius_Phase6(Unit, Event)
    if Unit:GetHealthPct() <40 then
    Unit:SendChatMessage(12, 0, "UNGREADIAL TRANSFORM !")
    Unit:SetModel(1126)
    Unit:SetScale(3)
    Unit:RemoveEvents()
    Unit:CastSpell(42931)
    Unit:RegisterEvent("Lucius_Phase7", 5000, 1)
    end
    end
    
    function Lucius_Phase7(Unit, Event)
    if Unit:GetHealthPct() <25 then
    Unit:SendChatMessage(14, 0, "FEEL THE POWER OF A TRUE GOD !")
    Unit:RemoveEvents()
    Unit:FullCastSpellOnTarget(5, Unit:GetMainTank(0))
    Unit:RegisterEvent("Lucius_Phase8", 13000, 1)
    end
    end
    
    
    function Lucius_Phase8(Unit, Event)
    if Unit:GetHealthPct() <15 then
    Unit:SendChatMessage(14, 0, "NO NO NO! I WON'T DIE ! ,UNGREADIAL TRANSFORM !")
    Unit:SetModel(10315)
    Unit:RemoveEvents()
    Unit:CastSpell(59159)
    Unit:RegisterEvent("Lucius_Phase9", 10000, 2)
    end
    end
    
    function Lucius_Phase9(Unit, Event)
    if Unit:GetHealthPct() <5 then
    Unit:RegisterEvent("Lucius_Phase9", 5000, 2)
    Unit:SendChatMessage(14, 0, "THIS CAN'T BE TRUE ! NOOOOOOOO.....")
    Unit:RemoveEvents()
    Unit:CastSpell(61721)
    end
    end
    
    
    function Lucius_OnLeaveCombat(Unit, Event)
    Unit:SendChatMessage(12, 0, "Haha you weaklings !")
    Unit:RemoveEvents()
    end
    
    RegisterUnitEvent(210801, 2, "Lucius_OnLeaveCombat")
    
    function Lucius_OnKilledTarget(Unit, Event)
    Unit:SendChatMessage(12, 0, "Kneel for your god !")
    end
    
    RegisterUnitEvent(210801, 3, "Lucius_OnKilledTarget")
    
    function Lucius_OnDied(Unit, Event)
    Unit:SendChatMessage(14, 0, "No..... SARCIUS !!!!!!!")
    Unit:RemoveEvents()
    end
    
    RegisterUnitEvent(210801, 4, "Lucius_OnDied"):(6):
    It does not pass Phase 2 ...
    Last edited by Diemen; 01-08-2010 at 04:56 AM. Reason: Changing

  3. #33
    stoneharry's Avatar Moderator Harry

    Authenticator enabled
    Reputation
    1613
    Join Date
    Sep 2007
    Posts
    4,554
    Thanks G/R
    151/146
    Trade Feedback
    0 (0%)
    Mentioned
    3 Post(s)
    Tagged
    0 Thread(s)
    Don't double post edit the one before.
    Also that script will not work since the remove events stops all registered events.
    Think of it this way:

    On combat, register a checker and JUST this one checker.
    When this checker is 90% of less, it removes events stopping it checking any more, then we register it AGAIN but only for 2 times, so that it will do it for 2 times. We then have to register if we want to check for anything else, which would be the < 80% health part and do the same thing.

  4. #34
    Diemen's Avatar Member
    Reputation
    1
    Join Date
    Nov 2006
    Posts
    41
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    I don't get it anymore sorry ,
    Could you show me something like it ?

  5. #35
    stoneharry's Avatar Moderator Harry

    Authenticator enabled
    Reputation
    1613
    Join Date
    Sep 2007
    Posts
    4,554
    Thanks G/R
    151/146
    Trade Feedback
    0 (0%)
    Mentioned
    3 Post(s)
    Tagged
    0 Thread(s)
    Code:
    function abigbad_Phase1(Unit, event)
        if Unit:GetHealthPct() < 95 then
            Unit:PlaySoundToSet(8899)
            Unit:SendChatMessage(12, 0, "Come on and fight you wee ne ne!")
            Unit:RemoveEvents()
            Unit:CastSpell(30035)
            Unit:RegisterEvent("abigbad_Phase2",1000, 0)
        end
    end
     
    function abigbad_Phase2(Unit, event)
        if Unit:GetHealthPct() < 85 then
            Unit:PlaySoundToSet(8905)
            Unit:SendChatMessage(12, 0, "I'm going to enjoy killing these slapjaw daffidiles!")
            Unit:RemoveEvents()
            Unit:CastSpell(29963)
            Unit:RegisterEvent("abigbad_Phase3",1000, 0)
        end
    end
     
    function abigbad_Phase3(Unit, event)
        if Unit:GetHealthPct() < 65 then
            Unit:PlaySoundToSet(8902)
            Unit:SendChatMessage(12, 0, "I like my meat extra crispy!")
            Unit:RemoveEvents()
            Unit:CastSpell(19129)
            Unit:CastSpell(45345)
            Unit:RegisterEvent("abigbad_Phase4",1000, 0)        
        end
    end
     
    function abigbad_Phase4(Unit, event)
        if Unit:GetHealthPct() < 45 then
            Unit:PlaySoundToSet(8904)
            Unit:SendChatMessage(12, 0, "I heard about enough of yer sniviling, shut your fly trap before i shut it for you!")
            Unit:RemoveEvents()
            Unit:CastSpell(19366)
            Unit:CastSpell(22436)
            Unit:CastSpell(15636)
            Unit:RegisterEvent("abigbad_Phase5",1000, 0)        
        end
    end
     
    function abigbad_Phase5(Unit, event)
        if Unit:GetHealthPct() < 35 then
            Unit:RemoveEvents()
            Unit:RegisterEvent("abigbad_Phase6",1000, 0)        
        end
    end
    function abigbad_Phase6(Unit, event)
        if Unit:GetHealthPct() < 5 then
            Unit:RemoveEvents()
            Unit:PlaySoundToSet(8901)
            Unit:CastSpell(28323)
            Unit:CastSpell(20620)
            Unit:SendChatMessage(12, 0, "Next time, bring more friends!")  
        end
    end
    function abigbad_OnLeaveCombat(Unit, event)
        Unit:RemoveEvents()
    end
     
    function abigbad_OnKilledTarget(Unit)
        Unit:CastSpell(41106)
    end
     
    function abigbad_Death(Unit)
        Unit:RemoveEvents()
        Unit:PlaySoundToSet(8870)
        Unit:SendChatMessage(12, 0, "Thank... You...")
    end
    RegisterUnitEvent(88888889, 1, "abigbad_OnCombat")
    RegisterUnitEvent(88888889, 2, "abigbad_OnLeaveCombat")
    RegisterUnitEvent(88888889, 3, "abigbad_OnKilledTarget")
    RegisterUnitEvent(88888889, 4, "abigbad_Death")
    
    function abigbadie_OnCombat(Unit, event)
        Unit:PlaySoundToSet(8903)
        Unit:SendChatMessage(12, 0, "To arms ye resta'bouts, we've got company!")
        x = Unit:GetX();
        y = Unit:GetY();
        z = Unit:GetZ();
        o = Unit:GetO();
        x = x - 2
        y = y - 2
        Unit:SpawnCreature(8888881, x, y, z, o, 17, 45000);
        x = x + 4
        y = y + 4
        Unit:SpawnCreature(8888881, x, y, z, o, 17, 45000);       
        Unit:FullCastSpell(46907)
        Unit:RegisterEvent("abigbad_Phase1",1000, 0)
    end
    
    
    function abigbadie_Death(Unit)
        RemoveEvents()
    end
    RegisterUnitEvent(5552221, 1, "abigbadie_OnCombat")
    RegisterUnitEvent(5552221, 4, "abigbadie_Death")

  6. #36
    Diemen's Avatar Member
    Reputation
    1
    Join Date
    Nov 2006
    Posts
    41
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Edited my script but it does not go further than the second Phase .....

Page 3 of 3 FirstFirst 123

Similar Threads

  1. LUA script problem, teleporter.
    By Romis in forum WoW EMU Questions & Requests
    Replies: 4
    Last Post: 12-02-2008, 04:32 PM
  2. LUA script problem
    By uberhak3r in forum World of Warcraft Emulator Servers
    Replies: 4
    Last Post: 07-09-2008, 06:32 PM
  3. [Help] Fairly large Lua script problem
    By Muruk in forum World of Warcraft Emulator Servers
    Replies: 10
    Last Post: 03-16-2008, 09:03 PM
  4. LUA Scripting Problem
    By Knife in forum World of Warcraft Emulator Servers
    Replies: 18
    Last Post: 03-10-2008, 02:00 PM
  5. Lua scripts problem
    By Mr.Ice.Cold in forum World of Warcraft Emulator Servers
    Replies: 12
    Last Post: 02-02-2008, 11:44 AM
All times are GMT -5. The time now is 02:23 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