58 var  i: integer;

    58 var  i: integer;

    59      s: shortstring;

    59      s: shortstring;

    60      pkbd: PByteArray;

    60      pkbd: PByteArray;

    61 begin

    61 begin

    62 if (CurrentTeam = nil)

    62 if (CurrentTeam = nil)

    63    or (CurrentTeam.ExtDriven)

    64    or (CurrentTeam.ExtDriven)

    64    or (CurrentTeam.Hedgehogs[CurrentTeam.CurrHedgehog].BotLevel <> 0) then exit;

    65    or (CurrentTeam.Hedgehogs[CurrentTeam.CurrHedgehog].BotLevel <> 0) then exit;

    65 pkbd:= SDL_GetKeyState(nil);

    66 pkbd:= SDL_GetKeyState(nil);

    66 i:= SDL_GetMouseState(nil, nil);

    67 i:= SDL_GetMouseState(nil, nil);

    67 pkbd^[1]:= (i and 1);

    68 pkbd^[1]:= (i and 1);