hedgewars/hwengine.dpr
changeset 161 d8870bbf960e
parent 160 207f520b9e83
child 166 2920ab2bf329
equal deleted inserted replaced
160:207f520b9e83 161:d8870bbf960e
    93                  isSoundEnabled:= false
    93                  isSoundEnabled:= false
    94                  end;
    94                  end;
    95               GameState:= gsGame
    95               GameState:= gsGame
    96               end;
    96               end;
    97      gsGame : begin
    97      gsGame : begin
    98               ProcessKbd;
       
    99               DoGameTick(Lag);
    98               DoGameTick(Lag);
   100               DrawWorld(Lag, SDLPrimSurface);
    99               DrawWorld(Lag, SDLPrimSurface);
   101               end;
   100               end;
   102    gsConsole: begin
   101    gsConsole: begin
   103               DoGameTick(Lag);
   102               DoGameTick(Lag);