hedgewars/uAI.pas
changeset 196 993cf173218b
parent 194 88652abdce9a
child 250 d7f744a9bf28
equal deleted inserted replaced
195:edae828322a0 196:993cf173218b
    22 procedure ProcessBot(FrameNo: Longword);
    22 procedure ProcessBot(FrameNo: Longword);
    23 procedure FreeActionsList;
    23 procedure FreeActionsList;
    24 
    24 
    25 implementation
    25 implementation
    26 uses uTeams, uConsts, SDLh, uAIMisc, uGears, uAIAmmoTests, uAIActions, uMisc,
    26 uses uTeams, uConsts, SDLh, uAIMisc, uGears, uAIAmmoTests, uAIActions, uMisc,
    27      uAIThinkStack, uConsole;
    27      uAIThinkStack;
    28 
    28 
    29 var BestActions: TActions;
    29 var BestActions: TActions;
    30     CanUseAmmo: array [TAmmoType] of boolean;
    30     CanUseAmmo: array [TAmmoType] of boolean;
    31     AIThinkStart: Longword;
    31     AIThinkStart: Longword;
    32     isThinking: boolean = false;
    32     isThinking: boolean = false;