SAIL - WantChangeClass

Gotowe kody SAIL'a, informacje na temat moddingu, itd.

Moderator: zoNE

Post Reply
User avatar
zoNE
The Great Uniter & Site Administrator
The Great Uniter & Site Administrator
Posts: 2059
Joined: Fri Feb 17, 2006 3:44 pm
Location: Poland
Contact:

SAIL - WantChangeClass

Post by zoNE »

Serpent wrote:Funkcja zwraca prawdę jeżeli jednostka chce zmienić swoją klasę na klasę = class.

Code: Select all

Export Function WantChangeClass(unit, class);
var i;
begin

     if GetTaskList(unit) then
        begin
        for i = 1 to GetTaskList(unit) do
            if '!' = GetTaskList(unit)[i][1] and
             class = GetTaskList(unit)[i][5] then
              begin
              result := true;
              break;
              end
               else
                result := false;
        end
         else
          result := false;
End;
Author: Serpent
Topic: https://forum.original-war.net/viewtopi ... =42&t=4547
Post Reply