40    {$IFDEF DEBUGFILE}AddFileLog('Waiting AI thread to finish');{$ENDIF}

    40    {$IFDEF DEBUGFILE}AddFileLog('Waiting AI thread to finish');{$ENDIF}

    41    StopThinking:= true;

    41    StopThinking:= true;

    42    SDL_WaitThread(ThinkThread, nil);

    42    SDL_WaitThread(ThinkThread, nil);

    43    ThinkThread:= nil

    43    ThinkThread:= nil

    44    end;

    44    end;

    45 BestActions.Count:= 0;

    49 BestActions.Count:= 0;

    46 BestActions.Pos:= 0

    50 BestActions.Pos:= 0

    47 end;

    51 end;

    48 

    52 

    49 procedure TestAmmos(var Actions: TActions; Me: PGear);

    53 procedure TestAmmos(var Actions: TActions; Me: PGear);