hedgewars/uGame.pas
changeset 7837 3e031b3b33e6
parent 7670 9485b88f6a44
child 8027 e5ba3dd12531
equal deleted inserted replaced
7836:69ece5fdec49 7837:3e031b3b33e6
    26 ////////////////////
    26 ////////////////////
    27     implementation
    27     implementation
    28 ////////////////////
    28 ////////////////////
    29 uses uInputHandler, uTeams, uIO, uAI, uGears, uSound, uMobile, 
    29 uses uInputHandler, uTeams, uIO, uAI, uGears, uSound, uMobile, 
    30     uVisualGears, uTypes, uVariables, uCommands, uConsts
    30     uVisualGears, uTypes, uVariables, uCommands, uConsts
    31     {$IFDEF SDL13}, uTouch{$ENDIF};
    31     {$IFDEF USE_TOUCH_INTERFACE}, uTouch{$ENDIF};
    32 
    32 
    33 procedure DoGameTick(Lag: LongInt);
    33 procedure DoGameTick(Lag: LongInt);
    34 var i: LongInt;
    34 var i: LongInt;
    35 begin
    35 begin
    36 if isPaused then
    36 if isPaused then