diff -r d699d23a6e1d -r b697a26ed538 hedgewars/VGSHandlers.inc --- a/hedgewars/VGSHandlers.inc Fri Nov 12 16:06:06 2010 -0500 +++ b/hedgewars/VGSHandlers.inc Fri Nov 12 22:38:05 2010 +0100 @@ -133,6 +133,16 @@ end; //////////////////////////////////////////////////////////////////////////////// +procedure doStepLineTrail(Gear: PVisualGear; Steps: Longword); +begin +Steps := Steps; +if Gear^.Timer <= Steps then + DeleteVisualGear(Gear) +else + dec(Gear^.Timer, Steps) +end; + +//////////////////////////////////////////////////////////////////////////////// procedure doStepEgg(Gear: PVisualGear; Steps: Longword); begin Gear^.X:= Gear^.X + Gear^.dX * Steps;