original-war.net

Serpent wrote:Zwraca prawdę jeżeli naukowiec o idencie unit chce skazić złoże o koordynatach x, y.

Code: Select all

Export Function WantDestroySibDeposit(unit, x, y);
begin

     if GetTaskList(unit) then
        begin
        if 'G' = GetTaskList(unit)[1][1] and
             x = GetTaskList(unit)[1][2] and
             y = GetTaskList(unit)[1][3] then
           result := true
            else
             result := false;
        end
         else
          result := false;
End;