| changeset 7418 | f611ee4760c0 |
| parent 7414 | a9f18c66ce34 |
| child 7426 | 55b49cc1f33a |
| 7416:2f2f78fc65a3 | 7418:f611ee4760c0 |
|---|---|
651 end; |
651 end; |
652 |
652 |
653 procedure chSpeedup_p(var s: shortstring); |
653 procedure chSpeedup_p(var s: shortstring); |
654 begin |
654 begin |
655 s:= s; // avoid compiler hint |
655 s:= s; // avoid compiler hint |
656 SpeedStart:= GameTicks; |
656 SpeedStart:= RealTicks; |
657 isSpeed:= true |
657 isSpeed:= true |
658 end; |
658 end; |
659 |
659 |
660 procedure chSpeedup_m(var s: shortstring); |
660 procedure chSpeedup_m(var s: shortstring); |
661 begin |
661 begin |