hedgewars/uTypes.pas
changeset 13068 6369d148cfff
parent 13047 eadf8259306f
child 13077 c213645ff848
equal deleted inserted replaced
13067:64aba90811a2 13068:6369d148cfff
   347         TeamKills : Longword;
   347         TeamKills : Longword;
   348         TurnSkips : Longword;
   348         TurnSkips : Longword;
   349         TeamDamage : Longword;
   349         TeamDamage : Longword;
   350         end;
   350         end;
   351 
   351 
   352     TBinds = array[0..cKbdMaxIndex] of shortstring;
   352     TBinds = record
       
   353                  indices: array[0..cKbdMaxIndex] of byte;
       
   354                  // zeroth element is reserved, indices[i] == 0 means no binding
       
   355                  binds: array[0..255] of shortstring;
       
   356                  lastIndex: byte;
       
   357              end;
       
   358 
   353     TKeyboardState = array[0..cKeyMaxIndex] of Byte;
   359     TKeyboardState = array[0..cKeyMaxIndex] of Byte;
   354 
   360 
   355     PVoicepack = ^TVoicepack;
   361     PVoicepack = ^TVoicepack;
   356     TVoicepack = record
   362     TVoicepack = record
   357         name: shortstring;
   363         name: shortstring;