• Listen to a special audio message from Bill Roper to the Hive Workshop community (Bill is a former Vice President of Blizzard Entertainment, Producer, Designer, Musician, Voice Actor) 🔗Click here to hear his message!
  • Read Evilhog's interview with Gregory Alper, the original composer of the music for WarCraft: Orcs & Humans 🔗Click here to read the full interview.

Triggers

Golem-Wars v1.5a+AI.w3x
Variables
Initialization
centr
Damage
Gold
Moving
Start
Dialog
Heros
dead
dead2
perehod
Rounds
Omon
Omon2
Fottball
Fotballmens
AI
AIStart
AIGO
AILevel
AIAttacked
AIItem
Items
Spells
Spells2
ItemsSistem
Combinations
Init_Strings
Init Health
Init Mana
Change
Init
Update
Deads
Kills
Multiboard
Install
Player Leave Game
TimerMultiboard
Refresh Frags Deads
Refresh Gold
Pogoda
instalize
Sneg
skoljenie
Смерти
Firstblood
kill
Спелы
Text
MEGAKICKCHANCE
SUPERLEGCHANCE
STONESHITCHANCE
t1
t2
t3
t3 2
t4
t5
t6
t7
t8
t9
t10
Enter map-specific custom script code below. This text will be included in the map script after variables are declared and before any trigger code.
//TESH.scrollpos=-1
//TESH.alwaysfold=0
function GetPlayerNameColored takes player id returns string
    local playercolor col=GetPlayerColor(id)
    local string r=GetPlayerName(id)
if col == PLAYER_COLOR_RED then
    set r="|cffff0000" +r+"|r"
elseif col == PLAYER_COLOR_BLUE then
    set r="|cff0000ff"+r+"|r"
elseif col == PLAYER_COLOR_CYAN then
    set r= "|cff00f5ff"+r+"|r"
elseif col == PLAYER_COLOR_PURPLE then
    set r="|cff551A8B"+r+"|r"
elseif col == PLAYER_COLOR_YELLOW then
    set r="|cffffff00"+r+"|r"
elseif col == PLAYER_COLOR_ORANGE then
    set r="|cffEE9A00"+r+"|r"
elseif col == PLAYER_COLOR_GREEN then
    set r="|cff00CD00"+r+"|r"
elseif col == PLAYER_COLOR_PINK then
    set r= "|cffFF69B4"+r+"|r"
elseif col == PLAYER_COLOR_LIGHT_GRAY then
    set r="|cffC0C0C0"+r+"|r"
elseif col == PLAYER_COLOR_LIGHT_BLUE then
    set r="|cffB0E2FF"+r+"|r"
elseif col == PLAYER_COLOR_AQUA then
    set r="|cff006400"+r+"|r"
elseif col == PLAYER_COLOR_BROWN then
    set r="|cff8B4513"+r+"|r"
else
    set r="|cff000000"+r+"|r"
endif
    set col=null
    return r
endfunction

function ValueColor takes integer col, integer val returns string
     local string s =I2S(val)
if col == 2 then
     set s= ("|cFFFF5800"+s+"|r")
 elseif col == 3 then
     set s= ("|cFF077E81"+s+"|r")
 elseif col == 4 then
     set s= ("|cFFFFDC00"+s+"|r")
endif
return s
endfunction
//=================================================================
function setcfg takes string key, string val returns nothing
   call StoreString(udg_Multiboard_Cashe, "config", key, val)
endfunction

function cfg takes string key returns string
  return GetStoredString(udg_Multiboard_Cashe, "config", key)
endfunction

function cfgi takes string key returns integer
   return S2I(cfg(key))
endfunction
//==================================================================
function CreateMultiboardRow takes player p returns nothing
     set udg_Multiboard_RowIndex = udg_Multiboard_RowIndex + 1
     call MultiboardSetRowCount( udg_Multiboard, udg_Multiboard_RowIndex )  
     call MultiboardSetItemWidthBJ( udg_Multiboard, 1, udg_Multiboard_RowIndex, 8.00 )
     call MultiboardSetItemWidthBJ( udg_Multiboard, 2, udg_Multiboard_RowIndex, 6.00 )
     call MultiboardSetItemWidthBJ( udg_Multiboard, 3, udg_Multiboard_RowIndex, 6.00 )
     call MultiboardSetItemWidthBJ( udg_Multiboard, 4, udg_Multiboard_RowIndex, 6.00 )
     call MultiboardSetItemStyleBJ( udg_Multiboard, 1, udg_Multiboard_RowIndex, true, false )
     call MultiboardSetItemStyleBJ( udg_Multiboard, 2, udg_Multiboard_RowIndex, true, false )
     call MultiboardSetItemStyleBJ( udg_Multiboard, 3, udg_Multiboard_RowIndex, true, false )
     call MultiboardSetItemStyleBJ( udg_Multiboard, 4, udg_Multiboard_RowIndex, true, false )
     call MultiboardSetItemValueBJ( udg_Multiboard, 1, udg_Multiboard_RowIndex, GetPlayerNameColored(p) )
     call MultiboardSetItemValueBJ( udg_Multiboard, 2, udg_Multiboard_RowIndex,ValueColor(2, udg_PL_Frags[GetConvertedPlayerId(p)])  )
     call MultiboardSetItemValueBJ( udg_Multiboard, 3, udg_Multiboard_RowIndex,ValueColor(3, udg_PL_Deads[GetConvertedPlayerId(p)])  )
     call MultiboardSetItemValueBJ( udg_Multiboard, 4, udg_Multiboard_RowIndex,ValueColor(4, GetPlayerState(GetTriggerPlayer(), PLAYER_STATE_RESOURCE_GOLD)) )
     call StoreInteger(udg_Multiboard_Cashe, I2S(GetConvertedPlayerId(p)), "multiboard row", udg_Multiboard_RowIndex)
endfunction
//=================================CreateMultiboard========================================
function Create_Multiboard takes nothing returns nothing
local integer i =1
    call CreateMultiboardBJ( 4, 1, "Golem Wars" )
    set udg_Multiboard = GetLastCreatedMultiboard()
//Interface
    call MultiboardSetItemWidthBJ( udg_Multiboard, 1, 1, 8.00 )
    call MultiboardSetItemWidthBJ( udg_Multiboard, 2, 1, 6.00 )
    call MultiboardSetItemWidthBJ( udg_Multiboard, 3, 1, 6.00 )
    call MultiboardSetItemWidthBJ( udg_Multiboard, 4, 1, 6.00 )
    call MultiboardSetItemStyleBJ( udg_Multiboard, 1, ( 1 ), true, false )
    call MultiboardSetItemStyleBJ( udg_Multiboard, 2, ( 1 ), true, true )
    call MultiboardSetItemStyleBJ( udg_Multiboard, 3, ( 1 ), true, true )
    call MultiboardSetItemStyleBJ( udg_Multiboard, 4, ( 1 ), true, true )
    call MultiboardSetItemValueBJ( udg_Multiboard, 1, 1, "|cFF009B50Players:|r" )
    call MultiboardSetItemValueBJ( udg_Multiboard, 2, 1, "|cFF00FF00Kills|r" )
    call MultiboardSetItemValueBJ( udg_Multiboard, 3, 1, "|cFF077E81Deads|r" )
    call MultiboardSetItemValueBJ( udg_Multiboard, 4, 1, "|cFFFFDC00Gold|r" )
    call MultiboardSetItemIconBJ( udg_Multiboard, 2, 1, "ReplaceableTextures\\WorldEditUI\\Editor-MultipleUnits.blp" )
    call MultiboardSetItemIconBJ( udg_Multiboard, 3, 1, "ReplaceableTextures\\CommandButtons\\BTNAnkh.blp" )
    call MultiboardSetItemIconBJ( udg_Multiboard, 4, 1, "UI\\Feedback\\Resources\\ResourceGold.blp" )
//AddPlayers
loop
    exitwhen i ==13
    if GetPlayerSlotState(ConvertedPlayer(i)) == PLAYER_SLOT_STATE_PLAYING then
    call CreateMultiboardRow(ConvertedPlayer(i))
    endif
set i=(i+1)
endloop
endfunction
//========================================================================================

function RefreshMultiboardItem takes player p, integer col, integer value returns nothing
     local integer row = GetStoredInteger(udg_Multiboard_Cashe, I2S(GetConvertedPlayerId(p)), "multiboard row")
if row !=0 then
     call MultiboardSetItemValueBJ( udg_Multiboard, col,row, ValueColor(col, value) )
endif
set row = 0
endfunction

function addI takes nothing returns nothing
    set udg_HEX_string = "||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||"
endfunction
Name Type is_array initial_value
AI_right boolean Yes
BarName string Yes
BarPlayer force Yes
BarSetting integer Yes
BarString string Yes
BarSystemsNumber integer No
biginInteger integer No
Boolean boolean Yes
Caster unit Yes
CountPlayers integer No
Deads integer Yes
DialogButton button Yes
FloatingText texttag Yes
HEROS unit Yes
HEX_coder string No
HEX_runer integer Yes
HEX_string string No
ItemGet itemcode No
ItemSpell item No
ItemStore itemcode Yes
ItemSuccess boolean No
Kills integer Yes
mach unit No
Meteor unit No
moved unit Yes
MovedAvtoFacing boolean Yes
MovedCaster unit Yes
MovedDamage real Yes
MovedDeath boolean Yes
MovedIsSnorads boolean Yes
MovedPozition location Yes
MovedRang real Yes
MoveFacing real Yes
MoveOforON boolean Yes
Multiboard multiboard No
MULTIBOARD multiboard Yes
Multiboard_Cashe gamecache No
Multiboard_Chashe gamecache No
Multiboard_RowIndex integer No 1
Multiboard_timer real No
n integer No IntegerMaxPlayers
number integer No
Omon unit Yes
Omon1 integer No
p location No
Picked_Units_Groop group No
PickUnit unit Yes
PL_Deads integer Yes
PL_Frags integer Yes
PLAYER player Yes
Player1 player No
PLAYER2 player Yes
Player_deaths integer Yes
Player_rows integer Yes
PlayerColor string Yes
Players_score integer Yes
Playersgroup force No
playerunit unit Yes
Points image Yes
realMove real Yes
realStop real Yes
Rezinka unit No
RunOrNO boolean Yes
SDMStrigger trigger No
SP effect No
Specef effect No
SpecEffects effect No
SpellItem abilcode Yes
SpellUnit unit Yes
StartDialog dialog Yes
Strings_Health string Yes
Strings_Mana string Yes
Target unit No
Target1 unit No
Terrain terraintype No
Text texttag No
Textuinit unit Yes
Timer timerdialog Yes
Unit unit No
centr
Events
Player - Player 1 (Red) types a chat message containing ct (Unexpected type: 'stringnoformat') as An exact match
Player - Player 2 (Blue) types a chat message containing ct (Unexpected type: 'stringnoformat') as An exact match
Player - Player 3 (Teal) types a chat message containing ct (Unexpected type: 'stringnoformat') as An exact match
Player - Player 4 (Purple) types a chat message containing ct (Unexpected type: 'stringnoformat') as An exact match
Player - Player 5 (Yellow) types a chat message containing ct (Unexpected type: 'stringnoformat') as An exact match
Player - Player 6 (Orange) types a chat message containing ct (Unexpected type: 'stringnoformat') as An exact match
Player - Player 7 (Green) types a chat message containing ct (Unexpected type: 'stringnoformat') as An exact match
Player - Player 8 (Pink) types a chat message containing ct (Unexpected type: 'stringnoformat') as An exact match
Player - Player 9 (Gray) types a chat message containing ct (Unexpected type: 'stringnoformat') as An exact match
Player - Player 10 (Light Blue) types a chat message containing ct (Unexpected type: 'stringnoformat') as An exact match
Player - Player 11 (Dark Green) types a chat message containing ct (Unexpected type: 'stringnoformat') as An exact match
Player - Player 12 (Brown) types a chat message containing ct (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Unit Group - Pick every unit in (Units of type GOLEM"ча) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of (Picked unit)) Equal to (Triggering player)
Then - Actions
Special Effect - Create a special effect at ((Triggering player) start location) using Abilities\Spells\Human\MassTeleport\MassTeleportTarget.mdl
Unit - Move (Picked unit) instantly to ((Triggering player) start location)
Else - Actions
Показ нанесенного урона!
//TESH.scrollpos=-1
//TESH.alwaysfold=0
function SDMSTextVars takes integer PlayerNumber returns string
    local string array Color
    set Color[0] = "|c00FF0303"
    set Color[1] = "|cFF0000FF"
    set Color[2] = "|c001CE6B9"
    set Color[3] = "|c00540079"
    set Color[4] = "|c00FFFC01"
    set Color[5] = "|c00FE8A0E"
    set Color[6] = "|c00FE8A0E"
    set Color[7] = "|c00E55BB0"
    set Color[8] = "|c00959697"
    set Color[9] = "|c007EBFF1"
    set Color[10] = "|c00106246"
    set Color[11] = "|c004E2A04"
    set Color[12] = "|c00282828"
    set Color[13] = "|c00282828"
    set Color[14] = "|c00282828"
    return Color[PlayerNumber]
endfunction
function SDMSFontSize takes nothing returns real
    return 12.0
endfunction
function SDMStheTrigger takes nothing returns trigger
    return udg_SDMStrigger//Здесь название любой простой глобальной переменной типа триггер.
endfunction
function SDMSLifeTime takes nothing returns real
    return 1.5//Время продолжительности строки. Большой не ставить, т. к. будет лагать. Рекомендую 1-2 секунды.
endfunction
function SDMSLifeTimeSecondary takes nothing returns real
    return 2.0//Дополнительное время продолжительности жизни строки. Не ставить меньше, чем основное, но чем меньше это значение, тем меньше утечка памяти. Рекомендую 120-200% от основного времени.
endfunction
function SDMSMinus takes nothing returns string
    return "-"//Возвращает то, что стоит перед числом нанесённого урона. Примеры:
//"Нанесено " например: Нанесено 15
//"Получено " например: Получено 21
//""          например: 16
//Рекомендую использовать "-" из-за большей производительности
endfunction
function SDMSPlus takes nothing returns string
    return ""//Возвращает то, что стоит перед числом нанесённого урона. Примеры:
//" ед. урона"         например: 15 ед. урона
//" очков повреждения" например: 21 очков повреждения
//Рекомендую использовать "" из-за большей производительности. Комбинируя функции Minus и Plus, можно добиваться отличных результатов. Например: Нанесено 17 ед. урона.
endfunction
function SDMSCreateTextTag takes nothing returns nothing
    local unit u=GetAttackedUnitBJ()
    local player pl=GetOwningPlayer(u)
    local integer i=GetConvertedPlayerId(pl)
    local texttag tt=null
    local real fontSize=SDMSFontSize()
    local real lifeTime=SDMSLifeTime()
    local real lifeTime2=SDMSLifeTimeSecondary()
    local string minus=SDMSMinus()
    local string plus=SDMSPlus()
    local string textColor=SDMSTextVars(i-1)

    call CreateTextTagUnitBJ(textColor+minus+I2S(R2I(GetEventDamage()))+plus+"|r",u,0,fontSize,100.0,100.0,100.0,0.0)
    set tt=GetLastCreatedTextTag()
    call SetTextTagVelocityBJ(tt,96.0,90)
    call SetTextTagPermanentBJ(tt,false)
    call SetTextTagLifespanBJ(tt,lifeTime)
    call SetTextTagFadepointBJ(tt,0.0)
    call PolledWait(lifeTime2)

    set u=null
    set pl=null
    set i=0
    set fontSize=0
    set lifeTime=0
    set lifeTime2=0
    set minus=""
    set plus=""
    set textColor=""
    call DestroyTextTagBJ(tt)
endfunction
function SDMSTriggerRegisterUnitDamaged takes nothing returns nothing
    call TriggerRegisterUnitEvent(SDMStheTrigger(),GetEnteringUnit(),EVENT_UNIT_DAMAGED)
endfunction
function SDMSGroupFunction takes nothing returns nothing
    local unit u=GetEnumUnit()

    call TriggerRegisterUnitEvent(SDMStheTrigger(),u,EVENT_UNIT_DAMAGED)

    set u=null
endfunction
function theSDMSTriggerActions takes nothing returns nothing
    local trigger UnitEnter=CreateTrigger()
    local trigger TextTagCreate=SDMStheTrigger()

    call TriggerRegisterEnterRectSimple(UnitEnter,GetPlayableMapRect())
    call TriggerAddAction(UnitEnter,function SDMSTriggerRegisterUnitDamaged)
    call ForGroupBJ(GetUnitsInRectAll(GetPlayableMapRect()),function SDMSGroupFunction)

    set UnitEnter=null
    set TextTagCreate=null
endfunction
function InitTrig_Damage takes nothing returns nothing
    local trigger tr=CreateTrigger()

    set udg_SDMStrigger=CreateTrigger()//Тут также меняется название глобальной переменной типа триггер.
    call TriggerAddAction(SDMStheTrigger(),function SDMSCreateTextTag)
    call TriggerRegisterTimerEventSingle(tr,0.0)
    call TriggerAddAction(tr,function theSDMSTriggerActions)

    set tr=null
endfunction
Gold
Events
Time - Every 2.00 seconds of game time
Conditions
Actions
For each (Integer A) from 1 to 12 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Then - Actions
Set Variable Set AI_right[((Integer A) + 2)] = "true"
Set Variable Set Player1 = (Player((Integer A)))
Player - Add 2 to (Player((Integer A))) . Current gold
Else - Actions
Moving
Events
Time - Every 0.04 seconds of game time
Conditions
Actions
Custom script: local effect e
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
realMove[number] Less than or equal to 1.00
Then - Actions
Do nothing
Else - Actions
For each (Integer A) from biginInteger to number , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
RunOrNO[(Integer A)] Equal to True
Or - Any (Conditions) are true
Conditions
MovedDeath[(Integer A)] Equal to True
(moved[(Integer A)] is alive) Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Then - Actions
Set Variable Set realMove[(Integer A)] = (realMove[(Integer A)] - realStop[(Integer A)])
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MovedAvtoFacing[(Integer A)] Equal to True
Then - Actions
Custom script: set udg_p = GetUnitLoc(udg_moved[GetForLoopIndexA()])
Custom script: call MoveLocation(udg_p, GetLocationX(udg_p) + udg_realMove[GetForLoopIndexA()] * CosBJ(GetUnitFacing(udg_moved[GetForLoopIndexA()])), GetLocationY(udg_p) + udg_realMove[GetForLoopIndexA()] * SinBJ(GetUnitFacing(udg_moved[GetForLoopIndexA()])))
Unit - Move moved[(Integer A)] instantly to p
Set Variable Set MovedPozition[(Integer A)] = p
Else - Actions
Custom script: set udg_p = GetUnitLoc(udg_moved[GetForLoopIndexA()])
Custom script: call MoveLocation(udg_p, GetLocationX(udg_p) + udg_realMove[GetForLoopIndexA()] * CosBJ(udg_MoveFacing[GetForLoopIndexA()]), GetLocationY(udg_p) + udg_realMove[GetForLoopIndexA()] * SinBJ(udg_MoveFacing[GetForLoopIndexA()]))
Unit - Move moved[(Integer A)] instantly to p
Special Effect - Create a special effect attached to the origin (Unexpected type: 'attachpoint') of moved[(Integer A)] using Abilities\Spells\Human\FlakCannons\FlakTarget.mdl
Set Variable Set Specef = (Last created special effect)
Set Variable Set MovedPozition[(Integer A)] = p
Custom script: set e = udg_Specef
Custom script: set udg_Specef = e
Special Effect - Destroy Specef
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between (Position of moved[(Integer A)]) and MovedPozition[(Integer A)]) Greater than (realMove[(Integer A)] / 5.00)
Then - Actions
Set Variable Set MoveFacing[(Integer A)] = (Angle from MovedPozition[(Integer A)] to (Position of moved[(Integer A)]))
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MovedIsSnorads[(Integer A)] Equal to True
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Distance between (Position of moved[(Integer A)]) and MovedPozition[(Integer A)]) Greater than (realMove[(Integer A)] / 5.00)
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Then - Actions
Unit - Kill moved[(Integer A)]
Else - Actions
Else - Actions
Set Variable Set Picked_Units_Groop = (Units within MovedRang[(Integer A)] of (Position of moved[(Integer A)]).)
Unit Group - Pick every unit in Picked_Units_Groop and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is alive) Equal to True
(Picked unit) Not equal to moved[(Integer A)]
(Picked unit) Not equal to MovedCaster[(Integer A)]
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Then - Actions
Unit - Kill moved[(Integer A)]
Unit - Cause MovedCaster[(Integer A)] to damage (Picked unit) , dealing MovedDamage[(Integer A)] damage of attack type Spells and damage type Normal
Else - Actions
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
MoveOforON[(Integer A)] Equal to False
realMove[(Integer A)] Less than 1.00
Then - Actions
Set Variable Set RunOrNO[(Integer A)] = "false"
Custom script: set udg_moved[GetForLoopIndexA()] = null
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Integer A) Equal to number
number Greater than biginInteger
Then - Actions
Set Variable Set number = (number - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
RunOrNO[number] Equal to False
number Greater than biginInteger
Then - Actions
Set Variable Set number = (number - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
RunOrNO[number] Equal to False
number Greater than biginInteger
Then - Actions
Set Variable Set number = (number - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
RunOrNO[number] Equal to False
number Greater than biginInteger
Then - Actions
Set Variable Set number = (number - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
RunOrNO[number] Equal to False
number Greater than biginInteger
Then - Actions
Set Variable Set number = (number - 1)
Else - Actions
Else - Actions
Else - Actions
Else - Actions
Else - Actions
Else - Actions
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Then - Actions
Set Variable Set RunOrNO[(Integer A)] = "false"
Custom script: set udg_moved[GetForLoopIndexA()] = null
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Integer A) Equal to number
number Greater than biginInteger
Then - Actions
Set Variable Set number = (number - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
RunOrNO[number] Equal to False
number Greater than biginInteger
Then - Actions
Set Variable Set number = (number - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
RunOrNO[number] Equal to False
number Greater than biginInteger
Then - Actions
Set Variable Set number = (number - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
RunOrNO[number] Equal to False
number Greater than biginInteger
Then - Actions
Set Variable Set number = (number - 1)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
RunOrNO[number] Equal to False
number Greater than biginInteger
Then - Actions
Set Variable Set number = (number - 1)
Else - Actions
Else - Actions
Else - Actions
Else - Actions
Else - Actions
Else - Actions
Start
Events
Time - Elapsed game time is 0.10 seconds
Conditions
Actions
Visibility - Disable fog of war
Visibility - Disable black mask
Player - Turn Gives bounty On for Player 1 (Red)
Player - Turn Gives bounty On for Player 2 (Blue)
Player - Turn Gives bounty On for Player 3 (Teal)
Player - Turn Gives bounty On for Player 4 (Purple)
Player - Turn Gives bounty On for Player 5 (Yellow)
Player - Turn Gives bounty On for Player 6 (Orange)
Player - Turn Gives bounty On for Player 7 (Green)
Player - Turn Gives bounty On for Player 8 (Pink)
Player - Turn Gives bounty On for Player 9 (Gray)
Player - Turn Gives bounty On for Player 10 (Light Blue)
Player - Turn Gives bounty On for Player 11 (Dark Green)
Player - Turn Gives bounty On for Player 12 (Brown)
Player - Set name of Neutral Hostile to Охранники Острова
Dialog
Events
Map initialization
Conditions
Actions
Set Variable Set StartDialog[1] = (Missing string for 'DialogCreate')
Dialog - Change the title of StartDialog[1] to Выберите Мод
Dialog - Create a dialog button for StartDialog[1] labelled Нападения Омонов
Set Variable Set DialogButton[1] = (Last created dialog Button)
Dialog - Create a dialog button for StartDialog[1] labelled Хаос на Арене
Set Variable Set DialogButton[2] = (Last created dialog Button)
Dialog - Create a dialog button for StartDialog[1] labelled Снежная Арена
Set Variable Set DialogButton[3] = (Last created dialog Button)
Dialog - Create a dialog button for StartDialog[1] labelled Подводная Битва
Set Variable Set DialogButton[4] = (Last created dialog Button)
Heros
Events
Time - Elapsed game time is 0.50 seconds
Conditions
Actions
For each (Integer A) from 1 to 12 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) controller) Not equal to Computer
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Set Variable Set AI_right[((Integer A) + 2)] = "true"
Special Effect - Create a special effect at ((Player((Integer A))) start location) using Abilities\Spells\Human\ThunderClap\ThunderClapCaster.mdl
Unit - Create 1 GOLEM"ча for (Player((Integer A))) at ((Player((Integer A))) start location) facing (Position of (Triggering unit))
Player - Set (Player((Integer A))) . Current gold to 200
Set Variable Set HEROS[(Player number of (Player((Integer A))))] = (Last created unit)
Else - Actions
dead
Events
Unit - A unit Dies
Conditions
((Triggering unit) is A Hero) Equal to True
Actions
For each (Integer A) from 1 to 12 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) slot status) Equal to Is playing
Then - Actions
Wait 2.00 seconds
Camera - Pan camera for (Owner of (Dying unit)) to ((Owner of (Dying unit)) start location) over 0.40 seconds
Hero - Instantly revive (Dying unit) at ((Owner of (Dying unit)) start location) , Show revival graphics
Wait 0.10 seconds
Unit - Set mana of (Dying unit) to 100 %
Else - Actions
//TESH.scrollpos=-1
//TESH.alwaysfold=0
function Trig_dead2_Conditions takes nothing returns boolean
    if ( not ( GetOwningPlayer(GetDyingUnit()) == Player(PLAYER_NEUTRAL_AGGRESSIVE) ) ) then
        return false
    endif
    return true
endfunction

function Trig_dead2_Actions takes nothing returns nothing
    local unit d
    set d = GetDyingUnit()
    call AddSpecialEffectLocBJ( GetUnitLoc(d), "Objects\\Spawnmodels\\Human\\HumanLargeDeathExplode\\HumanLargeDeathExplode.mdl" )
    call DestroyEffectBJ( GetLastCreatedEffectBJ() )
    call TriggerSleepAction( 10.00 )
    call AddSpecialEffectLocBJ( GetUnitLoc(d), "Abilities\\Spells\\Demon\\ReviveDemon\\ReviveDemon.mdl" )
    call DestroyEffectBJ( GetLastCreatedEffectBJ() )
    call CreateNUnitsAtLoc( 1, GetUnitTypeId(d), Player(PLAYER_NEUTRAL_AGGRESSIVE), GetUnitLoc(GetDyingUnit()), bj_UNIT_FACING )
endfunction

//===========================================================================
function InitTrig_dead2 takes nothing returns nothing
    set gg_trg_dead2 = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_dead2, EVENT_PLAYER_UNIT_DEATH )
    call TriggerAddCondition( gg_trg_dead2, Condition( function Trig_dead2_Conditions ) )
    call TriggerAddAction( gg_trg_dead2, function Trig_dead2_Actions )
endfunction
perehod
Events
Unit - A unit Gains a level
Conditions
Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Hero level of (Leveling Hero)) Less than or equal to 15
(Hero level of (Leveling Hero)) Greater than or equal to 15
Then - Actions
Animation - Change (Leveling Hero) 's size to ( 150.00 %, 150.00 %, 150.00 %) of its original size
Animation - Change (Leveling Hero) 's vertex coloring to ( 0.00 %, 0.00 %, 60.00 %) with 0 % transparency
Unit - Add Анреальный пенок to (Leveling Hero)
Game - Display to (All players) the text: ((Name of (Owner of (Leveling Hero))) + Достиг 15-го Уровня и его Големчик Стал сильнее)
Hero - Modify Strength of (Leveling Hero) : Add 15 .
Hero - Modify Agility of (Leveling Hero) : Add 15 .
Hero - Modify Intelligence of (Leveling Hero) : Add 15 .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Hero level of (Leveling Hero)) Less than or equal to 10
(Hero level of (Leveling Hero)) Greater than or equal to 10
Then - Actions
Animation - Change (Leveling Hero) 's size to ( 120.00 %, 120.00 %, 120.00 %) of its original size
Animation - Change (Leveling Hero) 's vertex coloring to ( 100.00 %, 0.00 %, 0.00 %) with 0 % transparency
Hero - Learn skill for (Leveling Hero) : Прыжок Смерти
Game - Display to (All players) the text: ((Name of (Owner of (Leveling Hero))) + Достиг 10-го Уровня и его Големчик Стал сильнее)
Hero - Modify Strength of (Leveling Hero) : Add 10 .
Hero - Modify Agility of (Leveling Hero) : Add 10 .
Hero - Modify Intelligence of (Leveling Hero) : Add 10 .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Hero level of (Leveling Hero)) Less than or equal to 6
(Hero level of (Leveling Hero)) Greater than or equal to 6
Then - Actions
Animation - Change (Leveling Hero) 's size to ( 100.00 %, 100.00 %, 100.00 %) of its original size
Animation - Change (Leveling Hero) 's vertex coloring to ( 0.00 %, 100 %, 0.00 %) with 0 % transparency
Game - Display to (All players) the text: ((Name of (Owner of (Leveling Hero))) + Достиг 6-го Уровня и его Големчик Стал сильнее)
Hero - Modify Strength of (Leveling Hero) : Add 5 .
Hero - Modify Agility of (Leveling Hero) : Add 5 .
Hero - Modify Intelligence of (Leveling Hero) : Add 5 .
Else - Actions
Omon
Events
Time - Elapsed game time is 1.00 seconds
Conditions
Actions
Custom script: local timerdialog t
Countdown Timer - Start (Missing string for 'CreateTimerBJ') as a One-shot timer that will expire in 60.00 seconds
Countdown Timer - Create a timer window for (Last started timer) with title Омоны!
Set Variable Set Timer[1] = (Last created timer window)
Custom script: set t = udg_Timer[1]
Countdown Timer - Show Timer[1]
Wait 60.00 seconds
Custom script: set udg_Timer[1] = t
Countdown Timer - Destroy Timer[1]
Trigger - Turn on Omon2 <gen>
Game - Display to (All players) the text: РАЗБЕГАЙСЯ ОМОНЫ НАСТУПАЮТ!!!!!
Sound - Play GoblinSapperYesAttack3 <gen>
Wait 22.00 seconds
Trigger - Turn off Omon2 <gen>
Omon2
Events
Time - Every 2 seconds of game time
Conditions
Actions
Custom script: local unit u
Unit - Create 1 . Омон for Neutral Hostile at (Random point in Arena <gen>) facing Default building facing degrees
Set Variable Set Omon1 = (Omon1 + 1)
Set Variable Set Omon[Omon1] = (Last created unit)
Custom script: set u = udg_Omon[udg_Omon1]
Unit Group - Pick every unit in (Units in Arena <gen>) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of (Picked unit)) is an enemy of (Owner of Omon[Omon1]).) Equal to True
Then - Actions
Unit - Order Omon[Omon1] to Attack . (Picked unit)
Else - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of Omon[Omon1] using Abilities\Spells\Human\Thunderclap\ThunderClapCaster.mdl
Special Effect - Destroy (Last created special effect)
Wait 60.00 seconds
Custom script: set udg_Omon[udg_Omon1] = u
Animation - Play Omon[Omon1] 's death animation
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of Omon[Omon1] using Abilities\Spells\Human\Thunderclap\ThunderClapCaster.mdl
Special Effect - Destroy (Last created special effect)
Wait 1.50 seconds
Unit - Kill Omon[Omon1]
Fottball
Events
Unit - A unit enters fotball2 <gen>
Conditions
(Unit-type of (Entering unit)) Equal to Мяч (Кожанный нах)
Actions
Custom script: local effect ef
Special Effect - Create a special effect at (Random point in fotball2 <gen>) using Abilities\Spells\Human\HolyBolt\HolyBoltSpecialArt.mdl
Set Variable Set SP = (Last created special effect)
Custom script: set ef = udg_SP
Wait 0.10 seconds
Custom script: set udg_SP = ef
Special Effect - Destroy SP
Special Effect - Create a special effect at (Random point in fotball2 <gen>) using Abilities\Spells\Human\HolyBolt\HolyBoltSpecialArt.mdl
Custom script: set ef = udg_SP
Wait 0.10 seconds
Custom script: set udg_SP = ef
Special Effect - Destroy SP
Special Effect - Create a special effect at (Random point in fotball2 <gen>) using Abilities\Spells\Human\HolyBolt\HolyBoltSpecialArt.mdl
Custom script: set ef = udg_SP
Wait 0.10 seconds
Custom script: set udg_SP = ef
Special Effect - Destroy SP
Special Effect - Create a special effect at (Random point in fotball2 <gen>) using Abilities\Spells\Human\HolyBolt\HolyBoltSpecialArt.mdl
Custom script: set ef = udg_SP
Wait 0.10 seconds
Custom script: set udg_SP = ef
Special Effect - Destroy SP
Special Effect - Create a special effect at (Random point in fotball2 <gen>) using Abilities\Spells\Human\HolyBolt\HolyBoltSpecialArt.mdl
Custom script: set ef = udg_SP
Wait 0.10 seconds
Custom script: set udg_SP = ef
Special Effect - Destroy SP
Player - Add 150 to (Owner of mach) . Current gold
Game - Display to (All players) the text: ((Name of (Owner of mach)) + забил гол и заработал 150 золота )
Unit - Move mach instantly to (Center of Mach <gen>)
Fotballmens
Events
Time - Elapsed game time is 8.00 seconds
Conditions
Actions
For each (Integer B) from 1 to 12 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer B))) slot status) Equal to Is playing
Then - Actions
Set Variable Set AI_right[((Integer B) + 2)] = "true"
Unit - Create 1 . Футболист бля =D for (Player((Integer B))) at (Random point in Mach <gen>) facing Default building facing degrees
Else - Actions
AIStart
Events
Time - Elapsed game time is 0.50 seconds
Conditions
Actions
Custom script: local unit u
For each (Integer B) from 1 to 12 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer B))) controller) Equal to Computer
Then - Actions
Set Variable Set AI_right[(Integer B)] = "true"
Unit - Create 1 . GOLEM"ча for (Player((Integer B))) at ((Player((Integer B))) start location) facing Default building facing degrees
Set Variable Set playerunit[(Integer B)] = (Last created unit)
Player - Set name of (Player((Integer B))) to (Proper name of playerunit[(Integer B)])
Special Effect - Create a special effect at ((Player((Integer B))) start location) using Abilities\Spells\Human\ThunderClap\ThunderClapCaster.mdl
Special Effect - Destroy (Last created special effect)
Custom script: set u = udg_playerunit[GetForLoopIndexA()]
Unit - Missing string for 'UnitMakeAbilityPermanentBJ'
Custom script: set udg_playerunit[GetForLoopIndexA()] = u
Hero - Learn skill for playerunit[(Integer B)] : Пенок
Player - Set (Player((Integer B))) . Current gold to 200
Trigger - Turn on AIGO <gen>
Else - Actions
AIGO
Events
Time - Every 1.80 seconds of game time
Conditions
Actions
Custom script: local unit uu
For each (Integer A) from 1 to 12 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Unit-type of playerunit[(Integer A)]) Equal to GOLEM"ча
((Player((Integer A))) controller) Not equal to User
Then - Actions
Set Variable Set AI_right[((Integer A) + 2)] = "true"
Custom script: set uu = udg_playerunit[GetForLoopIndexA()]
Unit Group - Pick every unit in (Units in Arena <gen>) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of (Picked unit)) is an enemy of (Owner of playerunit[(Integer A)]).) Equal to True
Then - Actions
Unit - Order playerunit[(Integer A)] to Attack . (Picked unit)
Else - Actions
Custom script: set udg_playerunit[GetForLoopIndexA()] = uu
Unit - Order playerunit[(Integer A)] to Right-Click . ItemSpell
Unit Group - Pick every unit in (Units in Arena <gen>) and do (Actions)
Loop - Actions
Custom script: local unit uu
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of (Picked unit)) controller) Equal to User
(Random integer number between 1 and 2) Equal to 2
((Owner of (Picked unit)) is an enemy of (Owner of playerunit[(Integer A)]).) Equal to True
Then - Actions
Custom script: set uu = udg_playerunit[GetForLoopIndexA()]
Unit - Order playerunit[(Integer A)] to Attack . (Picked unit)
Custom script: set udg_playerunit[GetForLoopIndexA()] = uu
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Percentage life of playerunit[(Integer A)]) Less than or equal to 15.00
Then - Actions
Unit - Order playerunit[(Integer A)] to Move To . (Random point in lechilka <gen>)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Hero level of playerunit[(Integer A)]) Greater than or equal to 6
Then - Actions
Hero - Learn skill for playerunit[(Integer A)] : Прыжок Смерти
Wait 0.10 seconds
Unit - Missing string for 'UnitMakeAbilityPermanentBJ'
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Hero level of playerunit[(Integer A)]) Greater than or equal to 2
Then - Actions
Hero - Learn skill for playerunit[(Integer A)] : Пенок
Wait 0.10 seconds
Unit - Missing string for 'UnitMakeAbilityPermanentBJ'
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Hero level of playerunit[(Integer A)]) Greater than or equal to 10
Then - Actions
Hero - Learn skill for playerunit[(Integer A)] : Супер Удар
Wait 0.10 seconds
Unit - Missing string for 'UnitMakeAbilityPermanentBJ'
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Hero level of playerunit[(Integer A)]) Greater than or equal to 15
Then - Actions
Hero - Learn skill for playerunit[(Integer A)] : Анреальный пенок
Wait 0.10 seconds
Unit - Missing string for 'UnitMakeAbilityPermanentBJ'
Else - Actions
Else - Actions
Else - Actions
AILevel
Events
Unit - A unit Dies
Conditions
Actions
For each (Integer A) from 1 to 12 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of (Killing unit)) Equal to (Owner of playerunit[(Integer A)])
Then - Actions
Hero - Add 80 experience to playerunit[(Integer A)] , Show level-up graphics
Else - Actions
AIAttacked
Events
Unit - A unit Is attacked
Conditions
((Attacking unit) is A Hero) Equal to True
Actions
For each (Integer A) from 1 to 12 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Attacking unit) Not equal to playerunit[(Integer A)]
(Attacked unit) Equal to playerunit[(Integer A)]
Then - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of (Attacking unit)) is an enemy of (Owner of playerunit[(Integer A)]).) Equal to True
Then - Actions
Unit - Order playerunit[(Integer A)] to Attack . (Attacking unit)
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Percentage life of (Attacking unit)) Less than or equal to 10
((Owner of (Attacking unit)) is an enemy of (Owner of playerunit[(Integer A)]).) Equal to True
Then - Actions
Unit - Order playerunit[(Integer A)] to Attack . (Attacking unit)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Percentage life of (Attacking unit)) Less than or equal to 10.00
((Owner of (Attacking unit)) is an enemy of (Owner of playerunit[(Integer A)]).) Equal to True
Then - Actions
Unit - Order playerunit[(Integer A)] to Attack . (Attacking unit)
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Percentage life of playerunit[(Integer A)]) Less than or equal to 10
Then - Actions
Unit - Order playerunit[(Integer A)] to Move To . (Random point in lechilka <gen>)
Else - Actions
AIItem
Events
Time - Every 1.00 seconds of game time
Conditions
Actions
For each (Integer A) from 1 to 12 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of playerunit[(Integer A)]) Current gold) Greater than or equal to 800
(playerunit[(Integer A)] has an item of type Ring of Protection +4) Not equal to True
(playerunit[(Integer A)] has an item of type Каменный Щит) Not equal to True
Then - Actions
Unit - Order playerunit[(Integer A)] to Move To . (Center of items <gen>)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(playerunit[(Integer A)] has an item of type Ring of Protection +4) Not equal to True
(items <gen> contains playerunit[(Integer A)]) Equal to True
(playerunit[(Integer A)] has an item of type Каменный Щит) Not equal to True
Then - Actions
Hero - Create Ring of Protection +4 and give it to playerunit[(Integer A)]
Player - Add -800 to (Owner of playerunit[(Integer A)]) . Current gold
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of playerunit[(Integer A)]) Current gold) Greater than or equal to 1200
(playerunit[(Integer A)] has an item of type Каменный Щит) Not equal to True
(playerunit[(Integer A)] has an item of type Каменный Щит(рецепт)) Not equal to True
Then - Actions
Unit - Order playerunit[(Integer A)] to Move To . (Center of items <gen>)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(playerunit[(Integer A)] has an item of type Каменный Щит(рецепт)) Not equal to True
(items <gen> contains playerunit[(Integer A)]) Equal to True
(playerunit[(Integer A)] has an item of type Каменный Щит) Not equal to True
Then - Actions
Hero - Create Каменный Щит(рецепт) and give it to playerunit[(Integer A)]
Player - Add -1200 to (Owner of playerunit[(Integer A)]) . Current gold
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of playerunit[(Integer A)]) Current gold) Greater than or equal to 1000
(playerunit[(Integer A)] has an item of type Шансовик) Not equal to True
(playerunit[(Integer A)] has an item of type Каменный Щит) Not equal to True
Then - Actions
Unit - Order playerunit[(Integer A)] to Move To . (Center of items <gen>)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(playerunit[(Integer A)] has an item of type Шансовик) Not equal to True
(items <gen> contains playerunit[(Integer A)]) Equal to True
(playerunit[(Integer A)] has an item of type Каменный Щит) Not equal to True
Then - Actions
Hero - Create Шансовик and give it to playerunit[(Integer A)]
Player - Add -1000 to (Owner of playerunit[(Integer A)]) . Current gold
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of playerunit[(Integer A)]) Current gold) Greater than or equal to 1000
(playerunit[(Integer A)] has an item of type Шансовик) Not equal to True
(playerunit[(Integer A)] has an item of type МЕГАКУЛАК) Not equal to True
Then - Actions
Unit - Order playerunit[(Integer A)] to Move To . (Center of items <gen>)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(items <gen> contains playerunit[(Integer A)]) Equal to True
(playerunit[(Integer A)] has an item of type МЕГАКУЛАК) Not equal to True
(playerunit[(Integer A)] has an item of type Шансовик) Not equal to True
Then - Actions
Hero - Create Шансовик and give it to playerunit[(Integer A)]
Player - Add -1000 to (Owner of playerunit[(Integer A)]) . Current gold
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of playerunit[(Integer A)]) Current gold) Greater than or equal to 1500
(playerunit[(Integer A)] has an item of type МЕГАКУЛАК(Рецепт)) Not equal to True
(playerunit[(Integer A)] has an item of type МЕГАКУЛАК) Not equal to True
Then - Actions
Unit - Order playerunit[(Integer A)] to Move To . (Center of items <gen>)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(items <gen> contains playerunit[(Integer A)]) Equal to True
(playerunit[(Integer A)] has an item of type МЕГАКУЛАК(Рецепт)) Not equal to True
(playerunit[(Integer A)] has an item of type МЕГАКУЛАК) Not equal to True
Then - Actions
Hero - Create МЕГАКУЛАК(Рецепт) and give it to playerunit[(Integer A)]
Player - Add -1500 to (Owner of playerunit[(Integer A)]) . Current gold
Else - Actions
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of playerunit[(Integer A)]) Current gold) Greater than or equal to 800
(playerunit[(Integer A)] has an item of type Перчатка) Not equal to True
(playerunit[(Integer A)] has an item of type МЕГАКУЛАК) Not equal to True
Then - Actions
Unit - Order playerunit[(Integer A)] to Move To . (Center of items <gen>)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(playerunit[(Integer A)] has an item of type Перчатка) Not equal to True
(items <gen> contains playerunit[(Integer A)]) Equal to True
(playerunit[(Integer A)] has an item of type МЕГАКУЛАК) Not equal to True
Then - Actions
Hero - Create Перчатка and give it to playerunit[(Integer A)]
Player - Add -800 to (Owner of playerunit[(Integer A)]) . Current gold
Else - Actions
Else - Actions
Else - Actions
Spells
Events
Time - Every 7.20 seconds of game time
Conditions
Actions
Custom script: local item it
Item - Create Неизвестное Заклинание at (Random point in Arena <gen>)
Set Variable Set ItemSpell = (Last created item)
Custom script: set it = udg_ItemSpell
For each (Integer A) from 1 to 12 , do (Actions)
Loop - Actions
Unit - Order playerunit[(Integer A)] to Right-Click . ItemSpell
Wait 20.00 seconds
Custom script: set udg_ItemSpell = it
Item - Remove ItemSpell
Spells2
Events
Unit - A unit Acquires an item
Conditions
(Item-type of (Item being manipulated)) Equal to Неизвестное Заклинание
Actions
Custom script: local unit ug
Set Variable Set SpellItem[1] = "A006"
Set Variable Set SpellItem[2] = "A008"
Set Variable Set SpellItem[3] = "A007"
Set Variable Set SpellItem[4] = "A003"
For each (Integer A) from 1 to 12 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Owner of (Hero manipulating item)) controller) Equal to User
Then - Actions
Set Variable Set PLAYER[(Integer A)] = (Owner of (Hero manipulating item))
Set Variable Set SpellUnit[(Player number of PLAYER[(Integer A)])] = (Hero manipulating item)
Custom script: set ug = udg_SpellUnit[GetForLoopIndexA()]
Unit - Add SpellItem[(Random integer number between 1 and 4)] to SpellUnit[(Player number of PLAYER[(Integer A)])]
Wait 15.00 seconds
Custom script: set udg_SpellUnit[GetForLoopIndexA()] = ug
Game - Missing string for 'DisplayTextToPlayer'
Unit - Remove SpellItem[(Integer A)] from SpellUnit[(Player number of PLAYER[(Integer A)])]
For each (Integer A) from 1 to 4 , do (Actions)
Loop - Actions
Unit - Remove SpellItem[1] from SpellUnit[(Player number of PLAYER[(Integer A)])]
Unit - Remove SpellItem[2] from SpellUnit[(Player number of PLAYER[(Integer A)])]
Unit - Remove SpellItem[3] from SpellUnit[(Player number of PLAYER[(Integer A)])]
Unit - Remove SpellItem[4] from SpellUnit[(Player number of PLAYER[(Integer A)])]
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Level of SpellItem[(Integer A)] for SpellUnit[(Player number of PLAYER[(Integer A)])]) Less than or equal to 0
Then - Actions
Do nothing
Else - Actions
Else - Actions
function ItemSys_CombineItem takes nothing returns nothing
     local unit u = GetTriggerUnit()
     local boolean array used
     local integer i = 0
     local integer j = 1
     local boolean exit = false
     local boolean noitem = false
     loop
     exitwhen udg_ItemStore[j] == 0 or noitem == true
         set exit = false
         set i = 0
         loop
         exitwhen i > 5 or exit == true
         if GetItemTypeId(UnitItemInSlot(u,i)) == udg_ItemStore[j] and used[i] == false then
               set exit = true
               set used[i] = true
               set j = j + 1
         else
               set i = i + 1
         endif
         endloop
         if exit == false then
               set noitem = true
         endif
     endloop
     set i = 0
     if noitem == false then
         loop
         exitwhen i > 5
             if used[i] == true then
               call RemoveItem(UnitItemInSlot(u,i))
             endif
             set i = i + 1 
         endloop
         call UnitAddItemById(u,udg_ItemGet)
         set udg_ItemSuccess = true
     else
         set udg_ItemSuccess = false
     endif
     set i = 1
     loop
          exitwhen i > 6
          set udg_ItemStore[i] = 0
          set i = i + 1
     endloop
     set u = null
endfunction
     
          

//===========================================================================
function InitTrig_ItemsSistem takes nothing returns nothing
endfunction
Combinations
Events
Unit - A unit Acquires an item
Conditions
Actions
Set Variable Set ItemStore[1] = "gcel"
Set Variable Set ItemStore[2] = "bspd"
Set Variable Set ItemStore[3] = "I00H"
Set Variable Set ItemGet = "I00G"
Custom script: call ItemSys_CombineItem()
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
ItemSuccess Equal to True
Then - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Weapons\AvengerMissile\AvengerMissile.mdl
Else - Actions
Set Variable Set ItemStore[1] = "spsh"
Set Variable Set ItemStore[2] = "rde3"
Set Variable Set ItemStore[3] = "I00C"
Set Variable Set ItemGet = "I00B"
Custom script: call ItemSys_CombineItem()
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
ItemSuccess Equal to True
Then - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Spells\Items\ClarityPotion\ClarityTarget.mdl
Else - Actions
Set Variable Set ItemStore[1] = "rde3"
Set Variable Set ItemStore[2] = "I001"
Set Variable Set ItemStore[3] = "I00E"
Set Variable Set ItemGet = "I00D"
Custom script: call ItemSys_CombineItem()
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
ItemSuccess Equal to True
Then - Actions
Special Effect - Create a special effect at (Position of (Triggering unit)) using Abilities\Spells\Human\Invisibility\InvisibilityTarget.mdl
Special Effect - Destroy (Last created special effect)
Else - Actions
Set Variable Set ItemStore[1] = "spsh"
Set Variable Set ItemStore[2] = "rde3"
Set Variable Set ItemStore[3] = "I00C"
Set Variable Set ItemGet = "I00B"
Custom script: call ItemSys_CombineItem()
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
ItemSuccess Equal to True
Then - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Spells\Items\ClarityPotion\ClarityTarget.mdl
Else - Actions
Set Variable Set ItemStore[1] = "I002"
Set Variable Set ItemStore[2] = "I001"
Set Variable Set ItemStore[3] = "I003"
Set Variable Set ItemGet = "I000"
Custom script: call ItemSys_CombineItem()
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
ItemSuccess Equal to True
Then - Actions
Special Effect - Create a special effect at (Position of (Triggering unit)) using Abilities\Spells\Human\ThunderClap\ThunderClapCaster.mdl
Special Effect - Destroy (Last created special effect)
Else - Actions
Set Variable Set ItemStore[1] = "I005"
Set Variable Set ItemStore[2] = "I001"
Set Variable Set ItemStore[3] = "I006"
Set Variable Set ItemGet = "I004"
Custom script: call ItemSys_CombineItem()
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
ItemSuccess Equal to True
Then - Actions
Special Effect - Create a special effect at (Position of (Triggering unit)) using Abilities\Spells\Other\Levelup\LevelupCaster.mdl
Special Effect - Destroy (Last created special effect)
Else - Actions
Set Variable Set ItemStore[1] = "I009"
Set Variable Set ItemStore[2] = "rwiz"
Set Variable Set ItemStore[3] = "cnob"
Set Variable Set ItemGet = "I008"
Custom script: call ItemSys_CombineItem()
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
ItemSuccess Equal to True
Then - Actions
Special Effect - Create a special effect at (Position of (Triggering unit)) using Abilities\Spells\Items\AIem\AIemTarget.mdl
Special Effect - Destroy (Last created special effect)
Else - Actions
Set Variable Set ItemStore[1] = "rat6"
Set Variable Set ItemStore[2] = "sbch"
Set Variable Set ItemStore[3] = "I007"
Set Variable Set ItemGet = "modt"
Custom script: call ItemSys_CombineItem()
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
ItemSuccess Equal to True
Then - Actions
Special Effect - Create a special effect at (Position of (Triggering unit)) using Abilities\Spells\Other\HowlOfTerror\HowlCaster.mdl
Special Effect - Destroy (Last created special effect)
Else - Actions
Set Variable Set ItemStore[1] = "spsh"
Set Variable Set ItemStore[2] = "rde3"
Set Variable Set ItemStore[3] = "I00C"
Set Variable Set ItemGet = "I00B"
Custom script: call ItemSys_CombineItem()
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
ItemSuccess Equal to True
Then - Actions
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Triggering unit) using Abilities\Spells\Items\ClarityPotion\ClarityTarget.mdl
Else - Actions
Init Health
Events
Map initialization
Conditions
Actions
Custom script: call addI()
Set Variable Set HEX_coder = "0123456789ABCDEF"
For each (Integer A) from 0 to 255 , do (Actions)
Loop - Actions
Set Variable Set Strings_Health[(Integer A)] = "|cFF"
Set Variable Set HEX_runer[0] = "16"
Set Variable Set HEX_runer[1] = "16"
For each (Integer A) from 0 to 255 , do (Actions)
Loop - Actions
Set Variable Set Strings_Health[(Integer A)] = (Strings_Health[(Integer A)] + ((Substring(HEX_coder, HEX_runer[0], HEX_runer[0])) + (Substring(HEX_coder, HEX_runer[1], HEX_runer[1]))))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
HEX_runer[1] Greater than 1
Then - Actions
Set Variable Set HEX_runer[1] = (HEX_runer[1] - 1)
Else - Actions
Set Variable Set HEX_runer[0] = (HEX_runer[0] - 1)
Set Variable Set HEX_runer[1] = "16"
Set Variable Set HEX_runer[0] = "1"
Set Variable Set HEX_runer[1] = "1"
For each (Integer A) from 0 to 255 , do (Actions)
Loop - Actions
Set Variable Set Strings_Health[(Integer A)] = (Strings_Health[(Integer A)] + ((Substring(HEX_coder, HEX_runer[0], HEX_runer[0])) + (Substring(HEX_coder, HEX_runer[1], HEX_runer[1]))))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
HEX_runer[1] Less than 16
Then - Actions
Set Variable Set HEX_runer[1] = (HEX_runer[1] + 1)
Else - Actions
Set Variable Set HEX_runer[0] = (HEX_runer[0] + 1)
Set Variable Set HEX_runer[1] = "1"
For each (Integer A) from 0 to 255 , do (Actions)
Loop - Actions
Set Variable Set Strings_Health[(Integer A)] = (Strings_Health[(Integer A)] + 00)
For each (Integer A) from 1 to 255 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(((Integer A) / 2) x 2) Equal to (Integer A)
Then - Actions
Set Variable Set Strings_Health[(Integer A)] = (Strings_Health[(Integer A)] + (Substring(HEX_string, 1, (Integer A))))
Set Variable Set Strings_Health[((Integer A) + 1)] = (Strings_Health[((Integer A) + 1)] + (Substring(HEX_string, 1, (Integer A))))
Else - Actions
For each (Integer A) from 0 to 255 , do (Actions)
Loop - Actions
Set Variable Set Strings_Health[(Integer A)] = (Strings_Health[(Integer A)] + |r|cFF999999)
For each (Integer A) from 0 to 255 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(((Integer A) / 2) x 2) Equal to (Integer A)
Then - Actions
Set Variable Set Strings_Health[(Integer A)] = (Strings_Health[(Integer A)] + (Substring(HEX_string, 1, (254 - (Integer A)))))
Set Variable Set Strings_Health[((Integer A) + 1)] = (Strings_Health[((Integer A) + 1)] + (Substring(HEX_string, 1, (254 - (Integer A)))))
Else - Actions
For each (Integer A) from 0 to 255 , do (Actions)
Loop - Actions
Set Variable Set Strings_Health[(Integer A)] = (Strings_Health[(Integer A)] + |r)
Init Mana
Events
Map initialization
Conditions
Actions
Custom script: call addI()
Set Variable Set HEX_coder = "0123456789ABCDEF"
For each (Integer A) from 0 to 255 , do (Actions)
Loop - Actions
Set Variable Set Strings_Mana[(Integer A)] = "|cFF"
Set Variable Set HEX_runer[0] = "16"
Set Variable Set HEX_runer[1] = "16"
For each (Integer A) from 0 to 255 , do (Actions)
Loop - Actions
Set Variable Set Strings_Mana[(Integer A)] = (Strings_Mana[(Integer A)] + 3300)
Set Variable Set HEX_runer[0] = "1"
Set Variable Set HEX_runer[1] = "1"
For each (Integer A) from 0 to 255 , do (Actions)
Loop - Actions
Set Variable Set Strings_Mana[(Integer A)] = (Strings_Mana[(Integer A)] + ((Substring(HEX_coder, HEX_runer[0], HEX_runer[0])) + (Substring(HEX_coder, HEX_runer[1], HEX_runer[1]))))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
HEX_runer[1] Less than 16
Then - Actions
Set Variable Set HEX_runer[1] = (HEX_runer[1] + 1)
Else - Actions
Set Variable Set HEX_runer[0] = (HEX_runer[0] + 1)
Set Variable Set HEX_runer[1] = "1"
For each (Integer A) from 1 to 255 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(((Integer A) / 2) x 2) Equal to (Integer A)
Then - Actions
Set Variable Set Strings_Mana[(Integer A)] = (Strings_Mana[(Integer A)] + (Substring(HEX_string, 1, (Integer A))))
Set Variable Set Strings_Mana[((Integer A) + 1)] = (Strings_Mana[((Integer A) + 1)] + (Substring(HEX_string, 1, (Integer A))))
Else - Actions
For each (Integer A) from 0 to 255 , do (Actions)
Loop - Actions
Set Variable Set Strings_Mana[(Integer A)] = (Strings_Mana[(Integer A)] + |r|cFF999999)
For each (Integer A) from 0 to 255 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(((Integer A) / 2) x 2) Equal to (Integer A)
Then - Actions
Set Variable Set Strings_Mana[(Integer A)] = (Strings_Mana[(Integer A)] + (Substring(HEX_string, 1, (254 - (Integer A)))))
Set Variable Set Strings_Mana[((Integer A) + 1)] = (Strings_Mana[((Integer A) + 1)] + (Substring(HEX_string, 1, (254 - (Integer A)))))
Else - Actions
For each (Integer A) from 0 to 255 , do (Actions)
Loop - Actions
Set Variable Set Strings_Mana[(Integer A)] = (Strings_Mana[(Integer A)] + |r)
Change
Events
Player - Player 1 (Red) Selects a unit
Player - Player 2 (Blue) Selects a unit
Player - Player 3 (Teal) Selects a unit
Player - Player 4 (Purple) Selects a unit
Player - Player 5 (Yellow) Selects a unit
Player - Player 6 (Orange) Selects a unit
Player - Player 7 (Green) Selects a unit
Player - Player 8 (Pink) Selects a unit
Player - Player 9 (Gray) Selects a unit
Player - Player 10 (Light Blue) Selects a unit
Player - Player 11 (Dark Green) Selects a unit
Player - Player 12 (Brown) Selects a unit
Conditions
Actions
Set Variable Set Unit = (Triggering unit)
Custom script: if GetLocalPlayer() == GetTriggerPlayer() then
Multiboard - Change the title of MULTIBOARD[(Player number of (Owner of (Triggering unit)))] to (|cFFFFCC00 + ((Name of (Owner of Unit)) + |r))
Multiboard - Set the text for MULTIBOARD[(Player number of (Owner of (Triggering unit)))] item in column 3 , row 4 to (|cFFFF0000 + (String(Kills[(Player number of (Owner of (Triggering unit)))])))
Multiboard - Set the text for MULTIBOARD[(Player number of (Owner of (Triggering unit)))] item in column 3 , row 5 to (|cFF0000FF + (String(Deads[(Player number of (Owner of (Triggering unit)))])))
Multiboard - Show MULTIBOARD[(Player number of (Owner of (Triggering unit)))]
Multiboard - Maximize MULTIBOARD[(Player number of (Owner of (Triggering unit)))]
Custom script: endif
Init
Events
Time - Elapsed game time is 3.00 seconds
Conditions
Actions
For each (Integer A) from 1 to 12 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Player((Integer A))) controller) Equal to User
Then - Actions
Multiboard - Create a multiboard with 3 columns and 5 rows, titled .
Set Variable Set CountPlayers = (CountPlayers + 1)
Set Variable Set MULTIBOARD[CountPlayers] = (Last created multiboard)
Multiboard - Set the display style for MULTIBOARD[CountPlayers] item in column 1 , row 1 to Hide text and Show icons
Multiboard - Set the display style for MULTIBOARD[CountPlayers] item in column 1 , row 2 to Hide text and Show icons
Multiboard - Set the display style for MULTIBOARD[CountPlayers] item in column 2 , row 1 to Show text and Hide icons
Multiboard - Set the display style for MULTIBOARD[CountPlayers] item in column 2 , row 2 to Show text and Hide icons
Multiboard - Set the display style for MULTIBOARD[CountPlayers] item in column 3 , row 1 to Show text and Hide icons
Multiboard - Set the display style for MULTIBOARD[CountPlayers] item in column 3 , row 2 to Show text and Hide icons
Multiboard - Set the display style for MULTIBOARD[CountPlayers] item in column 2 , row 3 to Show text and Hide icons
Multiboard - Set the display style for MULTIBOARD[CountPlayers] item in column 3 , row 3 to Show text and Hide icons
Multiboard - Set the display style for MULTIBOARD[CountPlayers] item in column 2 , row 4 to Show text and Hide icons
Multiboard - Set the display style for MULTIBOARD[CountPlayers] item in column 3 , row 4 to Show text and Hide icons
Multiboard - Set the display style for MULTIBOARD[CountPlayers] item in column 4 , row 4 to Show text and Hide icons
Multiboard - Set the display style for MULTIBOARD[CountPlayers] item in column 5 , row 4 to Show text and Hide icons
Multiboard - Set the display style for MULTIBOARD[CountPlayers] item in column 2 , row 5 to Show text and Hide icons
Multiboard - Set the display style for MULTIBOARD[CountPlayers] item in column 3 , row 5 to Show text and Hide icons
Multiboard - Set the display style for MULTIBOARD[CountPlayers] item in column 4 , row 5 to Show text and Hide icons
Multiboard - Set the display style for MULTIBOARD[CountPlayers] item in column 5 , row 5 to Show text and Hide icons
Multiboard - Set the width for MULTIBOARD[CountPlayers] item in column 1 , row 1 to 1.50 % of the total screen width
Multiboard - Set the width for MULTIBOARD[CountPlayers] item in column 2 , row 1 to 10.00 % of the total screen width
Multiboard - Set the width for MULTIBOARD[CountPlayers] item in column 3 , row 1 to 3.00 % of the total screen width
Multiboard - Set the width for MULTIBOARD[CountPlayers] item in column 1 , row 2 to 1.50 % of the total screen width
Multiboard - Set the width for MULTIBOARD[CountPlayers] item in column 2 , row 2 to 10.00 % of the total screen width
Multiboard - Set the width for MULTIBOARD[CountPlayers] item in column 3 , row 2 to 3.00 % of the total screen width
Multiboard - Set the width for MULTIBOARD[CountPlayers] item in column 1 , row 3 to 1.50 % of the total screen width
Multiboard - Set the width for MULTIBOARD[CountPlayers] item in column 2 , row 3 to 10.00 % of the total screen width
Multiboard - Set the width for MULTIBOARD[CountPlayers] item in column 3 , row 3 to 3.00 % of the total screen width
Multiboard - Set the width for MULTIBOARD[CountPlayers] item in column 1 , row 4 to 1.50 % of the total screen width
Multiboard - Set the width for MULTIBOARD[CountPlayers] item in column 2 , row 4 to 10.00 % of the total screen width
Multiboard - Set the width for MULTIBOARD[CountPlayers] item in column 3 , row 4 to 3.00 % of the total screen width
Multiboard - Set the width for MULTIBOARD[CountPlayers] item in column 1 , row 5 to 1.50 % of the total screen width
Multiboard - Set the width for MULTIBOARD[CountPlayers] item in column 2 , row 5 to 10.00 % of the total screen width
Multiboard - Set the width for MULTIBOARD[CountPlayers] item in column 3 , row 5 to 3.00 % of the total screen width
Multiboard - Set the icon for MULTIBOARD[CountPlayers] item in column 1 , row 1 to ReplaceableTextures\CommandButtons\BTNHealthStone.blp
Multiboard - Set the icon for MULTIBOARD[CountPlayers] item in column 1 , row 2 to ReplaceableTextures\CommandButtons\BTNManaStone.blp
Multiboard - Set the icon for MULTIBOARD[CountPlayers] item in column 1 , row 3 to ReplaceableTextures\CommandButtons\BTNChestOfGold.blp
Multiboard - Set the icon for MULTIBOARD[CountPlayers] item in column 1 , row 4 to ReplaceableTextures\CommandButtons\BTNOrcMeleeUpThree.blp
Multiboard - Set the icon for MULTIBOARD[CountPlayers] item in column 1 , row 5 to ReplaceableTextures\CommandButtons\BTNAnimateDead.blp
Multiboard - Set the text for MULTIBOARD[CountPlayers] item in column 2 , row 4 to (|cFFFF0000 + Убийств: )
Multiboard - Set the text for MULTIBOARD[CountPlayers] item in column 2 , row 3 to (|cFFFFFF00 + Золото: )
Multiboard - Set the text for MULTIBOARD[CountPlayers] item in column 2 , row 5 to (|cFF0000FF + Смертей: )
Multiboard - Hide MULTIBOARD[CountPlayers]
Else - Actions
//TESH.scrollpos=4
//TESH.alwaysfold=0
function Trig_Update_Actions takes nothing returns nothing
 local integer i = udg_CountPlayers
 loop
  call MultiboardSetItemValueBJ( udg_MULTIBOARD[i], 2, 1, udg_Strings_Health[R2I(( GetUnitLifePercent(udg_Unit) * 2.55 ))] )
  call MultiboardSetItemValueBJ( udg_MULTIBOARD[i], 2, 2, udg_Strings_Mana[R2I(( GetUnitManaPercent(udg_Unit) * 2.55 ))] )
  call MultiboardSetItemValueBJ( udg_MULTIBOARD[i], 3, 1, ( ( "|cFF00FF00" + I2S(R2I(GetUnitLifePercent(udg_Unit))) ) + ( "%" + "|r" ) ) )
  call MultiboardSetItemValueBJ( udg_MULTIBOARD[i], 3, 2, ( ( "|cFF3300FF" + I2S(R2I(GetUnitManaPercent(udg_Unit))) ) + ( "%" + "|r" ) ) )
  call MultiboardSetItemValueBJ( udg_MULTIBOARD[i], 3, 3, ( "|cFFFFFF00" + I2S(GetPlayerState(GetOwningPlayer(udg_Unit), PLAYER_STATE_RESOURCE_GOLD)) ) )
  set i = i - 1
  exitwhen i == 0
 endloop
endfunction

//===========================================================================
function InitTrig_Update takes nothing returns nothing
    set gg_trg_Update = CreateTrigger(  )
    call TriggerRegisterTimerEvent( gg_trg_Update, 0.1, true )
    call TriggerAddAction( gg_trg_Update, function Trig_Update_Actions )
endfunction
Deads
Events
Unit - A unit Dies
Conditions
((Dying unit) is A Hero) Equal to True
Actions
For each (Integer A) from 1 to 12 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of (Dying unit)) Equal to (Player((Integer A)))
Then - Actions
Set Variable Set PLAYER[(Integer A)] = (Owner of (Dying unit))
Set Variable Set Deads[(Player number of PLAYER[(Integer A)])] = (Deads[(Integer A)] + 1)
Else - Actions
Kills
Events
Unit - A unit Dies
Conditions
((Killing unit) is A Hero) Equal to True
Actions
For each (Integer B) from 1 to 12 , do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Owner of (Killing unit)) Equal to (Player((Integer B)))
Then - Actions
Set Variable Set PLAYER2[(Integer B)] = (Owner of (Killing unit))
Set Variable Set Kills[(Player number of PLAYER2[(Integer B)])] = (Kills[(Integer B)] + 1)
Else - Actions
Install
Events
Time - Elapsed game time is 1.00 seconds
Conditions
Actions
Game Cache - Create a game cache from Multiboard.w3v (Unexpected type: 'stringnoformat')
Set Variable Set Multiboard_Cashe = (Last created game cache)
Custom script: call Create_Multiboard()
Player Leave Game
Events
Player - Player 1 (Red) leaves the game
Player - Player 2 (Blue) leaves the game
Player - Player 3 (Teal) leaves the game
Player - Player 4 (Purple) leaves the game
Player - Player 5 (Yellow) leaves the game
Player - Player 6 (Orange) leaves the game
Player - Player 7 (Green) leaves the game
Player - Player 8 (Pink) leaves the game
Player - Player 9 (Gray) leaves the game
Player - Player 10 (Light Blue) leaves the game
Player - Player 11 (Dark Green) leaves the game
Player - Player 12 (Brown) leaves the game
Conditions
Actions
Multiboard - Destroy Multiboard
Game Cache - Clear all labels of (String((Player number of (Triggering player)))) in Multiboard_Cashe .
Custom script: call Create_Multiboard()
function Trig_TimerMultiboard_Actions takes nothing returns nothing
    local integer isec = cfgi ("MBiSec")
    local integer imin = cfgi ("MBiMin")
    local string ssec
    local string time
    set isec = isec + 1
if isec == 60 then
    set imin = imin + 1
    set isec = 0
endif
if isec < 10 then
    set ssec = "0" + I2S(isec)
else
    set ssec = I2S(isec)
endif
    set time = I2S(imin) + ":" + ssec
    call MultiboardSetTitleText( udg_Multiboard, "|cFF00F550"+"Golem Wars < " +time+" >" + "|r")
    call setcfg ("MBiSec", I2S(isec))
    call setcfg ("MBiMin", I2S(imin))
    call setcfg ("MBTime", time)
endfunction

//===========================================================================
function InitTrig_TimerMultiboard takes nothing returns nothing
    set gg_trg_TimerMultiboard = CreateTrigger(  )
    call TriggerRegisterTimerEventPeriodic( gg_trg_TimerMultiboard, 1.00 )
    call TriggerAddAction( gg_trg_TimerMultiboard, function Trig_TimerMultiboard_Actions )
endfunction
udg_PL_Frags[frag]
//TESH.scrollpos=-1
//TESH.alwaysfold=0
function Trig_Frags_Deads_Actions takes nothing returns nothing
     local integer dead = GetConvertedPlayerId(GetOwningPlayer(GetDyingUnit()))
     local integer frag = GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))
if  ((frag < 13) and (IsUnitType(GetDyingUnit(), UNIT_TYPE_HERO)) and (GetOwningPlayer(GetDyingUnit()) != GetOwningPlayer(GetKillingUnitBJ()))) == true then
    set udg_PL_Frags[frag] = ( udg_PL_Frags[frag] + 1 )
    call RefreshMultiboardItem(GetOwningPlayer(GetKillingUnitBJ()), 2, udg_PL_Frags[frag])
endif

if (dead < 13 and IsUnitType(GetDyingUnit(), UNIT_TYPE_HERO)) == true then
     set udg_PL_Deads[dead] = ( udg_PL_Deads[dead] + 1 )
     call RefreshMultiboardItem (GetOwningPlayer(GetDyingUnit()), 3, udg_PL_Deads[dead])
endif

set dead = 0
set frag = 0
endfunction

//===========================================================================
function InitTrig_Refresh_Frags_Deads takes nothing returns nothing
    set gg_trg_Refresh_Frags_Deads = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_Refresh_Frags_Deads, EVENT_PLAYER_UNIT_DEATH )
    call TriggerAddAction( gg_trg_Refresh_Frags_Deads, function Trig_Frags_Deads_Actions )
endfunction
Refresh Gold
Events
Player - Player 1 (Red) 's Current gold becomes Greater than or equal to 0.00
Player - Player 2 (Blue) 's Current gold becomes Greater than or equal to 0.00
Player - Player 3 (Teal) 's Current gold becomes Greater than or equal to 0.00
Player - Player 4 (Purple) 's Current gold becomes Greater than or equal to 0.00
Player - Player 5 (Yellow) 's Current gold becomes Greater than or equal to 0.00
Player - Player 6 (Orange) 's Current gold becomes Greater than or equal to 0.00
Player - Player 7 (Green) 's Current gold becomes Greater than or equal to 0.00
Player - Player 8 (Pink) 's Current gold becomes Greater than or equal to 0.00
Player - Player 9 (Gray) 's Current gold becomes Greater than or equal to 0.00
Player - Player 10 (Light Blue) 's Current gold becomes Greater than or equal to 0.00
Player - Player 11 (Dark Green) 's Current gold becomes Greater than or equal to 0.00
Player - Player 12 (Brown) 's Current gold becomes Greater than or equal to 0.00
Conditions
Actions
Custom script: call RefreshMultiboardItem(GetTriggerPlayer(), 4, GetPlayerState(GetTriggerPlayer(), PLAYER_STATE_RESOURCE_GOLD))
instalize
Events
Player - Player 1 (Red) types a chat message containing -snow (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Game - Display to (All players) for 35.00 seconds the text: TRIGSTR_202
Trigger - Run Sneg <gen> (checking conditions)
Sneg
Events
Conditions
Actions
Environment - Set fog to style Linear , z-start 1000 , z-end 8000 , density 0.30 and color ( 40.00 %, 40.00 %, 100 %)
Environment - Create at Arena <gen> the weather effect Northrend Blizzard
Environment - Turn (Last created weather effect) On
Environment - Change terrain type at (Center of pogoda9 <gen>) to Northrend - Snow using variation -1 in an area of size 2 and shape Circle
Wait 0.60 seconds
Environment - Change terrain type at (Center of pogoda5 <gen>) to Northrend - Snow using variation 0 in an area of size 2 and shape Circle
Wait 0.60 seconds
Environment - Change terrain type at (Center of pogoda4 <gen>) to Northrend - Snow using variation 0 in an area of size 2 and shape Circle
Wait 0.60 seconds
Environment - Change terrain type at (Center of pogoda1 <gen>) to Northrend - Snow using variation 0 in an area of size 2 and shape Circle
Wait 0.60 seconds
Environment - Change terrain type at (Center of pogoda2 <gen>) to Northrend - Snow using variation 0 in an area of size 2 and shape Circle
Wait 0.60 seconds
Environment - Change terrain type at (Center of pogoda10 <gen>) to Northrend - Snow using variation 0 in an area of size 2 and shape Circle
Wait 0.60 seconds
Environment - Change terrain type at (Center of pogoda3 <gen>) to Northrend - Snow using variation 0 in an area of size 2 and shape Circle
Wait 0.60 seconds
Environment - Change terrain type at (Center of pogoda6 <gen>) to Northrend - Snow using variation 0 in an area of size 2 and shape Circle
Wait 0.60 seconds
Environment - Change terrain type at (Center of pogoda8 <gen>) to Northrend - Snow using variation 0 in an area of size 2 and shape Circle
Environment - Change terrain type at (Center of pogoda7 <gen>) to Northrend - Snow using variation 0 in an area of size 2 and shape Circle
Trigger - Turn on skoljenie <gen>
Unit Group - Pick every unit in (Units in Arena <gen>) and do (Actions)
Loop - Actions
Animation - Change (Picked unit) 's vertex coloring to ( 50.00 %, 90.00 %, 100 %) with 10.00 % transparency
skoljenie
Events
Unit - A unit enters pogoda1 <gen>
Unit - A unit enters pogoda2 <gen>
Unit - A unit enters pogoda3 <gen>
Unit - A unit enters pogoda4 <gen>
Unit - A unit enters pogoda5 <gen>
Unit - A unit enters pogoda6 <gen>
Unit - A unit enters pogoda7 <gen>
Unit - A unit enters pogoda8 <gen>
Unit - A unit enters pogoda9 <gen>
Unit - A unit enters pogoda10 <gen>
Conditions
Actions
Special Effect - Create a special effect at (Position of (Entering unit)) using Objects\Spawnmodels\Naga\NagaDeath\NagaDeath.mdl
Set Variable Set SpecEffects = (Last created special effect)
Special Effect - Destroy (Last created special effect)
Animation - Play (Entering unit) 's death animation
Special Effect - Destroy (Last created special effect)
Set Variable Set number = (number + 1)
Set Variable Set RunOrNO[number] = "true"
Set Variable Set moved[number] = (Entering unit)
Set Variable Set MoveFacing[number] = (Facing of (Entering unit))
Set Variable Set MovedAvtoFacing[number] = "false"
Set Variable Set MovedDamage[number] = "0.00"
Set Variable Set MovedDeath[number] = "false"
Set Variable Set MovedIsSnorads[number] = "false"
Set Variable Set MovedRang[number] = "0.00"
Set Variable Set realMove[number] = "22.00"
Set Variable Set realStop[number] = "0.90"
Animation - Change (Entering unit) 's animation speed to 100.00 % of its original speed
Special Effect - Destroy (Last created special effect)
Special Effect - Destroy (Last created special effect)
Firstblood
Events
Unit - A unit Dies
Conditions
((Triggering unit) is A Hero) Equal to True
Actions
Game - Display to (All players) the text: ((Name of (Owner of (Killing unit))) + ( |cFFFF0000 Убил + ((Name of (Owner of (Dying unit))) + И Сделал |cFFFF0000First blood )))
Sound - Play firstblood.mp3 (Unexpected type: 'musictheme') .
Trigger - Turn off (This trigger)
Wait 1.00 seconds
Trigger - Turn on kill <gen>
kill
Events
Unit - A unit Dies
Conditions
((Triggering unit) is A Hero) Equal to True
Actions
Sound - Play Ownage.mp3 (Unexpected type: 'musictheme') .
Game - Display to (All players) the text: ((|cFF0000FF + (Name of (Owner of (Killing unit)))) + ( |cFFFF0000 Убил |cFF0000FF + (Name of (Owner of (Dying unit)))))
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 1
Then - Actions
Game - Display to (All players) the text: ((|cFF0000FF + (Name of (Owner of (Killing unit)))) + ( |cFFFF0000 Убил |cFF0000FF + ((Name of (Owner of (Dying unit))) + И Сделал |cFFFF0000Killing spree)))
Sound - Play Killing_Spree.mp3 (Unexpected type: 'musictheme') .
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 2
Then - Actions
Sound - Play MegaKill.mp3 (Unexpected type: 'musictheme') .
Game - Display to (All players) the text: ((|cFF0000FF + (Name of (Owner of (Killing unit)))) + ( |cFFFF0000 Убил |cFF0000FF + ((Name of (Owner of (Dying unit))) + И Сделал |cFFFF0000Mega KiLL)))
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Random integer number between 1 and 3) Equal to 3
Then - Actions
Sound - Play MonsterKill.mp3 (Unexpected type: 'musictheme') .
Game - Display to (All players) the text: ((|cFF0000FF + (Name of (Owner of (Killing unit)))) + ( |cFFFF0000 Убил |cFF0000FF + ((Name of (Owner of (Dying unit))) + И Сделал |cFFFF0000Monster KiLL)))
Else - Actions
Text
Events
Unit - A unit Starts the effect of an ability
Conditions
Actions
Custom script: local texttag t
Floating Text - Create floating text that reads (Name of (Ability being cast)) above (Casting unit) with Z offset 0 , using font size 10 , color ( 100 %, 0.00 %, 0.00 %), and 0 % transparency
Set Variable Set Text = (Last created floating text)
Custom script: set t = udg_Text
Floating Text - Set the velocity of Text to 64.00 towards 90 degrees
Wait 1.00 seconds
Custom script: set udg_Text = t
Floating Text - Destroy Text
MEGAKICKCHANCE
Events
Unit - A unit Is attacked
Conditions
((Attacking unit) has an item of type МЕГАКУЛАК) Equal to True
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 8
Then - Actions
Unit - Cause (Attacking unit) to damage (Attacked unit) , dealing 80.00 damage of attack type Hero and damage type Unknown
Special Effect - Create a special effect attached to the chest (Unexpected type: 'attachpoint') of (Attacked unit) using Abilities\Spells\Orc\WarStomp\WarStompCaster.mdl
Set Variable Set SpecEffects = (Last created special effect)
Special Effect - Destroy SpecEffects
Animation - Play (Attacked unit) 's death animation
Wait 0.20 seconds
Set Variable Set number = (number + 1)
Set Variable Set RunOrNO[number] = "true"
Set Variable Set moved[number] = (Attacked unit)
Set Variable Set MoveFacing[number] = (Facing of (Attacking unit))
Set Variable Set MovedAvtoFacing[number] = "false"
Set Variable Set MovedCaster[number] = (Attacking unit)
Set Variable Set MovedDamage[number] = "0.00"
Set Variable Set MovedDeath[number] = "true"
Set Variable Set MovedIsSnorads[number] = "false"
Set Variable Set MovedRang[number] = "0.00"
Set Variable Set realMove[number] = "60.00"
Set Variable Set realStop[number] = "1.60"
Animation - Play (Attacked unit) 's death animation
Else - Actions
Animation - Play (Attacked unit) 's death animation
SUPERLEGCHANCE
Events
Unit - A unit Is attacked
Conditions
((Attacking unit) has an item of type Супер Нога) Equal to True
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 8
Then - Actions
Animation - Play (Attacking unit) 's spell animation
Unit - Pause (Attacking unit)
Unit - Add Destroyer Form to (Attacking unit)
Animation - Change (Attacking unit) flying height to 300.00 at 300.00
Wait 0.40 seconds
Animation - Change (Attacking unit) flying height to 0.00 at 0.00
Environment - Create a 2.00 second Normal ripple deformation at (Position of (Attacked unit)) with starting radius 500.00 , ending radius 300.00 , and depth 140.00 , using 0.50 second ripples spaced 300.00 apart
Unit - Unpause (Attacking unit)
Unit - Remove Destroyer Form from (Attacking unit)
Unit Group - Pick every unit in (Units within 512 of (Position of (Triggering unit)).) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Picked unit) Not equal to (Attacking unit)
((Picked unit) is A structure) Not equal to True
Then - Actions
Unit - Cause (Attacking unit) to damage (Picked unit) , dealing 80.00 damage of attack type Spells and damage type Normal
Animation - Play (Picked unit) 's death animation
Set Variable Set number = (number + 1)
Set Variable Set RunOrNO[number] = "true"
Set Variable Set moved[number] = (Picked unit)
Set Variable Set MoveFacing[number] = (Angle from (Position of (Triggering unit)) to (Position of (Picked unit)))
Set Variable Set MovedAvtoFacing[number] = "false"
Set Variable Set MovedDamage[number] = "0.00"
Set Variable Set MovedDeath[number] = "false"
Set Variable Set MovedIsSnorads[number] = "false"
Set Variable Set MovedRang[number] = "0.00"
Set Variable Set realMove[number] = "30.00"
Set Variable Set realStop[number] = "1.50"
Else - Actions
Else - Actions
STONESHITCHANCE
Events
Unit - A unit Is attacked
Conditions
((Attacked unit) has an item of type Каменный Щит) Equal to True
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 15
Then - Actions
Unit - Set life of (Attacked unit) to ((Percentage life of (Attacked unit)) + 10.00) %
Special Effect - Create a special effect attached to the overhead (Unexpected type: 'attachpoint') of (Attacked unit) using Abilities\Spells\Items\AIre\AIreTarget.mdl
Special Effect - Destroy (Last created special effect)
Else - Actions
t1
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Пенок
((Casting unit) is A Hero) Equal to True
Actions
Unit - Cause (Casting unit) to damage (Target unit of ability being cast) , dealing (Real((Agility of (Casting unit) (Include bonuses)))) damage of attack type Spells and damage type Normal
Special Effect - Create a special effect at (Position of (Target unit of ability being cast)) using Abilities\Spells\Human\FlakCannons\FlakTarget.mdl
Set Variable Set SpecEffects = (Last created special effect)
Special Effect - Destroy SpecEffects
Animation - Play (Target unit of ability being cast) 's death animation
Set Variable Set number = (number + 1)
Set Variable Set RunOrNO[number] = "true"
Set Variable Set moved[number] = (Target unit of ability being cast)
Set Variable Set MoveFacing[number] = (Facing of (Triggering unit))
Set Variable Set MovedAvtoFacing[number] = "false"
Set Variable Set MovedDamage[number] = "0.00"
Set Variable Set MovedDeath[number] = "false"
Set Variable Set MovedIsSnorads[number] = "false"
Set Variable Set MovedRang[number] = "0.00"
Set Variable Set realMove[number] = (60.00 - (Real((Strength of (Target unit of ability being cast) (Include bonuses)))))
Set Variable Set realStop[number] = "0.60"
t2
Events
Unit - A unit Starts the effect of an ability
Conditions
((Triggering unit) is A Hero) Equal to True
(Ability being cast) Equal to Прыжок Смерти
Actions
Custom script: local unit pr
Set Variable Set Caster[3] = (Casting unit)
Custom script: set pr = udg_Caster[3]
Unit - Pause Caster[3]
Unit - Add Destroyer Form to Caster[3]
Animation - Change Caster[3] flying height to 500.00 at 800.00
Wait 0.40 seconds
Custom script: set udg_Caster[3] = pr
Animation - Change Caster[3] flying height to 0.00 at 1500.00
Environment - Create a 2.00 second Normal ripple deformation at (Position of Caster[3]) with starting radius 500.00 , ending radius 300.00 , and depth 140.00 , using 0.50 second ripples spaced 300.00 apart
Unit - Remove Destroyer Form from Caster[3]
Unit - Unpause Caster[3]
Unit Group - Pick every unit in (Units within 500.00 of (Position of Caster[3]).) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is A structure) Not equal to True
((Owner of (Picked unit)) is an enemy of (Owner of (Triggering unit)).) Equal to True
Then - Actions
Unit - Cause Caster[3] to damage (Picked unit) , dealing (Real((Strength of (Casting unit) (Include bonuses)))) damage of attack type Spells and damage type Normal
Animation - Play (Picked unit) 's death animation
Set Variable Set number = (number + 1)
Set Variable Set RunOrNO[number] = "true"
Set Variable Set moved[number] = (Picked unit)
Set Variable Set MoveFacing[number] = (Angle from (Position of Caster[3]) to (Position of (Picked unit)))
Set Variable Set MovedAvtoFacing[number] = "false"
Set Variable Set MovedDamage[number] = "0.00"
Set Variable Set MovedDeath[number] = "false"
Set Variable Set MovedIsSnorads[number] = "false"
Set Variable Set MovedRang[number] = "0.00"
Set Variable Set realMove[number] = (40.00 - (Real((Strength of (Picked unit) (Include bonuses)))))
Set Variable Set realStop[number] = "1.50"
Else - Actions
t3
Events
Unit - A unit Is attacked
Conditions
(Unit-type of (Attacking unit)) Equal to GOLEM"ча
Actions
Wait 0.20 seconds
Set Variable Set number = (number + 1)
Set Variable Set RunOrNO[number] = "true"
Set Variable Set moved[number] = (Attacked unit)
Set Variable Set MoveFacing[number] = (Facing of (Attacking unit))
Set Variable Set MovedAvtoFacing[number] = "false"
Set Variable Set MovedCaster[number] = (Attacking unit)
Set Variable Set MovedDamage[number] = "0.00"
Set Variable Set MovedDeath[number] = "true"
Set Variable Set MovedIsSnorads[number] = "false"
Set Variable Set MovedRang[number] = "0.00"
Set Variable Set realMove[number] = (Random real number between 1.00 and 30.00)
Set Variable Set realStop[number] = "1.60"
t3 2
Events
Unit - A unit Is attacked
Conditions
(Unit-type of (Attacking unit)) Equal to Футболист бля =D
Actions
Custom script: local unit uu
Set Variable Set mach = Мяч (Кожанный нах) 0003 <gen>
Wait 0.10 seconds
Set Variable Set number = (number + 1)
Set Variable Set RunOrNO[number] = "true"
Set Variable Set moved[number] = Мяч (Кожанный нах) 0003 <gen>
Set Variable Set MoveFacing[number] = (Facing of (Attacking unit))
Set Variable Set MovedAvtoFacing[number] = "false"
Set Variable Set MovedCaster[number] = (Attacking unit)
Set Variable Set MovedDamage[number] = "0.00"
Set Variable Set MovedDeath[number] = "true"
Set Variable Set MovedIsSnorads[number] = "false"
Set Variable Set MovedRang[number] = "0.00"
Set Variable Set realMove[number] = "40.00"
Set Variable Set realStop[number] = "1.60"
Custom script: set uu = udg_mach
Animation - Change mach flying height to 200.00 at 900.00
Wait 0.40 seconds
Custom script: set udg_mach = uu
Animation - Change mach flying height to 20.00 at 1000.00
Unit - Change ownership of mach to (Owner of (Attacking unit)) and Change color
Custom script: set uu = null
t4
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Разрезание
Actions
Custom script: local unit r
Set Variable Set Caster[5] = (Casting unit)
Unit - Turn collision for Caster[5] Off .
Custom script: set r = udg_Caster[5]
Set Variable Set number = (number + 1)
Set Variable Set RunOrNO[number] = "true"
Set Variable Set moved[number] = Caster[5]
Set Variable Set MoveFacing[number] = (Facing of Caster[5])
Set Variable Set MovedAvtoFacing[number] = "false"
Set Variable Set MovedDamage[number] = "0.00"
Set Variable Set MovedDeath[number] = "false"
Set Variable Set MovedIsSnorads[number] = "false"
Set Variable Set MovedRang[number] = "0.00"
Set Variable Set realMove[number] = "60.00"
Set Variable Set realStop[number] = "1.50"
Wait 0.80 seconds
Custom script: set udg_Caster[5] = r
Unit - Turn collision for Caster[5] On .
t5
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Супер Удар
((Triggering unit) is A Hero) Equal to True
Actions
Set Variable Set Target = (Target unit of ability being cast)
Unit - Cause (Casting unit) to damage (Target unit of ability being cast) , dealing (Real((Intelligence of (Casting unit) (Include bonuses)))) damage of attack type Spells and damage type Normal
Wait 0.10 seconds
Special Effect - Create a special effect at (Position of Target) using Abilities\Spells\Orc\WarStomp\WarStompCaster.mdl
Set Variable Set SpecEffects = (Last created special effect)
Special Effect - Destroy SpecEffects
Animation - Play Target 's death animation
Unit - Pause Target
Unit - Add Destroyer Form to Target
Animation - Change Target flying height to 200.00 at 200.00
Set Variable Set number = (number + 1)
Set Variable Set RunOrNO[number] = "true"
Set Variable Set moved[number] = Target
Set Variable Set MoveFacing[number] = (Facing of (Triggering unit))
Set Variable Set MovedAvtoFacing[number] = "false"
Set Variable Set MovedDamage[number] = "0.00"
Set Variable Set MovedDeath[number] = "false"
Set Variable Set MovedIsSnorads[number] = "false"
Set Variable Set MovedRang[number] = "0.00"
Set Variable Set realMove[number] = (60.00 - (Real((Strength of (Target unit of ability being cast) (Include bonuses)))))
Set Variable Set realStop[number] = "0.40"
Wait 3.00 seconds
Unit - Unpause Target
Unit - Remove Destroyer Form from Target
Animation - Change Target flying height to 0.00 at 0.00
Special Effect - Create a special effect at (Position of Target) using Abilities\Spells\Orc\WarStomp\WarStompCaster.mdl
Special Effect - Destroy (Last created special effect)
Unit - Unpause Target
Unit Group - Pick every unit in (Units within 300.00 of (Position of Target).) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Picked unit) Not equal to (Triggering unit)
((Picked unit) is A structure) Not equal to True
Then - Actions
Unit - Unpause Target
Animation - Change Target flying height to 0.00 at 0.00
Special Effect - Create a special effect at (Position of Target) using Abilities\Spells\Orc\WarStomp\WarStompCaster.mdl
Animation - Play (Picked unit) 's death animation
Environment - Create a 2.00 second Normal ripple deformation at (Position of Target) with starting radius 500.00 , ending radius 300.00 , and depth 140.00 , using 0.50 second ripples spaced 300.00 apart
Unit - Cause (Triggering unit) to damage (Picked unit) , dealing ((Real((Level of Супер Удар for (Triggering unit)))) x 50.00) damage of attack type Spells and damage type Unknown
Set Variable Set number = (number + 1)
Set Variable Set RunOrNO[number] = "true"
Set Variable Set moved[number] = (Picked unit)
Set Variable Set MoveFacing[number] = (Angle from (Position of (Target unit of ability being cast)) to (Position of (Picked unit)))
Set Variable Set MovedAvtoFacing[number] = "false"
Set Variable Set MovedDamage[number] = "0.00"
Set Variable Set MovedDeath[number] = "false"
Set Variable Set MovedIsSnorads[number] = "false"
Set Variable Set MovedRang[number] = "0.00"
Set Variable Set realMove[number] = (50.00 - (Real((Strength of (Target unit of ability being cast) (Include bonuses)))))
Set Variable Set realStop[number] = "1.50"
Else - Actions
t6
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Анреальный пенок
((Triggering unit) is A Hero) Equal to True
Actions
Custom script: local unit tr
Set Variable Set Target1 = (Target unit of ability being cast)
Custom script: set tr = udg_Target1
Unit - Add Destroyer Form to Target1
Animation - Change Target1 flying height to 500.00 at 500.00
Unit - Pause Target1
Special Effect - Create a special effect at (Position of Target1) using Abilities\Spells\Other\HowlOfTerror\HowlCaster.mdl
Unit - Cause (Casting unit) to damage Target1 , dealing (Real((Strength of (Casting unit) (Include bonuses)))) damage of attack type Spells and damage type Normal
Set Variable Set SpecEffects = (Last created special effect)
Special Effect - Destroy SpecEffects
Set Variable Set number = (number + 1)
Set Variable Set RunOrNO[number] = "true"
Set Variable Set moved[number] = Target1
Set Variable Set MoveFacing[number] = (Facing of (Triggering unit))
Set Variable Set MovedAvtoFacing[number] = "false"
Set Variable Set MovedDamage[number] = "5.00"
Set Variable Set MovedDeath[number] = "false"
Set Variable Set MovedIsSnorads[number] = "false"
Set Variable Set MovedRang[number] = "0.00"
Set Variable Set realMove[number] = (70.00 - (Real((Strength of (Target unit of ability being cast) (Include bonuses)))))
Set Variable Set realStop[number] = "0.28"
Animation - Change Target1 flying height to 300.00 at 1100.00
Wait 1.20 seconds
Animation - Change Target1 flying height to 0.00 at 1400.00
Wait 0.60 seconds
Special Effect - Create a special effect at (Position of Target1) using Abilities\Spells\Human\ThunderClap\ThunderClapCaster.mdl
Special Effect - Destroy (Last created special effect)
Unit - Cause (Triggering unit) to damage Target1 , dealing ((Real((Level of Анреальный пенок for (Triggering unit)))) + 20.00) damage of attack type Spells and damage type Normal
Animation - Change Target1 flying height to 500.00 at 1100.00
Wait 1.80 seconds
Animation - Change Target1 flying height to 0.00 at 1400.00
Special Effect - Create a special effect at (Position of Target1) using Abilities\Spells\Human\ThunderClap\ThunderClapCaster.mdl
Special Effect - Destroy (Last created special effect)
Unit - Cause (Triggering unit) to damage Target1 , dealing ((Real((Level of Анреальный пенок for (Triggering unit)))) + 20.00) damage of attack type Spells and damage type Normal
Custom script: set udg_Target1 = tr
Unit - Remove Destroyer Form from Target1
Unit - Unpause Target1
t7
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Мега Булыжник
Actions
Set Variable Set Caster[4] = (Target unit of ability being cast)
Wait ((Distance between (Position of (Casting unit)) and (Position of Caster[4])) / 1000.00) seconds
Special Effect - Create a special effect at (Position of Caster[4]) using Abilities\Spells\Human\ThunderClap\ThunderClapCaster.mdl
Special Effect - Destroy (Last created special effect)
Unit Group - Pick every unit in (Units within 500.00 of (Position of Caster[4]).) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is A structure) Not equal to True
((Owner of (Picked unit)) is an enemy of (Owner of (Triggering unit)).) Equal to True
Then - Actions
Unit - Cause (Casting unit) to damage (Picked unit) , dealing 50.00 damage of attack type Spells and damage type Unknown
Animation - Play (Picked unit) 's death animation
Set Variable Set number = (number + 1)
Set Variable Set RunOrNO[number] = "true"
Set Variable Set moved[number] = (Picked unit)
Set Variable Set MoveFacing[number] = (Angle from (Position of Caster[4]) to (Position of (Picked unit)))
Set Variable Set MovedAvtoFacing[number] = "false"
Set Variable Set MovedDamage[number] = "0.00"
Set Variable Set MovedDeath[number] = "false"
Set Variable Set MovedIsSnorads[number] = "false"
Set Variable Set MovedRang[number] = "0.00"
Set Variable Set realMove[number] = (50.00 - (Real((Strength of (Picked unit) (Include bonuses)))))
Set Variable Set realStop[number] = "1.50"
Else - Actions
//TESH.scrollpos=-1
//TESH.alwaysfold=0
function Trig_t8_Conditions takes nothing returns boolean
    if ( not ( GetSpellAbilityId() == 'AIfz' ) ) then
        return false
    endif
    return true
endfunction

function moverez takes nothing returns nothing
local timer t = CreateTimer()
call SetUnitPositionLoc( udg_Rezinka, PolarProjectionBJ(GetUnitLoc(udg_Rezinka), 32.00, GetUnitFacing(udg_Rezinka)) )
call SetUnitFacingToFaceUnitTimed( udg_Rezinka, udg_Caster[1],0)
call DestroyTimer(t)
endfunction

function Trig_t8_Actions takes nothing returns nothing
    local unit ps
    local timer t = CreateTimer()
    set udg_Caster[1] = GetSpellAbilityUnit()
    set udg_Rezinka = GetSpellTargetUnit()
    set ps = udg_Rezinka
    call SetUnitPathing( udg_Rezinka, false )
    call moverez()
    call TimerStart(t,0.04,true,function moverez)
    call TriggerSleepAction( 2.50 )
    set udg_Rezinka = ps
    call SetUnitPathing( udg_Rezinka, true )
    call DestroyTimer(t)
    set ps = null
endfunction

//===========================================================================
function InitTrig_t8 takes nothing returns nothing
    set gg_trg_t8 = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_t8, EVENT_PLAYER_UNIT_SPELL_EFFECT )
    call TriggerAddCondition( gg_trg_t8, Condition( function Trig_t8_Conditions ) )
    call TriggerAddAction( gg_trg_t8, function Trig_t8_Actions )
endfunction
t9
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Карусель
Actions
Custom script: local unit uc
Unit - Create 1 . Fel Boar for (Owner of (Casting unit)) at (Position of (Target unit of ability being cast)) facing Default building facing degrees
Set Variable Set Caster[2] = (Last created unit)
Custom script: set uc = udg_Caster[2]
Unit - Order (Last created unit) to Special Archimonde - Finger Of Death . (Target unit of ability being cast)
Wait 2.50 seconds
Custom script: set udg_Caster[2] = uc
Unit - Remove Caster[2] from the game
t10
Events
Unit - A unit Starts the effect of an ability
Conditions
(Ability being cast) Equal to Метеор
Actions
Custom script: local unit m
Unit - Create 1 . Meteor1 for (Owner of (Casting unit)) at (Target point of ability being cast) facing (Facing of (Casting unit)) degrees
Set Variable Set Meteor = (Last created unit)
Custom script: set m = udg_Meteor
Wait 0.80 seconds
Special Effect - Create a special effect at (Position of Meteor) using Abilities\Spells\Orc\WarStomp\WarStompCaster.mdl
Special Effect - Destroy (Last created special effect)
Special Effect - Create a special effect at (Position of Meteor) using Objects\Spawnmodels\Other\NeutralBuildingExplosion\NeutralBuildingExplosion.mdl
Special Effect - Destroy (Last created special effect)
Environment - Create a 1.00 second Normal ripple deformation at (Position of Meteor) with starting radius 100.00 , ending radius 600.00 , and depth 200.00 , using 1 second ripples spaced 300.00 apart
Custom script: set udg_Meteor = m
Unit Group - Pick every unit in (Units within 300.00 of (Position of Meteor).) and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
((Picked unit) is A structure) Not equal to True
(Picked unit) Not equal to (Casting unit)
Then - Actions
Unit - Cause Meteor to damage (Picked unit) , dealing 80.00 damage of attack type Spells and damage type Normal
Animation - Play (Picked unit) 's death animation
Set Variable Set number = (number + 1)
Set Variable Set RunOrNO[number] = "true"
Set Variable Set moved[number] = (Picked unit)
Set Variable Set MoveFacing[number] = (Angle from (Position of Caster[4]) to (Position of (Picked unit)))
Set Variable Set MovedAvtoFacing[number] = "false"
Set Variable Set MovedDamage[number] = "0.00"
Set Variable Set MovedDeath[number] = "false"
Set Variable Set MovedIsSnorads[number] = "false"
Set Variable Set MovedRang[number] = "0.00"
Set Variable Set realMove[number] = (50.00 - (Real((Strength of (Picked unit) (Include bonuses)))))
Set Variable Set realStop[number] = "1.50"
Else - Actions
Unit - Remove Meteor from the game
Top