344      gtAirBomb: begin

   344      gtAirBomb: begin

   345                 Result^.Radius:= 5;

   345                 Result^.Radius:= 5;

   346                 end;

   346                 end;

   347    gtBlowTorch: begin

   347    gtBlowTorch: begin

   348                 Result^.Radius:= cHHRadius + cBlowTorchC;

   348                 Result^.Radius:= cHHRadius + cBlowTorchC;

   351                 end;

   350                 end;

   352     gtSwitcher: begin

   351     gtSwitcher: begin

   353                 Result^.Z:= cCurrHHZ

   352                 Result^.Z:= cCurrHHZ

   354                 end;

   353                 end;

   355       gtTarget: begin

   354       gtTarget: begin

   379                 Result^.Friction:= _0_96;

   378                 Result^.Friction:= _0_96;

   380                 Result^.RenderTimer:= true

   379                 Result^.RenderTimer:= true

   381                 end;

   380                 end;

   382        gtDrill: begin

   381        gtDrill: begin

   383                 Result^.Timer:= 5000;

   382                 Result^.Timer:= 5000;

   386                 end;

   384                 end;

   387         gtBall: begin

   385         gtBall: begin

   388                 Result^.Radius:= 5;

   386                 Result^.Radius:= 5;

   389                 Result^.Tag:= random(8);

   387                 Result^.Tag:= random(8);

   390                 Result^.Timer:= 5000;

   388                 Result^.Timer:= 5000;