hedgewars/uGame.pas
changeset 3463 23c50be687a9
parent 3407 dcc129c4352e
child 3465 b290993c0810
equal deleted inserted replaced
3462:4b36933dce1d 3463:23c50be687a9
    24 procedure DoGameTick(Lag: LongInt);
    24 procedure DoGameTick(Lag: LongInt);
    25 
    25 
    26 ////////////////////
    26 ////////////////////
    27    implementation
    27    implementation
    28 ////////////////////
    28 ////////////////////
    29 uses uMisc, uConsts, uKeys, uTeams, uIO, uAI, uGears, uScript;
    29 uses uMisc, uConsts, uTeams, uIO, uAI, uGears, uScript;
    30 
    30 
    31 procedure DoGameTick(Lag: LongInt);
    31 procedure DoGameTick(Lag: LongInt);
    32 var i: LongInt;
    32 var i: LongInt;
    33 begin
    33 begin
    34 if isPaused then exit;
    34 if isPaused then exit;