| changeset 6982 | 8d41d22a291d |
| parent 6924 | 57b66ee3bff3 |
| child 6992 | b8f3d8991e92 |
| 6981:045e8162c9cd | 6982:8d41d22a291d |
|---|---|
631 inc(i, 5); |
631 inc(i, 5); |
632 end; |
632 end; |
633 end; |
633 end; |
634 end |
634 end |
635 end; |
635 end; |
636 |
|
637 const StepTicks: LongWord = 0; |
|
638 |
636 |
639 procedure HedgehogStep(Gear: PGear); |
637 procedure HedgehogStep(Gear: PGear); |
640 var PrevdX: LongInt; |
638 var PrevdX: LongInt; |
641 CurWeapon: PAmmo; |
639 CurWeapon: PAmmo; |
642 begin |
640 begin |