218 case Kind of

   219           gtFlame: Gear^.Boom := 2;  // some additional expl in there are x3, x4 this

   220        gtHedgehog: Gear^.Boom := 30;

   221            gtMine: Gear^.Boom := 50;

   222            gtCase: Gear^.Boom := 25;

   223         gtAirMine: Gear^.Boom := 25;

   224      gtExplosives: Gear^.Boom := 75;

   225         gtGrenade: Gear^.Boom := 50;

   226           gtShell: Gear^.Boom := 50;

   227             gtBee: Gear^.Boom := 50;

   228     gtShotgunShot: Gear^.Boom := 25;

   229      gtPickHammer: Gear^.Boom := 6;

   230 //           gtRope: Gear^.Boom := 2; could be funny to have rope attaching to hog deal small amount of dmg?

   231      gtDEagleShot: Gear^.Boom := 7;

   232        gtDynamite: Gear^.Boom := 75;

   233     gtClusterBomb: Gear^.Boom := 20;

   234      gtMelonPiece,

   235         gtCluster: Gear^.Boom := Timer;

   236          gtShover: Gear^.Boom := 30;

   237       gtFirePunch: Gear^.Boom := 30;

   238         gtAirBomb: Gear^.Boom := 30;

   239       gtBlowTorch: Gear^.Boom := 2;

   240          gtMortar: Gear^.Boom := 20;

   241            gtWhip: Gear^.Boom := 30;

   242        gtKamikaze: Gear^.Boom := 30; // both shove and explosion

   243            gtCake: Gear^.Boom := cakeDmg; // why is cake damage a global constant

   244      gtWatermelon: Gear^.Boom := 75;

   245     gtHellishBomb: Gear^.Boom := 90;

   246           gtDrill: if Gear^.State and gsttmpFlag = 0 then

   247                         Gear^.Boom := 50

   248                    else Gear^.Boom := 30;

   249            gtBall: Gear^.Boom := 40;

   250         gtRCPlane: Gear^.Boom := 25;

   251 // sniper rifle is distance linked, this Boom is just an arbitrary scaling factor applied to timer-based-damage

   252 // because, eh, why not..

   253 gtSniperRifleShot: Gear^.Boom := 100000;

   254             gtEgg: Gear^.Boom := 10;

   255           gtPiano: Gear^.Boom := 80;

   256         gtGasBomb: Gear^.Boom := 20;

   257     gtSineGunShot: Gear^.Boom := 35;

   258           gtSMine: Gear^.Boom := 30;

   259     gtSnowball: Gear^.Boom := 200000; // arbitrary scaling for the shove

   260          gtHammer: if cDamageModifier > _1 then // scale it based on cDamageModifier?

   261                          Gear^.Boom := 2

   262                     else Gear^.Boom := 3;

   263     gtPoisonCloud: Gear^.Boom := 20;

   264           gtKnife: Gear^.Boom := 40000; // arbitrary scaling factor since impact-based

   265     end;