Almost
. As the main orb shoots across, the bolts do come out at random angles, however, say angle intervals are 45 degrees (360/45=8) means that every 8 orbs shot will in fact fill a full 360 degrees of frost bolts. Then when the orb explodes, it releases a much more intense circle of frost bolts that goes out like a nova. (like every 10 degrees).
Change Log:
-Added the cold effect sfx (effect created when attacking a frost armor'ed unit) to units hit by bolts.
-Added a cool sfx to units hit by the orb, but I will not say which. It is up to you to test and see which (it could be a bit excessive but its still nice ^^)
-ALL floating text removed, it becomes too cluttered onscreen
-Changed spawn angle of bolts so they travel at totally random angles
scope FrozenOrb
//############ CONFIGURATION MENU #############
globals
// Ability raw code
private constant integer ABILITY_RAW = 'A000'
// Raw code of the missile unit
private constant integer MISSILE_RAW = 'h001'
// Raw code of the shard units
private constant integer BOLT_RAW = 'h002'
// Raw code of the dummy unit
private constant integer DUMMY = 'h000'
// Raw code of the Frost Nova slow ability
private constant integer FROST_NOVA = 'A002'
// Raw code for the buff checkup
// This prevents a lot of lag
private constant integer BUFF_RAW = 'Bfro'
// Maximum travel distance of the missile
private constant real MAX_DIST = 1600.
// Speed of the missile
private constant real SPEED = 750.
// Radius of effect of the missile
private constant real M_RADIUS = 225.
// Radius of effect of each shard
private constant real S_RADIUS = 100.
endglobals
// Missile damage
private function M_DAMAGE takes integer Level returns real
return Level * 20.
endfunction
// Shard damage
private function S_DAMAGE takes integer Level returns real
return Level * 10.
endfunction
//######### END OF CONFIGURATION MENU ##########
private struct Data
unit missile
integer ticks
real dx
real dy
trigger trig = CreateTrigger()
method onDestroy takes nothing returns nothing
call RemoveUnit(.missile)
call ClearTriggerStructA(.trig)
call DestroyTrigger(.trig)
endmethod
endstruct
private struct Shard
unit shard
trigger trig = CreateTrigger()
method onDestroy takes nothing returns nothing
call RemoveUnit(.shard)
call ClearTriggerStructA(.trig)
call DestroyTrigger(.trig)
endmethod
endstruct
private function Conditions takes nothing returns boolean
return GetSpellAbilityId() == ABILITY_RAW
endfunction
private function MoveMissile takes nothing returns boolean
local Data d = TT_GetData()
local real x = GetUnitX(d.missile)
local real y = GetUnitY(d.missile)
local real dx = x + d.dx
local real dy = y + d.dy
call SetUnitPosition(d.missile, dx, dy)
set d.ticks = d.ticks - 1
if d.ticks <= 0 then
call d.destroy()
return true
endif
return false
endfunction
private function MissileDmg takes nothing returns boolean
local Data d = GetTriggerStructA(GetTriggeringTrigger())
local unit pick = GetTriggerUnit()
local unit dummy
if IsUnitEnemy(pick, GetOwningPlayer(d.missile)) and GetWidgetLife(pick) > 0.405 and IsUnitType(pick, UNIT_TYPE_STRUCTURE) == false then
if GetUnitAbilityLevel(pick, BUFF_RAW) > 0 then
else
set dummy = CreateUnit(GetOwningPlayer(d.missile), DUMMY, 0., 0., 0.)
call UnitAddAbility(dummy, FROST_NOVA)
call IssueTargetOrder(dummy, "frostnova", pick)
call UnitApplyTimedLife(dummy, 'BTLF', 2.)
endif
call UnitDamageTarget(d.missile, pick, M_DAMAGE(1), false, false, ATTACK_TYPE_MAGIC, DAMAGE_TYPE_MAGIC, null)
endif
set dummy = null
set pick = null
return false
endfunction
private function RemoveShard takes nothing returns boolean
local Shard i = TT_GetData()
if GetWidgetLife(i.shard) < 0.405 then
call i.destroy()
return true
endif
return false
endfunction
private function ShardDmg takes nothing returns boolean
local Shard i = GetTriggerStructA(GetTriggeringTrigger())
local unit pick = GetTriggerUnit()
local unit dummy
if IsUnitEnemy(pick, GetOwningPlayer(i.shard)) and GetWidgetLife(pick) > 0.405 and IsUnitType(pick, UNIT_TYPE_STRUCTURE) == false then
if GetUnitAbilityLevel(pick, BUFF_RAW) > 0 then
else
set dummy = CreateUnit(GetOwningPlayer(i.shard), DUMMY, 0., 0., 0.)
call UnitAddAbility(dummy, FROST_NOVA)
call IssueTargetOrder(dummy, "frostnova", pick)
call UnitApplyTimedLife(dummy, 'BTLF', 2.)
endif
call UnitDamageTarget(i.shard, pick, S_DAMAGE(1), false, false, ATTACK_TYPE_MAGIC, DAMAGE_TYPE_MAGIC, null)
endif
set dummy = null
set pick = null
return false
endfunction
private function CreateShards takes nothing returns boolean
local Data d = TT_GetData()
local Shard i = Shard.create()
local real x
local real y
local unit shard
local location loc
local location move
if GetWidgetLife(d.missile) > 0.405 then
set x = GetUnitX(d.missile)
set y = GetUnitY(d.missile)
set i.shard = CreateUnit(GetOwningPlayer(d.missile), BOLT_RAW, x, y, GetRandomReal(1, 360))
set loc = GetUnitLoc(i.shard)
set x = GetLocationX(loc) + 850. * Cos(GetUnitFacing(i.shard) * bj_DEGTORAD)
set y = GetLocationY(loc) + 850. * Sin(GetUnitFacing(i.shard) * bj_DEGTORAD)
set move = Location(x, y)
call IssuePointOrderLoc(i.shard, "move", move)
call RemoveLocation(move)
call RemoveLocation(loc)
call TriggerRegisterUnitInRange(i.trig, i.shard, S_RADIUS, null)
call TriggerAddCondition(i.trig, Condition(function ShardDmg))
call SetTriggerStructA(i.trig, i)
call TT_Start(function RemoveShard, i)
call UnitApplyTimedLife(i.shard, 'BTLF', GetRandomReal(0.4, 1.2))
else
return true
endif
set shard = null
set loc = null
set move = null
return false
endfunction
private function Actions takes nothing returns nothing
local unit cast = GetTriggerUnit()
local location targ = GetSpellTargetLoc()
local real x = GetUnitX(cast)
local real y = GetUnitY(cast)
local real dx = GetLocationX(targ) - x
local real dy = GetLocationY(targ) - y
local real distance = RMinBJ(MAX_DIST, SquareRoot(dx * dx + dy * dy))
local real angle = Atan2(dy, dx)
local Data d = Data.create()
set d.missile = CreateUnit(GetOwningPlayer(cast), MISSILE_RAW, x, y, GetUnitFacing(cast))
set d.ticks = R2I(distance / (SPEED * TT_PERIOD))
set d.dx = (SPEED * TT_PERIOD) * Cos(angle)
set d.dy = (SPEED * TT_PERIOD) * Sin(angle)
call RemoveLocation(targ)
call TT_Start(function MoveMissile, d)
call TT_Start(function CreateShards, d)
call TriggerRegisterUnitInRange(d.trig, d.missile, M_RADIUS, null)
call TriggerAddCondition(d.trig, Condition(function MissileDmg))
call SetTriggerStructA(d.trig, d)
set cast = null
set targ = null
endfunction
function InitTrig_FrozenOrb takes nothing returns nothing
local trigger t = CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(t, EVENT_PLAYER_UNIT_SPELL_EFFECT)
call TriggerAddCondition(t, Condition(function Conditions))
call TriggerAddAction(t, function Actions)
endfunction
endscope
Frozen Orb Setup
Events
Map initialization
Conditions
Actions
Set So_FrOb_dmg_bolt[1] = 40
Set So_FrOb_dmg_bolt[2] = 59
Set So_FrOb_dmg_bolt[3] = 79
Set So_FrOb_dmg_bolt[4] = 100
Set So_FrOb_dmg_bolt[5] = 122
Set So_FrOb_dmg_bolt[6] = 145
Set So_FrOb_dmg_bolt[7] = 169
Set So_FrOb_dmg_bolt[8] = 194
Set So_FrOb_dmg_bolt[9] = 220
Set So_FrOb_dmg_bolt[10] = 247
Set So_FrOb_dmg_orb[1] = 100
Set So_FrOb_dmg_orb[2] = 158
Set So_FrOb_dmg_orb[3] = 235
Set So_FrOb_dmg_orb[4] = 332
Set So_FrOb_dmg_orb[5] = 450
Set So_FrOb_dmg_orb[6] = 590
Set So_FrOb_dmg_orb[7] = 753
Set So_FrOb_dmg_orb[8] = 940
Set So_FrOb_dmg_orb[9] = 1152
Set So_FrOb_dmg_orb[10] = 1390
The Helper:
The Helper:
