104             vgtSmallDamageTag, vgtTeamHealthSorter, vgtSpeechBubble, vgtBubble,

   104             vgtSmallDamageTag, vgtTeamHealthSorter, vgtSpeechBubble, vgtBubble,

   105             vgtSteam, vgtAmmo, vgtSmoke, vgtSmokeWhite, vgtHealth, vgtShell,

   105             vgtSteam, vgtAmmo, vgtSmoke, vgtSmokeWhite, vgtHealth, vgtShell,

   106             vgtDust, vgtSplash, vgtDroplet, vgtSmokeRing, vgtBeeTrace, vgtEgg,

   106             vgtDust, vgtSplash, vgtDroplet, vgtSmokeRing, vgtBeeTrace, vgtEgg,

   107             vgtFeather, vgtHealthTag, vgtSmokeTrace, vgtEvilTrace, vgtExplosion,

   107             vgtFeather, vgtHealthTag, vgtSmokeTrace, vgtEvilTrace, vgtExplosion,

   108             vgtBigExplosion, vgtChunk, vgtNote, vgtLineTrail, vgtBulletHit, vgtCircle,

   108             vgtBigExplosion, vgtChunk, vgtNote, vgtLineTrail, vgtBulletHit, vgtCircle,

   110 

   110 

   111     TGearsType = set of TGearType;

   111     TGearsType = set of TGearType;

   112 

   112 

   113     // Damage can be caused by different sources

   113     // Damage can be caused by different sources

   114     TDamageSource = (dsUnknown, dsFall, dsBullet, dsExplosion, dsShove, dsPoison);

   114     TDamageSource = (dsUnknown, dsFall, dsBullet, dsExplosion, dsShove, dsPoison);

   274         Timer: Longword;

   274         Timer: Longword;

   275         Angle, dAngle: real;

   275         Angle, dAngle: real;

   276         Kind: TVisualGearType;

   276         Kind: TVisualGearType;

   277         doStep: TVGearStepProcedure;

   277         doStep: TVGearStepProcedure;

   278         Tex: PTexture;

   278         Tex: PTexture;

   279         alpha, scale: GLfloat;

   280         alpha, scale: GLfloat;

   280         Hedgehog: PHedgehog;

   281         Hedgehog: PHedgehog;

   281         Tag: LongInt;

   282         Tag: LongInt;

   282         Text: shortstring;

   283         Text: shortstring;

   283         Tint: Longword;

   284         Tint: Longword;