Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- globals
- private integer playerNumber=0
- endglobals
- private function arC takes nothing returns boolean
- local real x
- local real y
- local unit hero
- local integer check=0
- local integer rnd
- local timer time
- if playerNumber==0 then
- set time=CreateTimer()
- call TimerStart(time,0.5,true,function arC)
- endif
- set playerNumber=playerNumber+1
- //if GetPlayerSlotState(Player(playerNumber))==PLAYER_SLOT_STATE_PLAYING and GetPlayerController(Player(playerNumber))==MAP_CONTROL_USER then
- loop
- exitwhen check!=0
- set rnd=GetRandomInt(0,heroesLib_HEROCOUNT)
- if heroesLib_HEROCHK[rnd]==false then
- set check=1
- endif
- endloop
- if IsPlayerAlly(Player(playerNumber),Player(0))==true then
- set x=savedConstants_T1SPAWNX
- set y=savedConstants_T1SPAWNY
- elseif IsPlayerAlly(Player(playerNumber),Player(5))==true then
- set x=savedConstants_T2SPAWNX
- set y=savedConstants_T2SPAWNY
- endif
- set hero=CreateUnit(Player(playerNumber),heroesLib_HEROID[rnd],x,y,270)
- if GetLocalPlayer()==Player(playerNumber) then
- call ClearSelection()
- call SelectUnit(hero,true)
- call PanCameraToTimed(x,y,0)
- endif
- set heroesLib_HEROCHK[rnd]=true
- //endif
- if playerNumber==9 then
- call PauseTimer(time)
- endif
- call DisableTrigger(GetTriggeringTrigger())
- return false
- endfunction
Add Comment
Please, Sign In to add comment