hedgewars/uTypes.pas
changeset 13761 a0d6404a80a2
parent 13679 3f6fae745f84
child 13762 f0cb47f0bfaf
equal deleted inserted replaced
13760:6908d1e65cdc 13761:a0d6404a80a2
   348         TeamKills : Longword;
   348         TeamKills : Longword;
   349         TurnSkips : Longword;
   349         TurnSkips : Longword;
   350         TeamDamage : Longword;
   350         TeamDamage : Longword;
   351         end;
   351         end;
   352 
   352 
       
   353     PClanDeathLogEntry = ^TClanDeathLogEntry;
       
   354 
       
   355     TClanDeathLogEntry = record
       
   356         Turn : Longword; // turn in which the clans were killed
       
   357         KilledClans : array[0..Pred(cMaxTeams)] of PClan; // array of clans that have died
       
   358         KilledClansCount: Longword; // number of clans that died
       
   359         NextEntry : PClanDeathLogEntry; // linked list
       
   360         end;
       
   361 
       
   362 
   353     TBinds = record
   363     TBinds = record
   354                  indices: array[0..cKbdMaxIndex] of byte;
   364                  indices: array[0..cKbdMaxIndex] of byte;
   355                  // zeroth element is reserved, indices[i] == 0 means no binding
   365                  // zeroth element is reserved, indices[i] == 0 means no binding
   356                  binds: array[0..255] of shortstring;
   366                  binds: array[0..255] of shortstring;
   357                  lastIndex: byte;
   367                  lastIndex: byte;
   441             TagTeamIndex: Longword;
   451             TagTeamIndex: Longword;
   442             CurrTeam: LongWord;
   452             CurrTeam: LongWord;
   443             ClanHealth: LongInt;
   453             ClanHealth: LongInt;
   444             ClanIndex: LongInt;
   454             ClanIndex: LongInt;
   445             TurnNumber: LongWord;
   455             TurnNumber: LongWord;
       
   456             DiedThisTurn: boolean; // true if clan died in current turn
       
   457             StatsHandled : boolean; // true if clan has been handled for stats screen
   446             Flawless: boolean;
   458             Flawless: boolean;
   447             end;
   459             end;
   448 
   460 
   449      cdeclPtr = procedure; cdecl;
   461      cdeclPtr = procedure; cdecl;
   450      cdeclIntPtr = procedure(num: LongInt); cdecl;
   462      cdeclIntPtr = procedure(num: LongInt); cdecl;