struct Point
    player owner
    integer status
    ....
endstruct

globals
    Point array points [9]
endglobals




function InitTrig_PointInit takes nothing returns nothing
    local integer i=0
    
    set points[0].status = 2
    set points[0].owner = Player(6)
    
    set points[1].status = 0
    set points[1].owner = Player(12)
    
    set points[2].status = 0
    set points[2].owner = Player(12)
    
    set points[3].status = 0
    set points[3].owner = Player(12)
    
    set points[4].status = 0
    set points[4].owner = Player(12)
    
    set points[5].status = 0
    set points[5].owner = Player(12)
    
    set points[6].status = 0
    set points[6].owner = Player(12)
    
    set points[7].status = 0
    set points[7].owner = Player(12)
    
    set points[8].status = 1
    set points[8].owner = Player(1)
    
//ДЕБАГ!!!
    loop
        exitwhen i == 14
        call BJDebugMsg(I2S(i) + "  ==  " + GetPlayerName(Player(i)))
        set i = i + 1
    endloop
    set i = 0
    loop
        exitwhen i == 9
        if points[i].status == 0 then
            call BJDebugMsg(I2S(i) + " - cвободен, владелец - " + GetPlayerName(points[i].owner))
        elseif points[i].status == 1 then
            call BJDebugMsg(I2S(i) + " - захватывается, владелец - " + GetPlayerName(points[i].owner))
        elseif points[i].status == 2 then
            call BJDebugMsg(I2S(i) + " - захвачен, владелец - " + GetPlayerName(points[i].owner))
        endif
        set i = i + 1
    endloop
endfunction