Moderator
M
Moderator
15:36, 25th Oct 2012
Magtheridon96: Approved.
Magtheridon96: Approved.
-
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.
[GUI]Timed Lightning v1.3
- Author(s)
- Almia
- Tags
- System, GUI / Triggers
- Size
- 23.55 KB
- Rating
- Downloads
- 1946
- Created
- Oct 21, 2012
- Updated
- Nov 15, 2016
- Resources
- 1
- State
Approved
This bundle is marked as recommended. It works and satisfies the submission rules.
Description
This is the timed lightning,this supports any lightning.
Features:
unit to unit
unit to point
point to point
destructable to unit
destructable to destructable.
To use:
Create timed lightning by calling call ExecuteFunc("CreateTimedLightning")
The Loop will move all the timed lightning
The temp fake source is used so that it will have different indexes instead of replacing any lightning and variables.
If you want the lightning to be created in a point by source or target,just make the boolean
SourceUnitIsALocation or TargetUnitIsALocation to true.
The configuration can be found inside the setup.
Dont touch the functions.
If you want a JASS version,here: Timed Light by Maker
[tab=Triggers]
System
Example Usage
Remove Dummies
-
Timed Lightning
-
Events
-
Map initialization
-
-
Conditions
-
Actions
-
Custom script: set udg_TL_Hash = InitHashtable()
-
-------- ----------------------------------- --------
-
-------- Lightning Codes --------
-
-------- ----------------------------------- --------
-
-------- Chain Lightning - Primary --------
-
Set TL_LightningType[1] = CLPB
-
-------- Chain Lightning - Secondary --------
-
Set TL_LightningType[2] = CLSB
-
-------- Healing Wave - Primary --------
-
Set TL_LightningType[3] = HWPB
-
-------- Healing Wave - Secondary --------
-
Set TL_LightningType[4] = HWSB
-
-------- Finger of Death --------
-
Set TL_LightningType[5] = AFOD
-
-------- Magic Leash/Aerial Shackles --------
-
Set TL_LightningType[6] = LEAS
-
-------- Drain Mana --------
-
Set TL_LightningType[7] = DRAM
-
-------- Drain Life --------
-
Set TL_LightningType[8] = DRAL
-
-------- Forked Lightning --------
-
Set TL_LightningType[9] = FORK
-
-------- Mana Burn --------
-
Set TL_LightningType[10] = MBUR
-
-------- Chimera Attack --------
-
Set TL_LightningType[11] = CHIM
-
-------- Mana Flare --------
-
Set TL_LightningType[12] = MFPB
-
-------- Spirit Link --------
-
Set TL_LightningType[13] = SPLK
-
Custom script: call ExecuteFunc("InitTimedLightning")
-
Custom script: endfunction
-
-------- ----------------------------------- --------
-
-------- This function destroys any kind of lightning,of course,depending on time or if a unit is dead --------
-
-------- call DestroyTimedLightning() as a key to destroy it. --------
-
-------- ----------------------------------- --------
-
Custom script: function DestroyTimedLightning takes nothing returns nothing
-
Lightning - Destroy TL_TempLightning
-
Hashtable - Clear all child hashtables of child TL_Key in TL_Hash
-
Unit Group - Remove TL_TempSource from TL_LoopGroup
-
Unit - Kill TL_TempSource
-
Custom script: endfunction
-
-------- ----------------------------------- --------
-
-------- This function creates the timed lightning --------
-
-------- Use call CreateTimedLightning --------
-
-------- ----------------------------------- --------
-
Custom script: function CreateTimedLightning takes nothing returns nothing
-
-------- ----------------------------------- --------
-
-------- Coordinates X,Y,Z --------
-
-------- ----------------------------------- --------
-
-------- ----------------------------------- --------
-
-------- Checks if a source unit is a location(via boolean) --------
-
-------- ----------------------------------- --------
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
If - Conditions
-
TL_IsSourceLocation Equal to True
-
-
Then - Actions
-
Custom script: set udg_TL_SourceZ = GetUnitFlyHeight(udg_TL_Source)
-
-
Else - Actions
-
Custom script: set udg_TL_SourceZ = GetUnitFlyHeight(udg_TL_Source) + 50
-
-
-
-------- ----------------------------------- --------
-
-------- Checks if a target unit is a location(via boolean) --------
-
-------- ----------------------------------- --------
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
If - Conditions
-
TL_IsTargetLocation Equal to True
-
-
Then - Actions
-
Custom script: set udg_TL_TargetZ = GetUnitFlyHeight(udg_TL_Target)
-
-
Else - Actions
-
Custom script: set udg_TL_TargetZ = GetUnitFlyHeight(udg_TL_Target) + 50
-
-
-
-------- ----------------------------------- --------
-
-------- X,Y of source and target --------
-
-------- ----------------------------------- --------
-
Custom script: set udg_TL_SourceX = GetUnitX(udg_TL_Source)
-
Custom script: set udg_TL_SourceY = GetUnitX(udg_TL_Source)
-
Custom script: set udg_TL_TargetX = GetUnitX(udg_TL_Target)
-
Custom script: set udg_TL_TargetY = GetUnitX(udg_TL_Target)
-
-------- ----------------------------------- --------
-
-------- Creating Lightning --------
-
-------- ----------------------------------- --------
-
Custom script: set udg_TL_Lightning = AddLightningEx(udg_TL_LCode,true,udg_TL_SourceX,udg_TL_SourceY,udg_TL_SourceZ,udg_TL_TargetX,udg_TL_TargetY,udg_TL_TargetZ)
-
-------- ----------------------------------- --------
-
-------- Colors --------
-
-------- ----------------------------------- --------
-
Lightning - Change color of TL_Lightning to (TL_Red TL_Green TL_Blue) with 1.00 alpha
-
-------- ----------------------------------- --------
-
-------- Save --------
-
-------- ----------------------------------- --------
-
Hashtable - Save Handle OfTL_Lightning as (Key Lightning) of TL_CastKey in TL_Hash
-
Hashtable - Save TL_MaxTime as (Key TempMaxTime) of TL_CastKey in TL_Hash
-
Hashtable - Save TL_StartTime as (Key Current) of TL_CastKey in TL_Hash
-
Hashtable - Save Handle OfTL_Target as (Key Target) of TL_CastKey in TL_Hash
-
Hashtable - Save Handle OfTL_FakeSource as (Key FakeSource) of TL_CastKey in TL_Hash
-
Hashtable - Save TL_SourceZ as (Key SourceHeight) of TL_CastKey in TL_Hash
-
Hashtable - Save TL_TargetZ as (Key TargetHeight) of TL_CastKey in TL_Hash
-
Hashtable - Save TL_Blue as (Key TempBlue) of TL_CastKey in TL_Hash
-
Hashtable - Save TL_Green as (Key TempRed) of TL_CastKey in TL_Hash
-
Hashtable - Save TL_Red as (Key TempRed) of TL_CastKey in TL_Hash
-
Unit Group - Add TL_Source to TL_LoopGroup
-
Custom script: endfunction
-
-------- ----------------------------------- --------
-
-------- This function moves lightning periodicallly --------
-
-------- ----------------------------------- --------
-
Custom script: function MoveTimedLightning takes nothing returns nothing
-
-------- ----------------------------------- --------
-
-------- Load --------
-
-------- ----------------------------------- --------
-
Set TL_TempTarget = (Load (Key Target) of TL_Key in TL_Hash)
-
Set TL_TempFakeSource = (Load (Key FakeSource) of TL_Key in TL_Hash)
-
Set TL_CurrentTime = (Load (Key Current) of TL_Key from TL_Hash)
-
Set TL_TempMaxTime = (Load (Key TempMaxTime) of TL_Key from TL_Hash)
-
Set TL_TempLightning = (Load (Key Lightning) of TL_Key in TL_Hash)
-
Set TL_TempSourceZ = (Load (Key SourceHeight) of TL_Key from TL_Hash)
-
Set TL_TempTargetZ = (Load (Key TargetHeight) of TL_Key from TL_Hash)
-
Set TL_TempBlue = (Load (Key TempBlue) of TL_Key from TL_Hash)
-
Set TL_TempGreen = (Load (Key TempGreen) of TL_Key from TL_Hash)
-
Set TL_TempRed = (Load (Key TempRed) of TL_Key from TL_Hash)
-
-------- ----------------------------------- --------
-
-------- Check if time is not ending --------
-
-------- ----------------------------------- --------
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
If - Conditions
-
TL_CurrentTime Greater than TL_TempMaxTime
-
-
Then - Actions
-
Custom script: call DestroyTimedLightning()
-
-
Else - Actions
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
If - Conditions
-
(TL_TempSource is alive) Equal to True
-
-
Then - Actions
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
If - Conditions
-
(TL_TempTarget is alive) Equal to True
-
-
Then - Actions
-
-------- ----------------------------------- --------
-
-------- Moving unit to the original caster(if not location) --------
-
-------- ----------------------------------- --------
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
If - Conditions
-
TL_TempFakeSource Not equal to No unit
-
-
Then - Actions
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
If - Conditions
-
(TL_TempFakeSource is dead) Equal to True
-
-
Then - Actions
-
Custom script: call DestroyTimedLightning()
-
-
Else - Actions
-
Custom script: call SetUnitX(udg_TL_TempSource,GetUnitX(udg_TL_TempFakeSource))
-
Custom script: call SetUnitY(udg_TL_TempSource,GetUnitY(udg_TL_TempFakeSource))
-
-
-
-
Else - Actions
-
-
-------- ----------------------------------- --------
-
-------- Coordinates --------
-
-------- ----------------------------------- --------
-
Custom script: set udg_TL_TempSourceX = GetUnitX(udg_TL_TempSource)
-
Custom script: set udg_TL_TempSourceY = GetUnitY(udg_TL_TempSource)
-
Custom script: set udg_TL_TempTargetX = GetUnitX(udg_TL_TempTarget)
-
Custom script: set udg_TL_TempTargetY = GetUnitY(udg_TL_TempTarget)
-
-------- ----------------------------------- --------
-
-------- Move Lightning --------
-
-------- ----------------------------------- --------
-
Custom script: call MoveLightningEx(udg_TL_TempLightning,true,udg_TL_TempSourceX,udg_TL_TempSourceY,udg_TL_TempSourceZ,udg_TL_TempTargetX,udg_TL_TempTargetY,udg_TL_TempTargetZ)
-
-------- ----------------------------------- --------
-
-------- Fade --------
-
-------- ----------------------------------- --------
-
Set TL_Fade = (TL_TempMaxTime - TL_CurrentTime)
-
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
-
If - Conditions
-
TL_Fade Less than 1.00
-
-
Then - Actions
-
Lightning - Change color of TL_TempLightning to (TL_TempRed TL_TempGreen TL_TempBlue) with TL_Fade alpha
-
-
Else - Actions
-
-
-------- ----------------------------------- --------
-
-------- Save --------
-
-------- ----------------------------------- --------
-
Hashtable - Save (TL_CurrentTime + 0.03) as (Key Current) of TL_Key in TL_Hash
-
-
Else - Actions
-
Custom script: call DestroyTimedLightning()
-
-
-
-
Else - Actions
-
Custom script: call DestroyTimedLightning()
-
-
-
-
-
Custom script: endfunction
-
Custom script: function TimedLightningLoop takes nothing returns nothing
-
Unit Group - Pick every unit in TL_LoopGroup and do (Actions)
-
Loop - Actions
-
Set TL_TempSource = (Picked unit)
-
Custom script: set udg_TL_Key = GetHandleId(udg_TL_TempSource)
-
Custom script: call ExecuteFunc("MoveTimedLightning")
-
-
-
Custom script: endfunction
-
Custom script: function InitTimedLightning takes nothing returns nothing
-
Custom script: local trigger t = GetTriggeringTrigger()
-
Custom script: call TriggerClearActions(t)
-
Custom script: call TriggerAddAction(t,function TimedLightningLoop)
-
Trigger - Add to (This trigger) the event (Time - Every 0.03 seconds of game time)
-
-
[trigger=]TL Cast
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Storm Bolt
Actions
Set TL_Caster = (Triggering unit)
Set TL_Point = (Position of TL_Caster)
Set TL_Owner = (Triggering player)
Set TL_Target = (Target unit of ability being cast)
-------- ------------------------------------ --------
-------- Creating Source --------
-------- ------------------------------------ --------
Unit - Create 1 Dummy for TL_Owner at TL_Point facing Default building facing degrees
Set TL_Source = (Last created unit)
Custom script: set udg_TL_CastKey = GetHandleId(udg_TL_Source)
Set TL_FakeSource = TL_Caster
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
TL_FakeSource Not equal to No unit
Then - Actions
Set TL_IsSourceLocation = False
Else - Actions
Set TL_IsSourceLocation = True
Unit - Add a TL_MaxTime second Generic expiration timer to TL_Caster
Set TL_StartTime = 0.00
-------- ------------------------------------ --------
-------- Used to create location target --------
-------- ------------------------------------ --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of TL_Target) Equal to Dummy
Then - Actions
Set TL_IsTargetLocation = True
Unit - Add a TL_MaxTime second Generic expiration timer to TL_Target
Else - Actions
Set TL_IsTargetLocation = False
Set TL_LCode = TL_LightningType[9]
Set TL_MaxTime = 5.00
-------- ----------------------------------- --------
-------- Color from 0.00 to 1.00 only --------
-------- ----------------------------------- --------
Set TL_Red = 1.00
Set TL_Green = 0.00
Set TL_Blue = 1.00
Custom script: call ExecuteFunc("CreateTimedLightning")
Custom script: call RemoveLocation(udg_TL_Point)
[/trigger]
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Storm Bolt
Actions
Set TL_Caster = (Triggering unit)
Set TL_Point = (Position of TL_Caster)
Set TL_Owner = (Triggering player)
Set TL_Target = (Target unit of ability being cast)
-------- ------------------------------------ --------
-------- Creating Source --------
-------- ------------------------------------ --------
Unit - Create 1 Dummy for TL_Owner at TL_Point facing Default building facing degrees
Set TL_Source = (Last created unit)
Custom script: set udg_TL_CastKey = GetHandleId(udg_TL_Source)
Set TL_FakeSource = TL_Caster
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
TL_FakeSource Not equal to No unit
Then - Actions
Set TL_IsSourceLocation = False
Else - Actions
Set TL_IsSourceLocation = True
Unit - Add a TL_MaxTime second Generic expiration timer to TL_Caster
Set TL_StartTime = 0.00
-------- ------------------------------------ --------
-------- Used to create location target --------
-------- ------------------------------------ --------
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of TL_Target) Equal to Dummy
Then - Actions
Set TL_IsTargetLocation = True
Unit - Add a TL_MaxTime second Generic expiration timer to TL_Target
Else - Actions
Set TL_IsTargetLocation = False
Set TL_LCode = TL_LightningType[9]
Set TL_MaxTime = 5.00
-------- ----------------------------------- --------
-------- Color from 0.00 to 1.00 only --------
-------- ----------------------------------- --------
Set TL_Red = 1.00
Set TL_Green = 0.00
Set TL_Blue = 1.00
Custom script: call ExecuteFunc("CreateTimedLightning")
Custom script: call RemoveLocation(udg_TL_Point)
[/trigger]
[trigger=]TL Remove Dummies
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to Dummy
Actions
Unit - Remove (Triggering unit) from the game
[/trigger]
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to Dummy
Actions
Unit - Remove (Triggering unit) from the game
[/trigger]
Bribe for the idea of functions based on his Knockback 2D
Magtheridon96 for explaining me how functions work.[/tab][tab=Changelogs]v1.0
-Released
v1.1
-Fixed Fading
v1.2
-Fixed some codes
-Now uses only one trigger for the setup and loop instead of three
v1.3
-Removed Configuration
-Removed Encapsulation(of course)
[/tab]
Contents
Reviews
- Joined
- Apr 24, 2012
- Messages
- 5,113
~Reserved
If you want an indexing method,try defskulls' Lightning Handling
If you want to use the configuration,just copy the variables and the ability code,then copy the encapsulate call:call ExecuteFunc("Encapsulate"),dont copy the InitTimedlightning call all over again
If you want an indexing method,try defskulls' Lightning Handling
If you want to use the configuration,just copy the variables and the ability code,then copy the encapsulate call:call ExecuteFunc("Encapsulate"),dont copy the InitTimedlightning call all over again
Last edited:
- Joined
- May 14, 2011
- Messages
- 524
Why does it have the jass tag ?
Edit : Damn you unknown BBCODE .
Edit : Damn you unknown BBCODE .
Last edited:
- Joined
- Dec 5, 2011
- Messages
- 368
LOL... Radamantus Posted the Triggers.
For Radamantus
- Joined
- Apr 24, 2012
- Messages
- 5,113
This lightning is just an alternate timed lightning of maker.
i put JASS tag because it has so many scripts
i put JASS tag because it has so many scripts
- Joined
- Oct 16, 2008
- Messages
- 10,454
Cool... Bribe-ish way of doing things in GUI... XD...
btw, since you said it yourself that its just a GUI/alternate version of Maker's TLS, maybe you can link Maker's system?
btw, since you said it yourself that its just a GUI/alternate version of Maker's TLS, maybe you can link Maker's system?
- Joined
- Apr 24, 2012
- Messages
- 5,113
Edit:
Added it now for ya
Added it now for ya
- Joined
- Oct 16, 2008
- Messages
- 10,454
and hmmm... destructables... pretty neat... though that can be achieved using points (since destructables cannot be moved), unless there are some things that can be done to destructables... but why no dest to point?
btw, can you add an example usage of doing the set-up part outside of the main trigger? it might be helpful...
btw, can you add an example usage of doing the set-up part outside of the main trigger? it might be helpful...
- Joined
- Apr 24, 2012
- Messages
- 5,113
what setup example?
i dont get it.
i dont get it.
- Joined
- Oct 16, 2008
- Messages
- 10,454
I only looked at what you posted btw...
and oh, I think the user can also bypass the hash and just use their own values directly... am I right? maybe you can add an example for that too...
I don't really think those samples are actually needed but maybe some users might get confused...
btw, I'm really curious why there isn't a dest to point method... I mean you already made dest to dest and dest to unit, so why not complete the list by adding dest to point? I just based this on your features list...
-
Set TL_LCode = TL_LightningType[9]
-
Set TL_MaxTime = 5.00
-
-------- ----------------------------------- --------
-
-------- Color from 0.00 to 1.00 only --------
-
-------- ----------------------------------- --------
-
Set TL_Red = 1.00
-
Set TL_Green = 0.00
-
Set TL_Blue = 1.00
-
Custom script: call Encapsulate()
and oh, I think the user can also bypass the hash and just use their own values directly... am I right? maybe you can add an example for that too...
I don't really think those samples are actually needed but maybe some users might get confused...
btw, I'm really curious why there isn't a dest to point method... I mean you already made dest to dest and dest to unit, so why not complete the list by adding dest to point? I just based this on your features list...
- Joined
- Apr 24, 2012
- Messages
- 5,113
Simple,for the dest to point,just make sure to create a dummy,set it the boolean to IsSourceUnitALocation to true
Also i didnt make the configuration on another trigger because i only made one trigger,and the actions of the configuration are deleted because of the TimedLightning function
Also i didnt make the configuration on another trigger because i only made one trigger,and the actions of the configuration are deleted because of the TimedLightning function
- Joined
- Oct 16, 2008
- Messages
- 10,454
well yeah, though it's a waste to add a dummy to the map just to create a "Dest to point" when you can just add the capability to make the system support a "Dest to point" by default... I guess... it's not really that important though... the whole dest functions actually since most destructables are static anyway so you can just always use P2P using the dest's locations...
- Joined
- Apr 24, 2012
- Messages
- 5,113
It will take me to create so many functions for that,it becomes handy if your are only using Units
- Joined
- Apr 24, 2012
- Messages
- 5,113
What do you mean?
I coded it myself and i have problems solving these one for days.
So,you are telling that im stealing again right? oh please,dont make me laugh.
I coded it myself and i have problems solving these one for days.
So,you are telling that im stealing again right? oh please,dont make me laugh.
- Joined
- May 14, 2011
- Messages
- 524
Now now , play nice .
- Joined
- Apr 14, 2012
- Messages
- 2,901
I could really use this!
- Joined
- Apr 24, 2012
- Messages
- 5,113
Thanks
- Joined
- Jul 22, 2015
- Messages
- 3,485
Sorry for the update. Just updating the tags.
- Joined
- Nov 3, 2018
- Messages
- 79
not sure if you are still active but could it be possible that lightning effects with HD graphics are not consistent? they dissapear instantly
