equal
deleted
inserted
replaced
83 gsGame: begin |
83 gsGame: begin |
84 DrawWorld(Lag); // never place between ProcessKbd and DoGameTick - bugs due to /put cmd and isCursorVisible |
84 DrawWorld(Lag); // never place between ProcessKbd and DoGameTick - bugs due to /put cmd and isCursorVisible |
85 ProcessKbd; |
85 ProcessKbd; |
86 if not isPaused then |
86 if not isPaused then |
87 begin |
87 begin |
88 DoGameTick(Lag); |
88 if ReadyTimeLeft = 0 then DoGameTick(Lag); |
89 ProcessVisualGears(Lag); |
89 ProcessVisualGears(Lag); |
90 end; |
90 end; |
91 end; |
91 end; |
92 gsChat: begin |
92 gsChat: begin |
93 DrawWorld(Lag); |
93 DrawWorld(Lag); |
94 if not isPaused then |
94 if not isPaused then |
95 begin |
95 begin |
96 DoGameTick(Lag); |
96 if ReadyTimeLeft = 0 then DoGameTick(Lag); |
97 ProcessVisualGears(Lag); |
97 ProcessVisualGears(Lag); |
98 end; |
98 end; |
99 end; |
99 end; |
100 gsExit: begin |
100 gsExit: begin |
101 isTerminated:= true; |
101 isTerminated:= true; |