 

 .
    .
     Kalah.exe ( - )      DLL (  DLL   ).
    KlPayer1.dll  KlPayer2.dll.         .
            .      .       1   .
         ,      . .,    2  4,   3,        2.
 -   1   .

   1.
     :

function KlInit(var KlInfo : tKlInfo) : boolean; - .   2       .


  tKlInfo = record
    size : longint; //  (i)    
    ver_B : longint; // (i)   
    ver_P : longint; // (o)   .   ,    ,   .
    Num_P : longint; // (i)   - 1  2.  ,    ,     ,    .
    Nholes : longint; // (i)      
    Nbones : longint; // (i)      
    LogLevel : longint; // (i)  : 0-, 1-   , 2-   , 3-  , 4-  , 5-
    Param : longint; // (i)  ,    
    name : array[0..31]of char; // (o)   (C-,  )
    creator : array[0..31]of char; // (o)  (C-,  )
    description : array[0..255]of char; // (o)  (C-,  )
  end;

    size       ,      size.
  ver_P ,       ,    ver_B,    ver_B.
      ,    FALSE,     TRUE.
    randomize   dll    ,      .

    ,     1  6   , .. 1-   ,  2-  .

  tHoles : array[1..6] of longint; 

function KlGetTurn(MyHoles, OppHoles : tHoles; MyKalah, OppKalah : longint) : longint; -  .  :  ,  ,  ,   - .

 -  ,     ,  1  Nholes.   ,  0.

procedure KlOppTurn(OppTurn : longint); -    .   1  Nholes.  ,      ,    .

procedure KlEndRound(MyBones, OppBones, NumTurns : longint); -     .              ,    .

procedure KlDone; -         ,  ,    .
