hedgewars/uTypes.pas
changeset 5563 fc73b6e941f7
parent 5562 8056d82b4d23
child 5585 c09f5b41644a
equal deleted inserted replaced
5562:8056d82b4d23 5563:fc73b6e941f7
   100             gtNapalmBomb, gtSnowball, gtFlake, gtStructure, gtLandGun, gtTardis); // 61
   100             gtNapalmBomb, gtSnowball, gtFlake, gtStructure, gtLandGun, gtTardis); // 61
   101 
   101 
   102     // Gears that are _only_ of visual nature (e.g. background stuff, visual effects, speechbubbles, etc.)
   102     // Gears that are _only_ of visual nature (e.g. background stuff, visual effects, speechbubbles, etc.)
   103     TVisualGearType = (vgtFlake, vgtCloud, vgtExplPart, vgtExplPart2, vgtFire,
   103     TVisualGearType = (vgtFlake, vgtCloud, vgtExplPart, vgtExplPart2, vgtFire,
   104             vgtSmallDamageTag, vgtTeamHealthSorter, vgtSpeechBubble, vgtBubble,
   104             vgtSmallDamageTag, vgtTeamHealthSorter, vgtSpeechBubble, vgtBubble,
   105             vgtSteam, vgtAmmo, vgtSmoke, vgtSmokeWhite, vgtHealth, vgtShell,
   105             vgtSteam, vgtAmmo, vgtSmoke, vgtSmokeWhite, 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,
   109             vgtSmoothWindBar, vgtStraightShot);
   109             vgtSmoothWindBar, vgtStraightShot);
   110 
   110 
   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         Sprite: TSprite;
       
   280         alpha, scale: GLfloat;
   279         alpha, scale: GLfloat;
   281         Hedgehog: PHedgehog;
   280         Hedgehog: PHedgehog;
   282         Tag: LongInt;
   281         Tag: LongInt;
   283         Text: shortstring;
   282         Text: shortstring;
   284         Tint: Longword;
   283         Tint: Longword;