hedgewars/uTeams.pas
changeset 3165 3ec07a7d8456
parent 3112 f1bbe35ddb83
child 3355 dc9e61e67484
equal deleted inserted replaced
3164:569fd65261d0 3165:3ec07a7d8456
    18 
    18 
    19 {$INCLUDE "options.inc"}
    19 {$INCLUDE "options.inc"}
    20 
    20 
    21 unit uTeams;
    21 unit uTeams;
    22 interface
    22 interface
    23 uses SDLh, uConsts, uKeys, uGears, uRandom, uFloat, uStats, uVisualGears, uCollisions, uLand,
    23 uses SDLh, uConsts, uKeys, uGears, uRandom, uFloat, uStats, uVisualGears, uCollisions, uLand, GLunit, uSound;
    24 {$IFDEF GLES11}
       
    25     gles11,
       
    26 {$ELSE}
       
    27     GL,
       
    28 {$ENDIF}
       
    29     uSound;
       
    30 
    24 
    31 type PHHAmmo = ^THHAmmo;
    25 type PHHAmmo = ^THHAmmo;
    32     THHAmmo = array[0..cMaxSlotIndex, 0..cMaxSlotAmmoIndex] of TAmmo;
    26     THHAmmo = array[0..cMaxSlotIndex, 0..cMaxSlotAmmoIndex] of TAmmo;
    33 
    27 
    34     PHedgehog = ^THedgehog;
    28     PHedgehog = ^THedgehog;