hedgewars/uVisualGears.pas
changeset 5596 555c4fc1f3bd
parent 5585 c09f5b41644a
child 5690 f6e0c5bd8020
equal deleted inserted replaced
5594:3ab68a93434b 5596:555c4fc1f3bd
   281                 end;
   281                 end;
   282   vgtHealthTag: begin
   282   vgtHealthTag: begin
   283                 Frame:= 0;
   283                 Frame:= 0;
   284                 Timer:= 1500;
   284                 Timer:= 1500;
   285                 dY:= -0.08;
   285                 dY:= -0.08;
       
   286                 dX:= 0;
   286                 //gear^.Z:= 2002;
   287                 //gear^.Z:= 2002;
   287                 end;
   288                 end;
   288   vgtSmokeTrace,
   289   vgtSmokeTrace,
   289   vgtEvilTrace: begin
   290   vgtEvilTrace: begin
   290                 gear^.X:= gear^.X - 16;
   291                 gear^.X:= gear^.X - 16;