equal
deleted
inserted
replaced
190 i, AliveCount: LongInt; |
190 i, AliveCount: LongInt; |
191 s: shortstring; |
191 s: shortstring; |
192 begin |
192 begin |
193 ScriptCall('onGameTick'); |
193 ScriptCall('onGameTick'); |
194 if GameTicks mod 20 = 0 then ScriptCall('onGameTick20'); |
194 if GameTicks mod 20 = 0 then ScriptCall('onGameTick20'); |
195 if GameTicks = NewTurnTick then ScriptCall('onNewTurn'); |
195 if GameTicks = NewTurnTick then |
|
196 begin |
|
197 ScriptCall('onNewTurn'); |
|
198 {$IFDEF SDL13} |
|
199 uTouch.NewTurnBeginning(); |
|
200 {$ENDIF} |
|
201 end; |
196 |
202 |
197 PrvInactive:= AllInactive; |
203 PrvInactive:= AllInactive; |
198 AllInactive:= true; |
204 AllInactive:= true; |
199 |
205 |
200 if (StepSoundTimer > 0) and (StepSoundChannel < 0) then |
206 if (StepSoundTimer > 0) and (StepSoundChannel < 0) then |