2038     isMap: boolean;

  2038     isMap: boolean;

  2039     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.

  2039     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.

  2040     LandBackSurface: PSDL_Surface;

  2040     LandBackSurface: PSDL_Surface;

  2041     digest: shortstring;

  2041     digest: shortstring;

  2042     CurAmmoGear: PGear;

  2042     CurAmmoGear: PGear;

  2043     GearsList: PGear;

  2044     GearsList: PGear;

  2044     AllInactive: boolean;

  2045     AllInactive: boolean;

  2045     PrvInactive: boolean;

  2046     PrvInactive: boolean;

  2046     KilledHHs: Longword;

  2047     KilledHHs: Longword;

  2047     SuddenDeathDmg: Boolean;

  2048     SuddenDeathDmg: Boolean;

  2095     ropeIconTex: PTexture;

  2096     ropeIconTex: PTexture;

  2096     rotationQt: GLfloat;

  2097     rotationQt: GLfloat;

  2097 

  2098 

  2098 

  2099 

  2099     VisualGearsList: PVisualGear;

  2100     VisualGearsList: PVisualGear;

  2100     vobFrameTicks, vobFramesCount, vobCount: Longword;

  2102     vobFrameTicks, vobFramesCount, vobCount: Longword;

  2101     vobVelocity, vobFallSpeed: LongInt;

  2103     vobVelocity, vobFallSpeed: LongInt;

  2102 

  2104 

  2103 

  2105 

  2104     hideAmmoMenu: boolean;

  2106     hideAmmoMenu: boolean;

  2151 implementation

  2153 implementation

  2152 

  2154 

  2153 

  2155 

  2154 procedure initModule;

  2156 procedure initModule;

  2155 begin

  2157 begin

  2156     Pathz:= cPathz;

  2161     Pathz:= cPathz;

  2157         {*  REFERENCE

  2162         {*  REFERENCE

  2158       4096 -> $FFFFF000

  2163       4096 -> $FFFFF000

  2159       2048 -> $FFFFF800

  2164       2048 -> $FFFFF800

  2160       1024 -> $FFFFFC00

  2165       1024 -> $FFFFFC00

  2161        512 -> $FFFFFE00  *}

  2166        512 -> $FFFFFE00  *}

  2162     if (cReducedQuality and rqLowRes) <> 0 then

  2167     if (cReducedQuality and rqLowRes) <> 0 then

  2164         LAND_WIDTH:= 2048;

  2169         LAND_WIDTH:= 2048;

  2165         LAND_HEIGHT:= 1024;

  2170         LAND_HEIGHT:= 1024;

  2166         LAND_WIDTH_MASK:= $FFFFF800;

  2171         LAND_WIDTH_MASK:= $FFFFF800;

  2167         LAND_HEIGHT_MASK:= $FFFFFC00;

  2172         LAND_HEIGHT_MASK:= $FFFFFC00;

  2169     else

  2174     else

  2171         LAND_WIDTH:= 4096;

  2176         LAND_WIDTH:= 4096;

  2172         LAND_HEIGHT:= 2048;

  2177         LAND_HEIGHT:= 2048;

  2173         LAND_WIDTH_MASK:= $FFFFF000;

  2178         LAND_WIDTH_MASK:= $FFFFF000;

  2174         LAND_HEIGHT_MASK:= $FFFFF800

  2179         LAND_HEIGHT_MASK:= $FFFFF800

  2176 

  2181 

  2177     SDWaterColorArray[0].r := 184;

  2182     SDWaterColorArray[0].r := 184;

  2178     SDWaterColorArray[0].g := 152;

  2183     SDWaterColorArray[0].g := 152;

  2179     SDWaterColorArray[0].b := 195;

  2184     SDWaterColorArray[0].b := 195;

  2180     SDWaterColorArray[0].a := 255;

  2185     SDWaterColorArray[0].a := 255;