hedgewars/uWorld.pas
changeset 783 4f59db6f147d
parent 780 f45b0e513dfd
child 793 c4a790225799
equal deleted inserted replaced
782:e2d2b84aa776 783:4f59db6f147d
    36     bSelected: boolean = false;
    36     bSelected: boolean = false;
    37     bShowFinger: boolean = false;
    37     bShowFinger: boolean = false;
    38     Frames: Longword = 0;
    38     Frames: Longword = 0;
    39 
    39 
    40 implementation
    40 implementation
    41 uses uStore, uMisc, uTeams, uIO, uConsole, uKeys, uLocale, uSound, GL;
    41 uses uStore, uMisc, uTeams, uIO, uConsole, uKeys, uLocale, uSound, GL, uAmmos;
    42 const FPS: Longword = 0;
    42 const FPS: Longword = 0;
    43       CountTicks: Longword = 0;
    43       CountTicks: Longword = 0;
    44       SoundTimerTicks: Longword = 0;
    44       SoundTimerTicks: Longword = 0;
    45       prevPoint: TPoint = (X: 0; Y: 0);
    45       prevPoint: TPoint = (X: 0; Y: 0);
    46 
    46