Arcane
You can change this now in User CP.
- Reaction score
- 87
...or is NewGen screwing up for no reason?
Edit: Looks like it's the DoAlliance function that's causing the problem. Because when I delete it, NewGen allows me to test map again. *figuring out problem
Edit: This is very strange. I removed the DoAlliance function and then put it back in, and this time, it tested fine, but it didn't work.
Code:
function DoAlliance takes nothing returns nothing
local integer i=0
local player p
loop
set p=Player(i)
if IsPlayerEnemy(p,Player(0)) then
call SetPlayerAllianceStateBJ(p,Player(14),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(14),p,bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(p,Player(13),bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(13),p,bj_ALLIANCE_UNALLIED)
else
call SetPlayerAllianceStateBJ(p,Player(13),bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(Player(13),p,bj_ALLIANCE_ALLIED_VISION)
call SetPlayerAllianceStateBJ(p,Player(14),bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(14),p,bj_ALLIANCE_UNALLIED)
endif
exitwhen i==11
set i=i+1
endloop
call SetPlayerAllianceStateBJ(Player(14),Player(13),bj_ALLIANCE_UNALLIED)
call SetPlayerAllianceStateBJ(Player(13),Player(14),bj_ALLIANCE_UNALLIED)
endfunction
//Adds all picked units to The White Hand unit group
function AddToGroupTWH takes nothing returns nothing
if IsUnitType(GetEnumUnit(), UNIT_TYPE_HERO) == false then
call GroupAddUnit(udg_Team1UG, GetEnumUnit())
endif
endfunction
//Adds all picked units to The Black Circle unit group
function AddToGroupTBC takes nothing returns nothing
if IsUnitType(GetEnumUnit(), UNIT_TYPE_HERO) == false then
call GroupAddUnit(udg_Team2UG, GetEnumUnit())
endif
endfunction
//Sets The White Hand to player 13 and changes its color
function WhiteHandConvert takes nothing returns nothing
call SetUnitOwner(GetEnumUnit(), Player(13), false)
if IsUnitType(GetEnumUnit(), UNIT_TYPE_HERO) == false then
call SetUnitColor(GetEnumUnit(), PLAYER_COLOR_AQUA)
endif
endfunction
//Sets The Black Circle to player 14 and changes its color
function BlackCircleConvert takes nothing returns nothing
call SetUnitOwner(GetEnumUnit(), Player(14), false)
if IsUnitType(GetEnumUnit(), UNIT_TYPE_HERO) == false then
call SetUnitColor(GetEnumUnit(), PLAYER_COLOR_BROWN)
endif
endfunction
function Trig_Initialization_Actions takes nothing returns nothing
//Calls the functions that convert player 1 and player 6's spawned buildings to
//neutral extra and neutral victim, also calls the functions that sets the alliance
//settings of the forces
set udg_Team1UG = CreateGroup()
set udg_Team2UG = CreateGroup()
call ForGroup( GetUnitsOfPlayerAll(Player(0)), function AddToGroupTWH)
call ForGroup( GetUnitsOfPlayerAll(Player(6)), function AddToGroupTBC)
call ForGroup(udg_Team1UG, function WhiteHandConvert)
call ForGroup(udg_Team2UG, function BlackCircleConvert)
set udg_Team1PG = GetPlayersAllies(Player(0))
set udg_Team2PG = GetPlayersAllies(Player(6))
call SetPlayerName(Player(13), "|cff2f4f4fThe White Hand|r")
call SetPlayerName(Player(14), "|cff8b4513The Black Circle|r")
call ForceAddPlayer(udg_Team1PG, Player(13))
call ForceAddPlayer(udg_Team2PG, Player(14))
call SetPlayerTeam(Player(13), 0)
call SetPlayerTeam(Player(14), 6)
call SetPlayerState(Player(13), PLAYER_STATE_ALLIED_VICTORY, 1)
call SetPlayerState(Player(14), PLAYER_STATE_ALLIED_VICTORY, 1)
call SetPlayerController(Player(13), MAP_CONTROL_COMPUTER)
call SetPlayerController(Player(14), MAP_CONTROL_COMPUTER)
call SetPlayerRacePreference(Player(14), RACE_PREF_HUMAN)
call SetPlayerRacePreference(Player(14), RACE_PREF_UNDEAD)
call EnableOcclusion(true)
call GroupClear(udg_Team1UG)
call GroupClear(udg_Team2UG)
call ForceClear(udg_Team1PG)
call ForceClear(udg_Team2PG)
call DestroyGroup(udg_Team1UG)
call DestroyGroup(udg_Team2UG)
call DestroyForce(udg_Team1PG)
call DestroyForce(udg_Team2PG)
endfunction
//===========================================================================
function InitTrig_Initialization takes nothing returns nothing
set gg_trg_Initialization = CreateTrigger( )
call TriggerRegisterTimerEventSingle( gg_trg_Initialization, 0.00 )
call ExecuteFunc(DoAlliance)
call TriggerAddAction( gg_trg_Initialization, function Trig_Initialization_Actions )
endfunction
Edit: Looks like it's the DoAlliance function that's causing the problem. Because when I delete it, NewGen allows me to test map again. *figuring out problem
Edit: This is very strange. I removed the DoAlliance function and then put it back in, and this time, it tested fine, but it didn't work.