And btw, these constest are cool, make more of them please.
Almost twelve hours to go!
Just a side note, instead of uploading a new attachment, edit the map you loaded first.
I don't want to go searching for the "newest" version of the spell.
And a personal note, I really liked the way this contest turned out! Lots of submissions, feedback and clean fun, fun, fun!
Good luck, contestants!
Good contest, with a good time line. I would have actually preferred two spells or something, though. I finished it rather quickly ^^.
I liked very much that the contest was themed, (though I'm not all that great at Hell themed stuff, lol). I would very much like to see another contest, and another theme.
//**********************************************************
//* *
//* H E L L A U R A *
//* Actual Code *
//* v1.00 *
//* *
//* By: Matrix *
//* Specially for thehelper.net spell contest * //* *
//**********************************************************
scope HellAura
globals
private constant integer SPELL_ID = 'A000' // the rawcode of the spell (choose aura or smth passive)
private constant string Effect = "Abilities\\Spells\\Human\\MarkOfChaos\\MarkOfChaosTarget.mdl" //path to the effect that is created when the unit within the AOE dies
endglobals
private function Damage takes unit u, integer lvl returns real
return 50.*lvl //I2R(GetHeroInt(u,true)*lvl)
endfunction
private function DamageRadius takes unit u, integer lvl returns real
return 200.+25*lvl // This is the radius of the damage (when sm1 is killed all enemy unit of DamageRadius is picked and damaged)
endfunction
private function AuraRadius takes unit u, integer lvl returns real
return 250.*lvl // This is the radius of the aura
endfunction
//******************Don't touch anything below if u don't know jass!////
private struct data
unit u
endstruct
private function DBPXY takes real x1, real y1, real x2, real y2 returns real
return SquareRoot((x1-x2)*(x1-x2) + (y1-y2)*(y1-y2))
endfunction
private function AfterConditions takes nothing returns boolean
local data d = GetCSData(GetTriggeringTrigger())
return DBPXY(GetUnitX(GetTriggerUnit()),GetUnitY(GetTriggerUnit()),GetUnitX(d.u),GetUnitY(d.u))<=AuraRadius(d.u,GetUnitAbilityLevel(d.u,SPELL_ID)) and GetWidgetLife(d.u)>.405 and IsUnitEnemy(d.u,GetOwningPlayer(GetTriggerUnit()))
endfunction
private function AfterActions takes nothing returns nothing
local data d = GetCSData(GetTriggeringTrigger())
local group g = NewGroup()
local unit first = null
call GroupEnumUnitsInRange(g,GetUnitX(d.u),GetUnitY(d.u),DamageRadius(d.u,GetUnitAbilityLevel(d.u,SPELL_ID)),null)
call DestroyEffect(AddSpecialEffect(Effect,GetUnitX(GetTriggerUnit()),GetUnitY(GetTriggerUnit())))
loop
set first = FirstOfGroup(g)
exitwhen first == null
if IsUnitEnemy(first,GetOwningPlayer(d.u)) and GetWidgetLife(first)>.405 and IsUnitType(first, UNIT_TYPE_STRUCTURE)==false then
call UnitDamageTarget(d.u, first, Damage(d.u,GetUnitAbilityLevel(d.u,SPELL_ID)), true, false, ATTACK_TYPE_NORMAL, DAMAGE_TYPE_UNIVERSAL, null)
endif
call GroupRemoveUnit(g,first)
endloop
call ReleaseGroup(g)
set g = null
set first = null
endfunction
private function Actions takes nothing returns nothing
local trigger t = CreateTrigger()
local data d = data.create()
local integer i = 0
loop
exitwhen i==16
call TriggerRegisterPlayerUnitEvent(t, Player(i), EVENT_PLAYER_UNIT_DEATH, null)
set i = i+1
endloop
call TriggerAddCondition(t, Condition( function AfterConditions ) )
call TriggerAddAction( t, function AfterActions )
set d.u = GetTriggerUnit()
call SetCSData(t,d)
set t = null
endfunction
private function Conditions takes nothing returns boolean
return GetLearnedSkill() == SPELL_ID and GetUnitAbilityLevel(GetTriggerUnit(),SPELL_ID)==1
endfunction
//===========================================================================
function InitTrig_HellAura takes nothing returns nothing
local trigger t = CreateTrigger()
local integer i = 0
loop
exitwhen i==16
call TriggerRegisterPlayerUnitEvent(t, Player(i), EVENT_PLAYER_HERO_SKILL, null)
set i = i+1
endloop
call TriggerAddCondition(t, Condition( function Conditions ) )
call TriggerAddAction(t, function Actions )
set t = null
endfunction
endscope
Uh oh. I totally forgot about this contest, and I have 6 hours to come up with and complete a spell?
Varine:
The Helper:
Varine:
Varine:
The Helper:
Varine:
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:
