hedgewars/uConsts.pas
changeset 304 8096e69e839e
parent 302 7aca131ecd7f
child 305 1c1cd66ffcdc
equal deleted inserted replaced
303:1659c4aad5ab 304:8096e69e839e
    90       msgOK                = 'ok';
    90       msgOK                = 'ok';
    91       msgFailed            = 'failed';
    91       msgFailed            = 'failed';
    92       msgGettingConfig     = 'Getting game config...';
    92       msgGettingConfig     = 'Getting game config...';
    93 
    93 
    94 const
    94 const
       
    95       cMaxPower     = 1500;
       
    96       cMaxAngle     = 2048;
       
    97       cPowerDivisor = 1500;
       
    98       
    95       MAXNAMELEN = 32;
    99       MAXNAMELEN = 32;
    96 
   100 
    97       COLOR_LAND = $00FFFFFF;
   101       COLOR_LAND = $00FFFFFF;
    98 
   102 
    99       cifRandomize = $00000001;
   103       cifRandomize = $00000001;
   290       Ammoz: array [TAmmoType] of record
   294       Ammoz: array [TAmmoType] of record
   291                                   NameId: TAmmoStrId;
   295                                   NameId: TAmmoStrId;
   292                                   Ammo: TAmmo;
   296                                   Ammo: TAmmo;
   293                                   Slot: 0..cMaxSlotIndex;
   297                                   Slot: 0..cMaxSlotIndex;
   294                                   TimeAfterTurn: Longword;
   298                                   TimeAfterTurn: Longword;
       
   299                                   minAngle, maxAngle: Longword;
   295                                   end = (
   300                                   end = (
   296                                   (NameId: sidGrenade;
   301                                   (NameId: sidGrenade;
   297                                    Ammo: (Propz: ammoprop_Timerable or
   302                                    Ammo: (Propz: ammoprop_Timerable or
   298                                                  ammoprop_Power;
   303                                                  ammoprop_Power;
   299                                           Count: AMMO_INFINITE;
   304                                           Count: AMMO_INFINITE;
   362                                           Count: 5;
   367                                           Count: 5;
   363                                           NumPerTurn: 0;
   368                                           NumPerTurn: 0;
   364                                           Timer: 0;
   369                                           Timer: 0;
   365                                           AmmoType: amRope);
   370                                           AmmoType: amRope);
   366                                    Slot: 7;
   371                                    Slot: 7;
   367                                    TimeAfterTurn: 0),
   372                                    TimeAfterTurn: 0;
       
   373                                    maxAngle: cMaxAngle div 2),
   368                                   (NameId: sidMine;
   374                                   (NameId: sidMine;
   369                                    Ammo: (Propz: ammoprop_NoCrosshair;
   375                                    Ammo: (Propz: ammoprop_NoCrosshair;
   370                                           Count: 2;
   376                                           Count: 2;
   371                                           NumPerTurn: 0;
   377                                           NumPerTurn: 0;
   372                                           Timer: 0;
   378                                           Timer: 0;
   445                                           Count: 1;
   451                                           Count: 1;
   446                                           NumPerTurn: 0;
   452                                           NumPerTurn: 0;
   447                                           Timer: 0;
   453                                           Timer: 0;
   448                                           AmmoType: amBlowTorch);
   454                                           AmmoType: amBlowTorch);
   449                                    Slot: 6;
   455                                    Slot: 6;
   450                                    TimeAfterTurn: 3000));
   456                                    TimeAfterTurn: 3000;
       
   457                                    minAngle: 510;
       
   458                                    maxAngle: 1400));
   451 
   459 
   452 implementation
   460 implementation
   453 
   461 
   454 end.
   462 end.