• 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

Mega Flare V1.15.w3x
Variables
Mega Flare
Information
Mega Flare Configuration
Mega Flare
Mega Flare Loop
Enter map-specific custom script code below. This text will be included in the map script after variables are declared and before any trigger code.
Name Type is_array initial_value
ActiveStars integer No
Angle real No
AscentHeight real No
AscentSpeed real No
Distance real No
ExplosionLayersBase integer No
ExplosionLayersPerlevel integer No
ExplosionProjectileHeightMutli real No
ExplosionRadius real No
ExplosionRadiusCurrent real No
ExplosionSidesBase integer No
ExplosionSidesPerLevel integer No
FlareSegmentGroup group No
FlareStarHash hashtable No
ProjectileSpeed real No
SpinSpeed real No
SpreadSpeed real No
Star_Loop integer No
Star_Loop_2 integer No
StarSegmentAOEDamageBase real No
StarSegmentAOEDamagePerlevel real No
StarSidesBase integer No
StarSidesPerLevel integer No
StarSize real No
TempGroup group No
TempPoint location No
TempPoint2 location No
u unit No
UHandle integer No
X real Yes
Y real Yes
Creator: Tank-Commander
Credits: None
Requested by: None
Purpose: Low-level basic spell to be used by a spellcaster hero - appealing looks while still having purpose.

Credits must be given to Tank-Commander if you use this.
Modification is allowed but only for private use - do not re-release a modified version of this spell.

=Preparing for import=
Go to:
File
Preferances
General
Check the box labeled 'Automatically create unknown variables while pasting trigger data'

This will mean you will not have to create all the variables and save you a large amount of time.

=Speeding up import of object data-
Go to:
Window
make sure the 'brush list' is unchecked.
If there is a tick symbol next to the word, then it is checked - click on it to uncheck it.

=Main importing=
In order of importing:
Object data - Spell - Mega Flare
Object data - Unit - Flare Section
Trigger Data - Folder - Mega Flare

=Modification=
All Modifications should be done in the Configuration Trigger, each configuration is explained.
Mega Flare Configuration
Events
Map initialization
Conditions
Actions
-------- Do not touch --------
Hashtable - Create a hashtable
Set Variable Set FlareStarHash = (Last created hashtable)
-------- --------------------- --------
-------- Configurables --------
-------- How many sides there are to the star --------
Set Variable Set StarSidesBase = "5"
Set Variable Set StarSidesPerLevel = "1"
-------- How many sides there are to the star --------
Set Variable Set StarSegmentAOEDamageBase = "10.00"
Set Variable Set StarSegmentAOEDamagePerlevel = "5.00"
-------- Size of the star --------
Set Variable Set StarSize = "400.00"
-------- Revolution speed --------
Set Variable Set SpinSpeed = "4.00"
-------- Height increase speed --------
Set Variable Set AscentSpeed = "15.00"
-------- Maxmimum achieved height --------
Set Variable Set AscentHeight = "700.00"
-------- Star Expanding Speed --------
Set Variable Set SpreadSpeed = "2.00"
-------- Star Explosion Sides --------
Set Variable Set ExplosionSidesBase = "4"
Set Variable Set ExplosionSidesPerLevel = "2"
-------- Explosion Radius Base --------
Set Variable Set ExplosionRadius = "200.00"
-------- Star Explosion Layers --------
Set Variable Set ExplosionLayersBase = "1"
Set Variable Set ExplosionLayersPerlevel = "1"
-------- Explosion projectile max height multiplyer --------
Set Variable Set ExplosionProjectileHeightMutli = "2.50"
-------- Explosion projectile speed --------
Set Variable Set ProjectileSpeed = "5.00"
-------- --------------------- --------
Mega Flare
Events
Unit - A unit Begins channeling an ability
Conditions
(Ability being cast) Equal to Mega Flare
Actions
Trigger - Turn on Mega_Flare_Loop <gen>
Set Variable Set u = (Triggering unit)
Custom script: set udg_X[1] = GetSpellTargetX()
Custom script: set udg_Y[1] = GetSpellTargetY()
Hashtable - Save 1 as 14 of (Key (Triggering unit).) in FlareStarHash .
For each (Integer Star_Loop ) from 1 to (StarSidesBase + ((Level of Mega Flare for (Triggering unit)) x StarSidesPerLevel)) , do (Actions)
Loop - Actions
Set Variable Set Angle = (Angle + (360.00 / ((Real(StarSidesBase)) + ((Real(StarSidesPerLevel)) x (Real((Level of Mega Flare for (Triggering unit))))))))
Custom script: set udg_X[2] = udg_X[1] + udg_StarSize * Cos(udg_Angle * bj_DEGTORAD)
Custom script: set udg_Y[2] = udg_Y[1] + udg_StarSize * Sin(udg_Angle * bj_DEGTORAD)
Set Variable Set TempPoint = (Point(X[1], Y[1]))
Set Variable Set TempPoint2 = (Point(X[2], Y[2]))
Unit - Create 1 . Flare Section for (Owner of u) at TempPoint2 facing (Angle from TempPoint to TempPoint2) degrees
Custom script: call RemoveLocation(udg_TempPoint2)
Custom script: call RemoveLocation(udg_TempPoint)
Set Variable Set UHandle = (Key (Last created unit).)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 14 of (Key (Triggering unit).) from FlareStarHash.) Equal to 1
Then - Actions
Hashtable - Save 1 as 14 of UHandle in FlareStarHash .
Hashtable - Save 0 as 14 of (Key (Triggering unit).) in FlareStarHash .
Else - Actions
Unit Group - Add (Last created unit) to FlareSegmentGroup
-------- Star Stage Indicator --------
Hashtable - Save 1 as 1 of UHandle in FlareStarHash .
-------- Original Unit Indicator --------
Hashtable - Save Handle Of u as 2 of UHandle in FlareStarHash .
-------- CentralPointIndicators --------
Hashtable - Save X[1] as 3 of UHandle in FlareStarHash .
Hashtable - Save Y[1] as 4 of UHandle in FlareStarHash .
-------- CurrentAngleIndicator --------
Hashtable - Save Angle as 5 of UHandle in FlareStarHash .
-------- CurrentSizeIndicator --------
Hashtable - Save StarSize as 8 of UHandle in FlareStarHash .
-------- Explosion Layers --------
Hashtable - Save (ExplosionLayersBase + (ExplosionLayersPerlevel x (Level of Mega Flare for u))) as 9 of UHandle in FlareStarHash .
Hashtable - Save (ExplosionSidesBase + (ExplosionSidesPerLevel x (Level of Mega Flare for u))) as 15 of UHandle in FlareStarHash .
-------- --------------------- --------
Mega Flare Loop
Events
Time - Every 0.03 seconds of game time
Conditions
Actions
Unit Group - Pick every unit in FlareSegmentGroup and do (Actions)
Loop - Actions
Set Variable Set UHandle = (Key (Picked unit).)
-------- Star Stage 1 - Ascent --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 1 of UHandle from FlareStarHash.) Equal to 1
Then - Actions
Hashtable - Save ((Load 5 of UHandle from FlareStarHash.) + SpinSpeed) as 5 of UHandle in FlareStarHash .
Hashtable - Save ((Load 8 of UHandle from FlareStarHash.) + SpreadSpeed) as 8 of UHandle in FlareStarHash .
Set Variable Set Angle = (Load 5 of UHandle from FlareStarHash.)
Set Variable Set X[1] = (Load 3 of UHandle from FlareStarHash.)
Set Variable Set Y[1] = (Load 4 of UHandle from FlareStarHash.)
Set Variable Set Distance = (Load 8 of UHandle from FlareStarHash.)
Custom script: call SetUnitX(GetEnumUnit(), udg_X[1] + udg_Distance * Cos(udg_Angle * bj_DEGTORAD))
Custom script: call SetUnitY(GetEnumUnit(), udg_Y[1] + udg_Distance * Sin(udg_Angle * bj_DEGTORAD))
Hashtable - Save ((Load 6 of UHandle from FlareStarHash.) + AscentSpeed) as 6 of UHandle in FlareStarHash .
Animation - Change (Picked unit) flying height to (Load 6 of UHandle from FlareStarHash.) at 0.00
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 6 of UHandle from FlareStarHash.) Greater than or equal to AscentHeight
Then - Actions
Hashtable - Save 2 as 1 of UHandle in FlareStarHash .
Else - Actions
Else - Actions
-------- Star Stage 2 - Decent --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 1 of UHandle from FlareStarHash.) Equal to 2
Then - Actions
Hashtable - Save ((Load 5 of UHandle from FlareStarHash.) + SpinSpeed) as 5 of UHandle in FlareStarHash .
Hashtable - Save ((Load 8 of UHandle from FlareStarHash.) - (SpreadSpeed x 10.00)) as 8 of UHandle in FlareStarHash .
Set Variable Set Angle = (Load 5 of UHandle from FlareStarHash.)
Set Variable Set X[1] = (Load 3 of UHandle from FlareStarHash.)
Set Variable Set Y[1] = (Load 4 of UHandle from FlareStarHash.)
Set Variable Set Distance = (Load 8 of UHandle from FlareStarHash.)
Custom script: call SetUnitX(GetEnumUnit(), udg_X[1] + udg_Distance * Cos(udg_Angle * bj_DEGTORAD))
Custom script: call SetUnitY(GetEnumUnit(), udg_Y[1] + udg_Distance * Sin(udg_Angle * bj_DEGTORAD))
Hashtable - Save ((Load 6 of UHandle from FlareStarHash.) - (AscentSpeed x 1.50)) as 6 of UHandle in FlareStarHash .
Animation - Change (Picked unit) flying height to (Load 6 of UHandle from FlareStarHash.) at 0.00
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 8 of UHandle from FlareStarHash.) Less than 0.00
Then - Actions
Unit - Kill (Picked unit)
Unit Group - Remove (Picked unit) from FlareSegmentGroup .
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 14 of UHandle from FlareStarHash.) Equal to 1
Then - Actions
Hashtable - Save 0 as 14 of UHandle in FlareStarHash .
For each (Integer Star_Loop ) from 1 to (Load 15 of UHandle from FlareStarHash.) , do (Actions)
Loop - Actions
Set Variable Set Angle = (Angle + (360.00 / (Real((Load 15 of UHandle from FlareStarHash.)))))
Set Variable Set ExplosionRadiusCurrent = ExplosionRadius
For each (Integer Star_Loop_2 ) from 1 to (Load 9 of UHandle from FlareStarHash.) , do (Actions)
Loop - Actions
Set Variable Set TempPoint = (Point(X[1], Y[1]))
Unit - Create 1 . Flare Section for (Owner of (Picked unit)) at TempPoint facing Angle degrees
Custom script: set udg_X[2] = udg_X[1] + udg_ExplosionRadiusCurrent * Cos(udg_Angle * bj_DEGTORAD)
Custom script: set udg_Y[2] = udg_Y[1] + udg_ExplosionRadiusCurrent * Sin(udg_Angle * bj_DEGTORAD)
Set Variable Set TempPoint2 = (Point(X[2], Y[2]))
Hashtable - Save (Distance between TempPoint and TempPoint2) as 10 of (Key (Last created unit).) in FlareStarHash .
Custom script: call RemoveLocation(udg_TempPoint2)
Custom script: call RemoveLocation(udg_TempPoint)
Hashtable - Save ((Load 10 of (Key (Last created unit).) from FlareStarHash.) x ExplosionProjectileHeightMutli) as 11 of (Key (Last created unit).) in FlareStarHash .
Set Variable Set ExplosionRadiusCurrent = (ExplosionRadiusCurrent + 100.00)
Hashtable - Save 3 as 1 of (Key (Last created unit).) in FlareStarHash .
Hashtable - Save Handle Of (Load 2 of UHandle in FlareStarHash.) as 2 of (Key (Last created unit).) in FlareStarHash .
Unit Group - Add (Last created unit) to FlareSegmentGroup
Else - Actions
Else - Actions
Else - Actions
-------- Star Stage 3 - Explosion --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 1 of UHandle from FlareStarHash.) Equal to 3
Then - Actions
Set Variable Set u = (Picked unit)
Set Variable Set Angle = (Facing of u)
Set Variable Set Distance = ProjectileSpeed
Custom script: set udg_X[1] = GetUnitX(udg_u)
Custom script: set udg_Y[1] = GetUnitY(udg_u)
Custom script: call SetUnitX(udg_u, udg_X[1] + udg_Distance * Cos(udg_Angle * bj_DEGTORAD))
Custom script: call SetUnitY(udg_u, udg_Y[1] + udg_Distance * Sin(udg_Angle * bj_DEGTORAD))
Hashtable - Save ((Load 12 of UHandle from FlareStarHash.) + Distance) as 12 of UHandle in FlareStarHash .
Hashtable - Save (((4.00 x (Load 11 of UHandle from FlareStarHash.)) / (Load 10 of UHandle from FlareStarHash.)) x (((Load 12 of UHandle from FlareStarHash.) / (Load 10 of UHandle from FlareStarHash.)) x ((Load 10 of UHandle from FlareStarHash.) - (Load 12 of UHandle from FlareStarHash.)))) as 13 of UHandle in FlareStarHash .
Animation - Change u flying height to (Load 13 of UHandle from FlareStarHash.) at 0.00
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Load 13 of UHandle from FlareStarHash.) Less than 0.00
Then - Actions
Unit - Kill (Picked unit)
Custom script: set udg_X[1] = GetUnitX(udg_u)
Custom script: set udg_Y[1] = GetUnitY(udg_u)
Set Variable Set TempPoint = (Point(X[1], Y[1]))
Special Effect - Create a special effect at TempPoint using Abilities\Spells\Other\Incinerate\FireLordDeathExplode.mdl
Custom script: call RemoveLocation(udg_TempPoint)
Special Effect - Destroy (Last created special effect)
Set Variable Set TempPoint2 = (Position of (Picked unit))
Set Variable Set TempGroup = (Units within 100.00 of TempPoint2 matching (((((Matching unit) is alive) Equal to True) and (((Matching unit) belongs to an enemy of (Owner of (Load 2 of UHandle in FlareStarHash.)).) Equal to True)) and ((((Matching unit) is Magic Immune) Equal to False) and (((Current flying height of (Matching unit)) Greater than or equal to ((Current flying height of (Picked unit)) - 100.00)) and ((Current flying height of (Matching unit)) Less than or equal to ((Current flying height of (Picked unit)) + 100.00))))).)
Custom script: call RemoveLocation(udg_TempPoint2)
Unit Group - Pick every unit in TempGroup and do (Actions)
Loop - Actions
Unit - Cause (Load 2 of UHandle in FlareStarHash.) to damage (Picked unit) , dealing ((StarSegmentAOEDamageBase x 5.00) + ((StarSegmentAOEDamagePerlevel x 5.00) x (Real((Level of Mega Flare for (Load 2 of UHandle in FlareStarHash.)))))) damage of attack type Spells and damage type Normal
Custom script: call DestroyGroup(udg_TempGroup)
Unit Group - Remove (Picked unit) from FlareSegmentGroup .
If ((Number of units in FlareSegmentGroup) Equal to 0) then do (Turn off (This trigger)) else do (Do nothing)
Else - Actions
Else - Actions
Set Variable Set TempPoint2 = (Position of (Picked unit))
Set Variable Set TempGroup = (Units within 100.00 of TempPoint2 matching (((((Matching unit) is alive) Equal to True) and (((Matching unit) belongs to an enemy of (Owner of (Load 2 of UHandle in FlareStarHash.)).) Equal to True)) and ((((Matching unit) is Magic Immune) Equal to False) and (((Current flying height of (Matching unit)) Greater than or equal to ((Current flying height of (Picked unit)) - 100.00)) and ((Current flying height of (Matching unit)) Less than or equal to ((Current flying height of (Picked unit)) + 100.00))))).)
Custom script: call RemoveLocation(udg_TempPoint2)
Unit Group - Pick every unit in TempGroup and do (Actions)
Loop - Actions
Unit - Cause (Load 2 of UHandle in FlareStarHash.) to damage (Picked unit) , dealing (StarSegmentAOEDamageBase + (StarSegmentAOEDamagePerlevel x (Real((Level of Mega Flare for (Load 2 of UHandle in FlareStarHash.)))))) damage of attack type Spells and damage type Normal
Custom script: call DestroyGroup(udg_TempGroup)
Top