Stefanman
Member
- Reaction score
- 10
Code:
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in (Units in magicplace <gen>)) Not equal to 0
Then - Actions
Set CHI_ofMove = (CHI_ofMove - 0.20)
For each (Integer A) from 1 to 6, do (Actions)
Loop - Actions
Set tempunit[13] = (Picked unit)
Set TempPoint[13] = (Position of tempunit[13])
Special Effect - Create a special effect at TempPoint[13] using Abilities\Spells\Human\Polymorph\PolyMorphDoneGround.mdl
Special Effect - Destroy (Last created special effect)
Set tempunit[13] = No unit
Custom script: call RemoveLocation (udg_TempPoint[13] )
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in (Units in magicplace <gen>)) Equal to 0
Then - Actions
Set CHI_ofMove = (CHI_ofMove + 0.20)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
CHI_ofMove Greater than or equal to 3.50
Then - Actions
Set CHI_ofMove = 3.00
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
CHI_ofMove Less than or equal to 0.40
Then - Actions
Set CHI_ofMove = 0.40
Else - Actions
Set TempGroup[50] = (Units of type Dirt Protector)
Unit Group - Pick every unit in TempGroup[50] and do (Actions)
Loop - Actions
Unit - Order (Picked unit) to Night Elf Keeper Of The Grove - Entangling Roots (Random unit from (Units within 500.00 of (Position of (Picked unit)) matching ((Terrain type at (Position of (Matching unit))) Equal to Outland - Rough Dirt)))
Custom script: call DestroyGroup(udg_TempGroup[50])
Set TempGroup[50] = (Random 2 units from (Units of type Iceman))
Unit Group - Pick every unit in TempGroup[50] and do (Actions)
Loop - Actions
Unit - Order (Picked unit) to Move To ((Position of (Picked unit)) offset by 350.00 towards (Random angle) degrees)
Custom script: call DestroyGroup(udg_TempGroup[50])
Unit Group - Pick every unit in archas and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of units in (Units in (Playable map area) matching (((Matching unit) has buff Target!) Equal to True))) Not equal to 0
Then - Actions
Set tempunit[353] = (Picked unit)
Unit - Order tempunit[353] to Attack (Random unit from (Units within 700.00 of (Position of tempunit[353]) matching ((tempunit[353] has buff Target!) Equal to True)))
Else - Actions
Set tempunit[353] = No unit
for anyone who is having some patience to read this,please help me,this is periodic event for 1 second. each second it lags ,i dont think it lags more and more,but it lags