changeset 15844 | 4e3c340eb766 |
parent 15842 | 4172debdff61 |
child 15847 | 2839b68a3732 |
15843:a722c8e86573 | 15844:4e3c340eb766 |
---|---|
1916 Gear^.X := newX; |
1916 Gear^.X := newX; |
1917 Gear^.Y := newY; |
1917 Gear^.Y := newY; |
1918 end; |
1918 end; |
1919 |
1919 |
1920 inc(BTSteps); |
1920 inc(BTSteps); |
1921 if BTSteps = 15 then |
1921 if BTSteps = 11 then |
1922 begin |
1922 begin |
1923 BTSteps := 0; |
1923 BTSteps := 0; |
1924 hit := true |
1924 hit := true |
1925 end; |
1925 end; |
1926 end; |
1926 end; |