33 var FollowGear: PGear = nil;

    33 var FollowGear: PGear = nil;

    34     WindBarWidth: integer = 0;

    34     WindBarWidth: integer = 0;

    35     bShowAmmoMenu: boolean = false;

    35     bShowAmmoMenu: boolean = false;

    36     bSelected: boolean = false;

    36     bSelected: boolean = false;

    37     bShowFinger: boolean = false;

    37     bShowFinger: boolean = false;

    38 

    39 

    39 implementation

    40 implementation

    40 uses uStore, uMisc, uTeams, uIO, uConsole, uKeys, uLocale, uSound;

    41 uses uStore, uMisc, uTeams, uIO, uConsole, uKeys, uLocale, uSound;

    41 const RealTicks: Longword = 0;

    42 const RealTicks: Longword = 0;

    43       FPS: Longword = 0;

    43       FPS: Longword = 0;

    44       CountTicks: Longword = 0;

    44       CountTicks: Longword = 0;

    45       SoundTimerTicks: Longword = 0;

    45       SoundTimerTicks: Longword = 0;

    46       prevPoint: TPoint = (X: 0; Y: 0);

    46       prevPoint: TPoint = (X: 0; Y: 0);

    47 

    47