Touch of Nature
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Touch of Nature
Actions
Custom script: local unit udg_UnitVarAlly
Set UnitVarAlly = (Target unit of ability being cast)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Real((Integer((Percentage life of UnitVarAlly))))) Less than or equal to 33.00
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 100) Less than or equal to 35
Then - Actions
Unit - Set life of UnitVarAlly to 100.00%
Unit - Set mana of UnitVarAlly to 100.00%
Unit - Add Armor Bonus to UnitVarAlly
Unit - Set level of Armor Bonus for UnitVarAlly to (Level of Touch of Nature for (Triggering unit))
Unit - Add Damage Bonus to UnitVarAlly
Unit - Set level of Damage Bonus for UnitVarAlly to (Level of Touch of Nature for (Triggering unit))
Countdown Timer - Start TimerAlly as a One-shot timer that will expire in 10.00 seconds
Unit - Remove Negative buffs considered Magic and physical from UnitVarAlly (Exclude expiration timers, Exclude auras)
Special Effect - Create a special effect attached to the origin of UnitVarAlly using Objects\Spawnmodels\NightElf\EntBirthTarget\EntBirthTarget.mdl
Special Effect - Destroy (Last created special effect)
Special Effect - Create a special effect attached to the origin of UnitVarAlly using Abilities\Spells\Human\Invisibility\InvisibilityTarget.mdl
Special Effect - Destroy (Last created special effect)
Floating Text - Create floating text that reads Natures Blessing! above UnitVarAlly with Z offset 0.00, using font size 10.00, color (0.00%, 60.00%, 0.00%), and 0.00% transparency
Floating Text - Change (Last created floating text): Disable permanence
Floating Text - Set the velocity of (Last created floating text) to 64.00 towards 90.00 degrees
Floating Text - Change the fading age of (Last created floating text) to 2.00 seconds
Floating Text - Change the lifespan of (Last created floating text) to 3.00 seconds
Skip remaining actions
Else - Actions
Else - Actions
Countdown Timer - Start TimerAlly as a One-shot timer that will expire in 10.00 seconds
Unit - Add Armor Bonus to UnitVarAlly
Unit - Set level of Armor Bonus for UnitVarAlly to (Level of Touch of Nature for (Triggering unit))
Unit - Add Damage Bonus to UnitVarAlly
Unit - Set level of Damage Bonus for UnitVarAlly to (Level of Touch of Nature for (Triggering unit))
Unit - Set life of UnitVarAlly to ((Real((Integer((Life of UnitVarAlly))))) + (120.00 x (Real((Level of Touch of Nature for (Triggering unit))))))
hmm im not sure but i think i read before somewhere that you can't use a local unit in GUI inside a loop or if then else... i might just be bullshi*ting cos its the morning
Lol it only took me like 2 hours to get down the basics of vJASS and recreate my spell in it >< but theres still problems with it lol. Hopefully easier to fix now tho- ya' know, or harder
EDIT: hmm yet again i cant find a solution and in my eyes everything looks fine, don't know where else to post this to get feedback on anything i may have missed so here it is:
I'm guessing it would help if i explain the spell so: Its based on channel and is single target. Creates dummy unit that acts as projectile homing in on the target unit. Once it reaches the target it deals damage over time. When the target is moving the periodic damage increases, when the target stands still the periodic damage decreases, lasts 20 seconds or until damage per second drops to 0.JASS:scope BeeSwarm initializer Init //=========================Bee Swarm by BlackShogun==========================// //=================================Setup=====================================// //spell rawcode private constant function BeeSwarmRawCode takes nothing returns integer return 'A000' endfunction //dummy unit rawcode private constant function BeeSwarmModel takes nothing returns integer return 'h000' endfunction //dummy unit model private constant function BeeSwarmSFX takes nothing returns string return "Abilities\\Weapons\\CryptFiendMissile\\CryptFiendMissile.mdl" endfunction //base damage per second private function BeeSwarmBaseDPS takes integer lvl returns real return 5.0*lvl endfunction //increase in damage per second for every second the target is moving private function BeeSwarmIncDPS takes integer lvl returns real return 0.5*lvl endfunction //decrease in damage per second for every second the target is moving private constant function BeeSwarmDecDPS takes nothing returns real return 0.5 endfunction //duration of spell private constant function BeeSwarmDur takes nothing returns real return 20.0 endfunction //the movement and effects interval private constant function BeeSwarmInterval takes nothing returns real return 0.03 endfunction //distance moved by projectile each interval private constant function BeeSwarmDist takes nothing returns real return 15.0 endfunction //===============================EndSetup====================================// //==================NOTE: DO NOT EDIT ANYTHING BEYOND HERE===================// struct BeeSwarm_Data unit cast unit targ unit u real x real y real dmg real time effect sfx endstruct globals private timer t = CreateTimer() private BeeSwarm_Data array ar private integer total = 0 endglobals private function Conditions takes nothing returns boolean return GetSpellAbilityId() == BeeSwarmRawCode() endfunction private function Effects takes nothing returns nothing local BeeSwarm_Data dat local integer i=0 local real x1=GetUnitX(dat.u) local real y1=GetUnitY(dat.u) local real x2=GetUnitX(dat.targ) local real y2=GetUnitY(dat.targ) local real a=Atan2(y2-y1, x2-x1) local real mx=BeeSwarmDist()*Cos(a) local real my=BeeSwarmDist()*Sin(a) local integer lvl=GetUnitAbilityLevel(dat.cast, BeeSwarmRawCode()) loop exitwhen i>=total set dat=ar[i] if not IsUnitInRange(dat.u, dat.targ, 50) then call SetUnitX(dat.u, x1+mx) call SetUnitY(dat.u, y1+my) call SetUnitFacing(dat.u, 57.29583*a) endif if IsUnitInRange(dat.u, dat.targ, 50) and (not IsUnitType(dat.targ, UNIT_TYPE_DEAD)) then call SetUnitX(dat.u, x2) call SetUnitY(dat.u, y2) call UnitDamageTarget(dat.cast, dat.targ, (BeeSwarmBaseDPS(lvl)*BeeSwarmInterval())+dat.dmg, true, true, ATTACK_TYPE_NORMAL, DAMAGE_TYPE_NORMAL, WEAPON_TYPE_WHOKNOWS) if dat.x!=null then if IsUnitInRangeXY(dat.targ, dat.x, dat.y, 5) then set dat.dmg=dat.dmg-(BeeSwarmDecDPS()*BeeSwarmInterval()) else set dat.dmg=dat.dmg+(BeeSwarmIncDPS(lvl)*BeeSwarmInterval()) endif endif set dat.x=x2 set dat.y=y2 endif if (BeeSwarmBaseDPS(lvl)+dat.dmg<=0) or (dat.time>=BeeSwarmDur()) or (IsUnitInRange(dat.u, dat.targ, 50) and IsUnitType(dat.targ, UNIT_TYPE_DEAD)) then call DestroyEffect(dat.sfx) call RemoveUnit(dat.u) set ar[i]=ar[total-1] set total=total-1 call dat.destroy() endif set dat.time=dat.time+(1*BeeSwarmInterval()) set i=i+1 endloop if total==0 then call PauseTimer(t) endif endfunction private function Actions takes nothing returns BeeSwarm_Data local BeeSwarm_Data dat=BeeSwarm_Data.create() local player p local real a set dat.cast=GetTriggerUnit() set p = GetOwningPlayer(dat.cast) set dat.targ=GetSpellTargetUnit() set a=57.29583*Atan2(GetUnitY(dat.targ)-GetUnitY(dat.cast), GetUnitX(dat.targ)-GetUnitX(dat.cast)) set dat.u=CreateUnit(p, BeeSwarmModel(), GetUnitX(dat.cast), GetUnitY(dat.cast), a) set dat.sfx=AddSpecialEffectTarget(BeeSwarmSFX(), dat.u, "chest") set dat.dmg=0 set dat.time=0 set p=null if total==0 then call TimerStart(t, BeeSwarmInterval(), true, function Effects) endif set total=total+1 set ar[total-1]=dat return dat endfunction private function Init takes nothing returns nothing local trigger T = CreateTrigger() call TriggerRegisterAnyUnitEventBJ(T, EVENT_PLAYER_UNIT_SPELL_EFFECT) call TriggerAddAction(T, function Actions) call TriggerAddCondition(T, Condition(function Conditions)) endfunction endscope
private function Effects takes nothing returns nothing
local BeeSwarm_Data dat
local integer i=0
local real x1=GetUnitX(dat.u)
local real y1=GetUnitY(dat.u)
local real x2=GetUnitX(dat.targ)
local real y2=GetUnitY(dat.targ)
local real a=Atan2(y2-y1, x2-x1)
local real mx=BeeSwarmDist()*Cos(a)
local real my=BeeSwarmDist()*Sin(a)
local integer lvl=GetUnitAbilityLevel(dat.cast, BeeSwarmRawCode())private function Effects takes nothing returns nothing
local BeeSwarm_Data dat
local integer i=0
local real x1
local real y1
local real x2
local real y2
local real a
local real mx
local real my
local integer lvl
loop
exitwhen i>=total
set dat=ar[i]
set everything here...
struct playerdata extends array //syntax to declare an array struct
integer a
integer b
integer c
endstruct
function init takes nothing returns nothing
local playerdata pd
set playerdata[3].a=12 //modifying player 3's fields.
set playerdata[3].b=34 //notice it behaves as a global array
set playerdata[3].c=500
set pd=playerdata[4]
set pd.a=17 //modifying player 4's fields.
set pd.b=111 //yep, this is also valid
set pd.c=501
endfunction
function updatePlayerStuff takes player p returns nothing
local integer i=GetPlayerId(p)
//some random function.
set playerdata[i].a=playerdata[i].b
endfunctionThanks , it was really hard because its my real vJass spellTotally, and some of the code is like wtf too
Touch of Nature Alternative
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Touch of Nature
Actions
Custom script: local unit udg_UnitVarAlly
Set UnitVarAlly = (Target unit of ability being cast)
Custom script: if GetUnitLifePercent(udg_UnitVarAlly) <= 33.00 and GetRandomInt(1, 100) <= 10 + 10 * GetUnitAbilityLevel(GetTriggerUnit(), 'A000') then
Unit - Set life of UnitVarAlly to 100.00%
Unit - Set mana of UnitVarAlly to 100.00%
Unit - Remove Negative buffs considered Magic and physical from UnitVarAlly (Exclude expiration timers, Exclude auras)
Special Effect - Create a special effect attached to the origin of UnitVarAlly using Objects\Spawnmodels\NightElf\EntBirthTarget\EntBirthTarget.mdl
Special Effect - Destroy (Last created special effect)
Special Effect - Create a special effect attached to the origin of UnitVarAlly using Abilities\Spells\Human\Invisibility\InvisibilityTarget.mdl
Special Effect - Destroy (Last created special effect)
Floating Text - Create floating text that reads Natures Blessing! above UnitVarAlly with Z offset 0.00, using font size 10.00, color (0.00%, 60.00%, 0.00%), and 0.00% transparency
Floating Text - Change (Last created floating text): Disable permanence
Floating Text - Set the velocity of (Last created floating text) to 64.00 towards 90.00 degrees
Floating Text - Change the fading age of (Last created floating text) to 2.00 seconds
Floating Text - Change the lifespan of (Last created floating text) to 3.50 seconds
Custom script: else
Unit - Set life of UnitVarAlly to ((Real((Integer((Life of UnitVarAlly))))) + (120.00 x (Real((Level of Touch of Nature for (Triggering unit))))))
Custom script: endif
Unit - Add Armor Bonus to UnitVarAlly
Unit - Set level of Armor Bonus for UnitVarAlly to (Level of Touch of Nature for (Triggering unit))
Unit - Add Damage Bonus to UnitVarAlly
Unit - Set level of Damage Bonus for UnitVarAlly to (Level of Touch of Nature for (Triggering unit))
Wait 10.00 seconds (Or perhaps polled wait 10 seconds)
Unit - Remove Armor Bonus from UnitVarAlly
Unit - Remove Damage Bonus from UnitVarAlly
// Silly me forgot this part...
Custom script: set udg_UnitVarAlly = null
DebugDeadTargetBirds
Events
Time - Every 0.40 seconds of game time
Conditions
Actions
Custom script: set bj_wantDestroyGroup=true
Unit Group - Pick every unit in (Units in (Entire map) matching ((((Matching unit) is in (Units of type Birds (MB))) Gleich True) and ((((Matching unit) is in A_AllBirdsGroup) Gleich False) and ((Current order of (Matching unit)) Gleich (Order(stop)))))) and do (Actions)
Loop - Actions
Set A_TempPoint[1] = (Position of (Picked unit))
Unit - Order (Picked unit) to Neutral - 'Kaboom!' A_TempPoint[1]
Custom script: call RemoveLocation (udg_A_TempPoint[1])
)life and units at ~0.404998751 (at 0.404998752 they are still alive ).
Not surprised at all. I will most probably abandon this idea an think of something that can compete with the man eating plant
However, the triggers could be better... However, I do have some suggestions, for example, you could make lightning effects from the trees to you, say create a dummy unit with life drain which takes their hp and gives it to you and create them at the trees. Or maybe a ring of trees to "Embrace" your hero or a treant thing.
|
Icon
|
Tooltip
|
| Learn Mother Nature's Recipe (Q) - [Level 1] Creates a swarm of moving treants which will move towards the target point, and after some time, they will freeze and transform into trees, blocking the way of enemies. Level 1 - 7 seconds. Level 2 - 5 seconds. Level 3 - 3 seconds. |
GetUnitState(whichUnit, UNIT_STATE_LIFE) >0.404998751//:P
GetWidgetLife(myunit)>.405 Returns true if alive, false if dead.
Custom script: local unit udg_UnitVarAlly
Set UnitVarAlly = (Target unit of ability being cast)
Custom script: set udg_UnitVarAlly = null
