hedgewars/uTeams.pas
changeset 4357 a1fcfc341a52
parent 4218 d90e9c89596b
child 4359 83ef50815535
equal deleted inserted replaced
4355:4554c4df9f1a 4357:a1fcfc341a52
    18 
    18 
    19 {$INCLUDE "options.inc"}
    19 {$INCLUDE "options.inc"}
    20 
    20 
    21 unit uTeams;
    21 unit uTeams;
    22 interface
    22 interface
    23 uses uConsts, uKeys, uGears, uRandom, uFloat, uStats, uVisualGears, uCollisions, GLunit, uSound;
    23 uses uConsts, uKeys, uGears, uRandom, uFloat, uStats, uVisualGears, uCollisions, GLunit, uSound, uTypes;
    24 
    24 
    25 type 
    25 type 
    26     PHHAmmo = ^THHAmmo;
    26     PHHAmmo = ^THHAmmo;
    27     THHAmmo = array[0..cMaxSlotIndex, 0..cMaxSlotAmmoIndex] of TAmmo;
    27     THHAmmo = array[0..cMaxSlotIndex, 0..cMaxSlotAmmoIndex] of TAmmo;
    28 
    28