TriggerHappy
...
- Reaction score
- 341
Unit Knockback System
TriggerHappy187
TriggerHappy187
Current Version - v1.04
Hello everybody. I Was practicing structs and decided to make a Knockback System.... And i did! If you don't know what a knockback system does , it slides the unit back to a point , as if he was pushed. Anyways , this is my FIRST time using structs. I'm not done with this system.... yet. I'm looking to implement cliff detection , Destructible collision ( finished ). It only requires JassNewGen pack , it is not dependent of any other systems
. Also please do not say "theres alot of these around...." , i know but i made this for fun and practice.Changelog :
Readme :
- Ground or Water Detection
- GUI Friendly
- Easy to set parameters
- MUI (Hopefully)
- Destructable Collision
Code :
JASS:
library UKS // Version 1.02
globals
private constant boolean SHOW_EFFECT = true
// Show effect on unit when he gets knockbacked
private constant boolean DESTROY = true
// Set to yes if you want to destroy doodads
private constant string EFFECT_POS = "origin"
// where on the unit to show the effect
private constant string EFFECT_GROUND = "Abilities\\Spells\\Human\\FlakCannons\\FlakTarget.mdl"
// The effect when a unit is knocked on ground
private constant string EFFECT_WATER = "Abilities\\Weapons\\WaterElementalMissile\\WaterElementalMissile.mdl"
// The effect when a unit is knocked on water
private constant real INTERVAL = 0.03
// How fast the timer will run periodicly
private constant boolean IGNORE_PATHING = false
// Allow the unit being moved to move over cliffs
// End of Configurables. Necessary globals. \\
private timer TIMER = CreateTimer()
private integer COUNT = 0
endglobals
private struct UKSData
unit u
real speed
real dec
real ticksMax
real ticksCur
location l
static UKSData array List
static method create takes unit u1, location l1, real speed1, real dec returns UKSData
local UKSData d = UKSData.allocate()
local real dx = GetUnitX(u1) - GetLocationX(l1)
local real dy = GetUnitY(u1) - GetLocationY(l1)
set d.l = l1
set d.u = u1
set d.speed = speed1
set d.dec = dec
set d.ticksMax = SquareRoot(dx * dx + dy * dy)
set d.ticksCur = 0
set .List[COUNT] = d
return d
endmethod
method onDestroy takes nothing returns nothing
set .u = null
call RemoveLocation(.l)
set .l = null
endmethod
endstruct
private function DestructGroup takes nothing returns nothing
call KillDestructable(GetEnumDestructable())
endfunction
private function DestroyDestruct takes unit u returns nothing
local rect r
local real centerX = GetUnitX(u)
local real centerY = GetUnitY(u)
local real radius = 90
local location loc = GetUnitLoc(u)
local boolexpr filter
if (radius >= 0) then
set bj_enumDestructableCenter = loc
set bj_enumDestructableRadius = radius
set r = Rect(centerX - radius, centerY - radius, centerX + radius, centerY + radius)
set filter = filterEnumDestructablesInCircleBJ
call EnumDestructablesInRect(r, filter, function DestructGroup)
call DestroyBoolExpr(filter)
call RemoveRect(r)
call RemoveLocation(loc)
endif
set r = null
set loc = null
set filter = null
endfunction
private function MoveUnits takes nothing returns nothing
local integer i = 0
local UKSData d
local real x
local real y
local real x1
local real y1
local real dx
local real dy
local real d2
loop
exitwhen i >= COUNT
set d = UKSData.List<i>
set x1 = GetUnitX(d.u)
set y1 = GetUnitY(d.u)
set dx = GetLocationX(d.l) - x1
set dy = GetLocationY(d.l) - y1
set d2 = SquareRoot(dx * dx + dy * dy)
set x = x1 + d.speed * dx / d2
set y = y1 + d.speed * dy / d2
if IGNORE_PATHING == true then
call SetUnitX(d.u, x)
call SetUnitY(d.u, y)
else
call SetUnitPosition(d.u, x, y)
endif
if SHOW_EFFECT == true then
if IsTerrainPathable(x,y,PATHING_TYPE_FLOATABILITY) then
call DestroyEffect(AddSpecialEffectTarget(EFFECT_GROUND, d.u, EFFECT_POS))
elseif not IsTerrainPathable(x,y,PATHING_TYPE_WALKABILITY) then
call DestroyEffect(AddSpecialEffectTarget(EFFECT_WATER, d.u, EFFECT_POS))
endif
endif
if DESTROY == true then
call DestroyDestruct(d.u)
endif
set d.ticksCur = d.ticksCur + d.speed
if d.speed - d.dec >= 0.000 then
set d.speed = d.speed - d.dec
endif
if d.ticksCur >= d.ticksMax or d.ticksCur <= 1 or d.speed <= 1 then
set COUNT = COUNT - 1
set UKSData.List<i> = UKSData.List[COUNT]
set i = i - 1
if COUNT <= 0 then
call PauseTimer(TIMER)
set COUNT = 0
endif
call UKSData.destroy (d)
endif
set i = i + 1
endloop
endfunction
public function KnockUnit takes unit u, location l, real speed, real decrement returns nothing
local UKSData d = UKSData.create(u,l,speed,decrement)
set COUNT = COUNT + 1
if COUNT == 1 then
call TimerStart(TIMER, INTERVAL, true, function MoveUnits)
endif
endfunction
endlibrary
</i></i>Example GUI Use :
Trigger:
- Example Use
- Events
- Unit - A unit Begins casting an ability
- Conditions
- (Ability being cast) Equal to Knockback Unit
- Actions
- Wait 0.20 seconds
- Set UKS_Unit = (Target unit of ability being cast)
- Set UKS_Towards = ((Position of (Target unit of ability being cast)) offset by 500.00 towards (Facing of (Casting unit)) degrees)
- Set UKS_Speed = 40.00
- Set UKS_Decrement = 2.20
- -------- Move Unit (unitvar) Towards (twards var), With the speed of (speedvar) and a decrement of (decrement var) --------
- Custom script: call UKS_KnockUnit(udg_UKS_Unit,udg_UKS_Towards,udg_UKS_Speed, udg_UKS_Decrement)
- Events
Video Example :
[YOUTUBE]<object width="425" height="344"><param name="movie" value="http://www.youtube.com/v/cTTx4MgEZ08&hl=en&fs=1"></param><param name="allowFullScreen" value="true"></param><param name="allowscriptaccess" value="always"></param><embed src="http://www.youtube.com/v/cTTx4MgEZ08&hl=en&fs=1" type="application/x-shockwave-flash" allowscriptaccess="always" allowfullscreen="true" width="425" height="344"></embed></object>[/YOUTUBE]
