Mercurial Mercurial > hedgewars-draft / comparison
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uVariables.pas
branchwebgl
changeset 8833 c13ebed437cb
parent 8444 75db7bb8dce8
parent 8617 e7bea88096d2
child 9127 e350500c4edb
equal deleted inserted replaced
8450:404ddce27b23 8833:c13ebed437cb 
   113     cGearScrEdgesDist: LongInt;
 
   113     cGearScrEdgesDist: LongInt;
 
   114     isAudioMuted     : boolean;
 
   114     isAudioMuted     : boolean;
 
   115 
   115 
   116     // originally typed consts
 
   116     // originally typed consts
 
   117     ExplosionBorderColor: LongWord;
 
   117     ExplosionBorderColor: LongWord;
 
       
   118     IceColor            : LongWord;
 
       
   119     IceEdgeColor        : LongWord;
 
   118     WaterOpacity: byte;
 
   120     WaterOpacity: byte;
 
   119     SDWaterOpacity: byte;
 
   121     SDWaterOpacity: byte;
 
   120     GrayScale: Boolean;
 
   122     GrayScale: Boolean;
 
   121 
   123 
   122     CountTexz: array[0..Pred(AMMO_INFINITE)] of PTexture;
 
   124     CountTexz: array[0..Pred(AMMO_INFINITE)] of PTexture;
 
   654             Width:  48; Height: 79; imageWidth: 0; imageHeight: 0; saveSurf: false; priority: tpHighest; getDimensions: false; getImageDimensions: true),// sprTardis
 
   656             Width:  48; Height: 79; imageWidth: 0; imageHeight: 0; saveSurf: false; priority: tpHighest; getDimensions: false; getImageDimensions: true),// sprTardis
 
   655             (FileName:  'slider'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
 
   657             (FileName:  'slider'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
 
   656             Width: 3; Height: 17; imageWidth: 3; imageHeight: 17; saveSurf: false; priority: tpLow; getDimensions: false; getImageDimensions: false), // sprSlider
 
   658             Width: 3; Height: 17; imageWidth: 3; imageHeight: 17; saveSurf: false; priority: tpLow; getDimensions: false; getImageDimensions: false), // sprSlider
 
   657             (FileName:  'botlevels'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
 
   659             (FileName:  'botlevels'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
 
   658             Width: 22; Height: 15; imageWidth: 22; imageHeight: 15; saveSurf: true; priority: tpLow; getDimensions: false; getImageDimensions: false), // sprBotlevels
 
   660             Width: 22; Height: 15; imageWidth: 22; imageHeight: 15; saveSurf: true; priority: tpLow; getDimensions: false; getImageDimensions: false), // sprBotlevels
 
   659          (*   (FileName:  'amKnife'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
       
   660             Width:  64; Height: 64; imageWidth: 0; imageHeight: 0; saveSurf: false; priority: tpMedium; getDimensions: false; getImageDimensions: true),// sprHandKnife*)
 
       
   661             (FileName:  'amCleaver'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
   661             (FileName:  'amCleaver'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
   662             Width:  64; Height: 64; imageWidth: 64; imageHeight: 64; saveSurf: false; priority: tpMedium; getDimensions: false; getImageDimensions: false),// sprHandKnife
 
   662             Width:  64; Height: 64; imageWidth: 64; imageHeight: 64; saveSurf: false; priority: tpMedium; getDimensions: false; getImageDimensions: false),// sprHandKnife
 
   663             (*(FileName:  'knife'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
 
       
   664             Width: 29; Height: 14; imageWidth: 64; imageHeight: 64; saveSurf: true; priority: tpLow; getDimensions: false; getImageDimensions: false) // sprKnife*)
 
       
   665             (FileName:  'cleaver'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
 
   663             (FileName:  'cleaver'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
 
   666             Width: 64; Height: 64; imageWidth: 64; imageHeight: 128; saveSurf: false; priority: tpLow; getDimensions: false; getImageDimensions: false), // sprKnife
 
   664             Width: 64; Height: 64; imageWidth: 64; imageHeight: 128; saveSurf: false; priority: tpLow; getDimensions: false; getImageDimensions: false), // sprKnife
 
   667             (FileName:  'star'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
 
   665             (FileName:  'star'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
 
   668             Width: 12; Height: 12; imageWidth: 12; imageHeight: 12; saveSurf: false; priority: tpLow; getDimensions: false; getImageDimensions: false) // sprStar
 
   666             Width: 12; Height: 12; imageWidth: 12; imageHeight: 12; saveSurf: false; priority: tpLow; getDimensions: false; getImageDimensions: false), // sprStar
 
       
   667             (FileName:  'icetexture'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil;
 
       
   668             Width: 128; Height: 128; imageWidth: 128; imageHeight: 128; saveSurf: true; priority: tpLow; getDimensions: false; getImageDimensions: true), // sprIceTexture
 
       
   669             (FileName:  'amIceGun'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
       
   670             Width: 32; Height: 32; imageWidth: 32; imageHeight: 32; saveSurf: false; priority: tpLow; getDimensions: false; getImageDimensions: false), // sprIceGun
 
       
   671             (FileName:  'amFrozenHog'; Path: ptHedgehog; AltPath: ptNone; Texture: nil; Surface: nil;
 
       
   672             Width: 64; Height: 64; imageWidth: 64; imageHeight: 64; saveSurf: false; priority: tpLow; getDimensions: false; getImageDimensions: false) // sprFrozenHog
 
   669             );
 
   673             );
 
   670 
   674 
   671 const
 
   675 const
 
   672     Wavez: array [TWave] of record
 
   676     Wavez: array [TWave] of record
 
   673             Sprite: TSprite;
 
   677             Sprite: TSprite;
 
  1194                 AmmoType: amBlowTorch;
 
  1198                 AmmoType: amBlowTorch;
 
  1195                 AttackVoice: sndNone;
 
  1199                 AttackVoice: sndNone;
 
  1196                 Bounciness: 1000);
 
  1200                 Bounciness: 1000);
 
  1197             Slot: 6;
 
  1201             Slot: 6;
 
  1198             TimeAfterTurn: 3000;
 
  1202             TimeAfterTurn: 3000;
 
  1199             minAngle: 768;
 
  1203             minAngle: 804;
 
  1200             maxAngle: 1280;
 
  1204             maxAngle: 1327;
 
  1201             isDamaging: false;
 
  1205             isDamaging: false;
 
  1202             SkipTurns: 0;
 
  1206             SkipTurns: 0;
 
  1203             PosCount: 1;
 
  1207             PosCount: 1;
 
  1204             PosSprite: sprWater;
 
  1208             PosSprite: sprWater;
 
  1205             ejectX: 0;
 
  1209             ejectX: 0;
 
  2425     SDWaterColorArray[1]:= SDWaterColorArray[0];
 
  2429     SDWaterColorArray[1]:= SDWaterColorArray[0];
 
  2426     SDWaterColorArray[3]:= SDWaterColorArray[2];
 
  2430     SDWaterColorArray[3]:= SDWaterColorArray[2];
 
  2427     SDWaterOpacity:= $80;
 
  2431     SDWaterOpacity:= $80;
 
  2428     SDTint:= $80;
 
  2432     SDTint:= $80;
 
  2429     ExplosionBorderColor:= $FF808080;
 
  2433     ExplosionBorderColor:= $FF808080;
 
       
  2434     IceColor:= ($44 shl RShift) or ($97 shl GShift) or ($A9 shl BShift) or ($A0 shl AShift);
 
       
  2435     IceEdgeColor:= ($8A shl RShift) or ($AF shl GShift) or ($B2 shl BShift) or ($FF shl AShift);
 
       
  2436 
  2430     WaterOpacity:= $80;
 
  2437     WaterOpacity:= $80;
 
  2431 
  2438 
  2432     cDrownSpeed.QWordValue  := 257698038;       // 0.06
 
  2439     cDrownSpeed.QWordValue  := 257698038;       // 0.06
 
  2433     cDrownSpeedf            := 0.06;
 
  2440     cDrownSpeedf            := 0.06;
 
  2434     cMaxWindSpeed.QWordValue:= 1073742;     // 0.00025
 
  2441     cMaxWindSpeed.QWordValue:= 1073742;     // 0.00025
hedgewars-draft