• 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

Shinra Tensei.w3x
Variables
Initilization
Spawn Creeps
visibility
reset
Spells
Shinra Tensei
Shinra tensei
---------------------------
Rinnegan
Rinnegan
KnockBack
Knockback Setting
Cast A Knockback
Get Knockback
To import spell:
1. Import the mangekyou and slam modelz
2. Copy spells and rinnegan buff
3. Copy all dummy
4. Copy the trigger ("spells"&"KnockBack")
Name Type is_array initial_value
Caster unit Yes
Creep_Point location No
Group group Yes
h integer No
H_Ability abilcode Yes
H_Angle real Yes
H_BigStone unit Yes
H_Cast_Point location Yes
H_Chibacu unit Yes
H_Index integer No
H_Index_Max integer No
H_Knockback_Time integer Yes
H_KnockBackGroup group Yes
H_Loop integervar No
H_Move location Yes
H_Mui integer No
H_Picked_Point location Yes
H_Picked_Unit unit Yes
H_Pickedunit2 unit Yes
H_PickUpGroup group Yes
H_Point1 location Yes
H_Point2 location Yes
H_RandomNumber real Yes
H_Small_Stone unit Yes
H_Speed1 real Yes
H_Speed2 real Yes
H_Spell integer Yes
H_Spell_Last integer Yes
H_Stone_Size integer Yes
H_Stones_Create location Yes
H_StonesRemove group Yes
H_unit unit Yes
Hero unit Yes
KB_Angle real Yes
KB_Casters unit Yes
KB_CountBuffs integer No
KB_DestroyTrees boolean Yes
KB_EffectCounter integer Yes
KB_EffectCounter2 integer Yes
KB_Effects_1 string Yes
KB_Effects_2 string Yes
KB_GeneralIntegers integervar Yes
KB_KnockbackedUnits group No
KB_Levels integer Yes
KB_MaxDistance real Yes
KB_ReachedDistance real Yes
KB_ReducedReal real No
KB_ReduceSpeedReal real Yes
KB_SpecificSpeed real Yes
KB_StartPositions location Yes
KB_TempPoint location Yes
KB_TempReal real No
KB_TotalKnockUnits integer No
KB_Units unit Yes
KBA_Caster unit No
KBA_DestroyTrees boolean No
KBA_DistancePerLevel real No
KBA_Level integer No
KBA_SpecialEffects string Yes
KBA_Speed real No
KBA_StartingPosition location No
KBA_TargetUnit unit No
Point location Yes
Sample_Group group No
Sample_Point location No
Shira_TargetGroup group No
table hashtable No 
//TESH.scrollpos=-1
//TESH.alwaysfold=0
function Trig_Spawn_Creeps_Actions takes nothing returns nothing
local unit spawned
local real vx = GetRandomReal(GetRectMinX(bj_mapInitialPlayableArea), GetRectMaxX(bj_mapInitialPlayableArea))
local real vy = GetRandomReal(GetRectMinY(bj_mapInitialPlayableArea), GetRectMaxY(bj_mapInitialPlayableArea))
set spawned = CreateUnit(Player(PLAYER_NEUTRAL_AGGRESSIVE),ChooseRandomCreep(-1),vx,vy,0)
set spawned = null
endfunction
//===========================================================================
function InitTrig_Spawn_Creeps takes nothing returns nothing
    local trigger createunits = CreateTrigger(  )
    call TriggerRegisterTimerEvent(createunits, 3.00, true)
    call TriggerAddAction( createunits, function Trig_Spawn_Creeps_Actions )
    set createunits = null
endfunction
visibility
Events
Map initialization
Conditions
Actions
Visibility - Create an initially Enabled visibility modifier for Player 1 (Red) emitting Visibility across (Playable map area)
//TESH.scrollpos=-1
//TESH.alwaysfold=0
function Trig_reset_Actions takes nothing returns nothing
local unit hero = gg_unit_H000_0001
call SetUnitState(hero, UNIT_STATE_LIFE, GetUnitState(hero, UNIT_STATE_MAX_LIFE) * RMaxBJ(0,100) * 0.01)
call SetUnitState(hero, UNIT_STATE_MANA, GetUnitState(hero, UNIT_STATE_MAX_MANA) * RMaxBJ(0,100) * 0.01)
call UnitResetCooldown( hero )
set hero = null
endfunction
//===========================================================================
function InitTrig_reset takes nothing returns nothing
    local trigger resethero = CreateTrigger(  )
    call TriggerRegisterPlayerEvent(resethero, Player(0), EVENT_PLAYER_END_CINEMATIC)
    call TriggerAddAction( resethero, function Trig_reset_Actions )
    set resethero = null
endfunction
Shinra tensei
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Shinra Tensei
Actions
Unit - Pause (Casting unit)
Animation - Play (Casting unit) 's spell one animation
Wait 0.30 seconds
Unit - Create 1 . ShinraCast for (Owner of (Casting unit)) at (Position of (Casting unit)) facing Default building facing degrees
Unit - Add a 1.20 second Generic expiration timer to (Last created unit)
Unit - Create 1 . ShinraCast2 for (Owner of (Casting unit)) at (Position of (Casting unit)) facing Default building facing degrees
Unit - Add a 1.00 second Generic expiration timer to (Last created unit)
Unit - Create 1 . ShinraCast2 for (Owner of (Casting unit)) at (Position of (Casting unit)) facing Default building facing degrees
Unit - Add a 1.00 second Generic expiration timer to (Last created unit)
Unit - Create 1 . ShinraCast2 for (Owner of (Casting unit)) at (Position of (Casting unit)) facing Default building facing degrees
Unit - Add a 1.00 second Generic expiration timer to (Last created unit)
Unit - Create 1 . ShinraCast2 for (Owner of (Casting unit)) at (Position of (Casting unit)) facing Default building facing degrees
Unit - Add a 1.00 second Generic expiration timer to (Last created unit)
Unit - Create 1 . ShinraCast2 for (Owner of (Casting unit)) at (Position of (Casting unit)) facing Default building facing degrees
Unit - Add a 1.00 second Generic expiration timer to (Last created unit)
Unit - Create 1 . ShinraCast2 for (Owner of (Casting unit)) at (Position of (Casting unit)) facing Default building facing degrees
Unit - Add a 1.00 second Generic expiration timer to (Last created unit)
Wait 0.05 seconds
Set Variable Set Shira_TargetGroup = (Units within 560.00 of (Position of (Casting unit)) matching ((((Matching unit) is A structure) Not equal to True) and ((((Matching unit) is alive) Equal to True) and (((Matching unit) belongs to an enemy of (Owner of (Casting unit)).) Equal to True))).)
Unit Group - Pick every unit in Shira_TargetGroup and do (Actions)
Loop - Actions
Trigger - Run Knockback_Setting <gen> (checking conditions)
Unit - Cause (Casting unit) to damage (Picked unit) , dealing 200.00 damage of attack type Spells and damage type Normal
Unit - Create 1 . ShinraTarg for (Owner of (Casting unit)) at (Position of (Picked unit)) facing ((Angle from (Position of (Picked unit)) to (Position of (Casting unit))) + 180.00) degrees
Unit - Add a 1.20 second Generic expiration timer to (Last created unit)
Wait 0.20 seconds
Unit - Unpause (Casting unit)
Selection - Select (Casting unit) for (Owner of (Casting unit))
//TESH.scrollpos=-1
//TESH.alwaysfold=0
function Trig_Rinnegan_Conditions takes nothing returns boolean
    return GetUnitAbilityLevel(GetTriggerUnit(), 'B000') > 0 and ( GetRandomInt(1, 100) <= 17 )
endfunction
function rineganpush takes nothing returns nothing
local timer w = GetExpiredTimer ()
local unit attacker = LoadUnitHandle(udg_table,GetHandleId(w),1)
local unit attacked = LoadUnitHandle(udg_table,GetHandleId(w),2)
local real timeleft = LoadReal(udg_table,GetHandleId(w),3)
local real ax = GetUnitX(attacker)
local real ay = GetUnitY(attacker)
local real dx = GetUnitX(attacked)
local real dy = GetUnitY(attacked)
local real angle = bj_RADTODEG * Atan2(dy - ay, dx - ax)
local real x = dx + 27 * Cos(angle * bj_DEGTORAD)
local real y = dy + 27 * Sin(angle * bj_DEGTORAD)
call SetUnitPosition(attacked,x,y)

if timeleft <= 0 then
call PauseUnit(attacked,false)
call SetUnitPathing(attacked,true)
call FlushChildHashtable(udg_table,GetHandleId(w))
set w = null
set attacker = null
set attacked = null
call DestroyTimer(GetExpiredTimer())
else
call SaveReal(udg_table,GetHandleId(w),3,timeleft - 2)
call DestroyEffect(AddSpecialEffect("Abilities\\Spells\\Other\\Stampede\\StampedeMissileDeath.mdl",dx,dy))
set w = null
set attacker = null
set attacked = null
endif
endfunction

function Trig_Rinnegan_Actions takes nothing returns nothing
local timer w = CreateTimer()
local unit attacker = GetTriggerUnit ()
local unit attacked = GetAttacker ()
local real timeleft = 10
call PauseUnit(attacked,true)
call SetUnitPathing(attacked,false)
call SaveUnitHandle(udg_table,GetHandleId(w),1,attacker)
call SaveUnitHandle(udg_table,GetHandleId(w),2,attacked)
call SaveReal(udg_table,GetHandleId(w),3,timeleft)
call TimerStart(w,0.02,true,function rineganpush)
set w = null
set attacker = null
set attacked = null
endfunction

//===========================================================================
function InitTrig_Rinnegan takes nothing returns nothing
    local trigger Rinnegan = CreateTrigger(  )
    call Preload("Abilities\\Spells\\Other\\Stampede\\StampedeMissileDeath.mdl")
    call TriggerRegisterAnyUnitEventBJ( Rinnegan, EVENT_PLAYER_UNIT_ATTACKED )
    call TriggerAddCondition( Rinnegan, Condition( function Trig_Rinnegan_Conditions ) )
    call TriggerAddAction( Rinnegan, function Trig_Rinnegan_Actions )
    set Rinnegan = null
endfunction
Refer this spell trigger from Paladon. I wont explain it. Please download Paladon's Knockback system for more information.
Knockback Setting
Events
Conditions
Actions
-------- This are spell effects. They don´t affect the knockback. --------
Set Variable Set Sample_Point = (Position of (Triggering unit))
Set Variable Set Sample_Group = (Units within 560.00 of Sample_Point matching ((((Matching unit) is A structure) Equal to False) and ((((Matching unit) is A structure) Equal to False) and ((((Matching unit) is alive) Equal to True) and (((Matching unit) belongs to an enemy of (Owner of (Casting unit)).) Equal to True)))).)
Destructible - Pick every destructible within 560.00 of Sample_Point and do (Actions)
Loop - Actions
Destructible - Kill (Picked destructible)
-------- This are the applied actions of the 'Actions to apply' trigger. They are in a loop to affect more than one unit. --------
Unit Group - Pick every unit in Sample_Group and do (Actions)
Loop - Actions
Set Variable Set KBA_Caster = (Triggering unit)
Set Variable Set KBA_TargetUnit = (Picked unit)
Set Variable Set KBA_Level = (Level of (Ability being cast) for (Triggering unit))
Set Variable Set KBA_StartingPosition = (Position of (Triggering unit))
Set Variable Set KBA_Speed = "22.00"
Set Variable Set KBA_DistancePerLevel = "1200.00"
Set Variable Set KBA_SpecialEffects[1] = "Abilities\Spells\Human\FlakCannons\FlakTarget.mdl"
Set Variable Set KBA_SpecialEffects[2] = "Abilities\Weapons\AncientProtectorMissile\AncientProtectorMissile.mdl"
Set Variable Set KBA_DestroyTrees = "true"
Trigger - Run Cast_A_Knockback <gen> (checking conditions)
-------- --------
Custom script: call RemoveLocation (udg_Sample_Point)
Custom script: call DestroyGroup (udg_Sample_Group)
Refer this spell trigger from Paladon. I wont explain it. Please download Paladon's Knockback system for more information.
Cast A Knockback
Events
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(KBA_TargetUnit is in KB_KnockbackedUnits.) Equal to True
Then - Actions
Unit Group - Remove KBA_TargetUnit from KB_KnockbackedUnits .
Set Variable Set KB_CountBuffs = (KB_CountBuffs - 1)
For each (Integer KB_GeneralIntegers[2] ) from 1 to KB_TotalKnockUnits , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
KB_Units[KB_GeneralIntegers[1]] Equal to KBA_TargetUnit
Then - Actions
Set Variable Set KB_GeneralIntegers[1] = KB_GeneralIntegers[2]
Set Variable Set KB_GeneralIntegers[2] = KB_TotalKnockUnits
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
KB_TotalKnockUnits Greater than KB_GeneralIntegers[1]
Then - Actions
Set Variable Set KB_Levels[KB_GeneralIntegers[1]] = KB_Levels[KB_TotalKnockUnits]
Set Variable Set KB_Units[KB_GeneralIntegers[1]] = KB_Units[KB_TotalKnockUnits]
Set Variable Set KB_Angle[KB_GeneralIntegers[1]] = KB_Angle[KB_TotalKnockUnits]
Set Variable Set KB_MaxDistance[KB_GeneralIntegers[1]] = KB_MaxDistance[KB_TotalKnockUnits]
Set Variable Set KB_ReachedDistance[KB_GeneralIntegers[1]] = KB_ReachedDistance[KB_TotalKnockUnits]
Set Variable Set KB_ReduceSpeedReal[KB_GeneralIntegers[1]] = KB_ReduceSpeedReal[KB_TotalKnockUnits]
Set Variable Set KB_SpecificSpeed[KB_GeneralIntegers[1]] = KB_SpecificSpeed[KB_TotalKnockUnits]
Set Variable Set KB_Effects_1[KB_GeneralIntegers[1]] = KB_Effects_1[KB_TotalKnockUnits]
Set Variable Set KB_Effects_2[KB_GeneralIntegers[1]] = KB_Effects_2[KB_TotalKnockUnits]
Set Variable Set KB_DestroyTrees[KB_GeneralIntegers[1]] = KB_DestroyTrees[KB_TotalKnockUnits]
Set Variable Set KB_EffectCounter[KB_GeneralIntegers[1]] = KB_EffectCounter[KB_TotalKnockUnits]
Set Variable Set KB_EffectCounter2[KB_GeneralIntegers[1]] = KB_EffectCounter2[KB_TotalKnockUnits]
Set Variable Set KB_GeneralIntegers[1] = (KB_GeneralIntegers[1] - 1)
Else - Actions
Set Variable Set KB_Units[KB_TotalKnockUnits] = No unit
Set Variable Set KB_TotalKnockUnits = (KB_TotalKnockUnits - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
KB_CountBuffs Equal to 0
Then - Actions
Set Variable Set KB_TotalKnockUnits = "0"
Trigger - Turn off Get_Knockback <gen>
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
KB_CountBuffs Equal to 0
Then - Actions
Trigger - Turn on Get_Knockback <gen>
Else - Actions
Set Variable Set KB_CountBuffs = (KB_CountBuffs + 1)
Set Variable Set KB_TotalKnockUnits = (KB_TotalKnockUnits + 1)
Set Variable Set KB_Casters[KB_TotalKnockUnits] = KBA_Caster
Set Variable Set KB_Levels[KB_TotalKnockUnits] = KBA_Level
Set Variable Set KB_Units[KB_TotalKnockUnits] = KBA_TargetUnit
Set Variable Set KB_StartPositions[KB_TotalKnockUnits] = KBA_StartingPosition
Set Variable Set KB_TempPoint[KB_TotalKnockUnits] = (Position of KBA_TargetUnit)
Set Variable Set KB_Angle[KB_TotalKnockUnits] = (Angle from KB_StartPositions[KB_TotalKnockUnits] to KB_TempPoint[KB_TotalKnockUnits])
Set Variable Set KB_MaxDistance[KB_TotalKnockUnits] = (KBA_DistancePerLevel x (Real(KBA_Level)))
Set Variable Set KB_ReachedDistance[KB_TotalKnockUnits] = "0.00"
Set Variable Set KB_ReduceSpeedReal[KB_GeneralIntegers[1]] = "0.00"
Set Variable Set KB_SpecificSpeed[KB_TotalKnockUnits] = KBA_Speed
Set Variable Set KB_Effects_1[KB_TotalKnockUnits] = KBA_SpecialEffects[1]
Set Variable Set KB_Effects_2[KB_TotalKnockUnits] = KBA_SpecialEffects[2]
Set Variable Set KB_DestroyTrees[KB_TotalKnockUnits] = KBA_DestroyTrees
Set Variable Set KB_EffectCounter[KB_GeneralIntegers[1]] = "0"
Set Variable Set KB_EffectCounter2[KB_GeneralIntegers[1]] = "0"
Unit Group - Add KBA_TargetUnit to KB_KnockbackedUnits
Custom script: call RemoveLocation (udg_KBA_StartingPosition)
Custom script: call RemoveLocation (udg_KB_TempPoint [udg_KB_TotalKnockUnits] )
Custom script: call RemoveLocation (udg_KB_StartPositions [udg_KB_TotalKnockUnits] )
Please refer this spell trigger from Paladon. I wont explain it. Please download Paladon's Knockback system for more information.
Get Knockback
Events
Time - Every 0.02 seconds of game time
Conditions
Actions
For each (Integer KB_GeneralIntegers[1] ) from 1 to KB_TotalKnockUnits , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(KB_Units[KB_GeneralIntegers[1]] is in KB_KnockbackedUnits.) Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
KB_ReachedDistance[KB_GeneralIntegers[1]] Greater than or equal to KB_MaxDistance[KB_GeneralIntegers[1]]
Then - Actions
Unit Group - Remove KB_Units[KB_GeneralIntegers[1]] from KB_KnockbackedUnits .
Set Variable Set KB_CountBuffs = (KB_CountBuffs - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
KB_TotalKnockUnits Greater than KB_GeneralIntegers[1]
Then - Actions
Set Variable Set KB_Levels[KB_GeneralIntegers[1]] = KB_Levels[KB_TotalKnockUnits]
Set Variable Set KB_Units[KB_GeneralIntegers[1]] = KB_Units[KB_TotalKnockUnits]
Set Variable Set KB_Angle[KB_GeneralIntegers[1]] = KB_Angle[KB_TotalKnockUnits]
Set Variable Set KB_MaxDistance[KB_GeneralIntegers[1]] = KB_MaxDistance[KB_TotalKnockUnits]
Set Variable Set KB_ReachedDistance[KB_GeneralIntegers[1]] = KB_ReachedDistance[KB_TotalKnockUnits]
Set Variable Set KB_ReduceSpeedReal[KB_GeneralIntegers[1]] = KB_ReduceSpeedReal[KB_TotalKnockUnits]
Set Variable Set KB_SpecificSpeed[KB_GeneralIntegers[1]] = KB_SpecificSpeed[KB_TotalKnockUnits]
Set Variable Set KB_Effects_1[KB_GeneralIntegers[1]] = KB_Effects_1[KB_TotalKnockUnits]
Set Variable Set KB_Effects_2[KB_GeneralIntegers[1]] = KB_Effects_2[KB_TotalKnockUnits]
Set Variable Set KB_DestroyTrees[KB_GeneralIntegers[1]] = KB_DestroyTrees[KB_TotalKnockUnits]
Set Variable Set KB_EffectCounter[KB_GeneralIntegers[1]] = KB_EffectCounter[KB_TotalKnockUnits]
Set Variable Set KB_EffectCounter2[KB_GeneralIntegers[1]] = KB_EffectCounter2[KB_TotalKnockUnits]
Set Variable Set KB_GeneralIntegers[1] = (KB_GeneralIntegers[1] - 1)
Else - Actions
Set Variable Set KB_Units[KB_TotalKnockUnits] = No unit
Set Variable Set KB_TotalKnockUnits = (KB_TotalKnockUnits - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
KB_CountBuffs Equal to 0
Then - Actions
Set Variable Set KB_TotalKnockUnits = "0"
Trigger - Turn off (This trigger)
Else - Actions
Else - Actions
Set Variable Set KB_ReducedReal = ((KB_SpecificSpeed[KB_GeneralIntegers[1]] / KB_MaxDistance[KB_GeneralIntegers[1]]) x KB_ReachedDistance[KB_GeneralIntegers[1]])
Set Variable Set KB_ReduceSpeedReal[KB_GeneralIntegers[1]] = (KB_ReducedReal - (KB_ReduceSpeedReal[KB_GeneralIntegers[1]] x 0.10))
Set Variable Set KB_TempReal = ((KB_SpecificSpeed[KB_GeneralIntegers[1]] - KB_ReduceSpeedReal[KB_GeneralIntegers[1]]) x 2.00)
Set Variable Set KB_TempPoint[1] = (Position of KB_Units[KB_GeneralIntegers[1]])
Set Variable Set KB_TempPoint[2] = (KB_TempPoint[1] offset by KB_TempReal towards KB_Angle[KB_GeneralIntegers[1]] degrees.)
Set Variable Set KB_EffectCounter[KB_GeneralIntegers[1]] = (KB_EffectCounter[KB_GeneralIntegers[1]] + 1)
Set Variable Set KB_EffectCounter2[KB_GeneralIntegers[1]] = (KB_EffectCounter2[KB_GeneralIntegers[1]] + 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
KB_DestroyTrees[KB_GeneralIntegers[1]] Equal to True
Then - Actions
Destructible - Pick every destructible within 200.00 of KB_TempPoint[2] and do (Actions)
Loop - Actions
Destructible - Kill (Picked destructible)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
KB_EffectCounter[KB_GeneralIntegers[1]] Equal to 6
Then - Actions
Set Variable Set KB_EffectCounter[KB_GeneralIntegers[1]] = "0"
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
KB_EffectCounter2[KB_GeneralIntegers[1]] Equal to 8
Then - Actions
Set Variable Set KB_EffectCounter2[KB_GeneralIntegers[1]] = "0"
Else - Actions
Unit - Move KB_Units[KB_GeneralIntegers[1]] instantly to KB_TempPoint[2]
Custom script: call RemoveLocation (udg_KB_TempPoint[1])
Custom script: call RemoveLocation (udg_KB_TempPoint[2])
Set Variable Set KB_ReachedDistance[KB_GeneralIntegers[1]] = (KB_ReachedDistance[KB_GeneralIntegers[1]] + KB_TempReal)
Else - Actions
Top