731 }

   731 }

   732       gtIceGun: begin

   732       gtIceGun: begin

   733                 gear^.Health:= 1000;

   733                 gear^.Health:= 1000;

   734                 gear^.Radius:= 8;

   734                 gear^.Radius:= 8;

   735                 gear^.Density:= _0;

   735                 gear^.Density:= _0;

   736                 end;

   737                 end;

   737      gtCreeper: begin

   738      gtCreeper: begin

   738                 // TODO: Finish creeper initialization implementation

   739                 // TODO: Finish creeper initialization implementation

   739                 gear^.Radius:= cHHRadius;

   740                 gear^.Radius:= cHHRadius;

   740                 gear^.Elasticity:= _0_35;

   741                 gear^.Elasticity:= _0_35;