equal
deleted
inserted
replaced
20 |
20 |
21 unit uAI; |
21 unit uAI; |
22 interface |
22 interface |
23 uses uFloat; |
23 uses uFloat; |
24 |
24 |
25 procedure init_uAI; |
25 procedure initModule; |
26 procedure free_uAI; |
26 procedure freeModule; |
27 |
27 |
28 procedure ProcessBot; |
28 procedure ProcessBot; |
29 procedure FreeActionsList; |
29 procedure FreeActionsList; |
30 |
30 |
31 implementation |
31 implementation |
343 end else ProcessAction(BestActions, Gear) |
343 end else ProcessAction(BestActions, Gear) |
344 else if ((GameTicks - StartTicks) > cMaxAIThinkTime) |
344 else if ((GameTicks - StartTicks) > cMaxAIThinkTime) |
345 or (TurnTimeLeft <= cStopThinkTime) then StopThinking:= true |
345 or (TurnTimeLeft <= cStopThinkTime) then StopThinking:= true |
346 end; |
346 end; |
347 |
347 |
348 procedure init_uAI; |
348 procedure initModule; |
349 begin |
349 begin |
350 hasThread:= 0; |
350 hasThread:= 0; |
351 end; |
351 end; |
352 |
352 |
353 procedure free_uAI; |
353 procedure freeModule; |
354 begin |
354 begin |
355 |
355 |
356 end; |
356 end; |
357 |
357 |
358 end. |
358 end. |