fixed some memory allocations to prevent valgrind warnings
[rocksndiamonds.git] / src / game_sp / Globals.c
index 4da9c45b06e970bcf5e40ea3739b705798c06d7e..0ca6500049f0c3cb1e07bed3428eea1ddd7a4cd9 100644 (file)
 
 #include "Globals.h"
 
-static void ReadDemo();
-void ReadLevel();
-
-// static char *VB_Name = "modGlobals";
-
-// --- Option Explicit
-// --- Option Compare Text
-// --- Option Base 0
-
-// --- const long StretchWidth = 16;
-// --- const long StretchWidth2 = StretchWidth / 2;
-// --- const long BaseWidth = 16;
-// --- const int TwoPixels = 2;
-
-boolean Original;
-boolean Cracked;
-boolean Level_Arg;
-boolean EGA_Arg;
-boolean Record_Fix;
-boolean SpeedKeys;
-boolean Level_Fix;
-boolean Dead_Code;
-boolean Redundant;
-boolean Alignments;
-boolean Ctrl_Alt_Fix;
-boolean Protection;
-boolean EP_ENHANCE;
-boolean EP_DEMO;
-boolean EP_DEBUG;
-boolean EXTRASPEED;
-boolean TIMINGFIX;
-boolean SafeRecord;
-boolean Norm_Time;
-boolean EP_OLD8;
-boolean SAVEGAME;
-boolean HP_DEMO;
-boolean ScreenFix;
-boolean DemoRecordFix;
-boolean DebugSwitch;
-boolean Ver62;
-boolean Ver62test;
-boolean Ver63;
-boolean Ver64;
-
-int LevelNumber;
-char *CurPath, *OrigPath, *TmpPath;
+
+static int *PlayField16Mem;
+static byte *PlayField8Mem;
+
 boolean LevelLoaded;
-long SignatureDelay;
 
-boolean bCapturePane;
+boolean DemoAvailable;
+boolean menBorder;
 
-int FieldWidth; // = 60
-int FieldHeight; // = 24
-int HeaderSize; // = 96
+int FieldWidth;                // standard size = 60
+int FieldHeight;       // standard size = 24
+int HeaderSize;                // standard size = 96
 int FieldMax, LevelMax;
-long FileMax;
+
 int *PlayField16;
 byte *PlayField8;
-byte *DisPlayField;
+byte DisPlayField[SP_MAX_PLAYFIELD_SIZE + SP_HEADER_SIZE];
 
-// Public DisplayMin%, DisplayMax%, DisplayWidth%, DisplayHeight%
-
-int TimerVar, RandomSeed;
-currency DeltaT; // Interval between two frames (in ms)
-long DeltaTPlay, DeltaTDemo;
-boolean BlockingSpeed;
-
-// --- const int posFrameCorner = 55;
-// --- const int posFrameVertical = 110;
-// --- const int posFrameHorizontal = 111;
+int TimerVar;
+short RandomSeed;
 
 int FreezeZonks;
 
-// constants for  Fixed Fields:
-// --- const int fiSpace = 0; // &H00  space(28 = wall space ...)
-// --- const int fiZonk = 1; // &H01  zonk
-// --- const int fiBase = 2; // &H02  base
-// --- const int fiMurphy = 3; // &H03  Murphy
-// --- const int fiInfotron = 4; // &H04  infotron
-// --- const int fiRAM = 5; // &H05  small RAM chip
-// --- const int fiHardWare = 6; // &H06  hardware (square, standard pyramid shape)
-// --- const int fiExit = 7; // &H07  exit
-// --- const int fiOrangeDisk = 8; // &H08  brown/orange utility disk
-// --- const int fiPortRight = 9; // &H09  port 1 left to right
-// --- const int fiPortDown = 10; // &H0A  port 1 up to down
-// --- const int fiPortLeft = 11; // &H0B  port 1 right to left
-// --- const int fiPortUp = 12; // &H0C  port 1 down to up
-// --- const int fiSpPortRight = 13; // &H0D  port 2 left to right (gravity change)
-// --- const int fiSpPortDown = 14; // &H0E  port 2 up to down     (gravity change)
-// --- const int fiSpPortLeft = 15; // &H0F  port 2 right to left (gravity change)
-// --- const int fiSpPortUp = 16; // &H10  port 2 down to up     (gravity change)
-// --- const int fiSnikSnak = 17; // &H11  snik snak
-// --- const int fiYellowDisk = 18; // &H12  yellow utility disk
-// --- const int fiTerminal = 19; // &H13  terminal
-// --- const int fiRedDisk = 20; // &H14  red utility disk
-// --- const int fiPortUpAndDown = 21; // &H15  vertical port
-// --- const int fiPortLeftAndRight = 22; // &H16  horizontal port
-// --- const int fiPortAllDirections = 23; // &H17  horizontal + vertical port
-// --- const int fiElectron = 24; // &H18  electron
-// --- const int fiBug = 25; // &H19  bug
-// --- const int fiRAMLeft = 26; // &H1A  horizontal RAM chip, left (pin 1)
-// --- const int fiRAMRight = 27; // &H1B  horizontal RAM chip, right
-// --- const int fiHWFirst = 28; // &H1C  hardware (radial blue circular cap + coloured shapes)
-
-// Public Const fiHW1% = 29               '  29 = 1D  hardware (green signal lamp)
-// Public Const fiHW2% = 30               '  30 = 1E  hardware (blue signal lamp)
-// Public Const fiHW3% = 31               '  31 = 1F  hardware (red signal lamp)
-// Public Const fiHW4% = 32               '  32 = 20  hardware (yellow/black diagonal stripes)
-// Public Const fiHW5% = 33               '  33 = 21  hardware (yellow resistor + blue + red shapes)
-// Public Const fiHW6% = 34               '  34 = 22  hardware (horizontal red capacitor + smd shape)
-// Public Const fiHW7% = 35               '  35 = 23  hardware (red + yellow + blue horizontal resistors)
-// Public Const fiHW8% = 36               '  36 = 24  hardware (3 red vertical resistors)
-// --- const int fiHWLast = 37;             //  37 = 25  hardware (3 yellow horizontal resistors)
-// --- const int fiRAMTop = 38;             //  38 = 26  vertical RAM chip, top (pin 1)
-// --- const int fiRAMBottom = 39;          //  39 = 27  vertical RAM chip, bottom
-
-// Specials to experiment with ...
-// --- const int fiWallSpace = 40;          //  40 = 28  invisible wall (can explode, zonks don't roll off)
-// --- const int fiHWTrash1 = 41;           //  41 = 29  hardware trash
-// --- const int fiHWTrash2 = 42;           //  42 = 2A  hardware trash
-// --- const int fiHWMurphy = 43;           //  43 = 2B  hardware inverted Murphy ... (maybe nice for use?)
-
-// --- const int fiExplosion = 0x1F;
-
-// --- const int keyNone = 0;
-// --- const int keyUp = 1;
-// --- const int keyLeft = 2;
-// --- const int keyDown = 3;
-// --- const int keyRight = 4;
-// --- const int keySpaceUp = 5;
-// --- const int keySpaceLeft = 6;
-// --- const int keySpaceDown = 7;
-// --- const int keySpaceRight = 8;
-// --- const int keySpace = 9;
-
-#if 0
-int *aniBug, *aniZonkRollRight, *aniZonkRollLeft;
-int *aniInfotronRollRight, *aniInfotronRollLeft;
-int *aniSnikSnak, *aniElectron, *aniExplosion;
-int *aniTouchBase, *aniTouchInfotron, *aniTouchRedDisk;
-// --- const int aniExplosionInfo = 111;
-// --- const int aniSnikSnakUp = 159;
-// --- const int aniSnikSnakDown = 167;
-// --- const int aniSnikSnakLeft = 239;
-// --- const int aniSnikSnakRight = 247;
-// --- const int aniMurphyYawn = 56;
-// --- const int aniMurphySleepLeft = 71;
-// --- const int aniMurphySleepRight = 68;
-int *aniMurphyExit; // , aniMurphyFaceLeft%, aniMurphyFaceRight%
-int *aniMurphyEatLeft, *aniMurphyEatRight; // , aniMurphyEatRightRedDisk
-int *aniMurphyEatUpLeft, *aniMurphyEatUpRight, *aniSplitUpDown;
-int *aniYellowDisk, *aniOrangeDisk, *aniRedDisk;
-// --- const int aniMurphyTouchUp = 46;
-// --- const int aniMurphyTouchLeft = 95;
-// --- const int aniMurphyTouchDown = 47;
-// --- const int aniMurphyTouchRight = 94;
-int *aniEatInfotronLeft, *aniEatInfotronRight;
-// --- const int aniPushLeft = 45;
-// --- const int aniPushRight = 44;
-// --- const int aniPushUpDown = 79;
-#endif
-
-#if 1
-int aniBug[] = { 74, 75, 76, 77, 78, 77, 76, 77, 78, 77, 76, 75, 74, 25 };
-int aniZonkRollRight[] = { 198, 197, 196, 195, 194, 193, 192, 1, -1 };
-int aniZonkRollLeft[] = { 192, 193, 194, 195, 196, 197, 198, 1, -1 };
-int aniInfotronRollRight[] = { 206, 205, 204, 203, 202, 201, 200, 4 };
-int aniInfotronRollLeft[] = { 200, 201, 202, 203, 204, 205, 206, 4 };
-int aniSnikSnak[] = { 121, 122, 123, 124, 125, 126, 127, 120, 121 };
-int aniElectron[] = { 144, 145, 146, 147, 148, 149, 150, 151, 144 };
-int aniExplosion[] = { 3, 103, 104, 105, 106, 107, 108, 109, 0 };
-int aniTouchBase[] = { 80, 81, 82, 83, 84, 85, 86, 0, -1 };
-int aniTouchInfotron[] = { 87, 88, 89, 91, 92, 93, 0, -1 }; // Only seven frames!!!!
-int aniTouchRedDisk[] = { 96, 97, 98, 99, 100, 101, 102, 0, -1 };
-int aniMurphyExit[] = { 46, 46, 46, 46, 47, 47, 47, 47, 48, 48, 48, 48, 49, 49, 49, 49, 50, 50, 50, 50, 51, 51, 51, 51, 52, 52, 52, 52, 53, 53, 53, 53, 54, 54, 54, 54, 0, 0, 0, 0, -1 };
-int aniMurphyEatLeft[] = { 176, 177, 178, 179, 180, 181, 182, 183, -1 };
-int aniMurphyEatRight[] = { 184, 185, 186, 187, 188, 189, 190, 191, -1 };
-int aniMurphyEatUpLeft[] = { 183, 182, 181, 180, 179, 178, 177, 176, -1 };
-int aniMurphyEatUpRight[] = { 191, 190, 189, 188, 187, 186, 185, 184, -1 };
-  // aniMurphyEatRightRedDisk = { 184, 184, 185, 186, 187, 188, 189, 190, 191, -1) '9 frames!
-int aniEatInfotronLeft[] = { 209, 211, 213, 215, 217, 219, 221, 223, -1 };
-int aniEatInfotronRight[] = { 224, 226, 228, 230, 232, 234, 236, 238, -1 };
-int aniSplitUpDown[] = { 3, 3, 3, 3, 3, 3, 3, 3, -1 };
-int aniYellowDisk[] = { 18, 18, 18, 18, 18, 18, 18, 18, -1 };
-int aniOrangeDisk[] = { 8, 8, 8, 8, 8, 8, 8, 8, -1 };
-int aniRedDisk[] = { 20, -1 };
-#endif
-
-void InitGlobals()
-{
-#if 0
-  aniBug = Array(74, 75, 76, 77, 78, 77, 76, 77, 78, 77, 76, 75, 74, 25);
-  aniZonkRollRight = Array(198, 197, 196, 195, 194, 193, 192, 1, -1);
-  aniZonkRollLeft = Array(192, 193, 194, 195, 196, 197, 198, 1, -1);
-  aniInfotronRollRight = Array(206, 205, 204, 203, 202, 201, 200, 4);
-  aniInfotronRollLeft = Array(200, 201, 202, 203, 204, 205, 206, 4);
-  aniSnikSnak = Array(121, 122, 123, 124, 125, 126, 127, 120, 121);
-  aniElectron = Array(144, 145, 146, 147, 148, 149, 150, 151, 144);
-  aniExplosion = Array(3, 103, 104, 105, 106, 107, 108, 109, 0);
-  aniTouchBase = Array(80, 81, 82, 83, 84, 85, 86, 0, -1);
-  aniTouchInfotron = Array(87, 88, 89, 91, 92, 93, 0, -1); // Only seven frames!!!!
-  aniTouchRedDisk = Array(96, 97, 98, 99, 100, 101, 102, 0, -1);
-  aniMurphyExit = Array(46, 46, 46, 46, 47, 47, 47, 47, 48, 48, 48, 48, 49, 49, 49, 49, 50, 50, 50, 50, 51, 51, 51, 51, 52, 52, 52, 52, 53, 53, 53, 53, 54, 54, 54, 54, 0, 0, 0, 0, -1);
-  aniMurphyEatLeft = Array(176, 177, 178, 179, 180, 181, 182, 183, -1);
-  aniMurphyEatRight = Array(184, 185, 186, 187, 188, 189, 190, 191, -1);
-  aniMurphyEatUpLeft = Array(183, 182, 181, 180, 179, 178, 177, 176, -1);
-  aniMurphyEatUpRight = Array(191, 190, 189, 188, 187, 186, 185, 184, -1);
-  // aniMurphyEatRightRedDisk = Array(184, 184, 185, 186, 187, 188, 189, 190, 191, -1) '9 frames!
-  aniEatInfotronLeft = Array(209, 211, 213, 215, 217, 219, 221, 223, -1);
-  aniEatInfotronRight = Array(224, 226, 228, 230, 232, 234, 236, 238, -1);
-  aniSplitUpDown = Array(3, 3, 3, 3, 3, 3, 3, 3, -1);
-  aniYellowDisk = Array(18, 18, 18, 18, 18, 18, 18, 18, -1);
-  aniOrangeDisk = Array(8, 8, 8, 8, 8, 8, 8, 8, -1);
-  aniRedDisk = Array(20, -1);
-#endif
-
-  InitPseudoCompileFlags();
-  UserDragFlag = False;
-  AutoScrollFlag = True;
-  FreezeZonks = 0;
-  BlockingSpeed = False;
-  LevelLoaded = False;
-  FieldWidth = 60;
-  FieldHeight = 24;
-  HeaderSize = 96;
-  FieldMax = (FieldWidth * FieldHeight) + HeaderSize - 1;
-  LevelMax = (FieldWidth * FieldHeight) - 1;
-  Let_ModifiedFlag(False);
-  bPlaying = False;
-  gSignature = "";
-  bSignatureAvailable = False;
-  FirstDemoByte = 0x81;
-  MySignature = "";
-  InitErrorReporting();
-}
-
-void InitPseudoCompileFlags()
-{
-  Cracked = 1;       // If protection Then crack it
-  Level_Arg = 1;     // :number is cmd line option
-  // Level_Arg  = 0     ' Remove Level cmd line option
-  EGA_Arg = 1;       // EGA is command line option
-  Record_Fix = 1;      // Assemble with fixed Demo rec
-  SpeedKeys = 0;     // Remove Speed Keys fix
-  Level_Fix = 1;     // Assemble with Level Fix
-  Dead_Code = 0;     // Remove dead code
-  Redundant = 0;     // Remove redundant code
-  Alignments = 1;      // Assemble with alignments
-  Ctrl_Alt_Fix = 1;      // Assemble with Ctrl/Alt fix
-  Protection = 0;      // Remove protection code,do HP
-  // EP added by EP for version 5.
-  EP_ENHANCE = 1;      // Some more nice things (EP)
-  EP_DEMO = 1;       // Use .SP files for demos (EP)
-  // Including record demo!
-  EP_DEBUG = 0;      // little cmdline debugging
-  EXTRASPEED = 1;      // '@' option, superfast!
-  TIMINGFIX = 1;     // "Fixed" the timing problem..
-  // Inactive If DemoRecordFix Then1
-  SafeRecord = 1;      // skip debug keys in recording
-  Norm_Time = 1;     // force automatic speed test,
-  // save result and then do as
-  // requested from cmd line.
-  EP_OLD8 = 1;       // call old int8 from current.
-  SAVEGAME = 1;      // Allow saving to SUPAPLEX.SAV
-  HP_DEMO = 1;       // Use fixed demo routines 5.5
-  ScreenFix = 1;     // No menu-write to gamy field
-  DemoRecordFix = 1;     // Demo record timing fix on
-  DebugSwitch = 1;     // Allow Ctrl/Alt-ScrollLock
-  Ver62 = 1;       // Version 6.2 stuff
-  Ver62test = 0;     // Version 6.2 test stuff
-  Ver63 = 1;       // Version 6.3 stuff
-  Ver64 = 1;       // Version 6.4 stuff
+LevelInfoType LInfo;
 
-}
+int ScrollMinX, ScrollMaxX, ScrollMinY, ScrollMaxY;
+int ScrollX, ScrollY;
 
-int GetSI(int X, int Y)
-{
-  int GetSI;
+int MurphyPosIndex, MurphyXPos, MurphyYPos;
+int MurphyScreenXPos, MurphyScreenYPos;
+int MurphyExplodePos, SplitMoveFlag, RedDiskReleaseMurphyPos;
+int KillMurphyFlag, MurphyMoveCounter;
+int YawnSleepCounter;
+int MurphyVarFaceLeft;
+int ScratchGravity, GravityFlag;
+int RedDiskReleaseFlag, MovingPictureSequencePhase;
 
-  GetSI = Y * FieldWidth + X;
+int YellowDisksExploded;
+int AllowRedDiskCheat, AllowEatRightRedDiskBug;
 
-  return GetSI;
-}
+int GameBusyFlag;
+int InfotronsNeeded, TotalInfotronsNeeded;
+int RedDiskCount;
+int SnikSnaksElectronsFrozen;
 
-int GetX(int si)
-{
-  int GetX;
+int DemoKeyCode;
 
-  GetX = si % FieldWidth;
+int RedDiskReleasePhase;
 
-  return GetX;
-}
-
-int GetY(int si)
+int fiGraphic[] =
 {
-  int GetY;
+  aniSpace,
+  aniZonk,
+  aniBase,
+  aniMurphy,
+  aniInfotron,
+  aniRAM,
+  aniHardWare,
+  aniExit,
+  aniOrangeDisk,
+  aniPortRight,
+  aniPortDown,
+  aniPortLeft,
+  aniPortUp,
+  aniSpPortRight,
+  aniSpPortDown,
+  aniSpPortLeft,
+  aniSpPortUp,
+  aniSnikSnak,
+  aniYellowDisk,
+  aniTerminal,
+  aniRedDisk,
+  aniPortUpAndDown,
+  aniPortLeftAndRight,
+  aniPortAllDirections,
+  aniElectron,
+  aniBug,
+  aniRAMLeft,
+  aniRAMRight,
+  aniHW0,
+  aniHW1,
+  aniHW2,
+  aniHW3,
+  aniHW4,
+  aniHW5,
+  aniHW6,
+  aniHW7,
+  aniHW8,
+  aniHW9,
+  aniRAMTop,
+  aniRAMBottom,
+  aniWallSpace
+};
+
+int aniSnikSnakTurningLeft[] =
+{
+  aniSnikSnakTurnUpToLeft,
+  aniSnikSnakTurnLeftToDown,
+  aniSnikSnakTurnDownToRight,
+  aniSnikSnakTurnRightToUp
+};
 
-  GetY = si / FieldWidth;
+int aniSnikSnakTurningRight[] =
+{
+  aniSnikSnakTurnUpToRight,
+  aniSnikSnakTurnRightToDown,
+  aniSnikSnakTurnDownToLeft,
+  aniSnikSnakTurnLeftToUp
+};
 
-  return GetY;
-}
 
-int GetStretchX(int si)
+int getSequenceLength(int sequence)
 {
-  int GetStretchX;
+  switch (sequence)
+  {
+    case aniBug:
+      return 14;
 
-  GetStretchX = StretchWidth * (si % FieldWidth);
+    case aniElectron:
+    case aniExplosion:
+      return 9;
 
-  return GetStretchX;
-}
+    case aniTouchInfotron:
+      return 7;
 
-int GetStretchY(int si)
-{
-  int GetStretchY;
+    case aniMurphyExit:
+      return 40;
 
-  GetStretchY = StretchWidth * (si / FieldWidth);
+    case aniRedDisk:
+      return 1;
 
-  return GetStretchY;
+    default:
+      return 8;
+  }
 }
 
-void ReadLevel()
+boolean isSnappingSequence(int sequence)
 {
-  // int FNum;
-  FILE *FNum;
-  long i;
-  // byte T;
-
-  DemoAvailable = False;
-
-  if (STRING_IS_LIKE(CurPath, "*.mpx"))
+  switch (sequence)
   {
-    ReadMPX();
-    return;
-  }
+    case aniTouchBase:
+    case aniTouchInfotron:
+    case aniTouchRedDisk:
+      return TRUE;
 
-  if (STRING_IS_LIKE(CurPath, "*.sp"))
-  {
-    ReadDemo();
-    return;
+    default:
+      return FALSE;
   }
+}
 
-  if (DemoFlag != 0)
-  {
-    ReadDemo();
-    return;
-  }
+void InitGlobals(void)
+{
+  InitPrecedingPlayfieldMemory();
 
-  FileMax = 0;
+  AutoScrollFlag = True;
+  FreezeZonks = 0;
+  LevelLoaded = False;
   FieldWidth = 60;
   FieldHeight = 24;
   HeaderSize = 96;
-
   FieldMax = (FieldWidth * FieldHeight) + HeaderSize - 1;
   LevelMax = (FieldWidth * FieldHeight) - 1;
+  bPlaying = False;
+  menBorder = False;
+
+  // add preceding playfield buffer (as large as preceding memory area)
+  PlayField16Mem = checked_calloc((game_sp.preceding_buffer_size +
+                                  SP_MAX_PLAYFIELD_SIZE +
+                                  SP_HEADER_SIZE) * sizeof(int));
+  PlayField16 = &PlayField16Mem[game_sp.preceding_buffer_size];
+
+  // add preceding playfield buffer (as large as one playfield row)
+  PlayField8Mem = checked_calloc((SP_MAX_PLAYFIELD_WIDTH +
+                                 SP_MAX_PLAYFIELD_SIZE +
+                                 SP_HEADER_SIZE) * sizeof(byte));
+  PlayField8 = &PlayField8Mem[SP_MAX_PLAYFIELD_WIDTH];
+}
 
-  PlayField8 = REDIM_1D(sizeof(byte), 0, FieldMax + 1 - 1);
-  DisPlayField = REDIM_1D(sizeof(byte), 0, FieldMax + 1 - 1);
-
-  // FNum = FreeFile();
-
-  // --- On Error GoTo ReadLevelEH
-
-#if 1
-  CurPath = "/home/aeglos/projects/rocksndiamonds/levels/TEST_supaplex/supaplex/levels.dat";
-  LevelNumber = 1;
-#endif
-
-  printf("::: '%s', %d\n", CurPath, LevelNumber);
-
-  FNum = fopen(CurPath, "rb");
-
-  i = (LevelNumber - 1) * ((long)(FieldMax) + 1) + 1;
-#if 1
-  FILE_GET(FNum, i, PlayField8, FieldMax + 1);
-#else
-  FILE_GET(FNum, i, &PlayField8, sizeof(PlayField8));
-#endif
-  i = (LevelNumber) * ((long)(FieldMax) + 1) + 1 - HeaderSize;
-  FILE_GET(FNum, i, &LInfo, sizeof(LInfo)); // store level info in an extra structure
-
-  fclose(FNum);
-
-  // --- On Error GoTo 0
+void FreeGlobals(void)
+{
+  checked_free(PlayField16Mem);
+  checked_free(PlayField8Mem);
+}
 
-  if (FieldMax < FileMax)
-    DemoAvailable = True;
+int GetSI(int X, int Y)
+{
+  return Y * FieldWidth + X;
+}
 
-  ReadSignature();
+int GetX(int si)
+{
+  return si % FieldWidth;
+}
 
-  PlayField16 = REDIM_1D(sizeof(int), -FieldWidth, FieldMax);
+int GetY(int si)
+{
+  return si / FieldWidth;
+}
 
-  for (i = 0; i <= FieldMax; i++)
-  {
-    PlayField16[i] = PlayField8[i];
-    DisPlayField[i] = PlayField8[i];
-    PlayField8[i] = 0;
-  }
+int GetStretchX(int si)
+{
+  return StretchWidth * (si % FieldWidth);
+}
 
-  AnimationPosTable = REDIM_1D(sizeof(int), 0, LevelMax - 2 *FieldWidth);
-  AnimationSubTable = REDIM_1D(sizeof(byte), 0, LevelMax - 2 *FieldWidth);
-  TerminalState = REDIM_1D(sizeof(byte), FieldWidth, LevelMax - FieldWidth);
+int GetStretchY(int si)
+{
+  return StretchWidth * (si / FieldWidth);
+}
 
-  GravityFlag = LInfo.InitialGravity;
-  FreezeZonks = LInfo.InitialFreezeZonks;
+void PrepareLevel(void)
+{
+  copyInternalEngineVars_SP();
 
-  subRandomize();
+  SetDisplayRegion();
+  SetScrollEdges();
 
   LevelLoaded = True;
-
-  return;
-
-#if 0
-ReadLevelEH:
-  Close();
-#endif
 }
 
-static void ReadDemo()
+int Min(int A, int B)
 {
-  // int FNum, i;
-  FILE *FNum;
-  int i;
-  // byte T;
-
-  FieldWidth = 60;
-  FieldHeight = 24;
-  HeaderSize = 96;
-  FieldMax = (FieldWidth * FieldHeight) + HeaderSize - 1;
-  LevelMax = (FieldWidth * FieldHeight) - 1;
-
-  // --- On Error GoTo ReadDemoEH
-  FileMax = FileLen(CurPath) - 1;
-  PlayField8 = REDIM_1D(sizeof(byte), 0, FileMax + 1 - 1);
-  DisPlayField = REDIM_1D(sizeof(byte), 0, FieldMax + 1 - 1);
-  // FNum = FreeFile();
-  FNum = fopen(CurPath, "rb");
-  i = (LevelNumber - 1) * ((long)(FieldMax) + 1) + 1;
-#if 1
-  FILE_GET(FNum, i, PlayField8, FileMax + 1);
-#else
-  FILE_GET(FNum, i, &PlayField8, sizeof(PlayField8));
-#endif
-  i = (LevelNumber) * ((long)(FieldMax) + 1) + 1 - HeaderSize;
-  FILE_GET(FNum, i, &LInfo, sizeof(LInfo)); // store level info in an extra structure
-  fclose(FNum);
-  // --- On Error GoTo 0
-
-  if (FieldMax < FileMax)
-    DemoAvailable = True;
-
-  ReadSignature();
-  PlayField16 = REDIM_1D(sizeof(int), -FieldWidth, FieldMax);
-  for (i = 0; i <= FieldMax; i++)
-  {
-    PlayField16[i] = PlayField8[i];
-    DisPlayField[i] = PlayField8[i];
-    PlayField8[i] = 0;
-  }
-
-  AnimationPosTable = REDIM_1D(sizeof(int), 0, LevelMax - 2 *FieldWidth);
-  AnimationSubTable = REDIM_1D(sizeof(byte), 0, LevelMax - 2 *FieldWidth);
-  TerminalState = REDIM_1D(sizeof(byte), 0, FieldMax + 1 - 1);
-  DemoPointer = FieldMax + 1;
-  DemoOffset = DemoPointer;
-  DemoKeyRepeatCounter = 0;
-  // DemoFlag = 1
-  // DemoAvailable = True
-  GravityFlag = LInfo.InitialGravity;
-  FreezeZonks = LInfo.InitialFreezeZonks;
-  RandomSeed = LInfo.DemoRandomSeed;
-  LevelLoaded = True;
-  return;
+  return (A < B ? A : B);
+}
 
-#if 0
-ReadDemoEH:
-  Close();
-#endif
+int Max(int A, int B)
+{
+  return (A < B ? B : A);
 }