hedgewars/uVisualGears.pas
changeset 7420 77567b03cc28
parent 7372 fcc002658832
child 7442 9bb6abdb5675
child 7543 a0dc770538e1
equal deleted inserted replaced
7418:f611ee4760c0 7420:77567b03cc28
   293                 begin
   293                 begin
   294                 dx:= 0;
   294                 dx:= 0;
   295                 dy:= 0;
   295                 dy:= 0;
   296                 FrameTicks:= 740;
   296                 FrameTicks:= 740;
   297                 Frame:= 19;
   297                 Frame:= 19;
       
   298                 Scale:= 0.75;
       
   299                 Timer:= 1;
   298                 end;
   300                 end;
   299     vgtDroplet:
   301     vgtDroplet:
   300                 begin
   302                 begin
   301                 dx:= 0.001 * (random(180) - 90);
   303                 dx:= 0.001 * (random(180) - 90);
   302                 dy:= -0.001 * (random(160) + 40);
   304                 dy:= -0.001 * (random(160) + 40);