v1[1].0 - First post.
v1[1].1 - Fixed a little leak.
v1[1].2 - Removed a special effect. Added 3 more instead.
- Made the spell drain mana as well as life.
- Removed the preloader because it was reducing a hell lot of lag.
scope DemonicPact
// CONFIGURATION
globals
// Raw code of the Demonic Pact ability
private constant integer AID_DEMONIC_PACT = 'A000'
// Raw code of the Demonic Pact Damage ability
private constant integer AID_WAVE_DAMAGE = 'A001'
// Raw code of the Demon Spawns
private constant integer UID_DEMON_SPAWN = 'Nfir'
// Raw code of the Meteor (Magma rock) unit that spawns from the demons
private constant integer UID_METEOR = 'h000'
// Raw code of the dummy unit
private constant integer UID_DUMMY = 'h001'
// Flame Strike special effect
private constant string SFX_FLAME_STRIKE = "Abilities\\Spells\\Human\\FlameStrike\\FlameStrike1.mdl"
// Phoenix Missile special effect
private constant string SFX_MISSILE = "Abilities\\Weapons\\PhoenixMissile\\Phoenix_Missile.mdl"
// Building explosion special effect
private constant string SFX_EXPLODE = "Objects\\Spawnmodels\\Other\\NeutralBuildingExplosion\\NeutralBuildingExplosion.mdl"
// Phoenix thingy special effect
private constant string SFX_PHOENIX = "Abilities\\Spells\\Human\\MarkOfChaos\\MarkOfChaosTarget.mdl"
// Volcano Death special effect
private constant string SFX_VOLCANO = "Abilities\\Spells\\Other\\Volcano\\VolcanoDeath.mdl"
// Doom special effect
private constant string SFX_DOOM = "Abilities\\Spells\\Other\\Doom\\DoomDeath.mdl"
endglobals
// The damage dealt every 0.3 seconds
private function DAMAGING takes unit cast, integer lvl returns real
return lvl * 20.
// Included the caster because someone might
// want to base the damage on the caster's attributes
endfunction
// The mana drained every 0.3 seconds
private function MANA takes unit cast, integer lvl returns real
return lvl * 5.
endfunction
// END OF CONFIGURATION
private function Conditions takes nothing returns boolean
return GetSpellAbilityId() == AID_DEMONIC_PACT
endfunction
private function Enum takes nothing returns boolean
return IsUnitType(GetFilterUnit(), UNIT_TYPE_STRUCTURE) == false and GetWidgetLife(GetFilterUnit()) > 0.405
endfunction
private function Damage takes unit cast, integer lvl, real x, real y returns nothing
local group gr = CreateGroup()
local unit first
call GroupEnumUnitsInRange(gr, x, y, 600., Condition(function Enum))
loop
set first = FirstOfGroup(gr)
exitwhen first == null
call UnitDamageTarget(cast, first, DAMAGING(cast, lvl), false, false, ATTACK_TYPE_MAGIC, DAMAGE_TYPE_MAGIC, null)
call SetUnitState(cast, UNIT_STATE_MANA, GetUnitState(cast, UNIT_STATE_MANA) - MANA(cast, lvl))
call GroupRemoveUnit(gr, first)
endloop
call DestroyGroup(gr)
set gr = null
set first = null
endfunction
private function Nova takes unit cast, integer lvl, real x, real y returns nothing
local integer i = 1
local real px
local real py
local unit dummy
loop
exitwhen i > 8
set px = x + 300. * Cos((i * 45.) * bj_DEGTORAD)
set py = y + 300. * Sin((i * 45.) * bj_DEGTORAD)
set dummy = CreateUnit(GetOwningPlayer(cast), UID_DUMMY, x, y, i * 45)
call UnitAddAbility(dummy, AID_WAVE_DAMAGE)
call SetUnitAbilityLevel(dummy, AID_WAVE_DAMAGE, lvl)
call IssuePointOrder(dummy, "breathoffire", px, py)
call UnitApplyTimedLife(dummy, 'BTLF', 2.)
set i = i + 1
endloop
set dummy = null
endfunction
private function Sfx takes unit cast, integer lvl, real x, real y returns nothing
local integer i = 1
local location loc
local effect array sfx
loop
exitwhen i > 12
set loc = RandomPointCircle(x, y, 600.)
// I set flame strike to a variable
// Because it is destroyed instantly
// And won't be seen if I used DestroyEffect(AddSpecialEffectLoc())
set sfx<i> = AddSpecialEffectLoc(SFX_FLAME_STRIKE, loc)
call RemoveLocation(loc)
set loc = RandomPointCircle(x, y, 600.)
call DestroyEffect(AddSpecialEffectLoc(SFX_MISSILE, loc))
call RemoveLocation(loc)
set loc = RandomPointCircle(x, y, 600.)
call DestroyEffect(AddSpecialEffectLoc(SFX_PHOENIX, loc))
call RemoveLocation(loc)
set loc = RandomPointCircle(x, y, 600.)
call DestroyEffect(AddSpecialEffectLoc(SFX_DOOM, loc))
call RemoveLocation(loc)
call TriggerSleepAction(0.33)
call Damage.execute(cast, lvl, x, y)
set i = i + 1
endloop
set i = 1
loop
exitwhen i > 12
call DestroyEffect(sfx<i>)
set sfx<i> = null
set i = i + 1
endloop
set loc = null
endfunction
private function Actions takes nothing returns nothing
local unit cast = GetTriggerUnit()
local integer i = 1
local real x = GetUnitX(cast)
local real y = GetUnitY(cast)
local real xx
local real yy
local real dex
local real dey
local unit array demon
local integer lvl = GetUnitAbilityLevel(cast, AID_DEMONIC_PACT)
loop
exitwhen i > 4
set xx = x + 600. * Cos((90 * i) * bj_DEGTORAD)
set yy = y + 600. * Sin((90 * i) * bj_DEGTORAD)
set demon<i> = CreateUnit(Player(PLAYER_NEUTRAL_AGGRESSIVE), UID_DEMON_SPAWN, xx, yy, 90. * i)
call SetUnitVertexColor(demon<i>, 255, 180, 180, 128)
call PauseUnit(demon<i>, true)
call SetUnitAnimation(demon<i>, "channel")
call UnitAddAbility(demon<i>, 'Aloc')
set i = i + 1
endloop
call Sfx.execute(cast, lvl, x, y)
call TriggerSleepAction(1.75)
set i = 1
loop
exitwhen i > 4
set dex = GetUnitX(demon<i>)
set dey = GetUnitY(demon<i>)
call KillUnit(demon<i>)
set demon<i> = CreateUnit(GetOwningPlayer(cast), UID_METEOR, dex, dey, 0.)
call IssuePointOrder(demon<i>, "move", x, y)
call TriggerSleepAction(1.3)
call KillUnit(demon<i>)
call DestroyEffect(AddSpecialEffect(SFX_EXPLODE, x, y))
call DestroyEffect(AddSpecialEffect(SFX_VOLCANO, x, y))
call Nova.execute(cast, lvl, x, y)
set i = i + 1
endloop
set cast = null
set demon[1] = null
set demon[2] = null
set demon[3] = null
set demon[4] = null
endfunction
function InitTrig_DemonicPact takes nothing returns nothing
local trigger trig = CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(trig, EVENT_PLAYER_UNIT_SPELL_EFFECT)
call TriggerAddCondition(trig, Condition(function Conditions))
call TriggerAddAction(trig, function Actions)
endfunction
endscope
</i></i></i></i></i></i></i></i></i></i></i></i></i></i>
Damage: 50 Per Explosion
Type: Line
Range: 250
Mana Cost: 150
Cooldown: 15 Seconds
The Hell Bender channels his rage into the area targeted rasing the very pyres of Hell to roast his enemies. Deals damage in a line per explosive pyre created. If a unit is targeted, he will be infected with Hell Fire. The area around the Hell Bender will become tainted with Hell's Fury and will reduce the armor of all enemy units standing in the circle by 10.Damage: 75 Per Explosion
Type: Line
Range: 250
Mana Cost: 175
Cooldown: 15 Seconds
The Hell Bender channels his rage into the area targeted rasing the very pyres of Hell to roast his enemies. Deals damage in a line per explosive pyre created. If a unit is targeted, he will be infected with Hell Fire. The area around the Hell Bender will become tainted with Hell's Fury and will reduce the armor of all enemy units standing in the circle by 15.Damage: 100 Per Explosion
Type: Line
Range: 250
Mana Cost: 200
Cooldown: 15 Seconds
The Hell Bender channels his rage into the area targeted rasing the very pyres of Hell to roast his enemies. Deals damage in a line per explosive pyre created. If a unit is targeted, he will be infected with Hell Fire. The area around the Hell Bender will become tainted with Hell's Fury and will reduce the armor of all enemy units standing in the circle by 20.
300 lines dont sound like its full of fluff, i dont know what you spell will do. up to now mine has 212 lines but there is so much to add that i think and cant have less than 400 - will be a horrible job to look through all it and - in the end - find no errors unless the ones i built in to make the judge happier
SPOILER: My spell is going to summon a Doom Guard.
The Helper:
The Helper:
The Helper:
The Helper:
The Helper:
The Helper:
The Helper:
The Helper:
The Helper:
The Helper:
The Helper:
The Helper:
The Helper:
The Helper:
Varine:
The Helper:
The Helper:
The Helper:
The Helper:
The Helper:
https://www.thehelper.net/threads/crispy-fried-pork-chops.193874/
The Helper:
The Helper:
