Can someone help me convert it to GUI ?
Rects= Region
JASS:
function O43580 takes nothing returns nothing
set udg_rects01[0]=udg_rect23
set udg_rects01[1]=udg_rect22
set udg_rects01[2]=udg_rect21
set udg_rects01[3]=udg_rect32
set udg_rects01[4]=udg_rect20
set udg_rects01[5]=udg_rect19
set udg_rects01[6]=udg_rect16
set udg_rects01[7]=udg_rect18
set udg_rects01[8]=udg_rect17
set udg_rects01[9]=udg_rect30
set udg_rects01[10]=udg_rect07
set udg_rects01[11]=udg_rect06
set udg_rects01[12]=udg_rect29
set udg_rects01[13]=udg_rect05
set udg_rects01[14]=udg_rect24
set udg_rects01[15]=udg_rect28
set udg_rects01[16]=udg_rect09
set udg_rects01[17]=udg_rect10
set udg_rects01[18]=udg_rect04
set udg_rects01[19]=udg_rect08
set udg_rects01[20]=udg_rect13
set udg_rects01[21]=udg_rect11
set udg_rects01[22]=udg_rect25
set udg_rects01[23]=udg_rect12
set udg_rects01[24]=udg_rect27
set udg_rects01[25]=udg_rect26
set udg_rects01[26]=udg_rect33
set udg_rects01[27]=udg_rect34
set udg_rects01[28]=udg_rect35
set udg_rects01[29]=udg_rect36
set udg_integer18=GetRandomInt(0,29)
set udg_boolean03=RectContainsUnit(udg_rects01[udg_integer18],GroupPickRandomUnit(GetUnitsOfPlayerAll(ConvertedPlayer(GetForLoopIndexA()))))
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=10
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
if(O43487())then
call ForGroupBJ(GetUnitsInRectOfPlayer(udg_rect15,Player(10)),function O43386)
call ForGroupBJ(GetUnitsInRectOfPlayer(udg_rect15,Player(11)),function O43390)
else
call DoNothing()
endif
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction