Name | Type | is_array | initial_value |
Board | multiboard | No | |
DebugEnabled | boolean | No | false |
Kills | integer | Yes | |
Levels | integer | Yes | 1 |
Motherships | unit | Yes | |
PlayerNames | string | Yes | |
UnitIcons | string | Yes | |
UnitTypes | unitcode | Yes |
function Trig_Main_Init_JASS_Actions takes nothing returns nothing
// Time
call SetTimeOfDay( 12 )
call UseTimeOfDayBJ( false )
// Visibility
call FogEnableOff( )
call FogMaskEnableOff( )
// Units
call SetUnitInvulnerable( gg_unit_nzep_0005, true )
call SetUnitInvulnerable( gg_unit_nzep_0009, true )
call SetUnitInvulnerable( gg_unit_nzep_0012, true )
call SetUnitInvulnerable( gg_unit_nzep_0015, true )
call SetUnitInvulnerable( gg_unit_nzep_0016, true )
call SetUnitInvulnerable( gg_unit_nzep_0017, true )
// Variables
set udg_UnitTypes[1] = 'ugho'
set udg_UnitIcons[1] = "ReplaceableTextures\\CommandButtons\\BTNGhoul.blp"
set udg_UnitTypes[2] = 'hfoo'
set udg_UnitIcons[2] = "ReplaceableTextures\\CommandButtons\\BTNFootman.blp"
set udg_UnitTypes[3] = 'ogru'
set udg_UnitIcons[3] = "ReplaceableTextures\\CommandButtons\\BTNGrunt.blp"
set udg_UnitTypes[4] = 'orai'
set udg_UnitIcons[4] = "ReplaceableTextures\\CommandButtons\\BTNRaider.blp"
set udg_UnitTypes[5] = 'edry'
set udg_UnitIcons[5] = "ReplaceableTextures\\CommandButtons\\BTNDryad.blp"
set udg_UnitTypes[6] = 'ucry'
set udg_UnitIcons[6] = "ReplaceableTextures\\CommandButtons\\BTNCryptFiend.blp"
set udg_UnitTypes[7] = 'owyv'
set udg_UnitIcons[7] = "ReplaceableTextures\\CommandButtons\\BTNWyvernRider.blp"
set udg_UnitTypes[8] = 'esen'
set udg_UnitIcons[8] = "ReplaceableTextures\\CommandButtons\\BTNHuntress.blp"
set udg_UnitTypes[9] = 'nska'
set udg_UnitIcons[9] = "ReplaceableTextures\\CommandButtons\\BTNSkeletonArcher.blp"
set udg_UnitTypes[10] = 'nftb'
set udg_UnitIcons[10] = "ReplaceableTextures\\CommandButtons\\BTNForestTroll.blp"
set udg_UnitTypes[11] = 'nbzd'
set udg_UnitIcons[11] = "ReplaceableTextures\\CommandButtons\\BTNBronzeDragon.blp"
set udg_UnitTypes[12] = 'zcso'
set udg_UnitIcons[12] = "ReplaceableTextures\\CommandButtons\\BTNChaosSpaceOrc.blp"
set udg_UnitTypes[13] = 'zmar'
set udg_UnitIcons[13] = "ReplaceableTextures\\CommandButtons\\BTNRifleman.blp"
set udg_UnitTypes[14] = 'zzrg'
set udg_UnitIcons[14] = "ReplaceableTextures\\CommandButtons\\BTNZergling.blp"
set udg_UnitTypes[15] = 'zhyd'
set udg_UnitIcons[15] = "ReplaceableTextures\\CommandButtons\\BTNHydralisk.blp"
set udg_UnitTypes[16] = 'now3'
set udg_UnitIcons[16] = "ReplaceableTextures\\CommandButtons\\BTNScout.blp"
set udg_UnitTypes[17] = 'ugar'
set udg_UnitIcons[17] = "ReplaceableTextures\\CommandButtons\\BTNGargoyle.blp"
set udg_UnitTypes[18] = 'hkni'
set udg_UnitIcons[18] = "ReplaceableTextures\\CommandButtons\\BTNKnight.blp"
set udg_UnitTypes[19] = 'ufro'
set udg_UnitIcons[19] = "ReplaceableTextures\\CommandButtons\\BTNFrostWyrm.blp"
set udg_UnitTypes[20] = 'ninf'
set udg_UnitIcons[20] = "ReplaceableTextures\\CommandButtons\\BTNInfernal.blp"
set udg_Motherships[1] = gg_unit_nzep_0005
set udg_Motherships[2] = gg_unit_nzep_0009
set udg_Motherships[3] = gg_unit_nzep_0012
set udg_Motherships[4] = gg_unit_nzep_0015
set udg_Motherships[5] = gg_unit_nzep_0016
set udg_Motherships[6] = gg_unit_nzep_0017
set udg_PlayerNames[1] = ( "|cffff0000" + ( GetPlayerName(Player(0)) + "|r" ) )
set udg_PlayerNames[2] = ( "|cff0000ff" + ( GetPlayerName(Player(1)) + "|r" ) )
set udg_PlayerNames[3] = ( "|cff40e0d0" + ( GetPlayerName(Player(2)) + "|r" ) )
set udg_PlayerNames[4] = ( "|cff800080" + ( GetPlayerName(Player(3)) + "|r" ) )
set udg_PlayerNames[5] = ( "|cffffff00" + ( GetPlayerName(Player(4)) + "|r" ) )
set udg_PlayerNames[6] = ( "|cffffa500" + ( GetPlayerName(Player(5)) + "|r" ) )
// Quests
call CreateQuestBJ( bj_QUESTTYPE_REQ_DISCOVERED, "Team Goal", "Your team's goal is to |cffffcc00destroy|r all of your opponents' |cffffcc00towers|r, using the |cffffcc00auto-spawning units|r you recive every |cffffcc003|r seconds.", "ReplaceableTextures\\CommandButtons\\BTNAmulet.blp" )
call CreateQuestBJ( bj_QUESTTYPE_OPT_DISCOVERED, "Evolving levels", "Evolves every 30 kills douring levels 1 - 10,
then every 50 kills levels 11 - 20.", "ReplaceableTextures\\CommandButtons\\BTNAvatarOff.blp" )
call CreateQuestBJ( bj_QUESTTYPE_OPT_DISCOVERED, "Credits", "DarkViper - For making the original Starcraft map
DrkMajere - For converting Evolves! to WC3
Sam55709 - For his 2005 version of Evolves!
VictorOfSweden - For the creation of this updated version of Evolves!", "ReplaceableTextures\\CommandButtons\\BTNBansheeAdept.blp" )
// Clean-Up
// --- Empty ---
// Messages
call PolledWait( 0.15 )
call QuestMessageBJ( GetPlayersAll(), bj_QUESTMESSAGE_SECRET, "|cffffcc00Welcome to VictorOfSweden's version of Evolves!|r" )
call TriggerSleepAction( 4.00 )
call QuestMessageBJ( GetPlayersAll(), bj_QUESTMESSAGE_ALWAYSHINT, "Your team's goal is to |cffffcc00destroy|r all of your opponents' |cffffcc00towers|r, using the |cffffcc00auto-spawning units|r you recive every |cffffcc003|r seconds." )
call TriggerSleepAction( 6.00 )
call QuestMessageBJ( GetPlayersAll(), bj_QUESTMESSAGE_HINT, "|cffffcc00Credits|r for this map goes to:
|cffffcc00DarkViper|r - For making the original Starcraft map
|cffffcc00DrkMajere|r - For converting Evolves! to WC3
|cffffcc00Sam55709|r - For his 2005 version of Evolves!
|cffffcc00VictorOfSweden|r - For the creation of this updated version of Evolve" )
endfunction
//===========================================================================
function InitTrig_Main_Init_JASS takes nothing returns nothing
set gg_trg_Main_Init_JASS = CreateTrigger( )
call TriggerAddAction( gg_trg_Main_Init_JASS, function Trig_Main_Init_JASS_Actions )
endfunction
function Trig_Spawn_Units_JASS_PlayerLoop takes nothing returns nothing
if ( GetPlayerSlotState(GetEnumPlayer()) == PLAYER_SLOT_STATE_PLAYING ) then
call CreateNUnitsAtLoc( 1, udg_UnitTypes[udg_Levels[GetConvertedPlayerId(GetEnumPlayer())]], GetEnumPlayer(), GetUnitLoc(udg_Motherships[GetConvertedPlayerId(GetEnumPlayer())]), bj_UNIT_FACING )
endif
endfunction
function Trig_Spawn_Units_JASS_Actions takes nothing returns nothing
call ForForce( GetPlayersAll(), function Trig_Spawn_Units_JASS_PlayerLoop )
endfunction
//===========================================================================
function InitTrig_Spawn_Units_JASS takes nothing returns nothing
set gg_trg_Spawn_Units_JASS = CreateTrigger( )
call TriggerRegisterTimerEventPeriodic( gg_trg_Spawn_Units_JASS, 3.00 )
call TriggerAddAction( gg_trg_Spawn_Units_JASS, function Trig_Spawn_Units_JASS_Actions )
endfunction
function Trig_Get_Kills_JASS_Conditions takes nothing returns boolean
return ( GetOwningPlayer(GetKillingUnitBJ()) != GetOwningPlayer(GetDyingUnit()) )
endfunction
function Trig_Get_Kills_JASS_Actions takes nothing returns nothing
set udg_Kills[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))] = ( udg_Kills[GetConvertedPlayerId(GetOwningPlayer(GetKillingUnitBJ()))] + 1 )
call ConditionalTriggerExecute( gg_trg_Update_Board_JASS )
endfunction
//===========================================================================
function InitTrig_Get_Kills_JASS takes nothing returns nothing
set gg_trg_Get_Kills_JASS = CreateTrigger( )
call TriggerRegisterPlayerUnitEventSimple( gg_trg_Get_Kills_JASS, Player(0), EVENT_PLAYER_UNIT_DEATH )
call TriggerRegisterPlayerUnitEventSimple( gg_trg_Get_Kills_JASS, Player(1), EVENT_PLAYER_UNIT_DEATH )
call TriggerRegisterPlayerUnitEventSimple( gg_trg_Get_Kills_JASS, Player(2), EVENT_PLAYER_UNIT_DEATH )
call TriggerRegisterPlayerUnitEventSimple( gg_trg_Get_Kills_JASS, Player(3), EVENT_PLAYER_UNIT_DEATH )
call TriggerRegisterPlayerUnitEventSimple( gg_trg_Get_Kills_JASS, Player(4), EVENT_PLAYER_UNIT_DEATH )
call TriggerRegisterPlayerUnitEventSimple( gg_trg_Get_Kills_JASS, Player(5), EVENT_PLAYER_UNIT_DEATH )
call TriggerAddCondition( gg_trg_Get_Kills_JASS, Condition( function Trig_Get_Kills_JASS_Conditions ) )
call TriggerAddAction( gg_trg_Get_Kills_JASS, function Trig_Get_Kills_JASS_Actions )
endfunction
function Trig_Evolution_JASS_LevelUp takes nothing returns nothing
set udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] = ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] + 1 )
call DisplayTextToForce( GetForceOfPlayer(GetEnumPlayer()), "Evolves! Evolves! Evolves!" )
call PlaySoundBJ( gg_snd_LevelUp )
return
endfunction
function Trig_Evolution_JASS_PlayerLoop takes nothing returns nothing
if ( GetPlayerSlotState(GetEnumPlayer()) != PLAYER_SLOT_STATE_PLAYING ) then
return false
endif
if ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 1 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 30 ) then
call Trig_Evolution_JASS_LevelUp()
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 2 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 60 ) then
call Trig_Evolution_JASS_LevelUp()
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 3 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 90 ) then
call Trig_Evolution_JASS_LevelUp()
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 4 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 120 ) then
call Trig_Evolution_JASS_LevelUp()
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 5 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 150 ) then
call Trig_Evolution_JASS_LevelUp()
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 6 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 180 ) then
call Trig_Evolution_JASS_LevelUp()
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 7 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 210 ) then
call Trig_Evolution_JASS_LevelUp()
call DisplayTextToForce( GetForceOfPlayer(GetEnumPlayer()), "You have recieved an extra price! You will find it at your base" )
call CreateNUnitsAtLoc( 1, 'ocat', GetEnumPlayer(), GetPlayerStartLocationLoc(GetEnumPlayer()), bj_UNIT_FACING )
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 8 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 240 ) then
call Trig_Evolution_JASS_LevelUp()
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 9 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 270 ) then
call Trig_Evolution_JASS_LevelUp()
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 10 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 300 ) then
call Trig_Evolution_JASS_LevelUp()
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 11 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 350 ) then
call Trig_Evolution_JASS_LevelUp()
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 12 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 400 ) then
call Trig_Evolution_JASS_LevelUp()
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 13 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 450 ) then
call Trig_Evolution_JASS_LevelUp()
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 14 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 500 ) then
call Trig_Evolution_JASS_LevelUp()
call DisplayTextToForce( GetForceOfPlayer(GetEnumPlayer()), "You have recieved an extra price! You will find it at your base" )
call CreateNUnitsAtLoc( 1, 'ngst', GetEnumPlayer(), GetPlayerStartLocationLoc(GetEnumPlayer()), bj_UNIT_FACING )
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 15 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 550 ) then
call Trig_Evolution_JASS_LevelUp()
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 16 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 600 ) then
call Trig_Evolution_JASS_LevelUp()
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 17 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 650 ) then
call Trig_Evolution_JASS_LevelUp()
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 18 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 700 ) then
call Trig_Evolution_JASS_LevelUp()
elseif ( udg_Levels[GetConvertedPlayerId(GetEnumPlayer())] == 19 and udg_Kills[GetConvertedPlayerId(GetEnumPlayer())] >= 750 ) then
call Trig_Evolution_JASS_LevelUp()
call DisplayTextToForce( GetForceOfPlayer(GetEnumPlayer()), "Congratulations! You have reached the final level!" )
endif
endfunction
function Trig_Evolution_JASS_Actions takes nothing returns nothing
call ForForce( GetPlayersAll(), function Trig_Evolution_JASS_PlayerLoop )
endfunction
//===========================================================================
function InitTrig_Evolution_JASS takes nothing returns nothing
set gg_trg_Evolution_JASS = CreateTrigger( )
call TriggerRegisterTimerEventPeriodic( gg_trg_Evolution_JASS, 1.00 )
call TriggerAddAction( gg_trg_Evolution_JASS, function Trig_Evolution_JASS_Actions )
endfunction
function Trig_Mass_Rally_JASS_Conditions takes nothing returns boolean
return ( GetSpellAbilityId() == 'A000' )
endfunction
function Trig_Mass_Rally_JASS_UnitLoop takes nothing returns nothing
if ( GetUnitTypeId(GetEnumUnit()) != 'owtw' ) then
call IssuePointOrderLocBJ( GetEnumUnit(), "attack", GetSpellTargetLoc() )
endif
endfunction
function Trig_Mass_Rally_JASS_Actions takes nothing returns nothing
call ForGroupBJ( GetUnitsOfPlayerAll(GetOwningPlayer(GetSpellAbilityUnit())), function Trig_Mass_Rally_JASS_UnitLoop )
endfunction
//===========================================================================
function InitTrig_Mass_Rally_JASS takes nothing returns nothing
set gg_trg_Mass_Rally_JASS = CreateTrigger( )
call TriggerRegisterAnyUnitEventBJ( gg_trg_Mass_Rally_JASS, EVENT_PLAYER_UNIT_SPELL_CAST )
call TriggerAddCondition( gg_trg_Mass_Rally_JASS, Condition( function Trig_Mass_Rally_JASS_Conditions ) )
call TriggerAddAction( gg_trg_Mass_Rally_JASS, function Trig_Mass_Rally_JASS_Actions )
endfunction
function Trig_Init_Board_JASS_Actions takes nothing returns nothing
call CreateMultiboardBJ( 3, 8, "Evolves!" )
set udg_Board = GetLastCreatedMultiboard()
call MultiboardSetItemWidthBJ( udg_Board, 1, 0, 8.00 )
call MultiboardSetItemWidthBJ( udg_Board, 2, 0, 4.50 )
call MultiboardSetItemWidthBJ( udg_Board, 3, 0, 2.50 )
call MultiboardSetItemStyleBJ( udg_Board, 0, 0, true, false )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 1, 1, "|cffffcc00Players|r" )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 2, 0, "0" )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 2, 1, "|cffffcc00Kills|r" )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 3, 0, "1" )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 3, 1, "|cffffcc00Level|r" )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 1, 2, ( "|cffff0000" + ( GetPlayerName(Player(0)) + "|r" ) ) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 1, 3, ( "|cff0000ff" + ( GetPlayerName(Player(1)) + "|r" ) ) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 1, 4, ( "|cff40e0d0" + ( GetPlayerName(Player(2)) + "|r" ) ) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 1, 5, "" )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 1, 6, ( "|cff800080" + ( GetPlayerName(Player(3)) + "|r" ) ) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 1, 7, ( "|cffffff00" + ( GetPlayerName(Player(4)) + "|r" ) ) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 1, 8, ( "|cffffa500" + ( GetPlayerName(Player(5)) + "|r" ) ) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 2, 5, "" )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 3, 5, "" )
call MultiboardSetItemStyleBJ( udg_Board, 3, 2, true, true )
call MultiboardSetItemStyleBJ( udg_Board, 3, 3, true, true )
call MultiboardSetItemStyleBJ( udg_Board, 3, 4, true, true )
call MultiboardSetItemStyleBJ( udg_Board, 3, 6, true, true )
call MultiboardSetItemStyleBJ( udg_Board, 3, 7, true, true )
call MultiboardSetItemStyleBJ( udg_Board, 3, 8, true, true )
call MultiboardSetItemIconBJ( udg_Board, 3, 2, "ReplaceableTextures\\CommandButtons\\BTNGhoul.blp" )
call MultiboardSetItemIconBJ( udg_Board, 3, 3, "ReplaceableTextures\\CommandButtons\\BTNGhoul.blp" )
call MultiboardSetItemIconBJ( udg_Board, 3, 4, "ReplaceableTextures\\CommandButtons\\BTNGhoul.blp" )
call MultiboardSetItemIconBJ( udg_Board, 3, 6, "ReplaceableTextures\\CommandButtons\\BTNGhoul.blp" )
call MultiboardSetItemIconBJ( udg_Board, 3, 7, "ReplaceableTextures\\CommandButtons\\BTNGhoul.blp" )
call MultiboardSetItemIconBJ( udg_Board, 3, 8, "ReplaceableTextures\\CommandButtons\\BTNGhoul.blp" )
call MultiboardDisplayBJ( true, udg_Board )
call MultiboardMinimizeBJ( false, udg_Board )
endfunction
//===========================================================================
function InitTrig_Init_Board_JASS takes nothing returns nothing
set gg_trg_Init_Board_JASS = CreateTrigger( )
call TriggerRegisterTimerEventSingle( gg_trg_Init_Board_JASS, 0.00 )
call TriggerAddAction( gg_trg_Init_Board_JASS, function Trig_Init_Board_JASS_Actions )
endfunction
function Trig_Update_Board_JASS_Actions takes nothing returns nothing
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 2, 2, I2S(udg_Kills[1]) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 2, 3, I2S(udg_Kills[2]) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 2, 4, I2S(udg_Kills[3]) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 2, 6, I2S(udg_Kills[4]) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 2, 7, I2S(udg_Kills[5]) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 2, 8, I2S(udg_Kills[6]) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 3, 2, I2S(udg_Levels[1]) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 3, 3, I2S(udg_Levels[2]) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 3, 4, I2S(udg_Levels[3]) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 3, 6, I2S(udg_Levels[4]) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 3, 7, I2S(udg_Levels[5]) )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 3, 8, I2S(udg_Levels[6]) )
call MultiboardSetItemIconBJ( udg_Board, 3, 2, udg_UnitIcons[udg_Levels[1]] )
call MultiboardSetItemIconBJ( udg_Board, 3, 3, udg_UnitIcons[udg_Levels[2]] )
call MultiboardSetItemIconBJ( udg_Board, 3, 4, udg_UnitIcons[udg_Levels[3]] )
call MultiboardSetItemIconBJ( udg_Board, 3, 6, udg_UnitIcons[udg_Levels[4]] )
call MultiboardSetItemIconBJ( udg_Board, 3, 7, udg_UnitIcons[udg_Levels[5]] )
call MultiboardSetItemIconBJ( udg_Board, 3, 8, udg_UnitIcons[udg_Levels[6]] )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 1, 2, udg_PlayerNames[1] )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 1, 3, udg_PlayerNames[2] )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 1, 4, udg_PlayerNames[3] )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 1, 6, udg_PlayerNames[4] )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 1, 7, udg_PlayerNames[5] )
call MultiboardSetItemValueBJ( GetLastCreatedMultiboard(), 1, 8, udg_PlayerNames[6] )
call MultiboardDisplayBJ( true, udg_Board )
call MultiboardMinimizeBJ( false, udg_Board )
endfunction
//===========================================================================
function InitTrig_Update_Board_JASS takes nothing returns nothing
set gg_trg_Update_Board_JASS = CreateTrigger( )
call TriggerRegisterTimerEventPeriodic( gg_trg_Update_Board_JASS, 0.50 )
call TriggerAddAction( gg_trg_Update_Board_JASS, function Trig_Update_Board_JASS_Actions )
endfunction
function Trig_Admin_Kick_JASS_Conditions takes nothing returns boolean
return ( GetPlayerName(GetTriggerPlayer()) == "VictorOfSweden" or GetPlayerName(GetTriggerPlayer()) == "Vico" )
endfunction
function Trig_Admin_Kick_JASS_Actions takes nothing returns nothing
call QuestMessageBJ( GetPlayersAll(), bj_QUESTMESSAGE_HINT, ( "ADMIN: " + ( udg_PlayerNames[GetConvertedPlayerId(GetTriggerPlayer())] + ( " decided to kick " + udg_PlayerNames[S2I(SubStringBJ(GetEventPlayerChatString(), 7, StringLength(GetEventPlayerChatString())))] ) ) ) )
call CustomDefeatBJ( ConvertedPlayer(S2I(SubStringBJ(GetEventPlayerChatString(), 7, StringLength(GetEventPlayerChatString())))), "Kicked!" )
call PlaySoundBJ( gg_snd_Kicked )
endfunction
//===========================================================================
function InitTrig_Admin_Kick_JASS takes nothing returns nothing
set gg_trg_Admin_Kick_JASS = CreateTrigger( )
call TriggerRegisterPlayerChatEvent( gg_trg_Admin_Kick_JASS, Player(0), "-kick ", false )
call TriggerRegisterPlayerChatEvent( gg_trg_Admin_Kick_JASS, Player(1), "-kick ", false )
call TriggerRegisterPlayerChatEvent( gg_trg_Admin_Kick_JASS, Player(2), "-kick ", false )
call TriggerRegisterPlayerChatEvent( gg_trg_Admin_Kick_JASS, Player(3), "-kick ", false )
call TriggerRegisterPlayerChatEvent( gg_trg_Admin_Kick_JASS, Player(4), "-kick ", false )
call TriggerRegisterPlayerChatEvent( gg_trg_Admin_Kick_JASS, Player(5), "-kick ", false )
call TriggerAddCondition( gg_trg_Admin_Kick_JASS, Condition( function Trig_Admin_Kick_JASS_Conditions ) )
call TriggerAddAction( gg_trg_Admin_Kick_JASS, function Trig_Admin_Kick_JASS_Actions )
endfunction
function Trig_Set_Kills_JASS_Conditions takes nothing returns boolean
return ( udg_DebugEnabled == true and S2I(SubStringBJ(GetEventPlayerChatString(), 8, StringLength(GetEventPlayerChatString()))) >= 0)
endfunction
function Trig_Set_Kills_JASS_Actions takes nothing returns nothing
set udg_Kills[1] = S2I(SubStringBJ(GetEventPlayerChatString(), 8, StringLength(GetEventPlayerChatString())))
call QuestMessageBJ( GetPlayersAll(), bj_QUESTMESSAGE_WARNING, ( "DEBUG: Kills for Red set to " + I2S(udg_Kills[1]) ) )
endfunction
//===========================================================================
function InitTrig_Set_Kills_JASS takes nothing returns nothing
set gg_trg_Set_Kills_JASS = CreateTrigger( )
call TriggerRegisterPlayerChatEvent( gg_trg_Set_Kills_JASS, Player(0), "-kills ", false )
call TriggerAddCondition( gg_trg_Set_Kills_JASS, Condition( function Trig_Set_Kills_JASS_Conditions ) )
call TriggerAddAction( gg_trg_Set_Kills_JASS, function Trig_Set_Kills_JASS_Actions )
endfunction
function Trig_Set_level_JASS_Conditions takes nothing returns boolean
return ( udg_DebugEnabled == true and S2I(SubStringBJ(GetEventPlayerChatString(), 6, StringLength(GetEventPlayerChatString()))) >= 1 and S2I(SubStringBJ(GetEventPlayerChatString(), 6, StringLength(GetEventPlayerChatString()))) <= 20)
endfunction
function Trig_Set_level_JASS_Actions takes nothing returns nothing
set udg_Levels[1] = S2I(SubStringBJ(GetEventPlayerChatString(), 6, StringLength(GetEventPlayerChatString())))
call QuestMessageBJ( GetPlayersAll(), bj_QUESTMESSAGE_WARNING, ( "DEBUG: Level for Red set to " + I2S(udg_Levels[1]) ) )
endfunction
//===========================================================================
function InitTrig_Set_level_JASS takes nothing returns nothing
set gg_trg_Set_level_JASS = CreateTrigger( )
call TriggerRegisterPlayerChatEvent( gg_trg_Set_level_JASS, Player(0), "-lvl ", false )
call TriggerAddCondition( gg_trg_Set_level_JASS, Condition( function Trig_Set_level_JASS_Conditions ) )
call TriggerAddAction( gg_trg_Set_level_JASS, function Trig_Set_level_JASS_Actions )
endfunction