• 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

Esdo's Dwarven Grenade spell v1.2a.w3x
Variables
RespawnCreeps
Respawn
DwarvenGrenade
INSTALLATION INSTRUCTIONS
DwarvenGrenadeConfig
DwarvenGrenadeAct
DwarvenGrenadeFollow
DwarvenGrenadeTimer
DwarvenGrenadeBoom
DwarvenGrenadeArc
DwarvenGrenadeLoop
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
BS integervar No
BS_Angle real Yes
BS_AoE boolean Yes
BS_AoE_Radius real Yes
BS_ArcHeight real Yes
BS_Colision real Yes
BS_Damage real Yes
BS_Debug real Yes
BS_DebugZ real Yes
BS_DistanceToTravel real Yes
BS_Group group Yes
BS_Hero unit Yes
BS_HYPSpeed real Yes
BS_Level integer Yes
BS_MaxDistance real Yes
BS_MC integervar No
BS_Missile unit Yes
BS_MissileCount integer No
BS_On boolean Yes
BS_Parabola real Yes
BS_Point location Yes
BS_Range real Yes
BS_Skip integer No
BS_Speed real Yes
BS_SpeedZ real Yes
BS_StartZ real Yes
BS_Times integer No
BS_Up boolean Yes
DwarvenGrenade_BlastPoint location No
DwarvenGrenade_Bomb unit Yes
DwarvenGrenade_Caster unit Yes
DwarvenGrenade_CasterPoint location No
DwarvenGrenade_Damage real No
DwarvenGrenade_DmgLvL real No
DwarvenGrenade_FollowPoint location No
DwarvenGrenade_Index integer No
DwarvenGrenade_IsPrimed boolean Yes
DwarvenGrenade_Level integer Yes
DwarvenGrenade_LoopInteger integer No
DwarvenGrenade_ManaBefore real No
DwarvenGrenade_PrimeText texttag No
DwarvenGrenade_TextPoint location No
DwarvenGrenade_Thrown boolean Yes
DwarvenGrenade_Timer real Yes
Respawns killed "Forest Troll Warlord" at the location of death.
Respawn
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to Forest Troll Warlord
Actions
Unit - Create 1 . Forest Troll Warlord for Neutral Hostile at (Position of (Triggering unit)) facing Default building facing degrees
So, want to use this spell on your map?

All right - 6 simple steps:

1 - On your World Editor, go Files - Preferences... and check the button "Automatically create unknown variables while pasting trigger data.

2 - Still on that window, go to the "Test Map" label and unmark "Use fixed random seed".

3 - Copy both abilities to your map ( "Dwarven Grenade" and "Shoot Grenade" ).

4 - Copy the "Grenade" unit to your map.

5- Copy this trigger folder "DwarvenGrenade" to your map.

6 - Done! Now you just gotta give a unit the "Dwarven Grenade" ability,

PLEASE! If you use this spell, give me credit!
DwarvenGrenadeConfig
Events
Map initialization
Conditions
Actions
-------- DmgLvL is the extra amount of damage dealt per spell level. --------
Set Variable Set DwarvenGrenade_Damage = "500.00"
Set Variable Set DwarvenGrenade_DmgLvL = "100.00"
This is the INIT trigger. It checks whenever a unit casts the "Dwarven Grenade" spell and gives that spell an unique ID (DwarvenGrenade_Index). This also spawns the grenade, and sets the fuse timer to a random value.
DwarvenGrenadeAct
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Dwarven Grenade
Actions
Set Variable Set DwarvenGrenade_Index = (DwarvenGrenade_Index + 1)
Set Variable Set DwarvenGrenade_Caster[DwarvenGrenade_Index] = (Triggering unit)
Set Variable Set DwarvenGrenade_CasterPoint = (Position of DwarvenGrenade_Caster[DwarvenGrenade_Index])
Set Variable Set DwarvenGrenade_IsPrimed[DwarvenGrenade_Index] = "true"
Set Variable Set DwarvenGrenade_Level[DwarvenGrenade_Index] = (Level of Dwarven Grenade for DwarvenGrenade_Caster[DwarvenGrenade_Index])
Unit - Remove Dwarven Grenade from DwarvenGrenade_Caster[DwarvenGrenade_Index]
Unit - Add Shoot Grenade to DwarvenGrenade_Caster[DwarvenGrenade_Index]
Unit - Create 1 . Grenade for (Owner of DwarvenGrenade_Caster[DwarvenGrenade_Index]) at DwarvenGrenade_CasterPoint facing Default building facing degrees
Set Variable Set DwarvenGrenade_Bomb[DwarvenGrenade_Index] = (Last created unit)
Set Variable Set DwarvenGrenade_Thrown[DwarvenGrenade_Index] = "false"
Set Variable Set DwarvenGrenade_Timer[DwarvenGrenade_Index] = (Real((Random integer number between 4 and 10)))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(DwarvenGrenadeFollow <gen> is on) Equal to False
Then - Actions
Trigger - Turn on DwarvenGrenadeFollow <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(DwarvenGrenadeTimer <gen> is on) Equal to False
Then - Actions
Trigger - Turn on DwarvenGrenadeTimer <gen>
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(DwarvenGrenadeBoom <gen> is on) Equal to False
Then - Actions
Trigger - Turn on DwarvenGrenadeBoom <gen>
Else - Actions
Custom script: call RemoveLocation (udg_DwarvenGrenade_CasterPoint)
This is a loop that checks if the grenade was thrown with the "Shoot Grenade" spell. If it wasn't, it will follow its owner.
DwarvenGrenadeFollow
Events
Time - Every 0.10 seconds of game time
Conditions
Actions
For each (Integer DwarvenGrenade_LoopInteger ) from 1 to DwarvenGrenade_Index , do (Actions)
Loop - Actions
Game - Display to (All players) the text: follow
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DwarvenGrenade_Thrown[DwarvenGrenade_LoopInteger] Equal to False
Then - Actions
Set Variable Set DwarvenGrenade_FollowPoint = (Position of DwarvenGrenade_Caster[DwarvenGrenade_LoopInteger])
Unit - Move DwarvenGrenade_Bomb[DwarvenGrenade_LoopInteger] instantly to DwarvenGrenade_FollowPoint
Custom script: call RemoveLocation (udg_DwarvenGrenade_FollowPoint)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DwarvenGrenade_Index Equal to 0
Then - Actions
Trigger - Turn off (This trigger)
Else - Actions
Simple trigger to show text above the grenade. Shows fuse timer remaining before explosion.
DwarvenGrenadeTimer
Events
Time - Every 0.50 seconds of game time
Conditions
Actions
For each (Integer DwarvenGrenade_LoopInteger ) from 1 to DwarvenGrenade_Index , do (Actions)
Loop - Actions
Game - Display to (All players) the text: timer
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DwarvenGrenade_Timer[DwarvenGrenade_LoopInteger] Greater than 0.00
Then - Actions
Set Variable Set DwarvenGrenade_Timer[DwarvenGrenade_LoopInteger] = (DwarvenGrenade_Timer[DwarvenGrenade_LoopInteger] - 0.50)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DwarvenGrenade_Timer[DwarvenGrenade_LoopInteger] Greater than 0.00
Then - Actions
Floating Text - Create floating text that reads (String(DwarvenGrenade_Timer[DwarvenGrenade_LoopInteger], 1, 2)) above DwarvenGrenade_Bomb[DwarvenGrenade_LoopInteger] with Z offset 0 , using font size 12.00 , color ( 100.00 %, 0.00 %, 0.00 %), and 0 % transparency
Set Variable Set DwarvenGrenade_PrimeText = (Last created floating text)
Floating Text - Set the velocity of DwarvenGrenade_PrimeText to 70.00 towards 110.00 degrees
Floating Text - Change DwarvenGrenade_PrimeText : Disable permanence
Floating Text - Change the fading age of DwarvenGrenade_PrimeText to 0.20 seconds
Floating Text - Change the lifespan of DwarvenGrenade_PrimeText to 0.40 seconds
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DwarvenGrenade_Index Equal to 0
Then - Actions
Trigger - Turn off (This trigger)
Else - Actions
BOOM!

This is the trigger that explodes the grenade.
DwarvenGrenadeBoom
Events
Time - Every 0.10 seconds of game time
Conditions
Actions
For each (Integer DwarvenGrenade_LoopInteger ) from 1 to DwarvenGrenade_Index , do (Actions)
Loop - Actions
Game - Display to (All players) the text: boom
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(DwarvenGrenade_Bomb[DwarvenGrenade_LoopInteger] is alive) Equal to True
DwarvenGrenade_Timer[DwarvenGrenade_LoopInteger] Less than or equal to 0.00
Then - Actions
Set Variable Set DwarvenGrenade_IsPrimed[DwarvenGrenade_LoopInteger] = "false"
Set Variable Set DwarvenGrenade_BlastPoint = (Position of DwarvenGrenade_Bomb[DwarvenGrenade_LoopInteger])
Unit - Kill DwarvenGrenade_Bomb[DwarvenGrenade_LoopInteger]
Custom script: set bj_wantDestroyGroup = true
Unit Group - Pick every unit in (Units within 512 of DwarvenGrenade_BlastPoint.) and do (Actions)
Loop - Actions
Unit - Cause DwarvenGrenade_Caster[DwarvenGrenade_LoopInteger] to damage (Picked unit) , dealing (DwarvenGrenade_Damage + (DwarvenGrenade_DmgLvL x (Real(DwarvenGrenade_Level[DwarvenGrenade_LoopInteger])))) damage of attack type Spells and damage type Normal
Special Effect - Create a special effect at DwarvenGrenade_BlastPoint using Abilities\Spells\Other\Doom\DoomDeath.mdl
Special Effect - Destroy (Last created special effect)
Unit - Remove Shoot Grenade from DwarvenGrenade_Caster[DwarvenGrenade_LoopInteger]
Unit - Add Dwarven Grenade to DwarvenGrenade_Caster[DwarvenGrenade_LoopInteger]
Unit - Set level of Dwarven Grenade for DwarvenGrenade_Caster[DwarvenGrenade_LoopInteger] to DwarvenGrenade_Level[DwarvenGrenade_LoopInteger]
Set Variable Set DwarvenGrenade_ManaBefore = (Mana of DwarvenGrenade_Caster[DwarvenGrenade_LoopInteger])
Unit - Set mana of DwarvenGrenade_Caster[DwarvenGrenade_LoopInteger] to 100 %
Trigger - Turn off DwarvenGrenadeAct <gen>
Unit - Order DwarvenGrenade_Caster[DwarvenGrenade_LoopInteger] to Orc Troll Berserker - Berserk .
Trigger - Turn on DwarvenGrenadeAct <gen>
Unit - Set mana of DwarvenGrenade_Caster[DwarvenGrenade_LoopInteger] to DwarvenGrenade_ManaBefore
Set Variable Set DwarvenGrenade_Bomb[DwarvenGrenade_LoopInteger] = DwarvenGrenade_Bomb[DwarvenGrenade_Index]
Set Variable Set DwarvenGrenade_Caster[DwarvenGrenade_LoopInteger] = DwarvenGrenade_Caster[DwarvenGrenade_Index]
Set Variable Set DwarvenGrenade_IsPrimed[DwarvenGrenade_LoopInteger] = DwarvenGrenade_IsPrimed[DwarvenGrenade_Index]
Set Variable Set DwarvenGrenade_Thrown[DwarvenGrenade_LoopInteger] = DwarvenGrenade_Thrown[DwarvenGrenade_Index]
Set Variable Set DwarvenGrenade_Timer[DwarvenGrenade_LoopInteger] = DwarvenGrenade_Timer[DwarvenGrenade_Index]
Set Variable Set DwarvenGrenade_Index = (DwarvenGrenade_Index - 1)
Set Variable Set DwarvenGrenade_LoopInteger = (DwarvenGrenade_LoopInteger - 1)
Custom script: call RemoveLocation (udg_DwarvenGrenade_BlastPoint)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DwarvenGrenade_Index Equal to 0
Then - Actions
Trigger - Turn off (This trigger)
Else - Actions
This trigger sets um the acr trajectory of the grenade after it was thrown.
DwarvenGrenadeArc
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Shoot Grenade
Actions
Custom script: local real Hyp
Custom script: local real SINE
Custom script: local real COSINE
Custom script: local real End_Z
Custom script: local real Distance
Custom script: local real Height
For each (Integer DwarvenGrenade_LoopInteger ) from 1 to DwarvenGrenade_Index , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Triggering unit) Equal to DwarvenGrenade_Caster[DwarvenGrenade_LoopInteger]
DwarvenGrenade_Thrown[DwarvenGrenade_LoopInteger] Equal to False
Then - Actions
Set Variable Set DwarvenGrenade_Thrown[DwarvenGrenade_LoopInteger] = "true"
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
BS_Skip Equal to 0
Then - Actions
Trigger - Turn on DwarvenGrenadeLoop <gen>
Else - Actions
Set Variable Set BS_Point[0] = (Position of (Triggering unit))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
DwarvenGrenade_Thrown[(Integer A)] Equal to True
Then - Actions
Else - Actions
Set Variable Set BS_Point[1] = (Target point of ability being cast)
Set Variable Set BS_Point[2] = (BS_Point[0] offset by 70.00 towards (Angle from BS_Point[0] to BS_Point[1]) degrees.)
Set Variable Set BS_MissileCount = "1"
For each (Integer BS_MC ) from 1 to BS_MissileCount , do (Actions)
Loop - Actions
Set Variable Set BS_Skip = (BS_Skip + 1)
Set Variable Set BS_Times = (BS_Times + 1)
Set Variable Set BS_On[BS_Times] = "true"
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Set Variable Set BS_Hero[BS_Times] = (Triggering unit)
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Set Variable Set BS_Angle[BS_Times] = (Angle from BS_Point[0] to BS_Point[1])
Set Variable Set BS_MaxDistance[BS_Times] = (Distance between BS_Point[1] and BS_Point[2])
Set Variable Set BS_DistanceToTravel[BS_Times] = BS_MaxDistance[BS_Times]
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- Height of Arc is a fourth of range. if you will set this to a number and not a portion of distance, then missile will fly too high --------
-------- at short distances and this will create a feel like it moves faster than usual. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Set Variable Set BS_ArcHeight[BS_Times] = (BS_MaxDistance[BS_Times] x 0.25)
Set Variable Set BS_Level[BS_Times] = (Level of Shoot Grenade for (Triggering unit))
Set Variable Set BS_Damage[BS_Times] = ((Random real number between 150.00 and 200.00) + (50.00 x (Real(BS_Level[BS_Times]))))
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- Change Area of Effect variable to true, if you want missile to hit multiple targets. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Set Variable Set BS_AoE[BS_Times] = "false"
Set Variable Set BS_AoE_Radius[BS_Times] = "150.00"
Set Variable Set BS_Range[BS_Times] = "1500.00"
Set Variable Set BS_Colision[BS_Times] = "75.00"
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- Change 60 to unit "height" (not flying) to make caster aim in head. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Custom script: set udg_BS_StartZ[udg_BS_Times] = GetLocationZ(udg_BS_Point[0]) + 55
Custom script: set End_Z = GetLocationZ(udg_BS_Point[1])
Custom script: set Distance = DistanceBetweenPoints(udg_BS_Point[2],udg_BS_Point[1])
Custom script: if udg_BS_StartZ[udg_BS_Times] >= End_Z then
Custom script: set udg_BS_Up[udg_BS_Times] = false
Custom script: set End_Z = ( End_Z + GetRandomReal(40.00, 85.00) )
Custom script: set Height = ( udg_BS_StartZ[udg_BS_Times] - End_Z )
Custom script: else
Custom script: set udg_BS_Up[udg_BS_Times] = true
Custom script: set End_Z = ( End_Z + GetRandomReal(60.00, 85.00) )
Custom script: set Height = ( End_Z - udg_BS_StartZ[udg_BS_Times] )
Custom script: endif
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- Lets check if missile fly up or down. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Custom script: set Hyp = SquareRoot(( ( Distance * Distance ) + ( Height * Height ) ))
Custom script: set SINE = ( Distance / Hyp )
Custom script: set COSINE = ( Height / Hyp )
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- HYPSpeed is hypotinuse movement per time interval. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Set Variable Set BS_HYPSpeed[BS_Times] = "40.00"
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- Because we know hypotinuse speed, SINE, COSINE, calculation of Height Speed and distance speed will calculate now. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Custom script: set udg_BS_Speed[udg_BS_Times] = ( udg_BS_HYPSpeed[udg_BS_Times] * SINE )
Custom script: set udg_BS_SpeedZ[udg_BS_Times] = ( udg_BS_HYPSpeed[udg_BS_Times] * COSINE )
Set Variable Set BS_Missile[BS_Times] = DwarvenGrenade_Bomb[DwarvenGrenade_LoopInteger]
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- In Object Data dummy unit have no movement type. Like that it will not change height when get close to trees and nautrial buildings. --------
-------- But it must to change height. Adding and Removing Storm Crown ability will help. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Unit - Add Storm Crow Form to (Last created unit)
Unit - Remove Storm Crow Form from (Last created unit)
Else - Actions
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- Cleaning leaks --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Custom script: call RemoveLocation ( udg_BS_Point[0] )
Custom script: call RemoveLocation ( udg_BS_Point[1] )
Custom script: call RemoveLocation ( udg_BS_Point[2] )
Same as above. Don't edit this trigger unless you know stuff.
DwarvenGrenadeLoop
Events
Time - Every 0.03 seconds of game time
Conditions
Actions
For each (Integer BS ) from 1 to BS_Times , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
BS_On[BS] Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
BS_Range[BS] Less than or equal to 0.00
Then - Actions
Set Variable Set BS_On[BS] = "false"
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- Starting Recycling Indexes --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
BS Less than BS_Times
Then - Actions
Set Variable Set BS_On[BS] = BS_On[BS_Times]
Set Variable Set BS_On[BS] = BS_On[BS_Times]
Set Variable Set BS_Missile[BS] = BS_Missile[BS_Times]
Set Variable Set BS_Hero[BS] = BS_Hero[BS_Times]
Set Variable Set BS_Range[BS] = BS_Range[BS_Times]
Set Variable Set BS_Speed[BS] = BS_Speed[BS_Times]
Set Variable Set BS_HYPSpeed[BS] = BS_HYPSpeed[BS_Times]
Set Variable Set BS_SpeedZ[BS] = BS_SpeedZ[BS_Times]
Set Variable Set BS_StartZ[BS] = BS_StartZ[BS_Times]
Set Variable Set BS_Damage[BS] = BS_Damage[BS_Times]
Set Variable Set BS_Angle[BS] = BS_Angle[BS_Times]
Set Variable Set BS_Colision[BS] = BS_Colision[BS_Times]
Set Variable Set BS_Level[BS] = BS_Level[BS_Times]
Set Variable Set BS_MaxDistance[BS] = BS_MaxDistance[BS_Times]
Set Variable Set BS_DistanceToTravel[BS] = BS_DistanceToTravel[BS_Times]
Set Variable Set BS_Parabola[BS] = BS_Parabola[BS_Times]
Set Variable Set BS_ArcHeight[BS] = BS_ArcHeight[BS_Times]
Set Variable Set BS_AoE[BS] = BS_AoE[BS_Times]
Set Variable Set BS_Up[BS] = BS_Up[BS_Times]
Else - Actions
Set Variable Set BS = (BS - 1)
Set Variable Set BS_Times = (BS_Times - 1)
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- End of Recycling Indexes --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Set Variable Set BS_Skip = (BS_Skip - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
BS_Skip Equal to 0
Then - Actions
Set Variable Set BS_Times = "0"
Trigger - Turn off (This trigger)
Else - Actions
Else - Actions
Set Variable Set BS_Point[3] = (Position of BS_Missile[BS])
Set Variable Set BS_Point[4] = (BS_Point[3] offset by BS_Speed[BS] towards BS_Angle[BS] degrees.)
Set Variable Set BS_DistanceToTravel[BS] = (BS_DistanceToTravel[BS] - BS_Speed[BS])
Unit - Move BS_Missile[BS] instantly to BS_Point[4]
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- If missile comes to black areas around map, than range seted to zero. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Playable map area) contains BS_Point[4]) Equal to False
Then - Actions
Set Variable Set BS_Range[BS] = "0.00"
Else - Actions
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- Missile traveled some range. Lets set remaining range. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Set Variable Set BS_Range[BS] = (BS_Range[BS] - BS_HYPSpeed[BS])
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- Need to check height of point where missile traveled to calculate debug height and make missile movement "real" --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Custom script: set udg_BS_DebugZ[udg_BS] = GetLocationZ(udg_BS_Point[4])
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- Height of missile will change at diferent way when it fly up/down. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
BS_Up[BS] Equal to False
Then - Actions
Set Variable Set BS_StartZ[BS] = (BS_StartZ[BS] - BS_SpeedZ[BS])
Else - Actions
Set Variable Set BS_StartZ[BS] = (BS_StartZ[BS] + BS_SpeedZ[BS])
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- Calculation of height that missile must have. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Set Variable Set BS_Parabola[BS] = (((4.00 x BS_ArcHeight[BS]) / BS_MaxDistance[BS]) x ((BS_MaxDistance[BS] - BS_DistanceToTravel[BS]) x (BS_DistanceToTravel[BS] / BS_MaxDistance[BS])))
Set Variable Set BS_Debug[BS] = ((BS_StartZ[BS] - BS_DebugZ[BS]) + BS_Parabola[BS])
Animation - Change BS_Missile[BS] flying height to BS_Debug[BS] at 0.00
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- Missile flying height is zero and it hit the ground. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
BS_Debug[BS] Less than or equal to 0.00
Then - Actions
Set Variable Set BS_Range[BS] = "0.00"
Else - Actions
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- Not zero yet? Pick units to damage someone. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Set Variable Set BS_Group[BS] = (Units within BS_Colision[BS] of BS_Point[4] matching (((((Matching unit) is A structure) Equal to False) and (((Matching unit) is Mechanical) Equal to False)) and (((((Matching unit) is Magic Immune) Equal to False) and (((Matching unit) is dead) Equal to False)) and ((((Matching unit) belongs to an ally of (Owner of BS_Hero[BS]).) Equal to False) and (((Matching unit) is A flying unit) Equal to False)))).)
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- Someone is picked, then deal damage. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in BS_Group[BS]) Greater than 0
Then - Actions
Unit Group - Pick every unit in (Random 1 units from BS_Group[BS]) and do (Actions)
Loop - Actions
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- I have seted height of unit to 85. It Must be diferent for units of diferent type. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
And - All (Conditions) are true
Conditions
BS_Debug[BS] Greater than or equal to 0.00
BS_Debug[BS] Less than or equal to 85.00
Then - Actions
Set Variable Set BS_Range[BS] = "0.00"
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- 75 to 85 is height of head of unit. Head may be diferent for all unit types. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
And - All (Conditions) are true
Conditions
BS_Debug[BS] Greater than or equal to 75.00
BS_Debug[BS] Less than or equal to 85.00
Then - Actions
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- Ten x damage at headshot! --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Floating Text - Create floating text that reads HEADSHOT! at BS_Point[3] with Z offset 120.00 , using font size 15.00 , color ( 100.00 %, 50.00 %, 50.00 %), and 0 % transparency
Floating Text - Set the velocity of (Last created floating text) to 100.00 towards BS_Angle[BS] degrees
Floating Text - Change (Last created floating text) : Disable permanence
Floating Text - Change the lifespan of (Last created floating text) to 3.00 seconds
Floating Text - Change the fading age of (Last created floating text) to 2.00 seconds
Else - Actions
Else - Actions
Else - Actions
Custom script: call DestroyGroup ( udg_BS_Group[udg_BS] )
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
-------- Kill leaks. --------
-------- ---------------------------------------------------------------------------------------------------------------------------------------------------------- --------
Custom script: call RemoveLocation ( udg_BS_Point[3] )
Custom script: call RemoveLocation ( udg_BS_Point[4] )
Else - Actions
Top