• Listen to a special audio message from Bill Roper to the Hive Workshop community (Bill is a former Vice President of Blizzard Entertainment, Producer, Designer, Musician, Voice Actor) 🔗Click here to hear his message!
  • Read Evilhog's interview with Gregory Alper, the original composer of the music for WarCraft: Orcs & Humans 🔗Click here to read the full interview.

Triggers

Chaoslaser.v2.gui.and.jass.v1.1-S.w3x
Variables
Chaoslaser v2
Read Me!
CLspelltrig1
CLspelltrig2
Chaoslaser v2 JASS
TimerUtils
unneeded
trig
trig2
trig3
trig4
trig5
Kartenspezifischen eigenen Skript-Code unten eingeben. Dieser Text wird in das Karten-Skript nach der Deklaration der Variablen und vor jeglichem Auslöser-Code eingefügt.
Name Type is_array initial_value
CL_castpt location No
CL_real real No
CL_tarpt location No
CL_tempeff effect No
CL_temprect rect No
CL_tmppt location No
CL_tmppt2 location No
CL_tmppt3 location No
do_not_copy_me location No
As far as you might know, as the triggers are explained within, I won't go through all the stuff now..
Just that:
To make this spell work correctly,
*copy all three dummies
*copy all three abilites
*copy the buff
*copy all variables with 'CL_' as prefix
*copy all triggers in this category
--
A simple form of the spell goes like:
Dummy is casted growing in size - as it's size reaches 1000%, dummies are created towards the targeted point, where 10 more are created moving circularly outwards, dealing damage to every awake enemy
--
Now, we start with 'CLspelltrig1'

//NOTE on the guiversion: I couldn't pass the target point of ability being cast, so it has a fixed range of 700; the jassversion does not
I tried to keep all triggers as simple as possible.
This one sets up different variables and creates the dummy which is going to be bigger and bigger and last turns on the core
--
Now move on to 'spelltrig2'
CLspelltrig1
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Chaoslaser v2
Actions
-------- Set up the variables --------
Set Variable Set CL_castpt = (Position of (Triggering unit))
Set Variable Set CL_tmppt = (Target point of ability being cast)
Set Variable Set CL_real = (Angle from CL_castpt to CL_tmppt)
Set Variable Set CL_tarpt = (CL_castpt offset by 100.00 towards CL_real degrees.)
-------- Create the dummy --------
Unit - Create 1 Dummy for (Owner of (Triggering unit)) at CL_tarpt facing CL_tmppt
Unit - Order (Last created unit) to Human Mountain King - Storm Bolt . (Triggering unit)
Unit - Make (Last created unit) face CL_tmppt over 0 seconds
Unit - Set level of Carrier for (Last created unit) to (Level of Chaoslaser v2 for (Triggering unit))
-------- Creating a special effect --------
Special Effect - Create a special effect at CL_castpt using Abilities\Spells\Undead\DarkRitual\DarkRitualTarget.mdl
Set Variable Set CL_tempeff = (Last created special effect)
Custom script: call DestroyEffect(udg_CL_tempeff)
Custom script: call RemoveLocation(udg_CL_castpt)
Custom script: call RemoveLocation(udg_CL_tarpt)
-------- Now I turn on the main trigger --------
Trigger - Turn on CLspelltrig2 <gen>
Here, we have a fairly big trigger dealing with everything after the dummy's creation.
First, I pick every unit having the dummy's type.
Now I check for it's custom value (custom values are randomly accessible) and if they match a certain condition, actions take place.
1): Condition - CV smaller than 1000:
Everytime, the CV matches the condition, I increase it by ten while increasing the dummy's size also by ten.

2): Condition - CV equal to 1000:
Here we go for the actual spell.
First, I create a dummy every 100 range towards the target point of the ability being cast (that value is set up withing the facing angle of the dummy)
After, I go for another dummy having 'revive dead' as model plus I create a rectangle in which all enemiy units are stored into a group, getting damage from the dummy.
Then, I create another ten dummies (one every 36 degrees) and order them to move to a point which is 2000 away from the point of creation (looks like a split-shard ;) )
Last, I do some more environmental effects for the eyecandy and we're done.
--
2oo9 by Squiggy
CLspelltrig2
Events
Time - Every 0.04 seconds of game time
Conditions
Actions
Custom script: set bj_wantDestroyGroup = true
-------- Here I pick all units of the type 'dummy' --------
Unit Group - Pick every unit in (Units of type Dummy) and do (Actions)
Loop - Actions
-------- I check which condition is met. --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of (Picked unit)) Less than 1000
Then - Actions
-------- Now I increase the dummy's size using the custom value (explained above) --------
Animation - Change (Picked unit) 's size to ( ((Real((Custom value of (Picked unit)))) + 10.00) %, ((Real((Custom value of (Picked unit)))) + 10.00) %, ((Real((Custom value of (Picked unit)))) + 10.00) %) of its original size
Unit - Set the custom value of (Picked unit) to ((Custom value of (Picked unit)) + 10)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Custom value of (Picked unit)) Equal to 1000
Then - Actions
Set Variable Set CL_tmppt = (Position of (Picked unit))
-------- Here, I go for six dummies serving as the 'beam' --------
For each (Integer A) from 1 to 6 , do (Actions)
Loop - Actions
Set Variable Set CL_tmppt2 = (CL_tmppt offset by (CL_real + 100.00) towards (Facing of (Picked unit)) degrees.)
Unit - Create 1 . Dummy2 for (Owner of (Picked unit)) at CL_tmppt2 facing (Facing of (Picked unit)) degrees
Unit - Add a 0.20 second Generic expiration timer to (Last created unit)
Unit - Set level of dmg for (Last created unit) to (Level of Carrier for (Picked unit))
Custom script: call RemoveLocation(udg_CL_tmppt2)
Set Variable Set CL_real = (CL_real + 100.00)
Custom script: call RemoveLocation(udg_CL_tmppt)
Set Variable Set CL_real = "0.00"
Set Variable Set CL_tmppt3 = (Position of (Last created unit))
-------- Now it's time to bring in the 'raise dead-dummy' --------
Unit - Create 1 . Dummy3 for (Owner of (Picked unit)) at CL_tmppt3 facing (Facing of (Picked unit)) degrees
-------- This makes the units in the targeted area take damage equal to the level of the spell * 3 --------
Unit - Set level of Carrier for (Last created unit) to (Level of Carrier for (Picked unit))
Set Variable Set CL_temprect = (Region centered at CL_tmppt3 with size (600.00, 600.00))
Custom script: set bj_wantDestroyGroup = true
Unit Group - Pick every unit in (Units in CL_temprect matching (((Matching unit) belongs to an enemy of (Owner of (Last created unit)).) Equal to True)) and do (Cause (Last created unit) to damage (Picked unit), dealing ((Real((Level of Carrier for (Last created unit)))) x 30.00) damage of attack type Spells and damage type Normal)
Unit - Add a 1.00 second Generic expiration timer to (Last created unit)
-------- Almost done, I do another bunch of dummies making them move outwards (explained above) --------
For each (Integer A) from 1 to 10 , do (Actions)
Loop - Actions
Set Variable Set CL_tmppt2 = (CL_tmppt3 offset by 2000.00 towards (CL_real + 36.00) degrees.)
Unit - Create 1 Dummy2 for (Owner of (Picked unit)) at CL_tmppt3 facing CL_tmppt2
Unit - Add a 2.00 second Generic expiration timer to (Last created unit)
Unit - Order (Last created unit) to Move To . CL_tmppt2
Unit - Set level of dmg for (Last created unit) to (Level of Carrier for (Picked unit))
Animation - Change (Last created unit) 's size to ( 25.00 %, 25.00 %, 25.00 %) of its original size
Custom script: call RemoveLocation(udg_CL_tmppt2)
Set Variable Set CL_real = (CL_real + 36.00)
Set Variable Set CL_real = "0.00"
Unit - Remove (Picked unit) from the game
-------- And last, I create some nice blight combined with a temporary deformation to show the power of the spell --------
Environment - Create Blight for (Owner of (Last created unit)) from CL_tmppt3 to a radius of 300.00 .
Environment - Create a 2.00 second Depression ripple deformation at CL_tmppt3 with starting radius 0.00 , ending radius 1024 , and depth 64 , using 2.00 second ripples spaced 512 apart
Set Variable Set CL_tempeff = (Last created special effect)
Custom script: call DestroyEffect(udg_CL_tempeff)
Custom script: call RemoveLocation(udg_CL_tmppt3)
Else - Actions
So.. this is the jass-version of the spell, for the documentation, check the commented lines

As far as you might know, as the triggers are explained within, I won't go through all the stuff now..
Just that:
To make this spell work correctly,
*copy all three dummies
*copy all three abilites
*copy the buff
*copy all variables with 'CL_' as prefix
*copy all triggers in this category
--
A simple form of the spell goes like:
Dummy is casted growing in size - as it's size reaches 1000%, dummies are created towards the targeted point, where 10 more are created moving circularly outwards, dealing damage to every awake enemy
--
Now, we start with 'CLspelltrig1'
//TESH.scrollpos=6
//TESH.alwaysfold=0
//==Chaoslaser v2==
//~Uses TimerUtils (blue flavor)
//~Needs jngp
//Credits go to HINDYhat for teaching me jass and correcting my spell a couple of times ^^
//2oo9 by Squiggy

scope CLv2 initializer SpellInit
    globals
        private constant integer SPELLID = 'A000'                   //First, I set the constants to the two abilites
        private constant integer SPELLID2 = 'A001'                  
        private constant integer DmgFactor = 30                     //Here you can preset the amount of damage which is going to be dealt (level*DmgFactor)
        private constant real distance = 100                        //Here, you can change the distance in which the beamdummies are created
        private constant string effpath = "Abilities\\Spells\\Undead\\DarkRitual\\DarkRitualTarget.mdl"  //And here, you can change the cast effect
    endglobals
    
    globals
        private player p
    endglobals
        
    private function Conditions takes nothing returns boolean
        return GetSpellAbilityId() == SPELLID                      //The usual condition
    endfunction
    
    private struct growth                                          //The struct 'growth' holds every needed data for the growth of the dummy and the 
        unit dummy                                                 //stuff that goes after
        real size
        real grow
        real posX
        real posY
        real facing
        real distance
        integer abilv
        real distaddX
        real distaddY
    endstruct

    private function Grp takes nothing returns boolean             //Group filter to your left
        return IsUnitEnemy(GetFilterUnit(), p)
    endfunction    
    
                                                                   //Everything after the dummy is created goes here
    
    private function grow takes nothing returns nothing
        local integer INDEX                                        //First, we define and set the needed locals
        local unit u
        local unit gru
        local group g
        local growth gt = growth(GetTimerData(GetExpiredTimer()))  //Now we get the data from the expired timer
        set gt.size = gt.size + .1                                 //We increase the dummysize by 10%
        call BJDebugMsg(R2S(gt.size))
        call SetUnitScale(gt.dummy, gt.size, gt.size, gt.size) 
        if gt.size > 10 then                                       //Now if the dummysize reaches 10, it's time to create the 'laserbeam'
            set g = CreateGroup()
            call ReleaseTimer(GetExpiredTimer())                   //and to remove the timer
            set INDEX = 0
            call RemoveUnit(gt.dummy)
            set gt.posX = GetUnitX(gt.dummy)
            set gt.posY = GetUnitY(gt.dummy)
            loop 
            exitwhen INDEX >= (gt.distance/distance)                    //Now we create one dummy per 100 warcraft units until the distance it reached
                set u = CreateUnit(p, 'n001', gt.posX, gt.posY, gt.facing)
                call SetUnitAbilityLevel(u, SPELLID2, gt.abilv)
                call UnitApplyTimedLife(u, 'BLTF' , .2)
                set INDEX = INDEX+1
                set gt.posX = gt.posX + gt.distaddX                //And here we move the position of the next created dummy 'forward'
                set gt.posY = gt.posY + gt.distaddY
            endloop
            set INDEX = 0
            loop 
                exitwhen INDEX == 8                                // Now we spawn the eight dummies which move outwards from the current position
                set u = CreateUnit(p, 'n001', gt.posX, gt.posY, INDEX*45)
                call SetUnitAbilityLevel(u, SPELLID2, gt.abilv)
                call IssuePointOrder(u, "move", gt.posX+1000.00*Cos((INDEX*45)*bj_DEGTORAD), gt.posY+1000.00*Sin((INDEX*45)*bj_DEGTORAD))  //We order it to move
                call SetUnitScale(u, 0.3, 0.3, 0.3)                //And now we decrease it's scaling to 0.33
                call UnitApplyTimedLife(u, 'BLTF' , 1.2)
                set INDEX = INDEX+1
            endloop
            set u = CreateUnit(p, 'n002', gt.posX, gt.posY, 90)    //Last, we need the effect and to deal damage
            call SetUnitAbilityLevel(u, SPELLID2, gt.abilv)
            call UnitApplyTimedLife(u, 'BLTF' , 1.0)
            call GroupEnumUnitsInRange(g, gt.posX, gt.posY, 500, Filter(function Grp))
            loop                                                   //As we just picked every unit in 200 range from the point where the dummy is spawned
                set gru = FirstOfGroup(g)                          //we deal the damage equal to lvl*30
                exitwhen gru == null
                call UnitDamageTarget(u, gru, gt.abilv*DmgFactor, false, true, ATTACK_TYPE_NORMAL, DAMAGE_TYPE_NORMAL, WEAPON_TYPE_WHOKNOWS)
                call GroupRemoveUnit(g, gru)
            endloop
            set u = null                                           //And now we null the necessary variables and clean up leaks
            set gt.dummy = null
            call DestroyGroup(g)
            set g = null
        call gt.destroy()
        endif
        endfunction
    
    private function Actions takes nothing returns nothing         //This part of the spell creates the dummy and starts the timer which makes the dummy 'grow'
        local unit caster = GetTriggerUnit()
        local real dx
        local real dy
        local location targetpoint = GetSpellTargetLoc()
        local timer t = NewTimer()                                 //Here, we create the timer
        local growth gt = growth.create()
        set p = GetOwningPlayer(caster)
        call SetTimerData(t, integer(gt))                          
        set gt.abilv = GetUnitAbilityLevel(caster, SPELLID)
        set gt.size = 0.00
        set gt.facing = GetUnitFacing(caster)
        set gt.dummy = CreateUnit(p, 'n000', GetUnitX(caster)+distance*Cos(gt.facing*bj_DEGTORAD), GetUnitY(caster)+100.00*Sin(gt.facing*bj_DEGTORAD), gt.facing)
        call TimerStart(t, 0.04, true, function grow)              //Now we start it
        set gt.posX = GetUnitX(gt.dummy)
        set gt.posY = GetUnitY(gt.dummy)
        set dx = GetLocationX(targetpoint)-gt.posX                 //And now it's time to get the diatance between the caster and the targeted point
        set dy = GetLocationY(targetpoint)-gt.posY
        set gt.distance = SquareRoot(dx * dx + dy * dy)
        set gt.distaddX = distance*Cos(gt.facing*bj_DEGTORAD)
        set gt.distaddY = distance*Sin(gt.facing*bj_DEGTORAD)
        call SetUnitScale(gt.dummy, gt.size, gt.size, gt.size)
        call IssueTargetOrder(gt.dummy, "thunderbolt", caster)     //This is done to stun the caster (looks crappy if he can move while casting
        call DestroyEffect(AddSpecialEffect(effpath, gt.posX, gt.posY))
        call RemoveLocation(targetpoint)                           //And here we get rid of leaks
        set caster = null
    endfunction    
    
    private function SpellInit takes nothing returns nothing
        local trigger t = CreateTrigger()
        call TriggerRegisterAnyUnitEventBJ(t, EVENT_PLAYER_UNIT_SPELL_EFFECT)
        call TriggerAddCondition(t, Condition(function Conditions))
        call TriggerAddAction(t, function Actions)
    endfunction
endscope
//TESH.scrollpos=0
//TESH.alwaysfold=0
library_once TimerUtils
//*********************************************************************
//* TimerUtils (Blue flavor)
//* ----------
//*
//*  To implement it , create a custom text trigger called TimerUtils
//* and paste the contents of this script there.
//*
//*  To copy from a map to another, copy the trigger holding this
//* library to your map.
//*
//* (requires vJass)   More scripts: htt://www.wc3campaigns.net
//*
//* For your timer needs:
//*  * Attaching
//*  * Recycling (with double-free protection)
//*
//* set t=NewTimer()      : Get a timer (alternative to CreateTimer)
//* ReleaseTimer(t)       : Relese a timer (alt to DestroyTimer)
//* SetTimerData(t,2)     : Attach value 2 to timer
//* GetTimerData(t)       : Get the timer's value.
//*                         You can assume a timer's value is 0
//*                         after NewTimer.
//*
//* Blue Flavor: Slower than the red flavor, it got a 408000 handle id
//*             limit, which means that if more than 408000 handle ids
//*             are used in your map, TimerUtils might fail, this
//*             value is quite big and it is much bigger than the 
//*             timer limit in Red flavor.
//*
//********************************************************************

//================================================================
    globals
        private constant integer MAX_HANDLE_ID_COUNT = 408000
        // values lower than 8191: very fast, but very unsafe.
        // values bigger than 8191: not that fast, the bigger the number is the slower the function gets
        // Most maps don't really need a value bigger than 50000 here, but if you are unsure, leave it
        // as the rather inflated value of 408000
    endglobals

    //=================================================================================================
    private function H2I takes handle h returns integer
        return h
        return 0
    endfunction

    //==================================================================================================
    globals
        private integer array data[MAX_HANDLE_ID_COUNT]
        private constant integer MIN_HANDLE_ID=0x100000
    endglobals

    //It is dependent on jasshelper's recent inlining optimization in order to perform correctly.
    function SetTimerData takes timer t, integer value returns nothing
        debug if(H2I(t)-MIN_HANDLE_ID>=MAX_HANDLE_ID_COUNT) then
        debug     call BJDebugMsg("SetTimerData: Handle id too big, increase the max handle id count or use gamecache instead")
        debug endif
        set data[H2I(t)-MIN_HANDLE_ID]=value
    endfunction

    function GetTimerData takes timer t returns integer
        debug if(H2I(t)-MIN_HANDLE_ID>=MAX_HANDLE_ID_COUNT) then
        debug     call BJDebugMsg("GetTimerData: Handle id too big, increase the max handle id count or use gamecache instead")
        debug endif
        return data[H2I(t)-MIN_HANDLE_ID]
    endfunction

    //==========================================================================================
    globals
        private timer array tT
        private integer tN = 0
        private constant integer HELD=0x28829022
        //use a totally random number here, the more improbable someone uses it, the better.
    endglobals

    //==========================================================================================
    function NewTimer takes nothing returns timer
        if (tN==0) then
            set tT[0]=CreateTimer()
        else
            set tN=tN-1
        endif
        call SetTimerData(tT[tN],0)
     return tT[tN]
    endfunction

    //==========================================================================================
    function ReleaseTimer takes timer t returns nothing
        if(t==null) then
            debug call BJDebugMsg("Warning: attempt to release a null timer")
            return
        endif
        if (tN==8191) then
            debug call BJDebugMsg("Warning: Timer stack is full, destroying timer!!")

            //stack is full, the map already has much more troubles than the chance of bug
            call DestroyTimer(t)
        else
            call PauseTimer(t)
            if(GetTimerData(t)==HELD) then
                debug call BJDebugMsg("Warning: ReleaseTimer: Double free!")
                return
            endif
            call SetTimerData(t,HELD)
            set tT[tN]=t
            set tN=tN+1
        endif    
    endfunction

endlibrary
trig
Events
Player - Player 1 (Red) types a chat message containing -lvlmax (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Hero - Set Dark Soul 0036 <gen> Hero-level to 10 , Show level-up graphics
trig2
Events
Map initialization
Conditions
Actions
Game - Set the time of day to 12
trig3
Events
Player - Player 1 (Red) types a chat message containing -cd (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Unit - Reset ability cooldowns for Dark Soul 0036 <gen> .
trig4
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Not equal to Dummy2
(Unit-type of (Triggering unit)) Not equal to Dummy3
(Unit-type of (Triggering unit)) Not equal to Dummy
Actions
Wait 8.00 seconds
Set Variable Set do_not_copy_me = (Random point in (Playable map area))
Unit - Create 1 . (Unit-type of (Triggering unit)) for (Owner of (Triggering unit)) at do_not_copy_me facing (Random angle) degrees
Custom script: call RemoveLocation(udg_do_not_copy_me)
trig5
Events
Time - Elapsed game time is 0.33 seconds
Conditions
Actions
Game - Display to (All players) the text: |cffffff00(Notice:)|r If a unit dies (you included) it will respawn after 8 seconds.Use the fountains located in the lower right corner to renew mp/hp
Visibility - Create an initially Enabled visibility modifier for Player 1 (Red) emitting Visibility across (Playable map area)
Top