hedgewars/uVariables.pas
changeset 4370 d1d5c1a57a50
parent 4369 334fc848e051
child 4371 ae172b2b03ed
equal deleted inserted replaced
4369:334fc848e051 4370:d1d5c1a57a50
  1998     playHeight, playWidth, leftX, rightX, topY, MaxHedgehogs: Longword;  // idea is that a template can specify height/width.  Or, a map, a height/width by the dimensions of the image.  If the map has pixels near top of image, it triggers border.
  1998     playHeight, playWidth, leftX, rightX, topY, MaxHedgehogs: Longword;  // idea is that a template can specify height/width.  Or, a map, a height/width by the dimensions of the image.  If the map has pixels near top of image, it triggers border.
  1999     LandBackSurface: PSDL_Surface;
  1999     LandBackSurface: PSDL_Surface;
  2000     digest: shortstring;
  2000     digest: shortstring;
  2001     CurAmmoGear: PGear;
  2001     CurAmmoGear: PGear;
  2002     GearsList: PGear;
  2002     GearsList: PGear;
       
  2003     AllInactive: boolean;
       
  2004     PrvInactive: boolean;
       
  2005     KilledHHs: Longword;
       
  2006     SuddenDeathDmg: Boolean;
       
  2007     SpeechType: Longword;
       
  2008     SpeechText: shortstring;
       
  2009     TrainingTargetGear: PGear;
       
  2010     skipFlag: boolean;
       
  2011     PlacingHogs: boolean; // a convenience flag to indicate placement of hogs is still in progress
       
  2012     StepSoundTimer: LongInt;
       
  2013     StepSoundChannel: LongInt;
  2003 
  2014 
  2004     CurrentTeam: PTeam;
  2015     CurrentTeam: PTeam;
  2005     PreviousTeam: PTeam;
  2016     PreviousTeam: PTeam;
  2006     CurrentHedgehog: PHedgehog;
  2017     CurrentHedgehog: PHedgehog;
  2007     TeamsArray: array[0..Pred(cMaxTeams)] of PTeam;
  2018     TeamsArray: array[0..Pred(cMaxTeams)] of PTeam;
  2024     HorizontOffset: LongInt;
  2035     HorizontOffset: LongInt;
  2025 {$IFDEF COUNTTICKS}
  2036 {$IFDEF COUNTTICKS}
  2026     cntTicks: LongWord;
  2037     cntTicks: LongWord;
  2027 {$ENDIF}
  2038 {$ENDIF}
  2028     cOffsetY: LongInt;
  2039     cOffsetY: LongInt;
  2029 
       
  2030 
  2040 
  2031 procedure initModule;
  2041 procedure initModule;
  2032 procedure freeModule;
  2042 procedure freeModule;
  2033 
  2043 
  2034 implementation
  2044 implementation