[Release] Lua scripts, The ultimative thread v3 menu

Shout-Out

User Tag List

Page 1 of 3 123 LastLast
Results 1 to 15 of 36
  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 v3

    V1/V2
    http://www.mmowned.com/forums/emulat...thread-v1.html

    http://www.mmowned.com/forums/emulat...thread-v2.html




    Q: Why the heck did you make one more of these?!!
    A: Becouse i keep exeeding the maxlimit on characters!

    Q: Will there be more of these threads?
    A: No I will keep updating this one tho

    Since i want to avoid making a v4 ill just put up some scripts, not all of them.. But there is a zillion scripts in the dl link.

    To DOWNLOAD this file go here:
    Filebeam - Free Fast File Hosting

    THE MEGA LUA PACK IS READY FOR DOWNLOAD! scroll down.. Its at the comments



    Okay guys.. You know the deal


    Here is some scripts made by TheBetrayer..


    Code:
    function war_1(pUnit, Event)
     if pUnit:GetHealthPct() < 70 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "I shall not perish!")
      pUnit:FullCastSpell(14204)
      pUnit:RegisterEvent("war_2",1000, 0)
     end
    end
     
    function war_2(pUnit, Event)
     if pUnit:GetHealthPct() < 50 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Face my wrath!!")
      pUnit:FullCastSpell(12292)
      pUnit:RegisterEvent("war_3",1000, 0)
     end
    end
     
    function war_3(pUnit, Event)
     if pUnit:GetHealthPct() < 30 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Argh!!")
      pUnit:FullCastSpell(12331)
      pUnit:RegisterEvent("war_4",1000, 0)
     end
    end
    
    function war_4(pUnit, Event)
     if pUnit:GetHealthPct() < 10 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "This is my last chance..")
      pUnit:FullCastSpell(12976)
     end
    end
     
    function war_start(pUnit, Event)
     pUnit:RegisterEvent("war_1",1000, 0)
     pUnit:SendChatMessage (11, 0, ", you will not pass!")
    end
    RegisterUnitEvent(<Spawn ID here>, 1, "war_start")
    Code:
    function YAY_1(pUnit, Event)
     if pUnit:GetHealthPct() < 70 then
      pUnit:RemoveEvents();
      pUnit:FullCastSpell(30926)
      pUnit:RegisterEvent("YAY_2",1000, 0)
     end
    end
     
    function YAY_2(pUnit, Event)
     if pUnit:GetHealthPct() < 50 then
      pUnit:RemoveEvents();
      pUnit:FullCastSpell(21858)
      pUnit:RegisterEvent("YAY_3",1000, 0)
     end
    end
     
    function YAY_3(pUnit, Event)
     if pUnit:GetHealthPct() < 30 then
      pUnit:RemoveEvents();
      pUnit:FullCastSpell(25550)
      pUnit:RegisterEvent("YAY_4",1000, 0)
     end
    end
    
    function YAY_4(pUnit, Event)
     if pUnit:GetHealthPct() < 10 then
      pUnit:RemoveEvents();
      pUnit:FullCastSpell(43218)
     end
    end
     
    function YAY_start(pUnit, Event)
     pUnit:RegisterEvent("YAY_1",1000, 0)
    end
    RegisterUnitEvent(<Spawn ID here>, 1, "YAY_start")
    Code:
    function bansh_1(pUnit, Event)
     if pUnit:GetHealthPct() < 70 then
      pUnit:RemoveEvents();
      pUnit:FullCastSpell(38840)
      pUnit:SendChatMessage (11, 0, "DIE!!!")
      pUnit:RegisterEvent("bansh_2",1000, 0)
     end
    end
     
    function bansh_2(pUnit, Event)
     if pUnit:GetHealthPct() < 50 then
      pUnit:RemoveEvents();
      pUnit:FullCastSpell(36127)
      pUnit:SendChatMessage (11, 0, "Die !")
      pUnit:RegisterEvent("bansh_3",1000, 0)
     end
    end
     
    function bansh_3(pUnit, Event)
     if pUnit:GetHealthPct() < 30 then
      pUnit:RemoveEvents();
      pUnit:FullCastSpell(39666)
      pUnit:SendChatMessage (11, 0, "Nothing may harm me!")  
      pUnit:RegisterEvent("bansh_4",1000, 0)
     end
    end
    
    function bansh_4(pUnit, Event)
     if pUnit:GetHealthPct() < 10 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "I will not die!")  
      pUnit:FullCastSpell(17683)
      pUnit:RegisterEvent("bansh_5",1000, 0)
     end
    end
    
    function bansh_5(pUnit, Event)
     if pUnit:GetHealthPct() < 75 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "This will be your grave!")  
      pUnit:FullCastSpell(36127)
      pUnit:RegisterEvent("bansh_6",1000, 0)
     end
    end
    
    function bansh_6(pUnit, Event)
     if pUnit:GetHealthPct() < 50 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Die! All of you!")  
      pUnit:FullCastSpell(38840)
      pUnit:RegisterEvent("bansh_7",1000, 0)
     end
    end
    
    function bansh_7(pUnit, Event)
     if pUnit:GetHealthPct() < 10 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "No!!")  
      pUnit:FullCastSpell(17928)
     end
    end
     
    function bansh_start(pUnit, Event)
     pUnit:RegisterEvent("bansh_1",1000, 0)
     pUnit:SendChatMessage (11, 0, ", you will die here!")
    end
    RegisterUnitEvent(<Spawn ID here>, 1, "bansh_start")
    Time for some of my own scripts

    Code:
    function willieh_Phase1(pUnit, Event)
    if pUnit:GetHealthPct() < 80 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(36205, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(17470, pUnit:GetMainTank())
    pUnit:RegisterEvent("willieh_Phase2",1000, 0)
    end
    end
    
    
    function willieh_Phase2(pUnit, event)
    if pUnit:GetHealthPct() < 78 then
    pUnit:FullCastSpellOnTarget(17470, pUnit:GetMainTank())
    pUnit:RegisterEvent("willieh_Phase3",10000, 0)
    end
    end
    
    
    function willieh_Phase3(pUnit, Event)
    if pUnit:GetHealthPct() < 76 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(36205, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(17470, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(17470, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(17470, pUnit:GetMainTank())
    pUnit:RegisterEvent("willieh_Phase4",1000, 0)
    end
    end
    
    function willieh_Phase4(pUnit, Event)
    if pUnit:GetHealthPct() < 74 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(35055, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(41193, pUnit:GetMainTank())
    pUnit:RegisterEvent("willieh_Phase5",1000, 0)
    end
    end
    
    function willieh_Phase5(pUnit, Event)
    if pUnit:GetHealthPct() < 72 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(6907, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(41193, pUnit:GetMainTank())
    pUnit:RegisterEvent("willieh_Phase6",1000, 0)
    end
    end
    
    function willieh_Phase6(pUnit, Event)
    if pUnit:GetHealthPct() < 68 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(36205, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(41193, pUnit:GetMainTank())
    pUnit:RegisterEvent("willieh_Phase7",1000, 0)
    end
    end
    
    function willieh_Phase7(pUnit, Event)
    if pUnit:GetHealthPct() < 63 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(36205, pUnit:GetMainTank())
    pUnit:RegisterEvent("willieh_Phase8",1000, 0)
    end
    end
    
    function willieh_Phase8(pUnit, Event)
    if pUnit:GetHealthPct() < 59 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(36205, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(35055, pUnit:GetMainTank())
    pUnit:RegisterEvent("willieh_Phase9",1000, 0)
    end
    end
    
    function willieh_Phase9(pUnit, Event)
    if pUnit:GetHealthPct() < 55 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(6907, pUnit:GetMainTank())
    pUnit:RegisterEvent("willieh_Phase10",1000, 0)
    end
    end
    
    
    function willieh_Phase10(pUnit, Event)
    if pUnit:GetHealthPct() < 50 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(36205, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(41193, pUnit:GetMainTank())
    pUnit:RegisterEvent("willieh_Phase11",1000, 0)
    end
    end
    
    function willieh_Phase11(pUnit, Event)
    if pUnit:GetHealthPct() < 45 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(6907, pUnit:GetMainTank())
    pUnit:RegisterEvent("willieh_Phase12",1000, 0)
    end
    end
    
    function willieh_Phase12(pUnit, Event)
    if pUnit:GetHealthPct() < 40 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(36205, pUnit:GetMainTank())
    pUnit:RegisterEvent("willieh_Phase13",1000, 0)
    end
    end
    
    function willieh_Phase13(pUnit, Event)
    if pUnit:GetHealthPct() < 35 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(17470, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(17470, pUnit:GetMainTank())
    pUnit:RegisterEvent("willieh_Phase14",1000, 0)
    end
    end
    
    
    function willieh_Phase14(pUnit, Event)
    if pUnit:GetHealthPct() < 20 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(41193, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(41193, pUnit:GetMainTank())
    pUnit:RegisterEvent("willieh_start",1000, 0)
    end
    end
    
    function willieh_start(pUnit, Event)
    pUnit:RegisterEvent("willieh_Phase1",1000, 0)
    end
    RegisterUnitEvent(1000015, 1, "willieh_start")
    Code:
    function anub_phase1(pUnit, Event)
    if pUnit:GetHealthPct() < 80 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(28785, pUnit:GetMainTank())
    pUnit:RegisterEvent("anub_phase2",1000, 0)
    end
    end
    
    function anub_phase2(pUnit, Event)
    if pUnit:GetHealthPct() < 65 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(28785, pUnit:GetMainTank())
    pUnit:RegisterEvent("anub_phase3",1000, 0)
    end
    end
    
    function anub_phase3(pUnit, Event)
    if pUnit:GetHealthPct() < 50 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(28786, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(28786, pUnit:GetMainTank())
    pUnit:RegisterEvent("anub_phase4",1000, 0)
    end
    end
    
    
    function anub_phase4(pUnit, Event)
    if pUnit:GetHealthPct() < 40 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(40355, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(39120, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(39120, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(39120, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(39120, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(39120, pUnit:GetMainTank())
    pUnit:RegisterEvent("anub_phase5",1000, 0)
    end
    end
    
    function anub_phase5(pUnit, Event)
    if pUnit:GetHealthPct() < 30 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(20698, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(20698, pUnit:GetMainTank())
    pUnit:FullCastSpellOnTarget(20698, pUnit:GetMainTank())
    pUnit:RegisterEvent("anub_phase6",1000, 0)
    end
    end
    
    function anub_phase6(pUnit, Event)
    if pUnit:GetHealthPct() < 20 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(28785, pUnit:GetMainTank())
    pUnit:FullCastSpell(20702)
    pUnit:RegisterEvent("anub_phase7",1000, 0)
    end
    end
    
    function anub_phase7(pUnit, Event)
    if pUnit:GetHealthPct() < 10 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(20702)
    pUnit:FullCastSpell(20702)
    pUnit:FullCastSpell(20702)
    pUnit:RegisterEvent("anub_start",1000, 0)
    end
    end
    
    function anub_start(pUnit, Event)
    pUnit:RegisterEvent("anub_phase1",1000, 0)
    end
    RegisterUnitEvent(15956, 1, "anub_start")
    Code:
    function bos_phase1(pUnit, Event)
    if pUnit:GetHealthPct() < 80 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(34236)
    pUnit:RegisterEvent("bos_phase2",1000, 0)
    end
    end
    
    function bos_phase2(pUnit, Event)
    if pUnit:GetHealthPct() < 65 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(29487, pUnit:GetMainTank())
    pUnit:RegisterEvent("bos_phase3",1000, 0)
    end
    end
    
    function bos_phase3(pUnit, Event)
    if pUnit:GetHealthPct() < 50 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(34236)
    pUnit:FullCastSpell(34236)
    pUnit:RegisterEvent("bos_phase4",1000, 0)
    end
    end
    
    
    function bos_phase4(pUnit, Event)
    if pUnit:GetHealthPct() < 40 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(29487, pUnit:GetMainTank())
    pUnit:RegisterEvent("bos_phase5",1000, 0)
    end
    end
    
    function bos_phase5(pUnit, Event)
    if pUnit:GetHealthPct() < 30 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(34236)
    pUnit:FullCastSpell(34236)
    pUnit:FullCastSpell(34236)
    pUnit:RegisterEvent("bos_phase6",1000, 0)
    end
    end
    
    function bos_phase6(pUnit, Event)
    if pUnit:GetHealthPct() < 20 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(29487, pUnit:GetMainTank())
    pUnit:RegisterEvent("bos_phase7",1000, 0)
    end
    end
    
    function bos_phase7(pUnit, Event)
    if pUnit:GetHealthPct() < 10 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(34236)
    pUnit:FullCastSpell(34236)
    pUnit:FullCastSpell(34236)
    pUnit:FullCastSpell(34236)
    pUnit:FullCastSpell(34236)
    pUnit:RegisterEvent("bos_start",1000, 0)
    end
    end
    
    function bos_start(pUnit, Event)
    pUnit:RegisterEvent("bos_phase1",1000, 0)
    end
    RegisterUnitEvent(15953, 1, "bos_start")
    Code:
    function farm_phase1(pUnit, Event)
    if pUnit:GetHealthPct() < 90 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(35326, pUnit:GetMainTank())
    pUnit:RegisterEvent("farm_phase2",1000, 0)
    end
    end
    
    function farm_phase2(pUnit, Event)
    if pUnit:GetHealthPct() < 80 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(41395, pUnit:GetMainTank())
    pUnit:RegisterEvent("farm_phase3",1000, 0)
    end
    end
    
    function farm_phase3(pUnit, Event)
    if pUnit:GetHealthPct() < 70 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(35326, pUnit:GetMainTank())
    pUnit:RegisterEvent("farm_phase4",1000, 0)
    end
    end
    
    function farm_phase4(pUnit, Event)
    if pUnit:GetHealthPct() < 60 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(41395, pUnit:GetMainTank())
    pUnit:RegisterEvent("farm_phase5",1000, 0)
    end
    end
    
    function farm_phase5(pUnit, Event)
    if pUnit:GetHealthPct() < 50 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(35326, pUnit:GetMainTank())
    pUnit:RegisterEvent("farm_phase6",1000, 0)
    end
    end
    
    function farm_phase6(pUnit, Event)
    if pUnit:GetHealthPct() < 40 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(41395, pUnit:GetMainTank())
    pUnit:RegisterEvent("farm_phase7",1000, 0)
    end
    end
    
    function farm_phase7(pUnit, Event)
    if pUnit:GetHealthPct() < 30 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(35326, pUnit:GetMainTank())
    pUnit:RegisterEvent("farm_phase8",1000, 0)
    end
    end
    
    function farm_phase8(pUnit, Event)
    if pUnit:GetHealthPct() < 20 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(41395, pUnit:GetMainTank())
    pUnit:RegisterEvent("farm_phase9",1000, 0)
    end
    end
    
    function farm_phase9(pUnit, Event)
    if pUnit:GetHealthPct() < 10 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpellOnTarget(35326, pUnit:GetMainTank())
    pUnit:RegisterEvent("farm_start",1000, 0)
    end
    end
    
    
    function farm_start(pUnit, Event)
    pUnit:RegisterEvent("farm_phase1",1000, 0)
    end
    RegisterUnitEvent(1037512, 1, "farm_start")
    Code:
    function boz_phase1(pUnit, Event)
    if pUnit:GetHealthPct() < 90 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(28467)
    pUnit:FullCastSpell(37759)
    pUnit:RegisterEvent("boz_phase2",1000, 0)
    end
    end
    
    function boz_phase2(pUnit, Event)
    if pUnit:GetHealthPct() < 85 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(28374)
    pUnit:RegisterEvent("boz_phase3",1000, 0)
    end
    end
    
    
    function boz_phase3(pUnit, Event)
    if pUnit:GetHealthPct() < 80 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(28467)
    pUnit:FullCastSpell(37759)
    pUnit:RegisterEvent("boz_phase4",1000, 0)
    end
    end
    
    function boz_phase4(pUnit, Event)
    if pUnit:GetHealthPct() < 75 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(28374)
    pUnit:RegisterEvent("boz_phase44",1000, 0)
    end
    end
    
    
    function boz_phase44(pUnit, Event)
    if pUnit:GetHealthPct() < 70 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(30641)
    pUnit:FullCastSpell(29685)
    pUnit:FullCastSpell(37759)
    pUnit:RegisterEvent("boz_phase55",1000, 0)
    end
    end
    
    
    function boz_phase55(pUnit, Event)
    if pUnit:GetHealthPct() < 68 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(28374)
    pUnit:RegisterEvent("boz_phase56",1000, 0)
    end
    end
    
    function boz_phase56(pUnit, Event)
    if pUnit:GetHealthPct() < 65 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(30641)
    pUnit:FullCastSpell(29685)
    pUnit:FullCastSpell(37759)
    pUnit:RegisterEvent("boz_phase66",1000, 0)
    end
    end
    
    function boz_phase66(pUnit, Event)
    if pUnit:GetHealthPct() < 62 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(28374)
    pUnit:RegisterEvent("boz_phase100",1000, 0)
    end
    end
    
    function boz_phase100(pUnit, Event)
    if pUnit:GetHealthPct() < 55 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(28374)
    pUnit:RegisterEvent("boz_phase67",1000, 0)
    end
    end
    
    function boz_phase67(pUnit, Event)
    if pUnit:GetHealthPct() < 50 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(30641)
    pUnit:FullCastSpell(29685)
    pUnit:FullCastSpell(37759)
    pUnit:FullCastSpell(38664)
    pUnit:RegisterEvent("boz_phase68",1000, 0)
    end
    end
    
    function boz_phase68(pUnit, Event)
    if pUnit:GetHealthPct() < 47 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(28374)
    pUnit:RegisterEvent("boz_phase69",1000, 0)
    end
    end
    
    function boz_phase69(pUnit, Event)
    if pUnit:GetHealthPct() < 45 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(30641)
    pUnit:FullCastSpell(29685)
    pUnit:FullCastSpell(37759)
    pUnit:FullCastSpell(38664)
    pUnit:FullCastSpell(29691)
    pUnit:RegisterEvent("boz_phase101",1000, 0)
    end
    end
    
    function boz_phase101(pUnit, Event)
    if pUnit:GetHealthPct() < 40 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(28374)
    pUnit:RegisterEvent("boz_phase102",1000, 0)
    end
    end
    
    
    function boz_phase102(pUnit, Event)
    if pUnit:GetHealthPct() < 35 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(30641)
    pUnit:FullCastSpell(29685)
    pUnit:FullCastSpell(37759)
    pUnit:FullCastSpell(38664)
    pUnit:FullCastSpell(29691)
    pUnit:FullCastSpell(28467)
    pUnit:RegisterEvent("boz_phase103",1000, 0)
    end
    end
    
    function boz_phase103(pUnit, Event)
    if pUnit:GetHealthPct() < 33 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(28374)
    pUnit:RegisterEvent("boz_phase104",1000, 0)
    end
    end
    
    function boz_phase104(pUnit, Event)
    if pUnit:GetHealthPct() < 28 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(30641)
    pUnit:FullCastSpell(29685)
    pUnit:FullCastSpell(37759)
    pUnit:FullCastSpell(38664)
    pUnit:FullCastSpell(29691)
    pUnit:FullCastSpell(28467)
    pUnit:FullCastSpell(37759)
    pUnit:RegisterEvent("boz_phase105",1000, 0)
    end
    end
    
    function boz_phase105(pUnit, Event)
    if pUnit:GetHealthPct() < 26 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(28374)
    pUnit:RegisterEvent("boz_phase106",1000, 0)
    end
    end
    
    function boz_phase106(pUnit, Event)
    if pUnit:GetHealthPct() < 21 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(30641)
    pUnit:FullCastSpell(29685)
    pUnit:FullCastSpell(37759)
    pUnit:FullCastSpell(38664)
    pUnit:FullCastSpell(29691)
    pUnit:FullCastSpell(28467)
    pUnit:FullCastSpell(37759)
    pUnit:FullCastSpell(28467)
    pUnit:RegisterEvent("boz_phase107",1000, 0)
    end
    end
    
    function boz_phase107(pUnit, Event)
    if pUnit:GetHealthPct() < 19 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(28374)
    pUnit:RegisterEvent("boz_phase1067",1000, 0)
    end
    end
    
    function boz_phase1067(pUnit, Event)
    if pUnit:GetHealthPct() < 14 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(30641)
    pUnit:FullCastSpell(29685)
    pUnit:FullCastSpell(37759)
    pUnit:FullCastSpell(38664)
    pUnit:FullCastSpell(29691)
    pUnit:FullCastSpell(28467)
    pUnit:FullCastSpell(37759)
    pUnit:FullCastSpell(28467)
    pUnit:FullCastSpell(37759)
    pUnit:FullCastSpell(37759)
    pUnit:RegisterEvent("boz_phase1077",1000, 0)
    end
    end
    
    function boz_phase1077(pUnit, Event)
    if pUnit:GetHealthPct() < 10 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(28374)
    pUnit:RegisterEvent("boz_phase1088",1000, 0)
    end
    end
    
    function boz_phase1088(pUnit, Event)
    if pUnit:GetHealthPct() < 5 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(30641)
    pUnit:FullCastSpell(29685)
    pUnit:FullCastSpell(37759)
    pUnit:FullCastSpell(38664)
    pUnit:FullCastSpell(29691)
    pUnit:FullCastSpell(28467)
    pUnit:FullCastSpell(37759)
    pUnit:FullCastSpell(28467)
    pUnit:FullCastSpell(37759)
    pUnit:FullCastSpell(37759)
    pUnit:RegisterEvent("boz_phase1099",1000, 0)
    end
    end
    
    function boz_phase1099(pUnit, Event)
    if pUnit:GetHealthPct() < 1 then
    pUnit:RemoveEvents();
    pUnit:FullCastSpell(28374)
    pUnit:RegisterEvent("boz_start",1000, 0)
    end
    end
    
    function boz_start(pUnit, Event)
    pUnit:RegisterEvent("boz_phase1",1000, 0)
    end
    RegisterUnitEvent(4636256, 1, "boz_start")
    Some scripts made by illidan1


    Code:
    function phasse_1(pUnit, Event)
     if pUnit:GetHealthPct() < 90 then
      pUnit:RemoveEvents();
      pUnit:FullCastSpell(29204)
      pUnit:FullCastSpellOnTarget(96, pUnit:GetMainTank())
      pUnit:RegisterEvent("phasse_11",1000, 0)
     end
    end
    
    function phasse_11(pUnit, Event)
     if pUnit:GetHealthPct() < 90 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Insert Imba Chat Message Here")
      pUnit:FullCastSpell(29204)
      pUnit:FullCastSpellOnTarget(96, pUnit:GetMainTank())
      pUnit:RegisterEvent("phasse_22",1000, 0)
     end
    end
     
    function phasse_22(pUnit, Event)
     if pUnit:GetHealthPct() < 80 then
      pUnit:FullCastSpellOnTarget(96, pUnit:GetMainTank())
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Roar!")
      pUnit:SetScale(2.11);
      pUnit:RegisterEvent("phasse_33",1000, 0)
     end
    end
     
    function phasse_33(pUnit, Event)
     if pUnit:GetHealthPct() < 70 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Insert Imba Chat Message Here")
      pUnit:FullCastSpell(18307)
      pUnit:FullCastSpellOnTarget(96, pUnit:GetMainTank())
      pUnit:RegisterEvent("phasse_66",3000, 0)
     end
    end
    
    function phasse_66(pUnit, Event)
     if pUnit:GetHealthPct() < 60 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Insert Imba Chat Message Here")
      pUnit:FullCastSpell(29204)
      pUnit:FullCastSpellOnTarget(96, pUnit:GetMainTank())
      pUnit:RegisterEvent("phasse_77",1000, 0)
     end
    end
    
    function phasse_77(pUnit, Event)
     if pUnit:GetHealthPct() < 50 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Insert Imba Chat Message Here")
      pUnit:FullCastSpell(1020)
      pUnit:FullCastSpellOnTarget(96, pUnit:GetMainTank())
      pUnit:FullCastSpellOnTarget(96, pUnit:GetMainTank())
      pUnit:RegisterEvent("phasse_88",2000, 0)
     end
    end
    
    function phasse_88(pUnit, Event)
     if pUnit:GetHealthPct() < 50 then
      pUnit:RemoveEvents();
      pUnit:FullCastSpell(27136)
      pUnit:FullCastSpellOnTarget(96, pUnit:GetMainTank())
      pUnit:RegisterEvent("phasse_99",5000, 0)
     end
    end
    
    function phasse_99(pUnit, Event)
     if pUnit:GetHealthPct() < 49 then
      pUnit:RemoveEvents();
      pUnit:FullCastSpell(27136)
      pUnit:FullCastSpellOnTarget(96, pUnit:GetMainTank())
      pUnit:RegisterEvent("phasse_100",5000, 0)
     end
    end
    
    function phasse_100(pUnit, Event)
     if pUnit:GetHealthPct() < 48 then
      pUnit:RemoveEvents();
      pUnit:FullCastSpell(27136)
      pUnit:FullCastSpellOnTarget(96, pUnit:GetMainTank())
      pUnit:RegisterEvent("phasse_101",5000, 0)
     end
    end
    
    function phasse_101(pUnit, Event)
     if pUnit:GetHealthPct() < 40 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Insert Imba Chat Message Here")
      pUnit:FullCastSpell(41274)
      pUnit:FullCastSpellOnTarget(96, pUnit:GetMainTank())
      pUnit:RegisterEvent("phasse_102",1000, 0)
     end
    end
    
    function phasse_102(pUnit, Event)
     if pUnit:GetHealthPct() < 39 then
      pUnit:RemoveEvents();
      pUnit:FullCastSpell(41274)
      pUnit:FullCastSpellOnTarget(96, pUnit:GetMainTank())
      pUnit:RegisterEvent("phasse_103",1000, 0)
     end
    end
     
    function phasse_103(pUnit, Event)
     if pUnit:GetHealthPct() < 38 then
      pUnit:RemoveEvents();
      pUnit:FullCastSpell(41274)
      pUnit:FullCastSpellOnTarget(96, pUnit:GetMainTank())
      pUnit:RegisterEvent("phasse_104",1000, 0)
     end
    end
     
    function phasse_104(pUnit, Event)
     if pUnit:GetHealthPct() < 30 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Insert Imba Chat Message Here")
      pUnit:FullCastSpell(18307)
      pUnit:FullCastSpellOnTarget(96, pUnit:GetMainTank())
      pUnit:RegisterEvent("phasse_108",3000, 0)
     end
    end
    
    function phasse_108(pUnit, Event)
     if pUnit:GetHealthPct() < 20 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Insert Imba Chat Message Here")
      pUnit:FullCastSpell(29204)
      pUnit:FullCastSpellOnTarget(96, pUnit:GetMainTank())
      pUnit:RegisterEvent("phasse_109",1000, 0)
     end
    end
    
    function phasse_109(pUnit, Event)
     if pUnit:GetHealthPct() < 10 then
      pUnit:RemoveEvents();
      
     end
    end
    
    function Bosss_start(pUnit, Event)
     pUnit:RegisterEvent("phasse_11",1000, 0)
     pUnit:SendChatMessage (11, 0, "Insert Imba Chat Message Here")
    end
    RegisterUnitEvent(3424234, 1, "Bosss_start")
    Code:
    function phhaase_11(pUnit, Event)
     if pUnit:GetHealthPct() < 99 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Mark me brutal wild!")
      pUnit:FullCastSpell(26990)
      pUnit:RegisterEvent("phhaase_22",1000, 0)
     end
    end
     
    function phhaase_22(pUnit, Event)
     if pUnit:GetHealthPct() < 70 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "The wrath of nature!")
      pUnit:FullCastSpell(26979)
      pUnit:RegisterEvent("phhaase_33",1000, 0)
     end
    end
     
    function phhaase_33(pUnit, Event)
     if pUnit:GetHealthPct() < 50 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Natures Tranquility")
      pUnit:FullCastSpell(26983)
      pUnit:RegisterEvent("phhaase_44",1000, 0)
     end
    end
     
    function phhaase_44(pUnit, Event)
     if pUnit:GetHealthPct() < 30 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Nature, i force you!")
      pUnit:SpawnCreature(400008, 196.844788, 18.691355, 30.839066, 1.552042, 67, 220000);
      pUnit:SpawnCreature(400008, 188.469711, 25.988760, 30.839060, 6.236941, 67, 220000);
      pUnit:SpawnCreature(400008, 197.002594, 34.448643, 30.839046, 4.697562, 67, 220000);
      pUnit:SpawnCreature(400008, 205.186874, 26.095493, 30.839050, 3.118916, 67, 220000);
      pUnit:RegisterEvent("phhaase_55",1000, 0)
     end
    end
    
    function phhaase_55(pUnit, Event)
     if pUnit:GetHealthPct() < 10 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Earth! i command you!")
      pUnit:FullCastSpell(33919)
      pUnit:RegisterEvent("phhaase_66",1000, 0)
     end
    end
      
    function phhaase_66(pUnit, Event)
     if pUnit:GetHealthPct() < 7 then
      pUnit:RemoveEvents();
      pUnit:FullCastSpell(33919)
      pUnit:RegisterEvent("phhaase_77",1000, 0)
     end
    end
    function phhaase_77(pUnit, Event)
     if pUnit:GetHealthPct() < 5 then
      pUnit:RemoveEvents();
      pUnit:FullCastSpell(33919)
     end
    end
    
    function Bbooss_start(pUnit, Event)
     pUnit:RegisterEvent("phhaase_11",1000, 0)
     pUnit:SendChatMessage (11, 0, "Nature Is mine to Command!")
     pUnit:FullCastSpell(42050)
    end
    RegisterUnitEvent(400007, 1, "Bbooss_start")
    Code:
    function phase_11(pUnit, Event)
     if pUnit:GetHealthPct() < 70 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "I will cut you up!")
      pUnit:FullCastSpell(8989)
      pUnit:RegisterEvent("phase_22",1000, 0)
     end
    end
     
    function phase_22(pUnit, Event)
     if pUnit:GetHealthPct() < 50 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "My axe will saw you!")
      pUnit:FullCastSpell(8989)
      pUnit:RegisterEvent("phase_33",1000, 0)
     end
    end
     
    function phase_33(pUnit, Event)
     if pUnit:GetHealthPct() < 30 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Holy Power!")
      pUnit:FullCastSpell(27136)
      pUnit:RegisterEvent("phase_44",1000, 0)
     end
    end
    
    function phase_44(pUnit, Event)
     if pUnit:GetHealthPct() < 10 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "This is the Last Stand")
      pUnit:FullCastSpell(14204)
     end
    end
     
    function Champ_start(pUnit, Event)
     pUnit:RegisterEvent("phase_11",1000, 0)
     pUnit:SendChatMessage (11, 0, ", you will die!")
    end
    RegisterUnitEvent(400001, 1, "Champ_start")
    Code:
    function phasee_1(pUnit, Event)
     if pUnit:GetHealthPct() < 70 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Do not move!")
      pUnit:FullCastSpell(17398)
      pUnit:RegisterEvent("phasee_2",1000, 0)
     end
    end
     
    function phasee_2(pUnit, Event)
     if pUnit:GetHealthPct() < 50 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "My Agility is inpowering")
      pUnit:FullCastSpell(17538)
      pUnit:RegisterEvent("phasee_3",1000, 0)
     end
    end
     
    function phasee_3(pUnit, Event)
     if pUnit:GetHealthPct() < 30 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "Can you see?!")
      pUnit:FullCastSpell(43433)
      pUnit:RegisterEvent("phasee_4",1000, 0)
     end
    end
    
    function phasee_4(pUnit, Event)
     if pUnit:GetHealthPct() < 10 then
      pUnit:RemoveEvents();
      pUnit:SendChatMessage (11, 0, "This is your End ")
      pUnit:FullCastSpell(26889)
     end
    end
     
    function Rogue_start(pUnit, Event)
     pUnit:RegisterEvent("phasee_1",1000, 0)
     pUnit:FullCastSpell(10032)
    end
    RegisterUnitEvent(400002, 6, "Rogue_start")

    Here is a warpnpc. It would need a part/dll file to work. But its just here incase someone is gonna try it out - Creator - Unknown

    Code:
    function warp_on_gossip_talk(unit, event, player)
    unit:CreateGossipMenuForPlayer(3543, player)
    unit:MenuAddItem(player, 0, "Horde cities", 1, 0)
    unit:MenuAddItem(player, 0, "Alliance cities", 2, 0)
    unit:MenuAddItem(player, 0, "Azeroth Instances", 5, 0)
    unit:MenuAddItem(player, 0, "Outland Instances", 6, 0)
    unit:MenuAddItem(player, 5, "Shattrath", 51, 0)
    unit:MenuSendToPlayer(player)
    end
    function warp_on_gossip_select(unit, event, player, id, intid, code)
    if(intid == 1) then
    unit:CreateGossipMenuForPlayer(3542, player)
    unit:MenuAddItem(player, 5, "Orgrimmar", 9, 0)
    unit:MenuAddItem(player, 5, "Undercity", 10, 0)
    unit:MenuAddItem(player, 5, "Thunder Bluff", 11, 0)
    unit:MenuAddItem(player, 5, "Silvermoon", 12, 0)
    unit:MenuAddItem(player, 5, "[Back]", 100, 0)unit:MenuSendToPlayer(player)
    end
    if(intid == 2) then
    unit:CreateGossipMenuForPlayer(3542, player)
    unit:MenuAddItem(player, 5, "Stormwind", 14, 0)
    unit:MenuAddItem(player, 5, "Ironforge", 15, 0)
    unit:MenuAddItem(player, 5, "Darnassus", 16, 0)
    unit:MenuAddItem(player, 5, "Exodar", 17, 0)
    unit:MenuAddItem(player, 5, "[Back]", 100, 0)
    unit:MenuSendToPlayer(player)
    end
    if(intid == 5) then
    unit:CreateGossipMenuForPlayer(3542, player)
    unit:MenuAddItem(player, 0, "Azeroth Raids", 3, 0)
    unit:MenuAddItem(player, 5, "Shadowfang Keep", 19, 0)
    unit:MenuAddItem(player, 5, "Scarlet Monastery", 20, 0)
    unit:MenuAddItem(player, 5, "Zul'Farrak", 21, 0)
    unit:MenuAddItem(player, 5, "Stratholme", 22, 0)
    unit:MenuAddItem(player, 5, "Scholomance", 23, 0)
    unit:MenuAddItem(player, 5, "Ragefire", 110, 0)
    unit:MenuAddItem(player, 5, "Deathmines", 170, 0)
    unit:MenuAddItem(player, 5, "Those caverns in barrens xX", 111,0)
    unit:MenuAddItem(player, 5, "Blackfathom deepths", 112, 0)
    unit:MenuAddItem(player, 5, "This instance in Stormwind ", 113,0)
    unit:MenuAddItem(player, 5, "Gnomeregan", 114, 0)
    unit:MenuAddItem(player, 5, "Razorfen thing number 1", 115, 0)
    unit:MenuAddItem(player, 5, "Razorfen hills", 116, 0)
    unit:MenuAddItem(player, 5, "Uldaman", 117, 0)
    unit:MenuAddItem(player, 5, "Maraudon", 118, 0)
    unit:MenuAddItem(player, 5, "Sunken temple", 119, 0)
    unit:MenuAddItem(player, 5, "Lower Blackrock", 120, 0)
    unit:MenuAddItem(player, 5, "Dire Maul", 121, 0)
    unit:MenuAddItem(player, 5, "Upper Blackrock", 122, 0)
    unit:MenuAddItem(player, 5, "[Back]", 100, 0)
    unit:MenuSendToPlayer(player)
    end
    if(intid == 6) then
    unit:CreateGossipMenuForPlayer(3542, player)
    unit:MenuAddItem(player, 5, "Outland Raids", 4, 0)
    unit:MenuAddItem(player, 5, "Hellfire Ramparts", 25, 0)
    unit:MenuAddItem(player, 5, "Blood furnace", 26, 0)
    unit:MenuAddItem(player, 5, "Shattered Halls", 27, 0)
    unit:MenuAddItem(player, 5, "Underbog", 28, 0)
    unit:MenuAddItem(player, 5, "Slave pens", 29, 0)
    unit:MenuAddItem(player, 5, "Steam whatever ", 30, 0)
    unit:MenuAddItem(player, 5, "Mana tombs", 31, 0)
    unit:MenuAddItem(player, 5, "Auchenai crypts", 32, 0)
    unit:MenuAddItem(player, 5, "Sethekk halls", 33, 0)
    unit:MenuAddItem(player, 5, "Shadow lab", 34, 0)
    unit:MenuAddItem(player, 5, "Mechanar", 35, 0)
    unit:MenuAddItem(player, 5, "Bota whatever Oo", 36, 0)
    unit:MenuAddItem(player, 5, "Arcatraz", 37, 0)
    unit:MenuAddItem(player, 5, "Caverns of Time", 52, 0)
    unit:MenuAddItem(player, 5, "[Back]", 100, 0)
    unit:MenuSendToPlayer(player)
    end
    if(intid == 3) then
    unit:CreateGossipMenuForPlayer(3542, player)
    unit:MenuAddItem(player, 5, "Onyxias Lair", 39, 0)
    unit:MenuAddItem(player, 5, "Molten Core", 40, 0)
    unit:MenuAddItem(player, 5, "Blackwing Lair", 123, 0)
    unit:MenuAddItem(player, 5, "Zul'Gurub", 41, 0)
    unit:MenuAddItem(player, 5, "Karazhan", 42, 0)
    unit:MenuAddItem(player, 5, "Ruins of Ahn'Qiraj", 43, 0)
    unit:MenuAddItem(player, 5, "Temple of Ahn'Qiraj", 44, 0)
    unit:MenuAddItem(player, 5, "Naxxramas", 45, 0)
    unit:MenuAddItem(player, 5, "Zul'Aman", 124, 0)
    unit:MenuAddItem(player, 5, "Caverns of Time", 52, 0)
    unit:MenuAddItem(player, 5, "[Back]", 100, 0)
    unit:MenuSendToPlayer(player)
    end
    if(intid == 4) then
    unit:CreateGossipMenuForPlayer(3542, player)
    unit:MenuAddItem(player, 5, "Black Temple", 50, 0)
    unit:MenuAddItem(player, 5, "Tempest Keep", 49, 0)
    unit:MenuAddItem(player, 5, "Gruuls Lair", 48, 0)
    unit:MenuAddItem(player, 5, "Serpentshrine caverns", 47, 0)
    unit:MenuAddItem(player, 5, "Maghteridons Lair", 46, 0)
    unit:MenuAddItem(player, 5, "[Back]", 100, 0)
    unit:MenuSendToPlayer(player)
    end
    if(intid == 12) then
    player:Teleport(530, 9400.486328, -7278.376953, 14.206780)
    end
    if(intid == 9) then
    player:Teleport(1, 1371.068970, -4370.801758, 26.052483)
    end
    if(intid == 11) then
    player:Teleport(1, -1304.569946, 205.285004, 68.681396)
    end
    if(intid == 10) then
    player:Teleport(0, 2050.203125, 285.650604, 56.994549)
    end
    if(intid == 17) then
    player:Teleport(530, -4072.202393, -12014.337891, -1.277277)
    end
    if(intid == 14) then
    player:Teleport(0, -9100.480469, 406.950745, 92.594185)
    endif
    (intid == 15) then
    player:Teleport(0, -5028.265137, -825.976563, 495.301575)
    end
    if(intid == 16) then
    player:Teleport(1, 9985.907227, 1971.155640, 1326.815674)
    end
    if(intid == 51) then
    player:Teleport(530, -1887.510010, 5359.379883, -12.427300)
    end
    if(intid == 19) then
    player:Teleport(0, -234.495087, 1561.946411, 76.892143)
    end
    if(intid == 20) then
    player:Teleport(0, 2870.442627, -819.985229, 160.331085)
    end
    if(intid == 21) then
    player:Teleport(1, -6797.278809, -2903.917969, 9.953360)end
    if(intid == 41) then
    player:Teleport(0, -11919.073242, -1202.459374, 92.298744)end
    if(intid == 43) then
    player:Teleport(1, -8394.730469, 1485.658447, 21.038563)end
    if(intid == 44) then
    player:Teleport(1, -8247.316406, 1970.156860, 129.071472)
    end
    if(intid == 40) then
    player:Teleport(409, 1089.6, -470.19, -106.41)end
    if(intid == 39) thenplayer:Teleport(1, -4746, -3749, -4.0)
    end
    if(intid == 45) then
    player:Teleport(533, 3006.06, -3436.72, 293.891)
    end
    if(intid = 23) then
    player:Teleport(0, 1267.468628, -2556.651367, 94.127983)
    end
    if(intid == 24) then
    player:Teleport(0, 3359.111572, -3380.8444238, 144.781860)
    end
    if(intid == 38) then
    player:Teleport(0, -7527.129883, -1224.997437, 285.733002)
    end
    if(intid == 42) thenplayer:Teleport(532, -11087.3, -1977.47, 49.6135)
    end
    if(intid == 52) then
    player:Teleport(1, -8519.718750, -4297.542480, -208.441376)
    end
    if(intid == 25) then
    player:Teleport(530, -360.670990, 3071.899902, -15.097700)
    end
    if(intid == 26) then
    player:Teleport(530, -303.506012, 3164.820068, 31.742500)end
    if(intid == 27) then
    player:Teleport(530, -311.083527, 3083.291748, -3.745923)end
    if(intid == 28) then
    player:Teleport(530, 777.088989, 6763.450195, -72.062561)
    end
    if(intid == 29) then
    player:Teleport(530, 719.507996, 6999.339844, -73.074303)
    end
    if(intid == 30) then
    player:Teleport(530, 816.590027, 6934.669922, -80.544601)end
    if(intid == 31) then
    player:Teleport(530, -3079.810059, 4943.040039, -101.046997)
    end
    if(intid == 32) then
    player:Teleport(530, -3361.959961, 5225.770020, -101.047997)end
    if(intid == 33) then
    player:Teleport(530, -3362.219971, 4660.410156, -101.049004)end
    if(intid == 34) then
    player:Teleport(530, -3645.060059, 4943.620117, -101.047997)end
    if(intid == 35) then
    player:Teleport(530, 2862.409912, 1546.089966, 252.158691)
    end
    if(intid == 36) then
    player:Teleport(530, 3413.649902, 1483.319946, 182.837997)
    end
    if(intid == 37) then
    player:Teleport(530, 3311.598145, 1332.745117, 505.557251)
    end
    if(intid == 46) then
    player:Teleport(530, -313.678986, 3088.350098, -116.501999)
    end
    if(intid == 47) then
    player:Teleport(530, 830.542908, 6865.445801, -63.785503)
    end
    if(intid == 48) then
    player:Teleport(530, 3549.424072, 5179.854004, -4.430779)
    end
    if(intid == 49) then
    player:Teleport(530, 3087.310059, 1373.790039, 184.643005)
    end
    if(intid == 50) then
    player:Teleport(530, -3609.739990, 328.252014, 37.307701)
    end
    if(intid == 124) then
    player:Teleport(530, 6850, -7950, 170)
    end
    if(intid == 136) then
    player:Teleport(0, -13152.9, 342.729, 53.1328)
    end
    if(intid = 110) then
    player:Teleport(389, 1.7849, -14.3685, -16.5533)
    end
    if(intid == 111) then
    player:Teleport(1, -746.207, -2213.18, 15.8909)
    end
    if(intid == 112) then
    player:Teleport(48, -152.984, 106.33, -39.0953)
    end
    if(intid == 113) then
    player:Teleport(0, -8776.78, 836.753, 93.1946)end
    if(intid == 114) then
    player:Teleport(0, -5189.22, 524.796, 389.107)
    end
    if(intid == 115) then
    player:Teleport(1, -4464.92, -1666.24, 91)
    end
    if(intid == 116) then
    player:Teleport(129, 2591.99, 1101.25, 52.8593)
    end
    if(intid == 117) then
    player:Teleport(70, -228.193, 46.1602, -45.0186)
    end
    if(intid == 118) then
    player:Teleport(349, 419.84, 11.3365, -131.079)
    end
    if(intid == 119) then
    player:Teleport(0, -10349.1, -3849.67, -24.6078)
    end
    if(intid == 120) then
    player:Teleport(230, 596.432, -188.498, -49)
    end
    if(intid == 121) then
    player:Teleport(429, 254.588, -24.7395, -1.56062)
    end
    if(intid == 122) then
    player:Teleport(229, 73.5083, -215.044, 53.3869)
    end
    if(intid == 123) then
    player:Teleport(469, -7665.55, -1102.49, 400.679)
    end
    if(intid == 170) then
    player:Teleport(0, -11079.8, 1506.98, 42.9594)
    end
    intid = 0
    end
    RegisterGossipEvent(12345 , 1, "warp_on_gossip_talk") --change the NPC ID RegisterGossipEvent(12345 , 2, "warp_on_gossip_select") -- here too

    2 more scripts by me,

    Code:
    function Frostwyrm_Icebolt(Unit, event, miscunit, misc)
        print "Frostwyrm Icebolt"
        Unit:FullCastSpellOnTarget(28522,Unit:GetMainTank())
    end
    
    function Frostwyrm_Frostbreath(Unit, event, miscunit, misc)
        print "Frostwyrm Frostbreath"
        Unit:FullCastSpell(28524)
    end
    
    function Frostwyrm_Frostaura(Unit, event, miscunit, misc)
        print "Frostwyrm Frostaura"
        Unit:FullCastSpell(28531)
    end
    
    function Frostwyrm_Lifedrain(Unit, event, miscunit, misc)
        print "Frostwyrm Lifedrain"
        Unit:FullCastSpellOnTarget(28542,Unit:GetMainTank())
    end
    
    function Frostwyrm_Chill(Unit, event, miscunit, misc)
        print "Frostwyrm Chill"
        Unit:FullCastSpell(28547)
    end
    
    function Frostwyrm(unit, event, miscunit, misc)
        print "Frostwyrm"
        unit:RegisterEvent("Frostwyrm_Icebolt",60000,0)
        unit:RegisterEvent("Frostwyrm_Frostbreath",40000,0)
        unit:RegisterEvent("Frostwyrm_Frostaura",5000,0)
        unit:RegisterEvent("Frostwyrm_Lifedrain",13000,0)
        unit:RegisterEvent("Frostwyrm_Chill",28000,0)
    end
    
    RegisterUnitEvent(1508423,1,"Frostwyrm")
    Code:
    function Wind_Boulder(Unit, event, miscunit, misc)
        print "Wind Boulder"
        Unit:FullCastSpellOnTarget(26616,Unit:GetMainTank())
    end
    
    function Wind_Harshwinds(Unit, event, miscunit, misc)
        print "Wind Harshwinds"
        Unit:FullCastSpell(25161)
    end
    
    function Wind_Sweep(Unit, event, miscunit, misc)
        print "Wind Sweep"
        Unit:FullCastSpell(26103)
    end
    
    function Wind_Sandbag(Unit, event, miscunit, misc)
        print "Wind Sandbag"
        Unit:FullCastSpellOnTarget(29673,Unit:GetMainTank())
    end
    
    function Wind_Sandbreath(Unit, event, miscunit, misc)
        print "Wind Sandbreath"
        Unit:CastSpell(39049)
    end
    
    function Wind_Sandstorm(Unit, event, miscunit, misc)
        print "Wind Sandstorm"
        Unit:FullCastSpellOnTarget(10134,Unit:GetMainTank())
    end
    
    function Wind(unit, event, miscunit, misc)
        print "Wind"
        unit:RegisterEvent("Wind_Boulder",35000,0)
        unit:RegisterEvent("Wind_Harshwinds",16000,0)
        unit:RegisterEvent("Wind_Sweep",20000,0)
        unit:RegisterEvent("Wind_Sandbag",13000,0)
        unit:RegisterEvent("Wind_Sandbreath",13000,0)
        unit:RegisterEvent("Wind_Sandstorm",28000,0)
    end
    
    RegisterUnitEvent(1508421,1,"Wind")

    Some Molten Core bosses


    Code:
    --[[********************************
    *                                                            *
    * The LUA++ Scripting Project        *
    *                                                            *
    ********************************
    
    This software is provided as free and open source by the
    staff of The LUA++ Scripting Project, in accordance with 
    the AGPL license. This means we provide the software we have 
    created freely and it has been thoroughly tested to work for 
    the developers, but NO GUARANTEE is made it will work for you 
    as well. Please give credit where credit is due, if modifying,
    redistributing and/or using this software. Thank you.
    
    ~~End of License Agreement
    -- LUA++ staff, March 26, 2008. ]]
    RegisterUnitEvent(12118,1,"Lucifron_OnCombat")
    RegisterUnitEvent(12118,4,"Lucifron_OnDeath")
    RegisterUnitEvent(12118,2,"Lucifron_OnWipe")
    --[[
        LUCIFRON's AI
    ]]
    function Lucifron_OnCombat(Unit,event)
        Unit:RegisterEvent("LucifronSpells",math.random(18000,21000),0)
        Unit:RegisterEvent("ShadowShock", 7000, 0)
    end
    function Lucifron_OnDeath(Unit,event)
        Unit:RemoveEvents()
    end
    function Lucifron_OnWipe(Unit,event)
        Unit:RemoveEvents()
    end
    function LucifronSpells(Unit,event)
        if math.random(0,1) < 0.5 then
            Unit:CastSpell(19702)
        else
            Unit:CastSpell(19703)
        end
    end
    
    function ShadowShock(Unit,event)
        local plr = Unit:GetRandomPlayer(0)
        if(plr ~= nil) then
        Unit:FullCastSpellOnTarget(19460,plr)
        end
    end
    --[[
        FLAMEWALKER's AI
    ]]
    RegisterUnitEvent(12119,1,"LucifronProtector_OnCombat")
    RegisterUnitEvent(12119,2,"LucifronProtector_OnWipe")
    RegisterUnitEvent(12119,4,"LucifronProtector_OnDied")
    function LucifronProtector_OnCombat(Unit,event)
        Unit:RegisterEvent("LucifronProtector_Cleave", math.random(12000, 16000), 1)
    end
    function LucifrontProtector_Cleave(Unit,event)
        Unit:FullCastSpellOnTarget(39047, Unit:GetMainTank())
        Unit:RegisterEvent("LucifronProtector_Cleave", math.random(12000, 16000), 0)
    end
    function LucifronProtector_OnDied(Unit,event)
        Unit:RemoveEvents()
    end
    function LucifronProtector_OnWipe(Unit,event)
        Unit:RemoveEvents()
    
    
    end


    Code:
    --[[********************************
    *                                                            *
    * The LUA++ Scripting Project        *
    *                                                            *
    ********************************
    
    This software is provided as free and open source by the
    staff of The LUA++ Scripting Project, in accordance with 
    the AGPL license. This means we provide the software we have 
    created freely and it has been thoroughly tested to work for 
    the developers, but NO GUARANTEE is made it will work for you 
    as well. Please give credit where credit is due, if modifying,
    redistributing and/or using this software. Thank you.
    
    ~~End of License Agreement
    -- LUA++ staff, March 26, 2008. ]]
    --[[
        GARR's AI
        ]]
    
    RegisterUnitEvent(12057,1,"Garr_OnCombat")
    RegisterUnitEvent(12057,2,"Garr_OnWipe")
    RegisterUnitEvent(12057,4,"Garr_OnDied")
    
    function Garr_OnCombat(Unit,event)
        setvars(Unit, {Garr = Unit})
        Unit:RegisterEvent("Garr_Shackles", 21000, 0)
        Unit:RegisterEvent("Garr_AntiMagicPulse", 10000, 0)
    end
    
    function Garr_OnWipe(Unit,event)
        Unit:RemoveEvents()
    end
    function Garr_OnDied(Unit,event)
        Unit:RemoveEvents()
    end
    function Garr_Shackles(Unit,event)
        Unit:CastSpell(19496)
    end
    function Garr_AntiMagicPulse(Unit,event)
        Unit:CastSpell(19492)
    end
    --[[
        FIRESWORM
        ]]
    RegisterUnitEvent(12099,1,"Firesworm_OnCombat")
    RegisterUnitEvent(12099,2,"Firesworm_OnWipe")
    RegisterUnitEvent(12099,4,"Firesworm_OnDied")
    
    function Firesworm_OnCombat(Unit,event)
        Unit:RegisterEvent("FireswormSpells", math.random(14000, 20000), 0) --Only calling this once.
        Unit:RegisterEvent("Separation_Anxiety", 2000, 0)
    end
    function Firesworm_OnWipe(Unit,event)
        Unit:RemoveEvents()
    end
    function Firesworm_OnDied(Unit,event)
        Unit:RemoveEvents()
        Unit:CastSpell(19497)
    end
    function Separation_Anxiety(Unit,event)
        local args = getvars(Unit)
        if args.Garr ~= nil then
            local dist = Unit:GetDistance(args.Garr)
            if dist >= 70 then
                Unit:CastSpell(23492)
            end
        end
    end
    
    function FireswormSpells(Unit,event)
        local plr = Unit:GetRandomPlayer(0)
        if plr ~= nil then
            Unit:FullCastSpellOnTarget(20294,plr)
        end
    end
    There is more of them. They're in the rar

    Zul gurub, also in the rar
    Code:
    --[[********************************
    *                                                            *
    * The LUA++ Scripting Project        *
    *                                                            *
    ********************************
    
    This software is provided as free and open source by the
    staff of The LUA++ Scripting Project, in accordance with 
    the AGPL license. This means we provide the software we have 
    created freely and it has been thoroughly tested to work for 
    the developers, but NO GUARANTEE is made it will work for you 
    as well. Please give credit where credit is due, if modifying,
    redistributing and/or using this software. Thank you.
    
    ~~End of License Agreement
    -- LUA++ staff, March 26, 2008. ]]
    function Venoxis_HolyNovaRepeat(pUnit, event)
         pUnit:CastSpell(23858)
         pUnit:RegisterEvent("Venoxis_HolyNova", math.random(26000, 31000), 1)
    end
    
    function Venoxis_HolyNova(pUnit, event)
         pUnit:CastSpell(23858)
         pUnit:RegisterEvent("Venoxis_HolyNovaRepeat", math.random(26000, 31000), 1)
    end
    
    function Venoxis_HolyFireRepeat(pUnit, event)
         pUnit:FullCastSpellOnTarget(23860, pUnit:GetMainTank())
         pUnit:RegisterEvent("Venoxis_HolyFire", math.random(18000, 22000), 1)
    end
    
    function Venoxis_HolyFire(pUnit, event)
         pUnit:FullCastSpellOnTarget(23860, pUnit:GetMainTank())
         pUnit:RegisterEvent("Venoxis_HolyFireRepeat", math.random(18000, 22000), 1)
    end
    
    function Venoxis_Serpent(pUnit, event)
         local serpenttarget=pUnit:GetRandomPlayer(0);
         pUnit:SpawnCreature(14884, serpenttarget:GetX(), serpenttarget:GetY(), serpenttarget:GetZ(), serpenttarget:GetO(), 14, 0)
    end
    
    function Venoxis_Renew(pUnit, event)
         pUnit:CastSpell(23895)
    end
    
    function Venoxis_PoisonCloud(pUnit, event)
         pUnit:CastSpell(23861)
    end
    
    function Venoxis_VenomSpitRepeat(pUnit, event)
         pUnit:FullCastSpellOnTarget(23862, pUnit:GetRandomPlayer(0))
         pUnit:RegisterEvent("Venoxis_VenomSpit", math.random(14000, 18000), 1)
    end
    
    function Venoxis_VenomSpit(pUnit, event)
         pUnit:FullCastSpellOnTarget(23862, pUnit:GetRandomPlayer(0))
         pUnit:RegisterEvent("Venoxis_VenomSpitRepeat", math.random(14000, 18000), 1)
    end
    
    function Venoxis_Phasetwo(pUnit, event)
         if pUnit:GetHealthPct() < 51 then
             pUnit:RemoveEvents()
             pUnit:SendChatMessage(14, 0, "Let the coils of hate unfurl!")
             pUnit:SetModel(9134)
             pUnit:CastSpell(23849)
             pUnit:CastSpell(23861)
             pUnit:RegisterEvent("Venoxis_PoisonCloud", 22000, 0)
             pUnit:RegisterEvent("Venoxis_VenomSpit", math.random(14000, 18000), 1)
         end
    end
    
    function Venoxis_OnEnterCombat(pUnit, event)
         pUnit:RegisterEvent("Venoxis_HolyNova", math.random(26000, 31000), 1)
         pUnit:RegisterEvent("Venoxis_HolyFire", math.random(18000, 22000), 1)
         pUnit:RegisterEvent("Venoxis_Serpent", 45000, 0)
         pUnit:RegisterEvent("Venoxis_Renew", 50000, 0)
         pUnit:RegisterEvent("Venoxis_Phasetwo", 1000, 0)
    end
    
    RegisterUnitEvent(14507, 1, "Venoxis_OnEnterCombat")
    
    function Venoxis_OnWipe(pUnit, event)
         if pUnit:IsAlive() then
             pUnit:SetModel(15217)
             pUnit:RemoveEvents()
         else
             pUnit:SendChatMessage(14, 0, "Ssserenity..at lassst!")
         end
    end
    
    RegisterUnitEvent(14507, 2, "Venoxis_OnWipe")
    
    function Venoxis_OnDie(pUnit, event)
         pUnit:RemoveEvents()
    end
    
    RegisterUnitEvent(14507, 4, "Venoxis_OnDie")
    
    --Parasitic Serpent AI
    function Serpent_OneTimeBite(pUnit, event)
         pUnit:FullCastSpellOnTarget(23865, pUnit:GetClosestPlayer())
    end
    
    function Serpent_Bite(pUnit, event)
         pUnit:FullCastSpellOnTarget(23865, pUnit:GetClosestPlayer())
    end
    
    function Serpent_OnEnterCombat(pUnit, event)
         pUnit:RegisterEvent("Serpent_OneTimeBite", 2000, 1)
         pUnit:RegisterEvent("Serpent_Bite", 14000, 0)
    end
    
    RegisterUnitEvent(14884, 1, "Serpent_OnEnterCombat")
    
    function Serpent_OnWipe(pUnit, event)
         pUnit:RemoveEvents()
    end
    
    RegisterUnitEvent(14884, 2, "Serpent_OnWipe")
    
    function Serpent_OnDie(pUnit, event)
         pUnit:RemoveEvents()
    end
    
    RegisterUnitEvent(14884, 4, "Serpent_OnDie")



    Last edited by b!atch; 05-25-2008 at 05:18 AM.
    Spectrum-X is win! Rep People That Help You and Candybones Wont Eat Your Brain:>

    [Release] Lua scripts, The ultimative thread v3
  2. #2
    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)
    Fixed dl link, Feedback is welcome
    Last edited by b!atch; 05-24-2008 at 01:52 PM.
    Spectrum-X is win! Rep People That Help You and Candybones Wont Eat Your Brain:>

  3. #3
    Mythers's Avatar Banned
    Reputation
    88
    Join Date
    Jul 2007
    Posts
    576
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Look's really nice, deffinently going to use some of em

    Rep added!

  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)
    Thx Way more in the dl link. And check out v1/2 aswell;D
    Spectrum-X is win! Rep People That Help You and Candybones Wont Eat Your Brain:>

  5. #5
    MisterEMU's Avatar Banned
    Reputation
    38
    Join Date
    Feb 2008
    Posts
    307
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    why don't you make 1 thread with all three version in it...

  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)
    Becouse i keep exceeding the maxlimit >.<
    I keep exceeding the maxlimit on characters, aka letters
    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)

    Finally its here! The mega lua pack!

    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++

    I will post this in v1/2 aswell..

    Q: Why didnt you update mainthread?
    A: Becouse then i would exceed the character-maxlimit


    New dl link with tuts+whole isle of quel danas scripted

    New dl link once again. About 700 scripts now


    WUUT 20 more scripts

    Updated dl link with more scripts
    Wuhuw. Even more scripts now -- Now that many new scripts. But its "ok"

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


    ENJOY!


    I will keep updating this file as i get time. Right now im not able to find scripts that aint included But when i find one ill update the dl link and ofc make you notice it The new scripts will be in a folder called "NEW!"
    Last edited by b!atch; 07-01-2008 at 08:39 AM.
    Spectrum-X is win! Rep People That Help You and Candybones Wont Eat Your Brain:>

  8. #8
    andor44's Avatar Member
    Reputation
    8
    Join Date
    Sep 2007
    Posts
    36
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    w00t finally a lua wrap npc (i was nub to find other xD) :wave::runaway:+Rep
    "Im not a superflying incho!"

  9. #9
    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, But it wont work without the part/dll file
    Spectrum-X is win! Rep People That Help You and Candybones Wont Eat Your Brain:>

  10. #10
    andor44's Avatar Member
    Reputation
    8
    Join Date
    Sep 2007
    Posts
    36
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Ah now i see
    Sry im noob to scripting,can u help me , how i let this to work ?

    ????
    I'll rep the ppl who make me a working wrapnpc script :P
    "Im not a superflying incho!"

  11. #11
    Sithius's Avatar
    Sithius
    Guest
    Thanks a lot for sharing this.
    Will help me loads

    +rep!

    EDIT: .... Damn apperintly I can't at the moment

  12. #12
    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)
    Code:
    function warp_on_gossip_talk(unit, event, player)
    unit:CreateGossipMenuForPlayer(3543, player)
    unit:MenuAddItem(player, 0, "Horde cities", 1, 0)
    unit:MenuAddItem(player, 0, "Alliance cities", 2, 0)
    unit:MenuAddItem(player, 0, "Azeroth Instances", 5, 0)
    unit:MenuAddItem(player, 0, "Outland Instances", 6, 0)
    unit:MenuAddItem(player, 5, "Shattrath", 51, 0)
    unit:MenuSendToPlayer(player)
    end
    function warp_on_gossip_select(unit, event, player, id, intid, code)
    if(intid == 1) then
    unit:CreateGossipMenuForPlayer(3542, player)
    unit:MenuAddItem(player, 5, "Orgrimmar", 9, 0)
    unit:MenuAddItem(player, 5, "Undercity", 10, 0)
    unit:MenuAddItem(player, 5, "Thunder Bluff", 11, 0)
    unit:MenuAddItem(player, 5, "Silvermoon", 12, 0)
    unit:MenuAddItem(player, 5, "[Back]", 100, 0)unit:MenuSendToPlayer(player)
    end
    if(intid == 2) then
    unit:CreateGossipMenuForPlayer(3542, player)
    unit:MenuAddItem(player, 5, "Stormwind", 14, 0)
    unit:MenuAddItem(player, 5, "Ironforge", 15, 0)
    unit:MenuAddItem(player, 5, "Darnassus", 16, 0)
    unit:MenuAddItem(player, 5, "Exodar", 17, 0)
    unit:MenuAddItem(player, 5, "[Back]", 100, 0)
    unit:MenuSendToPlayer(player)
    end
    if(intid == 5) then
    unit:CreateGossipMenuForPlayer(3542, player)
    unit:MenuAddItem(player, 0, "Azeroth Raids", 3, 0)
    unit:MenuAddItem(player, 5, "Shadowfang Keep", 19, 0)
    unit:MenuAddItem(player, 5, "Scarlet Monastery", 20, 0)
    unit:MenuAddItem(player, 5, "Zul'Farrak", 21, 0)
    unit:MenuAddItem(player, 5, "Stratholme", 22, 0)
    unit:MenuAddItem(player, 5, "Scholomance", 23, 0)
    unit:MenuAddItem(player, 5, "Ragefire", 110, 0)
    unit:MenuAddItem(player, 5, "Deathmines", 170, 0)
    unit:MenuAddItem(player, 5, "Those caverns in barrens xX", 111,0)
    unit:MenuAddItem(player, 5, "Blackfathom deepths", 112, 0)
    unit:MenuAddItem(player, 5, "This instance in Stormwind ", 113,0)
    unit:MenuAddItem(player, 5, "Gnomeregan", 114, 0)
    unit:MenuAddItem(player, 5, "Razorfen thing number 1", 115, 0)
    unit:MenuAddItem(player, 5, "Razorfen hills", 116, 0)
    unit:MenuAddItem(player, 5, "Uldaman", 117, 0)
    unit:MenuAddItem(player, 5, "Maraudon", 118, 0)
    unit:MenuAddItem(player, 5, "Sunken temple", 119, 0)
    unit:MenuAddItem(player, 5, "Lower Blackrock", 120, 0)
    unit:MenuAddItem(player, 5, "Dire Maul", 121, 0)
    unit:MenuAddItem(player, 5, "Upper Blackrock", 122, 0)
    unit:MenuAddItem(player, 5, "[Back]", 100, 0)
    unit:MenuSendToPlayer(player)
    end
    if(intid == 6) then
    unit:CreateGossipMenuForPlayer(3542, player)
    unit:MenuAddItem(player, 5, "Outland Raids", 4, 0)
    unit:MenuAddItem(player, 5, "Hellfire Ramparts", 25, 0)
    unit:MenuAddItem(player, 5, "Blood furnace", 26, 0)
    unit:MenuAddItem(player, 5, "Shattered Halls", 27, 0)
    unit:MenuAddItem(player, 5, "Underbog", 28, 0)
    unit:MenuAddItem(player, 5, "Slave pens", 29, 0)
    unit:MenuAddItem(player, 5, "Steam whatever ", 30, 0)
    unit:MenuAddItem(player, 5, "Mana tombs", 31, 0)
    unit:MenuAddItem(player, 5, "Auchenai crypts", 32, 0)
    unit:MenuAddItem(player, 5, "Sethekk halls", 33, 0)
    unit:MenuAddItem(player, 5, "Shadow lab", 34, 0)
    unit:MenuAddItem(player, 5, "Mechanar", 35, 0)
    unit:MenuAddItem(player, 5, "Bota whatever Oo", 36, 0)
    unit:MenuAddItem(player, 5, "Arcatraz", 37, 0)
    unit:MenuAddItem(player, 5, "Caverns of Time", 52, 0)
    unit:MenuAddItem(player, 5, "[Back]", 100, 0)
    unit:MenuSendToPlayer(player)
    end
    if(intid == 3) then
    unit:CreateGossipMenuForPlayer(3542, player)
    unit:MenuAddItem(player, 5, "Onyxias Lair", 39, 0)
    unit:MenuAddItem(player, 5, "Molten Core", 40, 0)
    unit:MenuAddItem(player, 5, "Blackwing Lair", 123, 0)
    unit:MenuAddItem(player, 5, "Zul'Gurub", 41, 0)
    unit:MenuAddItem(player, 5, "Karazhan", 42, 0)
    unit:MenuAddItem(player, 5, "Ruins of Ahn'Qiraj", 43, 0)
    unit:MenuAddItem(player, 5, "Temple of Ahn'Qiraj", 44, 0)
    unit:MenuAddItem(player, 5, "Naxxramas", 45, 0)
    unit:MenuAddItem(player, 5, "Zul'Aman", 124, 0)
    unit:MenuAddItem(player, 5, "Caverns of Time", 52, 0)
    unit:MenuAddItem(player, 5, "[Back]", 100, 0)
    unit:MenuSendToPlayer(player)
    end
    if(intid == 4) then
    unit:CreateGossipMenuForPlayer(3542, player)
    unit:MenuAddItem(player, 5, "Black Temple", 50, 0)
    unit:MenuAddItem(player, 5, "Tempest Keep", 49, 0)
    unit:MenuAddItem(player, 5, "Gruuls Lair", 48, 0)
    unit:MenuAddItem(player, 5, "Serpentshrine caverns", 47, 0)
    unit:MenuAddItem(player, 5, "Maghteridons Lair", 46, 0)
    unit:MenuAddItem(player, 5, "[Back]", 100, 0)
    unit:MenuSendToPlayer(player)
    end
    if(intid == 12) then
    player:Teleport(530, 9400.486328, -7278.376953, 14.206780)
    end
    if(intid == 9) then
    player:Teleport(1, 1371.068970, -4370.801758, 26.052483)
    end
    if(intid == 11) then
    player:Teleport(1, -1304.569946, 205.285004, 68.681396)
    end
    if(intid == 10) then
    player:Teleport(0, 2050.203125, 285.650604, 56.994549)
    end
    if(intid == 17) then
    player:Teleport(530, -4072.202393, -12014.337891, -1.277277)
    end
    if(intid == 14) then
    player:Teleport(0, -9100.480469, 406.950745, 92.594185)
    endif
    (intid == 15) then
    player:Teleport(0, -5028.265137, -825.976563, 495.301575)
    end
    if(intid == 16) then
    player:Teleport(1, 9985.907227, 1971.155640, 1326.815674)
    end
    if(intid == 51) then
    player:Teleport(530, -1887.510010, 5359.379883, -12.427300)
    end
    if(intid == 19) then
    player:Teleport(0, -234.495087, 1561.946411, 76.892143)
    end
    if(intid == 20) then
    player:Teleport(0, 2870.442627, -819.985229, 160.331085)
    end
    if(intid == 21) then
    player:Teleport(1, -6797.278809, -2903.917969, 9.953360)end
    if(intid == 41) then
    player:Teleport(0, -11919.073242, -1202.459374, 92.298744)end
    if(intid == 43) then
    player:Teleport(1, -8394.730469, 1485.658447, 21.038563)end
    if(intid == 44) then
    player:Teleport(1, -8247.316406, 1970.156860, 129.071472)
    end
    if(intid == 40) then
    player:Teleport(409, 1089.6, -470.19, -106.41)end
    if(intid == 39) thenplayer:Teleport(1, -4746, -3749, -4.0)
    end
    if(intid == 45) then
    player:Teleport(533, 3006.06, -3436.72, 293.891)
    end
    if(intid = 23) then
    player:Teleport(0, 1267.468628, -2556.651367, 94.127983)
    end
    if(intid == 24) then
    player:Teleport(0, 3359.111572, -3380.8444238, 144.781860)
    end
    if(intid == 38) then
    player:Teleport(0, -7527.129883, -1224.997437, 285.733002)
    end
    if(intid == 42) thenplayer:Teleport(532, -11087.3, -1977.47, 49.6135)
    end
    if(intid == 52) then
    player:Teleport(1, -8519.718750, -4297.542480, -208.441376)
    end
    if(intid == 25) then
    player:Teleport(530, -360.670990, 3071.899902, -15.097700)
    end
    if(intid == 26) then
    player:Teleport(530, -303.506012, 3164.820068, 31.742500)end
    if(intid == 27) then
    player:Teleport(530, -311.083527, 3083.291748, -3.745923)end
    if(intid == 28) then
    player:Teleport(530, 777.088989, 6763.450195, -72.062561)
    end
    if(intid == 29) then
    player:Teleport(530, 719.507996, 6999.339844, -73.074303)
    end
    if(intid == 30) then
    player:Teleport(530, 816.590027, 6934.669922, -80.544601)end
    if(intid == 31) then
    player:Teleport(530, -3079.810059, 4943.040039, -101.046997)
    end
    if(intid == 32) then
    player:Teleport(530, -3361.959961, 5225.770020, -101.047997)end
    if(intid == 33) then
    player:Teleport(530, -3362.219971, 4660.410156, -101.049004)end
    if(intid == 34) then
    player:Teleport(530, -3645.060059, 4943.620117, -101.047997)end
    if(intid == 35) then
    player:Teleport(530, 2862.409912, 1546.089966, 252.158691)
    end
    if(intid == 36) then
    player:Teleport(530, 3413.649902, 1483.319946, 182.837997)
    end
    if(intid == 37) then
    player:Teleport(530, 3311.598145, 1332.745117, 505.557251)
    end
    if(intid == 46) then
    player:Teleport(530, -313.678986, 3088.350098, -116.501999)
    end
    if(intid == 47) then
    player:Teleport(530, 830.542908, 6865.445801, -63.785503)
    end
    if(intid == 48) then
    player:Teleport(530, 3549.424072, 5179.854004, -4.430779)
    end
    if(intid == 49) then
    player:Teleport(530, 3087.310059, 1373.790039, 184.643005)
    end
    if(intid == 50) then
    player:Teleport(530, -3609.739990, 328.252014, 37.307701)
    end
    if(intid == 124) then
    player:Teleport(530, 6850, -7950, 170)
    end
    if(intid == 136) then
    player:Teleport(0, -13152.9, 342.729, 53.1328)
    end
    if(intid = 110) then
    player:Teleport(389, 1.7849, -14.3685, -16.5533)
    end
    if(intid == 111) then
    player:Teleport(1, -746.207, -2213.18, 15.8909)
    end
    if(intid == 112) then
    player:Teleport(48, -152.984, 106.33, -39.0953)
    end
    if(intid == 113) then
    player:Teleport(0, -8776.78, 836.753, 93.1946)end
    if(intid == 114) then
    player:Teleport(0, -5189.22, 524.796, 389.107)
    end
    if(intid == 115) then
    player:Teleport(1, -4464.92, -1666.24, 91)
    end
    if(intid == 116) then
    player:Teleport(129, 2591.99, 1101.25, 52.8593)
    end
    if(intid == 117) then
    player:Teleport(70, -228.193, 46.1602, -45.0186)
    end
    if(intid == 118) then
    player:Teleport(349, 419.84, 11.3365, -131.079)
    end
    if(intid == 119) then
    player:Teleport(0, -10349.1, -3849.67, -24.6078)
    end
    if(intid == 120) then
    player:Teleport(230, 596.432, -188.498, -49)
    end
    if(intid == 121) then
    player:Teleport(429, 254.588, -24.7395, -1.56062)
    end
    if(intid == 122) then
    player:Teleport(229, 73.5083, -215.044, 53.3869)
    end
    if(intid == 123) then
    player:Teleport(469, -7665.55, -1102.49, 400.679)
    end
    if(intid == 170) then
    player:Teleport(0, -11079.8, 1506.98, 42.9594)
    end
    intid = 0
    end
    RegisterGossipEvent(npc id, 1, "warp_on_gossip_talk")
    RegisterGossipEvent(npc id, 2,"warp_on_gossip_select")


    Edit the endings to look like that.. Just enter the npcs id where it tells you to. that might make it load, it still wont work without the part file tho.
    Spectrum-X is win! Rep People That Help You and Candybones Wont Eat Your Brain:>

  13. #13
    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 sithius
    Spectrum-X is win! Rep People That Help You and Candybones Wont Eat Your Brain:>

  14. #14
    andor44's Avatar Member
    Reputation
    8
    Join Date
    Sep 2007
    Posts
    36
    Thanks G/R
    0/0
    Trade Feedback
    0 (0%)
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    it still wont work without the part file tho. wat is daaaaaaaaaattt ? ;P What's that ?
    "Im not a superflying incho!"

  15. #15
    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)
    A file you need some pro dud to make.. At least thats what im told^^ dont know if its gonna work with the LUAscripting folder.. My guess=Not:b
    Spectrum-X is win! Rep People That Help You and Candybones Wont Eat Your Brain:>

Page 1 of 3 123 LastLast

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. Replies: 9
    Last Post: 06-19-2008, 03:55 AM
  4. [Release] Lua scripts, The ultimative thread v1
    By b!atch in forum World of Warcraft Emulator Servers
    Replies: 6
    Last Post: 05-26-2008, 10:28 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 02:16 AM. Powered by vBulletin® Version 4.2.3
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved. User Alert System provided by Advanced User Tagging (Pro) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.
Google Authenticator verification provided by Two-Factor Authentication (Free) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.
Digital Point modules: Sphinx-based search