hedgewars/uConsts.pas
changeset 1221 51e3f3cfdca5
parent 1190 73ec31d8bb6f
child 1242 4aca5f7b2504
equal deleted inserted replaced
1220:ebb643caeb34 1221:51e3f3cfdca5
    72                    sndCake, sndOw1, sndOw4);
    72                    sndCake, sndOw1, sndOw4);
    73 
    73 
    74      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
    74      TAmmoType  = (amGrenade, amClusterBomb, amBazooka, amUFO, amShotgun, amPickHammer,
    75                    amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch, amWhip,
    75                    amSkip, amRope, amMine, amDEagle, amDynamite, amFirePunch, amWhip,
    76                    amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
    76                    amBaseballBat, amParachute, amAirAttack, amMineStrike, amBlowTorch,
    77                    amGirder, amTeleport, amSwitch, amMortar, amKamikaze, amCake);
    77                    amGirder, amTeleport, amSwitch, amMortar, amKamikaze, amCake,
       
    78                    amSeduction);
    78 
    79 
    79      THWFont    = (fnt16, fntBig, fntSmall);
    80      THWFont    = (fnt16, fntBig, fntSmall);
    80 
    81 
    81      TCapGroup  = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
    82      TCapGroup  = (capgrpGameState, capgrpAmmoinfo, capgrpNetSay, capgrpVolume);
    82 
    83 
   969                                    minAngle: 0;
   970                                    minAngle: 0;
   970                                    maxAngle: 0;
   971                                    maxAngle: 0;
   971                                    isDamaging: true;
   972                                    isDamaging: true;
   972                                    SkipTurns: 0;
   973                                    SkipTurns: 0;
   973                                    PosCount: 1;
   974                                    PosCount: 1;
       
   975                                    PosSprite: sprWater),
       
   976                                   (NameId: sidSeduction;
       
   977                                    NameTex: nil;
       
   978                                    Probability: 100;
       
   979                                    NumberInCase: 1;
       
   980                                    Ammo: (Propz: ammoprop_ForwMsgs or
       
   981                                                  ammoprop_NoCrosshair or
       
   982                                                  ammoprop_DontHold;
       
   983                                           Count: 1;
       
   984                                           NumPerTurn: 0;
       
   985                                           Timer: 0;
       
   986                                           Pos: 0;
       
   987                                           AmmoType: amSeduction);
       
   988                                    Slot: 2;
       
   989                                    TimeAfterTurn: 0;
       
   990                                    minAngle: 0;
       
   991                                    maxAngle: 0;
       
   992                                    isDamaging: true;
       
   993                                    SkipTurns: 0;
       
   994                                    PosCount: 1;
   974                                    PosSprite: sprWater)
   995                                    PosSprite: sprWater)
   975                                   );
   996                                   );
   976 
   997 
   977 var CountTexz: array[1..9] of PTexture;
   998 var CountTexz: array[1..9] of PTexture;
   978 
   999