#include "Murphy.h"
+
static void subEatRedDisk(int si);
static boolean subMoveKillsMurphy(int si, int ax, int bl);
-static char *VB_Name = "modMurphy";
-// --- Option Explicit
+#if 1
+
+#define LocalStretch (2)
+#define MurphyZoomFactor (ZoomFactor)
+
+#else
#define LocalStretch (1)
+#define MurphyZoomFactor (1)
+
+#endif
// ==========================================================================
// SUBROUTINE
// Move Murphy in any direction
// ==========================================================================
-int subAnimateMurphy(int si)
+void subAnimateMurphy(int *si)
{
- int subAnimateMurphy;
-
- int ax, al, ah, bx, bl, i, X, Y;
- int tX, tY, tDeltaX, tDeltaY, tPos, Tmp;
+ int ax, al, bl, i, X, Y;
+ int time1, time2;
+ int tDeltaX, tDeltaY, tPos, Tmp;
// Variables that hold information about the animation sequence
- int *dx; // an array of image positions in moving.mpx, finalized with -1
- int dx2; // an additional image position of a second sprite, for instance: yellow disk if pushed
- int MurphyDX, MurphyDY; // murphys move steps
- int SeqPos; // index into dx()
- int ClearPos; // Position to clear before blitting sprites, none=-1
- int dxPos; // field-position to draw dx(SeqPos)
- int dx2Step; // position of dx2 relative to dx-position
-
- ax = PlayField16[si];
+ static int dx1 = 0; // image/animation token
+ static int dx2 = 0; // an additional image position of a second sprite, for instance: yellow disk if pushed
+ static int MurphyDX = 0, MurphyDY = 0; // murphys move steps
+ static int SeqPos = 0; // index into dx()
+ static int ClearPos = 0; // Position to clear before blitting sprites, none=-1
+ static int dxPos = 0; // field-position to draw dx(SeqPos)
+ static int dx2Step = 0; // position of dx2 relative to dx-position
+ static int dx1SequenceLength = 0;
+
+ ax = PlayField16[*si];
al = LowByte(ax);
+
if (al != fiMurphy)
{
MurphyMoveCounter = 0; // We have no Murphy! Exit!
- return subAnimateMurphy;
+
+ return;
}
MurphyMoveCounter = 1; // We have a Murphy!
- MurphyExplodePos = si;
- if (ax != 3) // yes--go proceed moving murphy?
+ MurphyExplodePos = *si;
+
+ // (check if high byte of PlayField16 has stored movement information)
+ if (ax != fiMurphy) // yes--go proceed moving murphy?
goto locProceedMovingMurphy;
// FS: reset moving sequence variables
MurphyDX = 0;
MurphyDY = 0;
- ClearPos = si;
- dxPos = si;
+ ClearPos = *si;
+ dxPos = *si;
+ dx1 = -1;
dx2 = -1;
SeqPos = 0;
// end of FS
+
ScratchGravity = 0; // scratch gravity off
if (GravityFlag != 0) // Gravity? (1=gravity on)
{
- bl = LowByte(PlayField16[si - FieldWidth]); // check above
- if (! (bl == fiPortUp || bl == fiPortUpAndDown || bl == fiPortAllDirections))
+ bl = LowByte(PlayField16[*si - FieldWidth]); // check above
+ if (! (bl == fiPortUp ||
+ bl == fiPortUpAndDown ||
+ bl == fiPortAllDirections))
{
- if (PlayField16[si + FieldWidth] == 0) // gravity on and space below!
+ if (PlayField16[*si + FieldWidth] == 0) // gravity on and space below!
ScratchGravity = 1;
}
} // loc_g_5E8B:
goto loc_g_6364;
}
+#if 1
+
+#if 0
+ ax = (TimerVar & 3);
+ if (ax != 0)
+ return;
+#endif
+
+ // ------------------------------------------------------------------
+ // Murphy's YAWN & SLEEP sequence, counted down by YawnSleepCounter:
+
+ YawnSleepCounter = YawnSleepCounter + 1;
+
+ if (YawnSleepCounter < 16)
+ return;
+
+ if (YawnSleepCounter < 2000)
+ {
+ // normal grin
+ // (default: single graphic, no animation)
+ subCopyAnimToScreen(*si, aniMurphy, YawnSleepCounter - 16);
+
+ return;
+ }
+
+ if (YawnSleepCounter < 4000)
+ {
+ // yawn! and look depressed afterwards...
+ // (default: 12 animation frames with delay of 8)
+ subCopyAnimToScreen(*si, aniMurphyYawn, YawnSleepCounter - 2000);
+
+ return;
+ }
+
+ if (YawnSleepCounter < 6400)
+ {
+ // yawn again!
+ // (default: 12 animation frames with delay of 8)
+ subCopyAnimToScreen(*si, aniMurphyYawn, YawnSleepCounter - 4000);
+
+ return;
+ }
+
+ // time1 = 6400 + 12 * 8; // (default: 6496 == 6400 + 12 * 8)
+ time1 = 6400 + 12 * 10;
+
+ if (YawnSleepCounter < time1)
+ {
+ // yawn again! - third time
+ // (default: 12 animation frames with delay of 8)
+ subCopyAnimToScreen(*si, aniMurphyYawn, YawnSleepCounter - 6400);
+
+ return;
+ }
+
+ // time2 = 6496 + 3 * 64; // (default: 6688 == 6496 + 3 * 64)
+ time2 = 6496 + 3 * 100;
+
+ if (YawnSleepCounter > time2) // Murphy already went to sleep
+ return;
+
+ if (PlayField16[*si - 1] == 0)
+ {
+ if (PlayField16[*si + 1] == 0)
+ {
+ // no sleep -- go back to "wait and start yawning" phase
+ YawnSleepCounter = 144;
+
+ return;
+ }
+ else
+ {
+ // go to sleep (right side)
+ // (default: 3 animation frames with delay of 64)
+ subCopyAnimToScreen(*si, aniMurphySleepRight, YawnSleepCounter - time1);
+
+ return;
+ }
+ }
+
+ // go to sleep (left side)
+ // (default: 3 animation frames with delay of 64)
+ subCopyAnimToScreen(*si, aniMurphySleepLeft, YawnSleepCounter - time1);
+
+ return;
+
+ // end of YAWN-SLEEP-Sequence
+
+#else
+
ax = (TimerVar & 3);
if (ax != 0)
- return subAnimateMurphy;
+ return;
// ------------------------------------------------------------------
// Murphy's YAWN & SLEEP sequence, counted down by YawnSleepCounter:
YawnSleepCounter = YawnSleepCounter + 1;
if (YawnSleepCounter == 4)
{
- subCopyFieldToScreen(si, fiMurphy); // normal grin
- return subAnimateMurphy;
+ subCopyFieldToScreen(*si, fiMurphy); // normal grin
+ return;
} // loc_g_5ECE:
if (YawnSleepCounter <= 500) // loc_g_5ED7:
- return subAnimateMurphy;
+ return;
if (YawnSleepCounter <= 522)
{
bx = (YawnSleepCounter - 500) / 2;
- subCopyFieldToScreen(si, aniMurphyYawn + bx); // yawn! and look depressed afterwards...
- return subAnimateMurphy;
+ subCopyFieldToScreen(*si, aniMurphyYawn + bx); // yawn! and look depressed afterwards...
+ return;
} // loc_g_5F00:
if (YawnSleepCounter <= 1000)
- return subAnimateMurphy;
+ return;
if (YawnSleepCounter <= 1022)
{
bx = (YawnSleepCounter - 1000) / 2;
- subCopyFieldToScreen(si, aniMurphyYawn + bx); // yawn again!
- return subAnimateMurphy;
+ subCopyFieldToScreen(*si, aniMurphyYawn + bx); // yawn again!
+ return;
} // loc_g_5F32:
if (YawnSleepCounter <= 1600) // loc_g_5F3B:
- return subAnimateMurphy;
+ return;
if (YawnSleepCounter <= 1622)
{
bx = (YawnSleepCounter - 1600) / 2;
- subCopyFieldToScreen(si, aniMurphyYawn + bx); // yawn again! - third time
- return subAnimateMurphy;
+ subCopyFieldToScreen(*si, aniMurphyYawn + bx); // yawn again! - third time
+ return;
} // loc_g_5F64:
if (YawnSleepCounter > 1654)
- return subAnimateMurphy;
+ return;
- if (PlayField16[si - 1] == 0)
+ if (PlayField16[*si - 1] == 0)
{
- if (PlayField16[si + 1] == 0)
+ if (PlayField16[*si + 1] == 0)
{
YawnSleepCounter = 36;
- return subAnimateMurphy;
+ return;
}
else
{
bx = (YawnSleepCounter - 1622) / 16;
- subCopyFieldToScreen(si, aniMurphySleepRight + bx); // go to sleep
- return subAnimateMurphy;
+ subCopyFieldToScreen(*si, aniMurphySleepRight + bx); // go to sleep
+ return;
}
} // loc_g_5F81:
bx = (YawnSleepCounter - 1622) / 16;
- subCopyFieldToScreen(si, aniMurphySleepLeft + bx); // go to sleep
- return subAnimateMurphy;
+ subCopyFieldToScreen(*si, aniMurphySleepLeft + bx); // go to sleep
+
+ return;
// end of YAWN-SLEEP-Sequence
+
+#endif
+
// ------------------------------------------------------------------
// ==========================================================================
// (Direct Jump) a key was pressed
if (ScratchGravity == 0)
goto loc_g_6003;
- if (PlayField16[si + FieldWidth] != 0)
+ if (PlayField16[*si + FieldWidth] != 0)
goto loc_g_6003;
if (bl == keyUp)
{
- if (PlayField16[si - FieldWidth] == fiBase)
+ if (PlayField16[*si - FieldWidth] == fiBase)
goto loc_g_6003;
}
else if (bl == keyLeft)
{
- if (PlayField16[si - 1] == fiBase)
+ if (PlayField16[*si - 1] == fiBase)
goto loc_g_6003;
}
else if (bl == keyRight)
{
- if (PlayField16[si + 1] == fiBase)
+ if (PlayField16[*si + 1] == fiBase)
goto loc_g_6003;
} // loc_g_6001:
default:
RedDiskReleaseFlag = 0;
- return subAnimateMurphy;
+ return;
break;
}
// FS:
MurphyDY = -2;
// end of FS
- ax = PlayField16[si - FieldWidth];
+ ax = PlayField16[*si - FieldWidth];
al = LowByte(ax);
if (ax == fiSpace)
goto loc_g_6312;
if (al == fiYellowDisk)
goto loc_g_6AB8;
- if (! subMoveKillsMurphy(si - FieldWidth, ax, bl))
+ if (! subMoveKillsMurphy(*si - FieldWidth, ax, bl))
goto loc_g_6078;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// moving right to left ...
MurphyDX = -2;
// end of FS
MurphyVarFaceLeft = 1;
- ax = PlayField16[si - 1];
+ ax = PlayField16[*si - 1];
al = LowByte(ax);
if (ax == fiSpace)
goto loc_g_6341;
if (ax == fiOrangeDisk)
goto loc_g_6B9B;
- if (! subMoveKillsMurphy(si - 1, ax, bl))
+ if (! subMoveKillsMurphy(*si - 1, ax, bl))
goto loc_g_60DA;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// moving up to down ...
// FS:
MurphyDY = 2;
// end of FS
- ax = PlayField16[si + FieldWidth];
+ ax = PlayField16[*si + FieldWidth];
al = LowByte(ax);
if (ax == fiSpace)
goto loc_g_6364;
if (al == fiYellowDisk)
goto loc_g_6B2A;
- if (! subMoveKillsMurphy(si + FieldWidth, ax, bl))
+ if (! subMoveKillsMurphy(*si + FieldWidth, ax, bl))
goto loc_g_6154;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// moving left to right ...
MurphyDX = 2;
// end of FS
MurphyVarFaceLeft = 0;
- ax = PlayField16[si + 1];
+ ax = PlayField16[*si + 1];
al = LowByte(ax);
if (ax == fiSpace)
goto loc_g_6399;
if (ax == fiOrangeDisk)
goto loc_g_6BD3;
- if (! subMoveKillsMurphy(si + 1, ax, bl))
+ if (! subMoveKillsMurphy(*si + 1, ax, bl))
goto loc_g_61B6;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// touching down to up ...
loc_g_622E:
// FS:
ClearPos = -1;
- dxPos = si - FieldWidth;
+ dxPos = *si - FieldWidth;
// end of FS
- ax = PlayField16[si - FieldWidth];
+ ax = PlayField16[*si - FieldWidth];
al = LowByte(ax);
al = LowByte(ax);
if (ax == fiBase)
if (al == fiRedDisk)
goto loc_g_6A48;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// touching right to left ...
loc_g_6258:
// FS:
ClearPos = -1;
- dxPos = si - 1;
+ dxPos = *si - 1;
// end of FS
MurphyVarFaceLeft = 1;
- ax = PlayField16[si - 1];
+ ax = PlayField16[*si - 1];
al = LowByte(ax);
if (ax == fiBase)
goto loc_g_651D;
if (al == fiRedDisk)
goto loc_g_6A64;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// touching up to down ...
loc_g_6288:
// FS:
ClearPos = -1;
- dxPos = si + FieldWidth;
+ dxPos = *si + FieldWidth;
// end of FS
- ax = PlayField16[si + FieldWidth];
+ ax = PlayField16[*si + FieldWidth];
al = LowByte(ax);
if (ax == fiBase)
goto loc_g_655B;
if (al == fiRedDisk)
goto loc_g_6A80;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// touching left to right ...
loc_g_62B2:
// FS:
ClearPos = -1;
- dxPos = si + 1;
+ dxPos = *si + 1;
// end of FS
MurphyVarFaceLeft = 0;
- ax = PlayField16[si + 1];
+ ax = PlayField16[*si + 1];
al = LowByte(ax);
if (ax == fiBase)
goto loc_g_6599;
if (al == fiRedDisk)
goto loc_g_6A9C;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// Release Red disk: no move ...
ClearPos = -1;
// end of FS
if (LowByte(RedDiskCount) == 0)
- return subAnimateMurphy;
+ return;
if (LowByte(RedDiskReleasePhase) != 0)
- return subAnimateMurphy;
+ return;
if (LowByte(RedDiskReleaseFlag) != 1)
- return subAnimateMurphy;
+ return;
- MovHighByte(&PlayField16[si], 0x2A);
+ MovHighByte(&PlayField16[*si], 0x2A);
MovingPictureSequencePhase = 0x40; // init picture move sequence
- dx = aniRedDisk;
+ dx1 = aniRedDisk;
MovLowByte(&RedDiskReleasePhase, 1);
- Mov(&RedDiskReleaseMurphyPos, si); // remember Murphy's location
+ RedDiskReleaseMurphyPos = *si; // remember Murphy's location
goto loc_Split;
// ==========================================================================
// ==========================================================================
loc_g_6312:
- dx = (MurphyVarFaceLeft == 0 ? aniMurphyEatUpRight : aniMurphyEatUpRight);
- PlayField16[si - FieldWidth] = 0x103;
- PlayField16[si] = 0x300;
- si = si - FieldWidth;
+ dx1 = (MurphyVarFaceLeft == 0 ? aniMurphyMoveUpRight : aniMurphyMoveUpLeft);
+ PlayField16[*si - FieldWidth] = 0x103;
+ PlayField16[*si] = 0x300;
+ *si = *si - FieldWidth;
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6341:
- dx = aniMurphyEatLeft;
- PlayField16[si - 1] = 0x203;
- PlayField16[si] = 0x300;
- si = si - 1;
+ dx1 = aniMurphyMoveLeft;
+ PlayField16[*si - 1] = 0x203;
+ PlayField16[*si] = 0x300;
+ *si = *si - 1;
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6364:
- dx = (MurphyVarFaceLeft == 0 ? aniMurphyEatUpRight : aniMurphyEatUpRight);
- PlayField16[si + FieldWidth] = 0x303;
- PlayField16[si] = 0x300;
- si = si + FieldWidth;
+ dx1 = (MurphyVarFaceLeft == 0 ? aniMurphyMoveUpRight : aniMurphyMoveUpLeft);
+ PlayField16[*si + FieldWidth] = 0x303;
+ PlayField16[*si] = 0x300;
+ *si = *si + FieldWidth;
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6399:
- dx = aniMurphyEatRight;
- PlayField16[si + 1] = 0x403;
- PlayField16[si] = 0x300;
- si = si + 1;
+ dx1 = aniMurphyMoveRight;
+ PlayField16[*si + 1] = 0x403;
+ PlayField16[*si] = 0x300;
+ *si = *si + 1;
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_63C2:
- if (SgnHighByte(PlayField16[si - FieldWidth]) >= 0)
+ if (SgnHighByte(PlayField16[*si - FieldWidth]) >= 0)
{
- ExplodeFieldSP(si); // Explode
- return subAnimateMurphy;
+ ExplodeFieldSP(*si); // Explode
+
+ return;
}
- PlayField16[si - FieldWidth] = fiBase;
+ PlayField16[*si - FieldWidth] = fiBase;
// ==========================================================================
// BASE moving down to up
// ==========================================================================
loc_g_63D3:
- subSoundFXBase();
- dx = (MurphyVarFaceLeft == 0 ? aniMurphyEatUpRight : aniMurphyEatUpRight);
- PlayField16[si - FieldWidth] = 0x503;
- PlayField16[si] = 0x300;
- si = si - FieldWidth;
+ subSoundFX(*si, fiBase, actDigging);
+
+ dx1 = (MurphyVarFaceLeft == 0 ? aniMurphyDigUpRight : aniMurphyDigUpLeft);
+ PlayField16[*si - FieldWidth] = 0x503;
+ PlayField16[*si] = 0x300;
+ *si = *si - FieldWidth;
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_640B:
- if (SgnHighByte(PlayField16[si - 1]) >= 0)
+ if (SgnHighByte(PlayField16[*si - 1]) >= 0)
{
- ExplodeFieldSP(si); // Explode
- return subAnimateMurphy;
+ ExplodeFieldSP(*si); // Explode
+
+ return;
}
- PlayField16[si - 1] = fiBase;
+ PlayField16[*si - 1] = fiBase;
// ==========================================================================
// BASE moving right to left
// ==========================================================================
loc_g_641C:
- subSoundFXBase();
- dx = aniMurphyEatLeft;
- PlayField16[si - 1] = 0x203;
- PlayField16[si] = 0x300;
- si = si - 1;
+ subSoundFX(*si, fiBase, actDigging);
+
+ dx1 = aniMurphyDigLeft;
+ PlayField16[*si - 1] = 0x203;
+ PlayField16[*si] = 0x300;
+ *si = *si - 1;
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6448:
- if (SgnHighByte(PlayField16[si + FieldWidth]) >= 0)
+ if (SgnHighByte(PlayField16[*si + FieldWidth]) >= 0)
{
- ExplodeFieldSP(si); // Explode
- return subAnimateMurphy;
+ ExplodeFieldSP(*si); // Explode
+
+ return;
}
- PlayField16[si + FieldWidth] = fiBase;
+ PlayField16[*si + FieldWidth] = fiBase;
// ==========================================================================
// BASE moving up to down
// ==========================================================================
loc_g_6459:
- subSoundFXBase();
- dx = (MurphyVarFaceLeft == 0 ? aniMurphyEatUpRight : aniMurphyEatUpRight);
- PlayField16[si + FieldWidth] = 0x703;
- PlayField16[si] = 0x300;
- si = si + FieldWidth;
+ subSoundFX(*si, fiBase, actDigging);
+
+ dx1 = (MurphyVarFaceLeft == 0 ? aniMurphyDigUpRight : aniMurphyDigUpLeft);
+ PlayField16[*si + FieldWidth] = 0x703;
+ PlayField16[*si] = 0x300;
+ *si = *si + FieldWidth;
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6491:
- if (SgnHighByte(PlayField16[si + 1]) >= 0)
+ if (SgnHighByte(PlayField16[*si + 1]) >= 0)
{
- ExplodeFieldSP(si); // Explode
- return subAnimateMurphy;
+ ExplodeFieldSP(*si); // Explode
+
+ return;
}
- PlayField16[si + 1] = fiBase;
+ PlayField16[*si + 1] = fiBase;
// ==========================================================================
// BASE moving left to right
// ==========================================================================
loc_g_64A2:
- subSoundFXBase();
- dx = aniMurphyEatRight;
- PlayField16[si + 1] = 0x803;
- PlayField16[si] = 0x300;
- si = si + 1;
+ subSoundFX(*si, fiBase, actDigging);
+
+ dx1 = aniMurphyDigRight;
+ PlayField16[*si + 1] = 0x803;
+ PlayField16[*si] = 0x300;
+ *si = *si + 1;
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_64CE:
- if (SgnHighByte(PlayField16[si - FieldWidth]) >= 0)
+ if (SgnHighByte(PlayField16[*si - FieldWidth]) >= 0)
{
- ExplodeFieldSP(si); // Explode
- return subAnimateMurphy;
+ ExplodeFieldSP(*si); // Explode
+
+ return;
}
- PlayField16[si - FieldWidth] = fiBase;
+ PlayField16[*si - FieldWidth] = fiBase;
// ==========================================================================
// BASE touching down to up
// ==========================================================================
loc_g_64DF:
- subCopyFieldToScreen(si, aniMurphyTouchUp);
- subSoundFXBase();
- dx = aniTouchBase;
- dxPos = si - FieldWidth;
- MovHighByte(&PlayField16[si], 0x10);
+ subCopyImageToScreen(*si, aniMurphyTouchUp);
+ subSoundFX(*si, fiBase, actDigging);
+
+ dx1 = aniTouchBase;
+ dxPos = *si - FieldWidth;
+ MovHighByte(&PlayField16[*si], 0x10);
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_650C:
- if (SgnHighByte(PlayField16[si - 1]) >= 0)
+ if (SgnHighByte(PlayField16[*si - 1]) >= 0)
{
- ExplodeFieldSP(si); // Explode
- return subAnimateMurphy;
+ ExplodeFieldSP(*si); // Explode
+
+ return;
}
- PlayField16[si - 1] = fiBase;
+ PlayField16[*si - 1] = fiBase;
// ==========================================================================
// BASE touching right to left
// ==========================================================================
loc_g_651D:
- subCopyFieldToScreen(si, aniMurphyTouchLeft);
- subSoundFXBase();
- dx = aniTouchBase;
- dxPos = si - 1;
- MovHighByte(&PlayField16[si], 0x11);
+ subCopyImageToScreen(*si, aniMurphyTouchLeft);
+ subSoundFX(*si, fiBase, actDigging);
+
+ dx1 = aniTouchBase;
+ dxPos = *si - 1;
+ MovHighByte(&PlayField16[*si], 0x11);
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_654A:
- if (SgnHighByte(PlayField16[si + FieldWidth]) >= 0)
+ if (SgnHighByte(PlayField16[*si + FieldWidth]) >= 0)
{
- ExplodeFieldSP(si); // Explode
- return subAnimateMurphy;
+ ExplodeFieldSP(*si); // Explode
+
+ return;
}
- PlayField16[si + FieldWidth] = fiBase;
+ PlayField16[*si + FieldWidth] = fiBase;
// ==========================================================================
// BASE touching up to down
// ==========================================================================
loc_g_655B:
- subCopyFieldToScreen(si, aniMurphyTouchDown);
- subSoundFXBase();
- dx = aniTouchBase;
- dxPos = si + FieldWidth;
- MovHighByte(&PlayField16[si], 0x12);
+ subCopyImageToScreen(*si, aniMurphyTouchDown);
+ subSoundFX(*si, fiBase, actDigging);
+
+ dx1 = aniTouchBase;
+ dxPos = *si + FieldWidth;
+ MovHighByte(&PlayField16[*si], 0x12);
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6588:
- if (SgnHighByte(PlayField16[si + 1]) >= 0)
+ if (SgnHighByte(PlayField16[*si + 1]) >= 0)
{
- ExplodeFieldSP(si); // Explode
- return subAnimateMurphy;
+ ExplodeFieldSP(*si); // Explode
+
+ return;
}
- PlayField16[si + 1] = fiBase;
+ PlayField16[*si + 1] = fiBase;
// ==========================================================================
// BASE touching left to right
// ==========================================================================
loc_g_6599:
- subCopyFieldToScreen(si, aniMurphyTouchRight);
- subSoundFXBase();
- dx = aniTouchBase;
- dxPos = si + 1;
- MovHighByte(&PlayField16[si], 0x13);
+ subCopyImageToScreen(*si, aniMurphyTouchRight);
+ subSoundFX(*si, fiBase, actDigging);
+
+ dx1 = aniTouchBase;
+ dxPos = *si + 1;
+ MovHighByte(&PlayField16[*si], 0x13);
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_65C6:
- subSoundFXInfotron();
- dx = (MurphyVarFaceLeft == 0 ? aniMurphyEatUpRight : aniMurphyEatUpRight);
- PlayField16[si - FieldWidth] = 0x903;
- PlayField16[si] = 0x300;
- si = si - FieldWidth;
+ subSoundFX(*si, fiInfotron, actCollecting);
+
+ dx1 = (MurphyVarFaceLeft == 0 ? aniMurphyEatUpRight : aniMurphyEatUpLeft);
+ PlayField16[*si - FieldWidth] = 0x903;
+ PlayField16[*si] = 0x300;
+ *si = *si - FieldWidth;
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_65FE:
- subSoundFXInfotron();
- dx = aniEatInfotronLeft;
+ subSoundFX(*si, fiInfotron, actCollecting);
+
+ dx1 = aniEatInfotronLeft;
+#if 0
dx2 = fiInfotron;
dx2Step = -1;
ClearPos = -1;
- PlayField16[si - 1] = 0xA03;
- PlayField16[si] = 0x300;
- si = si - 1;
+#endif
+ PlayField16[*si - 1] = 0xA03;
+ PlayField16[*si] = 0x300;
+ *si = *si - 1;
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_662A:
- subSoundFXInfotron();
- dx = (MurphyVarFaceLeft == 0 ? aniMurphyEatUpRight : aniMurphyEatUpRight);
- PlayField16[si + FieldWidth] = 0xB03;
- PlayField16[si] = 0x300;
- si = si + FieldWidth;
+ subSoundFX(*si, fiInfotron, actCollecting);
+
+ dx1 = (MurphyVarFaceLeft == 0 ? aniMurphyEatUpRight : aniMurphyEatUpLeft);
+ PlayField16[*si + FieldWidth] = 0xB03;
+ PlayField16[*si] = 0x300;
+ *si = *si + FieldWidth;
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6662:
- subSoundFXInfotron();
- dx = aniEatInfotronRight;
+ subSoundFX(*si, fiInfotron, actCollecting);
+
+ dx1 = aniEatInfotronRight;
+#if 0
dx2 = fiInfotron;
dx2Step = 1;
ClearPos = -1;
- PlayField16[si + 1] = 0xC03;
- PlayField16[si] = 0x300;
- si = si + 1;
+#endif
+ PlayField16[*si + 1] = 0xC03;
+ PlayField16[*si] = 0x300;
+ *si = *si + 1;
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_668E:
- subCopyFieldToScreen(si, aniMurphyTouchUp);
- subSoundFXInfotron();
- dx = aniTouchInfotron;
- MovHighByte(&PlayField16[si], 0x14);
- MovHighByte(&PlayField16[si - FieldWidth], 0xFF);
+ subCopyImageToScreen(*si, aniMurphyTouchUp);
+ subSoundFX(*si, fiInfotron, actCollecting);
+
+ dx1 = aniTouchInfotron;
+ MovHighByte(&PlayField16[*si], 0x14);
+ MovHighByte(&PlayField16[*si - FieldWidth], 0xFF);
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_66C0:
- subCopyFieldToScreen(si, aniMurphyTouchLeft);
- subSoundFXInfotron();
- dx = aniTouchInfotron;
- MovHighByte(&PlayField16[si], 0x15);
- MovHighByte(&PlayField16[si - 1], 0xFF);
+ subCopyImageToScreen(*si, aniMurphyTouchLeft);
+ subSoundFX(*si, fiInfotron, actCollecting);
+
+ dx1 = aniTouchInfotron;
+ MovHighByte(&PlayField16[*si], 0x15);
+ MovHighByte(&PlayField16[*si - 1], 0xFF);
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_66F2:
- subCopyFieldToScreen(si, aniMurphyTouchDown);
- subSoundFXInfotron();
- dx = aniTouchInfotron;
- MovHighByte(&PlayField16[si], 0x16);
- MovHighByte(&PlayField16[si + FieldWidth], 0xFF);
+ subCopyImageToScreen(*si, aniMurphyTouchDown);
+ subSoundFX(*si, fiInfotron, actCollecting);
+
+ dx1 = aniTouchInfotron;
+ MovHighByte(&PlayField16[*si], 0x16);
+ MovHighByte(&PlayField16[*si + FieldWidth], 0xFF);
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6724:
- subCopyFieldToScreen(si, aniMurphyTouchRight);
- subSoundFXInfotron();
- dx = aniTouchInfotron;
- MovHighByte(&PlayField16[si], 0x17);
- MovHighByte(&PlayField16[si + 1], 0xFF);
+ subCopyImageToScreen(*si, aniMurphyTouchRight);
+ subSoundFX(*si, fiInfotron, actCollecting);
+
+ dx1 = aniTouchInfotron;
+ MovHighByte(&PlayField16[*si], 0x17);
+ MovHighByte(&PlayField16[*si + 1], 0xFF);
goto loc_StopNoSplit;
// ==========================================================================
MurphyDY = 0;
// end of FS
if (LowByte(InfotronsNeeded) != 0)
- return subAnimateMurphy;
-
- subSoundFXExit();
- data_h_DemoDone = 1; // EP set level success bytes
- LevelStatus = 1; // set Level Status DONE
- EP_GameDemoVar0DAA = 0; // force demo for lead-out
- if (SavedGameFlag == 0) // saved game running?
- {
- if (UpdateTimeFlag != 0) // update time?
- {
- UpdatedFlag = 1; // prevent double update
- subUpdatePlayingTime(); // update playing time
- }
- }
+ return;
#if 0
- subUpdateHallOfFame(); // update time + Hall-Of-Fame
+ if (!game_sp.LevelSolved)
+ printf("::: Murphy.c: !!!!!!!!!! LEVEL %d SOLVED !!!!!!!!!!\n", level_nr);
#endif
+#if 1
+ game_sp.LevelSolved = TRUE;
+#endif
+
+ subSoundFX(*si, fiExit, actPassing);
+
LeadOutCounter = 0x40; // quit: start lead-out
- dx = aniMurphyExit;
- MovHighByte(&PlayField16[si], 0xD);
+ dx1 = aniMurphyExit;
+ MovHighByte(&PlayField16[*si], 0xD);
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_679B:
- ax = PlayField16[si - 2];
+ ax = PlayField16[*si - 2];
if (ax != 0)
- return subAnimateMurphy;
+ return;
- MovHighByte(&PlayField16[si - 2], 1);
- subCopyFieldToScreen(si, aniPushLeft); // draw pushing murphy
- dx = aniZonkRollLeft;
- dxPos = si - 1;
+ MovHighByte(&PlayField16[*si - 2], 1);
+ subCopyImageToScreen(*si, aniPushLeft); // draw pushing murphy
+ dx1 = aniZonkRollLeft;
+ dxPos = *si - 1;
dx2 = aniPushLeft;
dx2Step = 1;
- MovHighByte(&PlayField16[si], 0xE);
+ MovHighByte(&PlayField16[*si], 0xE);
goto loc_MoveNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_67D4:
- ax = PlayField16[si + 2];
+ ax = PlayField16[*si + 2];
if (ax != 0)
- return subAnimateMurphy;
+ return;
- ax = PlayField16[si + FieldWidth + 1];
+ ax = PlayField16[*si + FieldWidth + 1];
if (ax == 0) // zonk falls
- return subAnimateMurphy;
+ return;
- MovHighByte(&PlayField16[si + 2], 1);
- subCopyFieldToScreen(si, aniPushRight); // draw pushing murphy
- dx = aniZonkRollRight;
- dxPos = si + 1;
+ MovHighByte(&PlayField16[*si + 2], 1);
+ subCopyImageToScreen(*si, aniPushRight); // draw pushing murphy
+ dx1 = aniZonkRollRight;
+ dxPos = *si + 1;
dx2 = aniPushRight;
dx2Step = -1;
- MovHighByte(&PlayField16[si], 0xF);
+ MovHighByte(&PlayField16[*si], 0xF);
goto loc_MoveNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6817:
- subCopyFieldToScreen(si, aniMurphyTouchUp);
+ subCopyImageToScreen(*si, aniMurphyTouchUp);
if (YellowDisksExploded != 0)
{
- YawnSleepCounter = 10; // stay hypnotized
- return subAnimateMurphy;
+ YawnSleepCounter = 40; // stay hypnotized
+
+ return;
} // loc_g_6838:
- subCopyFieldToScreen(si - FieldWidth, 0x88); // draw new terminal type
- TerminalState[si - FieldWidth] = 8;
+#if 1
+ // draw new terminal type
+#if 1
+ GfxGraphic[GetX(*si - FieldWidth)][GetY(*si - FieldWidth)] = aniTerminalActive;
+#else
+ subCopyImageToScreen(*si - FieldWidth, aniTerminalActive);
+#endif
+#else
+ subCopyFieldToScreen(*si - FieldWidth, 0x88); // draw new terminal type
+#endif
+ TerminalState[*si - FieldWidth] = 8;
goto loc_g_68F0;
// ==========================================================================
// ==========================================================================
loc_g_684E:
- subCopyFieldToScreen(si, aniMurphyTouchLeft);
+ subCopyImageToScreen(*si, aniMurphyTouchLeft);
if (YellowDisksExploded != 0)
{
- YawnSleepCounter = 10; // stay hypnotized
- return subAnimateMurphy;
+ YawnSleepCounter = 40; // stay hypnotized
+
+ return;
} // loc_g_6838:
- subCopyFieldToScreen(si - 1, 0x88); // draw new terminal type
- TerminalState[si - 1] = 8;
+#if 1
+ // draw new terminal type
+#if 1
+ GfxGraphic[GetX(*si - 1)][GetY(*si - 1)] = aniTerminalActive;
+#else
+ subCopyImageToScreen(*si - 1, aniTerminalActive);
+#endif
+#else
+ subCopyFieldToScreen(*si - 1, 0x88); // draw new terminal type
+#endif
+ TerminalState[*si - 1] = 8;
goto loc_g_68F0;
// ==========================================================================
// ==========================================================================
loc_g_6884:
- subCopyFieldToScreen(si, aniMurphyTouchDown);
+ subCopyImageToScreen(*si, aniMurphyTouchDown);
if (YellowDisksExploded != 0)
{
- YawnSleepCounter = 10; // stay hypnotized
- return subAnimateMurphy;
+ YawnSleepCounter = 40; // stay hypnotized
+
+ return;
} // loc_g_6838:
- subCopyFieldToScreen(si + FieldWidth, 0x88); // draw new terminal type
- TerminalState[si + FieldWidth] = 8;
+#if 1
+ // draw new terminal type
+#if 1
+ GfxGraphic[GetX(*si + FieldWidth)][GetY(*si + FieldWidth)] = aniTerminalActive;
+#else
+ subCopyImageToScreen(*si + FieldWidth, aniTerminalActive);
+#endif
+#else
+ subCopyFieldToScreen(*si + FieldWidth, 0x88); // draw new terminal type
+#endif
+ TerminalState[*si + FieldWidth] = 8;
goto loc_g_68F0;
// ==========================================================================
// ==========================================================================
loc_g_68BA:
- subCopyFieldToScreen(si, aniMurphyTouchRight);
+ subCopyImageToScreen(*si, aniMurphyTouchRight);
if (YellowDisksExploded != 0)
{
- YawnSleepCounter = 10; // stay hypnotized
- return subAnimateMurphy;
+ YawnSleepCounter = 40; // stay hypnotized
+
+ return;
} // loc_g_6838:
- subCopyFieldToScreen(si + 1, 0x88); // draw new terminal type
- TerminalState[si + 1] = 8;
+#if 1
+ // draw new terminal type
+#if 1
+ GfxGraphic[GetX(*si + 1)][GetY(*si + 1)] = aniTerminalActive;
+#else
+ subCopyImageToScreen(*si + 1, aniTerminalActive);
+#endif
+#else
+ subCopyFieldToScreen(*si + 1, 0x88); // draw new terminal type
+#endif
+ TerminalState[*si + 1] = 8;
// ==========================================================================
// common TERMINAL stuff moving/touching from all directions
// ==========================================================================
ExplodeFieldSP (i);
}
- return subAnimateMurphy;
+ return;
// ==========================================================================
// PORT down to up, VERTICAL PORT, CROSS PORT all moving down to up
// ==========================================================================
loc_g_6916:
- if (PlayField16[si - 2 * FieldWidth] != 0)
- return subAnimateMurphy;
+ if (PlayField16[*si - 2 * FieldWidth] != 0)
+ return;
- dx = aniSplitUpDown;
+ dx1 = aniSplitUpDown;
dx2Step = -FieldWidth;
- PlayField16[si] = 0x1803;
- PlayField16[si - 2 * FieldWidth] = 0x300;
+ PlayField16[*si] = 0x1803;
+ PlayField16[*si - 2 * FieldWidth] = 0x300;
goto loc_StopSplit;
// ==========================================================================
// ==========================================================================
loc_g_693A:
- if (PlayField16[si - 2] != 0)
- return subAnimateMurphy;
+ if (PlayField16[*si - 2] != 0)
+ return;
- dx = aniMurphyEatLeft;
+ dx1 = aniMurphyMoveLeft;
dx2Step = -1;
- PlayField16[si] = 0x1903;
- PlayField16[si - 2] = 0x300;
+ PlayField16[*si] = 0x1903;
+ PlayField16[*si - 2] = 0x300;
goto loc_StopSplit;
// ==========================================================================
// ==========================================================================
loc_g_695E:
- if (PlayField16[si + 2 * FieldWidth] != 0)
- return subAnimateMurphy;
+ if (PlayField16[*si + 2 * FieldWidth] != 0)
+ return;
- dx = aniSplitUpDown;
+ dx1 = aniSplitUpDown;
dx2Step = FieldWidth;
- PlayField16[si] = 0x1A03;
- PlayField16[si + 2 * FieldWidth] = 0x300;
+ PlayField16[*si] = 0x1A03;
+ PlayField16[*si + 2 * FieldWidth] = 0x300;
goto loc_StopSplit;
// ==========================================================================
// ==========================================================================
loc_g_6982:
- if (PlayField16[si + 2] != 0)
- return subAnimateMurphy;
+ if (PlayField16[*si + 2] != 0)
+ return;
- dx = aniMurphyEatRight;
+ dx1 = aniMurphyMoveRight;
dx2Step = 1;
- PlayField16[si] = 0x1B03;
- PlayField16[si + 2] = 0x300;
+ PlayField16[*si] = 0x1B03;
+ PlayField16[*si + 2] = 0x300;
loc_StopSplit:
MovingPictureSequencePhase = 0; // stop picture move sequence
// ==========================================================================
loc_g_69A6:
- dx = (MurphyVarFaceLeft == 0 ? aniMurphyEatUpRight : aniMurphyEatUpRight);
- PlayField16[si] = 0x1C03;
- PlayField16[si - FieldWidth] = 0x300;
+ dx1 = (MurphyVarFaceLeft == 0 ? aniMurphyEatUpRight : aniMurphyEatUpLeft);
+ PlayField16[*si] = 0x1C03;
+ PlayField16[*si - FieldWidth] = 0x300;
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_69CE:
- dx = aniMurphyEatLeft;
- PlayField16[si] = 0x300; // !!!!!! this time we move murphy at sequence-start!
- PlayField16[si - 1] = 0x1D03;
- si = si - 1;
+ dx1 = aniMurphyEatLeft;
+ PlayField16[*si] = 0x300; // !!!!!! this time we move murphy at sequence-start!
+ PlayField16[*si - 1] = 0x1D03;
+ *si = *si - 1;
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_69F7:
- dx = (MurphyVarFaceLeft == 0 ? aniMurphyEatUpRight : aniMurphyEatUpRight);
- PlayField16[si] = 0x1E03;
- PlayField16[si + FieldWidth] = 0x300;
+ dx1 = (MurphyVarFaceLeft == 0 ? aniMurphyEatUpRight : aniMurphyEatUpLeft);
+ PlayField16[*si] = 0x1E03;
+ PlayField16[*si + FieldWidth] = 0x300;
goto loc_StopNoSplit;
// ==========================================================================
loc_g_6A1F:
// dx = aniMurphyEatRightRedDisk 'this sequence is 9 steps long!
- dx = aniMurphyEatRight;
+ dx1 = aniMurphyEatRight;
// --------------------------------------------------------------------------
// BugFix
// Table data_h_145A, pointed to by table data_h_105E, has a severe bug:
// We only correct Murphies x-location here, when the sequence starts.
// Remember that this is not the real bug-fix, but we must live with
// this existing bug and correct for the consequences of it.
- if (0 == AllowEatRightRedDiskBug) // Murphy's screen x-position
- MurphyScreenXPos = MurphyScreenXPos - 2;
+
+ if (AllowEatRightRedDiskBug == 0) // Murphy's screen x-position
+ MurphyScreenXPos = MurphyScreenXPos - 2 * MurphyZoomFactor;
SeqPos = -1;
// FS: for me this means to blit the first animation frame twice
// end of BugFix
// --------------------------------------------------------------------------
- PlayField16[si] = 0x300; // !!!!!! this time we move murphy at sequence-start!
- PlayField16[si + 1] = 0x1F03;
- si = si + 1;
+ PlayField16[*si] = 0x300; // !!!!!! this time we move murphy at sequence-start!
+ PlayField16[*si + 1] = 0x1F03;
+ *si = *si + 1;
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6A48:
- dx = aniTouchRedDisk;
- MovHighByte(&PlayField16[si], 0x20);
- MovHighByte(&PlayField16[si - FieldWidth], 3);
+ dx1 = aniTouchRedDisk;
+ MovHighByte(&PlayField16[*si], 0x20);
+ MovHighByte(&PlayField16[*si - FieldWidth], 3);
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6A64:
- dx = aniTouchRedDisk;
- MovHighByte(&PlayField16[si], 0x21);
- MovHighByte(&PlayField16[si - 1], 3);
+ dx1 = aniTouchRedDisk;
+ MovHighByte(&PlayField16[*si], 0x21);
+ MovHighByte(&PlayField16[*si - 1], 3);
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6A80:
- dx = aniTouchRedDisk;
- MovHighByte(&PlayField16[si], 0x22);
- MovHighByte(&PlayField16[si + FieldWidth], 3);
+ dx1 = aniTouchRedDisk;
+ MovHighByte(&PlayField16[*si], 0x22);
+ MovHighByte(&PlayField16[*si + FieldWidth], 3);
goto loc_StopNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6A9C:
- dx = aniTouchRedDisk;
- MovHighByte(&PlayField16[si], 0x23);
- MovHighByte(&PlayField16[si + 1], 3);
+ dx1 = aniTouchRedDisk;
+ MovHighByte(&PlayField16[*si], 0x23);
+ MovHighByte(&PlayField16[*si + 1], 3);
loc_StopNoSplit:
MovingPictureSequencePhase = 0; // stop picture move sequence
// ==========================================================================
loc_g_6AB8:
- if (PlayField16[si - 2 * FieldWidth] != 0)
- return subAnimateMurphy;
-
- PlayField16[si - 2 * FieldWidth] = 0x1200;
- subCopyFieldToScreen(si, aniPushRight);
- dx = aniYellowDisk;
- dxPos = si - FieldWidth;
- dx2 = aniPushUpDown;
+ if (PlayField16[*si - 2 * FieldWidth] != 0)
+ return;
+
+ PlayField16[*si - 2 * FieldWidth] = 0x1200;
+ dx1 = aniYellowDisk;
+ dxPos = *si - FieldWidth;
+ dx2 = (MurphyVarFaceLeft == 0 ? aniPushRight : aniPushLeft);
dx2Step = FieldWidth;
- PlayField16[si] = 0x2403;
+ PlayField16[*si] = 0x2403;
+ subCopyImageToScreen(*si, dx2);
goto loc_MoveNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6AF1:
- if (PlayField16[si - 2] != 0)
- return subAnimateMurphy;
+ if (PlayField16[*si - 2] != 0)
+ return;
- PlayField16[si - 2] = 0x1200;
- subCopyFieldToScreen(si, aniPushLeft);
- dx = aniYellowDisk;
- dxPos = si - 1;
+ PlayField16[*si - 2] = 0x1200;
+ subCopyImageToScreen(*si, aniPushLeft);
+ dx1 = aniYellowDisk;
+ dxPos = *si - 1;
dx2 = aniPushLeft;
dx2Step = 1;
- PlayField16[si] = 0x2503;
+ PlayField16[*si] = 0x2503;
goto loc_MoveNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6B2A:
- if (PlayField16[si + 2 * FieldWidth] != 0)
- return subAnimateMurphy;
-
- PlayField16[si + 2 * FieldWidth] = 0x1200;
- subCopyFieldToScreen(si, aniPushRight);
- dx = aniYellowDisk;
- dxPos = si + FieldWidth;
- dx2 = aniPushUpDown;
+ if (PlayField16[*si + 2 * FieldWidth] != 0)
+ return;
+
+ PlayField16[*si + 2 * FieldWidth] = 0x1200;
+ dx1 = aniYellowDisk;
+ dxPos = *si + FieldWidth;
+ dx2 = (MurphyVarFaceLeft == 0 ? aniPushRight : aniPushLeft);
dx2Step = -FieldWidth;
- PlayField16[si] = 0x2703;
+ PlayField16[*si] = 0x2703;
+ subCopyImageToScreen(*si, dx2);
goto loc_MoveNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6B63:
- if (PlayField16[si + 2] != 0)
- return subAnimateMurphy;
+ if (PlayField16[*si + 2] != 0)
+ return;
- PlayField16[si + 2] = 0x1200;
- subCopyFieldToScreen(si, aniPushRight);
- dx = aniYellowDisk;
- dxPos = si + 1;
+ PlayField16[*si + 2] = 0x1200;
+ subCopyImageToScreen(*si, aniPushRight);
+ dx1 = aniYellowDisk;
+ dxPos = *si + 1;
dx2 = aniPushRight;
dx2Step = -1;
- PlayField16[si] = 0x2603;
+ PlayField16[*si] = 0x2603;
goto loc_MoveNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6B9B:
- if (PlayField16[si - 2] != 0)
- return subAnimateMurphy;
+ if (PlayField16[*si - 2] != 0)
+ return;
- PlayField16[si - 2] = 0x800;
- subCopyFieldToScreen(si, aniPushLeft);
- dx = aniOrangeDisk;
- dxPos = si - 1;
+ PlayField16[*si - 2] = 0x800;
+ subCopyImageToScreen(*si, aniPushLeft);
+ dx1 = aniOrangeDisk;
+ dxPos = *si - 1;
dx2 = aniPushLeft;
dx2Step = 1;
- PlayField16[si] = 0x2803;
+ PlayField16[*si] = 0x2803;
goto loc_MoveNoSplit;
// ==========================================================================
// ==========================================================================
loc_g_6BD3:
- if (PlayField16[si + 2] != 0)
- return subAnimateMurphy;
+ if (PlayField16[*si + 2] != 0)
+ return;
- if (PlayField16[si + FieldWidth + 1] == 0) // falling goes before pushing
- return subAnimateMurphy;
+ if (PlayField16[*si + FieldWidth + 1] == 0) // falling goes before pushing
+ return;
- PlayField16[si + 2] = 0x100;
- subCopyFieldToScreen(si, aniPushRight);
- dx = aniOrangeDisk;
- dxPos = si + 1;
+ PlayField16[*si + 2] = 0x100;
+ subCopyImageToScreen(*si, aniPushRight);
+ dx1 = aniOrangeDisk;
+ dxPos = *si + 1;
dx2 = aniPushRight;
dx2Step = -1;
- PlayField16[si] = 0x2903;
+ PlayField16[*si] = 0x2903;
// ==========================================================================
// Copy screen animation action table to action work space
// (To paint sequence: Push Zonk/Disk / release red disk / Port passing)
ax = ax - 1; // next picture of sequence
MovingPictureSequencePhase = ax; // store for later
+
if (ax == 0) // Sound effects
- subSoundFXPush();
+ {
+ switch (HighByte(PlayField16[*si]))
+ {
+ case 0xE:
+ case 0xF:
+ subSoundFX(*si, fiZonk, actPushing);
+ break;
+
+ case 0x28:
+ case 0x29:
+ subSoundFX(*si, fiOrangeDisk, actPushing);
+ break;
+
+ case 0x24:
+ case 0x25:
+ case 0x26:
+ case 0x27:
+ subSoundFX(*si, fiYellowDisk, actPushing);
+ break;
+
+ default:
+ break;
+ }
+ }
- bl = HighByte(PlayField16[si]);
+ bl = HighByte(PlayField16[*si]);
if (bl == 0xE) // Push Zonk to left
goto loc_g_6F7E;
if (bl == 0x2A) // Red disk release timer
goto loc_g_716E;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// Paint frame of MOVING.DAT sequence
// ==========================================================================
loc_g_6C8F:
+
+#if 1
+ if (SeqPos <= 0)
+ dx1SequenceLength = getSequenceLength(dx1);
+#endif
+
if (SplitMoveFlag == 0)
{
// ++++++++++++++++++++++++++
// Begin of normal movement
- MurphyScreenXPos = MurphyScreenXPos + MurphyDX;
- MurphyScreenYPos = MurphyScreenYPos + MurphyDY;
- if (! ClearPos < 0) // clear field that murphy is leaving
- subCopyFieldToScreen(ClearPos, 0);
+ MurphyScreenXPos = MurphyScreenXPos + MurphyDX * MurphyZoomFactor;
+ MurphyScreenYPos = MurphyScreenYPos + MurphyDY * MurphyZoomFactor;
+
+ if (!(ClearPos < 0)) // clear field that murphy is leaving
+ subCopyImageToScreen(ClearPos, aniSpace);
+#if 0
+ // !!! special two-tile animation currently not used !!!
if (dx2 == fiInfotron) // special case of infotron moving left or right
{
tDeltaX = 0;
tDeltaY = 0;
}
else
+#endif
{
tDeltaX = MurphyDX * LocalStretch * (SeqPos + 1);
tDeltaY = MurphyDY * LocalStretch * (SeqPos + 1);
X = GetStretchX(dxPos) + tDeltaX;
Y = GetStretchY(dxPos) + tDeltaY;
- Tmp = (SeqPos < 0 ? 0 : 0); // 9StepBugFix!(red disk move right)
+ Tmp = (SeqPos < 0 ? 0 : SeqPos); // 9StepBugFix!(red disk move right)
+
+#if 1
+ if (isSnappingSequence(dx1) && SeqPos == dx1SequenceLength - 1)
+ dx1 = aniSpace;
+#endif
+
+#if 1
+ DDSpriteBuffer_BltImg(X, Y, dx1, Tmp);
+ GfxGraphic[GetX(*si)][GetY(*si)] = -1; // (Murphy's position)
+ GfxGraphic[GetX(dxPos)][GetY(dxPos)] = -1; // (snapping position)
+ // printf("::: Tmp: %d\n", Tmp);
+#else
StretchedSprites.BltEx(X, Y, dx[Tmp]);
- if (! dx2 < 0)
+#endif
+
+ if (!(dx2 < 0))
{
tPos = dxPos + dx2Step;
X = GetStretchX(tPos);
Y = GetStretchY(tPos);
+#if 0
+ // !!! special two-tile animation currently not used !!!
if (dx2 == fiInfotron) // special case of infotron moving left or right
{
StretchedSprites.BltEx(X, Y, dx[SeqPos] + dx2Step);
}
else // pushing something
+#endif
{
- StretchedSprites.BltEx(X + tDeltaX, Y + tDeltaY, dx2);
+ // (SeqPos iterates from 0 to 7 while pushing)
+ DDSpriteBuffer_BltImg(X + tDeltaX, Y + tDeltaY, dx2, SeqPos);
}
}
{
// ++++++++++++++++++++++++++++++++
// Begin of split movement (port)
- MurphyScreenXPos = MurphyScreenXPos + 2 * MurphyDX;
- MurphyScreenYPos = MurphyScreenYPos + 2 * MurphyDY;
- subCopyFieldToScreen(ClearPos, 0); // clear the field that murphy leaves
+ MurphyScreenXPos = MurphyScreenXPos + 2 * MurphyDX * MurphyZoomFactor;
+ MurphyScreenYPos = MurphyScreenYPos + 2 * MurphyDY * MurphyZoomFactor;
+ subCopyImageToScreen(ClearPos, aniSpace); // clear the field that murphy leaves
tDeltaX = MurphyDX * LocalStretch * (SeqPos + 1);
tDeltaY = MurphyDY * LocalStretch * (SeqPos + 1);
X = GetStretchX(dxPos) + tDeltaX;
Y = GetStretchY(dxPos) + tDeltaY;
- StretchedSprites.BltEx(X, Y, dx[SeqPos]); // plot first murphy
+ DDSpriteBuffer_BltImg(X, Y, dx1, SeqPos); // plot first murphy
+
tPos = dxPos + dx2Step;
X = GetStretchX(tPos);
Y = GetStretchY(tPos);
- StretchedSprites.BltEx(X + tDeltaX, Y + tDeltaY, dx[SeqPos]); // plot second murphy
- StretchedSprites.BltEx(X, Y, LowByte(PlayField16[tPos])); // replot the port on top
+ DDSpriteBuffer_BltImg(X + tDeltaX, Y + tDeltaY, dx1, SeqPos); // plot second murphy
+ DDSpriteBuffer_BltImg(X, Y, fiGraphic[LowByte(PlayField16[tPos])], 0); // replot the port on top
// End of split movement (port)
// ------------------------------
} // loc_g_6D1E:'loc_g_6D28:
SeqPos = SeqPos + 1;
+#if 1
+ if (SeqPos < dx1SequenceLength)
+ return;
+#else
if (dx[SeqPos] > -1)
- return subAnimateMurphy;
+ return;
+#endif
// Follow-up after movement completed 'loc_g_6D35:
MurphyXPos = MurphyXPos + MurphyDX;
MurphyYPos = MurphyYPos + MurphyDY;
- bl = HighByte(PlayField16[si]); // animation phase
- MovHighByte(&PlayField16[si], 0);
+ bl = HighByte(PlayField16[*si]); // animation phase
+ MovHighByte(&PlayField16[*si], 0);
if (bl == 0x1) // space, moving up
goto loc_g_6EC8;
goto loc_g_747F;
ExitToMenuFlag = 1;
- return subAnimateMurphy;
+
+ return;
// ==========================================================================
// infotron, moving up
if (0 < LowByte(InfotronsNeeded))
InfotronsNeeded = InfotronsNeeded - 1;
- subDisplayInfotronsNeeded();
loc_g_6EC8: // space, base
- PlayField16[si] = fiMurphy;
- subAdjustZonksInfotronsAboveMurphy(si + FieldWidth);
- return subAnimateMurphy;
+ PlayField16[*si] = fiMurphy;
+ subAdjustZonksInfotronsAboveMurphy(*si + FieldWidth);
+
+ return;
// ==========================================================================
// infotron, moving left
if (0 < LowByte(InfotronsNeeded))
InfotronsNeeded = InfotronsNeeded - 1;
- subDisplayInfotronsNeeded();
loc_g_6EE6: // space, base
- PlayField16[si] = fiMurphy;
- subAdjustZonksInfotronsAboveMurphy(si + 1);
- return subAnimateMurphy;
+ PlayField16[*si] = fiMurphy;
+ subAdjustZonksInfotronsAboveMurphy(*si + 1);
+
+ return;
// ==========================================================================
// infotron, moving down
if (0 < LowByte(InfotronsNeeded))
InfotronsNeeded = InfotronsNeeded - 1;
- subDisplayInfotronsNeeded();
loc_g_6F04: // space, base
- if (LowByte(PlayField16[si - FieldWidth]) != fiExplosion)
- PlayField16[si - FieldWidth] = 0;
+ if (LowByte(PlayField16[*si - FieldWidth]) != fiExplosion)
+ PlayField16[*si - FieldWidth] = 0;
+
+ PlayField16[*si] = fiMurphy;
- PlayField16[si] = fiMurphy;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// infotron, moving right
if (0 < LowByte(InfotronsNeeded))
InfotronsNeeded = InfotronsNeeded - 1;
- subDisplayInfotronsNeeded();
loc_g_71C4: // space, base
- subAdjustZonksInfotronsAboveMurphy(si - 1);
- PlayField16[si] = fiMurphy;
- return subAnimateMurphy;
+ subAdjustZonksInfotronsAboveMurphy(*si - 1);
+ PlayField16[*si] = fiMurphy;
+
+ return;
// ==========================================================================
// infotron, touching up
if (0 < LowByte(InfotronsNeeded))
InfotronsNeeded = InfotronsNeeded - 1;
- subDisplayInfotronsNeeded();
loc_g_71E2: // base
- if (LowByte(PlayField16[si - FieldWidth]) != fiExplosion)
- PlayField16[si - FieldWidth] = 0;
+ if (LowByte(PlayField16[*si - FieldWidth]) != fiExplosion)
+ PlayField16[*si - FieldWidth] = 0;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// infotron, touching left
if (0 < LowByte(InfotronsNeeded))
InfotronsNeeded = InfotronsNeeded - 1;
- subDisplayInfotronsNeeded();
loc_g_71FE: // base
- if (LowByte(PlayField16[si - 1]) != fiExplosion)
- PlayField16[si - 1] = 0;
+ if (LowByte(PlayField16[*si - 1]) != fiExplosion)
+ PlayField16[*si - 1] = 0;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// infotron, touching down
if (0 < LowByte(InfotronsNeeded))
InfotronsNeeded = InfotronsNeeded - 1;
- subDisplayInfotronsNeeded();
loc_g_721A: // base
- if (LowByte(PlayField16[si + FieldWidth]) != fiExplosion)
- PlayField16[si + FieldWidth] = 0;
+ if (LowByte(PlayField16[*si + FieldWidth]) != fiExplosion)
+ PlayField16[*si + FieldWidth] = 0;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// infotron, touching right
if (0 < LowByte(InfotronsNeeded))
InfotronsNeeded = InfotronsNeeded - 1;
- subDisplayInfotronsNeeded();
loc_g_7236: // base
- if (LowByte(PlayField16[si + 1]) != fiExplosion)
- PlayField16[si + 1] = 0;
+ if (LowByte(PlayField16[*si + 1]) != fiExplosion)
+ PlayField16[*si + 1] = 0;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// zonk, pushing left
// ==========================================================================
loc_g_6F18:
- if (LowByte(PlayField16[si]) != fiExplosion)
- PlayField16[si] = 0;
+ if (LowByte(PlayField16[*si]) != fiExplosion)
+ PlayField16[*si] = 0;
- PlayField16[si - 1] = fiMurphy;
- PlayField16[si - 2] = fiZonk;
- subExplodeSnikSnaksBelow(si - 2);
- si = si - 1;
- return subAnimateMurphy;
+ PlayField16[*si - 1] = fiMurphy;
+ PlayField16[*si - 2] = fiZonk;
+ subExplodeSnikSnaksBelow(*si - 2);
+ *si = *si - 1;
+
+ return;
// ==========================================================================
// zonk, pushing right
// ==========================================================================
loc_g_6F3B:
- if (LowByte(PlayField16[si]) != fiExplosion)
- PlayField16[si] = 0;
+ if (LowByte(PlayField16[*si]) != fiExplosion)
+ PlayField16[*si] = 0;
+
+ PlayField16[*si + 1] = fiMurphy;
+ PlayField16[*si + 2] = fiZonk;
+ subExplodeSnikSnaksBelow(*si + 2);
+ *si = *si + 1;
- PlayField16[si + 1] = fiMurphy;
- PlayField16[si + 2] = fiZonk;
- subExplodeSnikSnaksBelow(si + 2);
- si = si + 1;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// exit
loc_g_6F77:
ExitToMenuFlag = 1;
- return subAnimateMurphy;
+
+#if 1
+ PlayField16[*si] = fiSpace; // remove Murphy from playfield after exiting
+#endif
+
+ return;
// ==========================================================================
// Push Zonk from right to left
// ==========================================================================
loc_g_6F7E:
- if (DemoKeyCode == keyLeft && PlayField16[si - 1] == fiZonk)
- return subAnimateMurphy;
+ if (DemoKeyCode == keyLeft && PlayField16[*si - 1] == fiZonk)
+ return;
- PlayField16[si] = fiMurphy; // else restore - no more zonk pushing!
- PlayField16[si - 1] = fiZonk;
- if (LowByte(PlayField16[si - 2]) != fiExplosion)
- PlayField16[si - 2] = 0;
+ PlayField16[*si] = fiMurphy; // else restore - no more zonk pushing!
+ PlayField16[*si - 1] = fiZonk;
+ if (LowByte(PlayField16[*si - 2]) != fiExplosion)
+ PlayField16[*si - 2] = 0;
- subCopyFieldToScreen(si, fiMurphy);
- return subAnimateMurphy;
+ subCopyImageToScreen(*si, aniMurphy);
+
+ return;
// ==========================================================================
// Push Zonk from left to right
// ==========================================================================
loc_g_6FBC:
- if (DemoKeyCode == keyRight && PlayField16[si + 1] == fiZonk)
- return subAnimateMurphy;
+ if (DemoKeyCode == keyRight && PlayField16[*si + 1] == fiZonk)
+ return;
+
+ PlayField16[*si] = fiMurphy; // else restore - no more zonk pushing!
+ PlayField16[*si + 1] = fiZonk;
+ if (LowByte(PlayField16[*si + 2]) != fiExplosion)
+ PlayField16[*si + 2] = 0;
- PlayField16[si] = fiMurphy; // else restore - no more zonk pushing!
- PlayField16[si + 1] = fiZonk;
- if (LowByte(PlayField16[si + 2]) != fiExplosion)
- PlayField16[si + 2] = 0;
+ subCopyImageToScreen(*si, aniMurphy);
- subCopyFieldToScreen(si, fiMurphy);
- return subAnimateMurphy;
+ return;
// ==========================================================================
// Push orange disk from right to left
// ==========================================================================
loc_g_6FFA:
- if (DemoKeyCode == keyLeft && PlayField16[si - 1] == fiOrangeDisk)
- return subAnimateMurphy;
+ if (DemoKeyCode == keyLeft && PlayField16[*si - 1] == fiOrangeDisk)
+ return;
- PlayField16[si] = fiMurphy; // else restore - no more pushing!
- PlayField16[si - 1] = fiOrangeDisk;
- if (LowByte(PlayField16[si - 2]) != fiExplosion)
- PlayField16[si - 2] = 0;
+ PlayField16[*si] = fiMurphy; // else restore - no more pushing!
+ PlayField16[*si - 1] = fiOrangeDisk;
+ if (LowByte(PlayField16[*si - 2]) != fiExplosion)
+ PlayField16[*si - 2] = 0;
- subCopyFieldToScreen(si, fiMurphy);
- return subAnimateMurphy;
+ subCopyImageToScreen(*si, aniMurphy);
+
+ return;
// ==========================================================================
// Push orange disk from left to right
// ==========================================================================
loc_g_7038:
- if (DemoKeyCode == keyRight && PlayField16[si + 1] == fiOrangeDisk)
- return subAnimateMurphy;
+ if (DemoKeyCode == keyRight && PlayField16[*si + 1] == fiOrangeDisk)
+ return;
+
+ PlayField16[*si] = fiMurphy; // else restore - no more pushing!
+ PlayField16[*si + 1] = fiOrangeDisk;
+ if (LowByte(PlayField16[*si + 2]) != fiExplosion)
+ PlayField16[*si + 2] = 0;
- PlayField16[si] = fiMurphy; // else restore - no more pushing!
- PlayField16[si + 1] = fiOrangeDisk;
- if (LowByte(PlayField16[si + 2]) != fiExplosion)
- PlayField16[si + 2] = 0;
+ subCopyImageToScreen(*si, aniMurphy);
- subCopyFieldToScreen(si, fiMurphy);
- return subAnimateMurphy;
+ return;
// ==========================================================================
// Push yellow disk from down to up
// ==========================================================================
loc_g_7076:
- if (DemoKeyCode == keyUp && PlayField16[si - FieldWidth] == fiYellowDisk)
- return subAnimateMurphy;
+ if (DemoKeyCode == keyUp && PlayField16[*si - FieldWidth] == fiYellowDisk)
+ return;
+
+ PlayField16[*si] = fiMurphy; // else restore - no more pushing!
+ PlayField16[*si - FieldWidth] = fiYellowDisk;
+ if (LowByte(PlayField16[*si - 2 * FieldWidth]) != fiExplosion)
+ PlayField16[*si - 2 * FieldWidth] = 0;
- PlayField16[si] = fiMurphy; // else restore - no more pushing!
- PlayField16[si - FieldWidth] = fiYellowDisk;
- if (LowByte(PlayField16[si - 2 * FieldWidth]) != fiExplosion)
- PlayField16[si - 2 * FieldWidth] = 0;
+ subCopyImageToScreen(*si, aniMurphy);
- subCopyFieldToScreen(si, fiMurphy);
- return subAnimateMurphy;
+ return;
// ==========================================================================
// Push yellow disk from right to left
// ==========================================================================
loc_g_70B4:
- if (DemoKeyCode == keyLeft && PlayField16[si - 1] == fiYellowDisk)
- return subAnimateMurphy;
+ if (DemoKeyCode == keyLeft && PlayField16[*si - 1] == fiYellowDisk)
+ return;
- PlayField16[si] = fiMurphy; // else restore - no more pushing!
- PlayField16[si - 1] = fiYellowDisk;
- if (LowByte(PlayField16[si - 2]) != fiExplosion)
- PlayField16[si - 2] = 0;
+ PlayField16[*si] = fiMurphy; // else restore - no more pushing!
+ PlayField16[*si - 1] = fiYellowDisk;
+ if (LowByte(PlayField16[*si - 2]) != fiExplosion)
+ PlayField16[*si - 2] = 0;
- subCopyFieldToScreen(si, fiMurphy);
- return subAnimateMurphy;
+ subCopyImageToScreen(*si, aniMurphy);
+
+ return;
// ==========================================================================
// Push yellow disk from up to down
// ==========================================================================
loc_g_70F2:
- if (DemoKeyCode == keyDown && PlayField16[si + FieldWidth] == fiYellowDisk)
- return subAnimateMurphy;
+ if (DemoKeyCode == keyDown && PlayField16[*si + FieldWidth] == fiYellowDisk)
+ return;
+
+ PlayField16[*si] = fiMurphy; // else restore - no more pushing!
+ PlayField16[*si + FieldWidth] = fiYellowDisk;
+ if (LowByte(PlayField16[*si + 2 * FieldWidth]) != fiExplosion)
+ PlayField16[*si + 2 * FieldWidth] = 0;
- PlayField16[si] = fiMurphy; // else restore - no more pushing!
- PlayField16[si + FieldWidth] = fiYellowDisk;
- if (LowByte(PlayField16[si + 2 * FieldWidth]) != fiExplosion)
- PlayField16[si + 2 * FieldWidth] = 0;
+ subCopyImageToScreen(*si, aniMurphy);
- subCopyFieldToScreen(si, fiMurphy);
- return subAnimateMurphy;
+ return;
// ==========================================================================
// Push yellow disk from left to right
// ==========================================================================
loc_g_7130:
- if (DemoKeyCode == keyRight && PlayField16[si + 1] == fiYellowDisk)
- return subAnimateMurphy;
+ if (DemoKeyCode == keyRight && PlayField16[*si + 1] == fiYellowDisk)
+ return;
+
+ PlayField16[*si] = fiMurphy; // else restore - no more pushing!
+ PlayField16[*si + 1] = fiYellowDisk;
+ if (LowByte(PlayField16[*si + 2]) != fiExplosion)
+ PlayField16[*si + 2] = 0;
- PlayField16[si] = fiMurphy; // else restore - no more pushing!
- PlayField16[si + 1] = fiYellowDisk;
- if (LowByte(PlayField16[si + 2]) != fiExplosion)
- PlayField16[si + 2] = 0;
+ subCopyImageToScreen(*si, aniMurphy);
- subCopyFieldToScreen(si, fiMurphy);
- return subAnimateMurphy;
+ return;
// ==========================================================================
// time red disk release (space)
loc_g_716E:
if (DemoKeyCode != keySpace)
{
- PlayField16[si] = fiMurphy;
- subCopyFieldToScreen(si, fiMurphy);
+ PlayField16[*si] = fiMurphy;
+ subCopyImageToScreen(*si, aniMurphy);
RedDiskReleasePhase = 0;
}
else if (MovingPictureSequencePhase == 0x20)
{
- subCopyFieldToScreen(si, 43); // anxious murphy
+ // anxious murphy, dropping red disk
+ subCopyImageToScreen(*si, aniMurphyDropping);
RedDiskReleasePhase = 1;
}
- return subAnimateMurphy;
+ return;
// ==========================================================================
// Special port down to up
// ==========================================================================
loc_g_7244:
- if (LowByte(PlayField16[si]) != fiExplosion)
- PlayField16[si] = 0;
+ if (LowByte(PlayField16[*si]) != fiExplosion)
+ PlayField16[*si] = 0;
- PlayField16[si - 2 * FieldWidth] = fiMurphy;
+ PlayField16[*si - 2 * FieldWidth] = fiMurphy;
SplitMoveFlag = 0;
- si = si - FieldWidth;
- if (HighByte(PlayField16[si]) == 1)
- subSpPortTest(si);
+ *si = *si - FieldWidth;
+ if (HighByte(PlayField16[*si]) == 1)
+ subSpPortTest(*si);
+
+ *si = *si - FieldWidth;
- si = si - FieldWidth;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// Special port right to left
// ==========================================================================
loc_g_7272:
- if (LowByte(PlayField16[si]) != fiExplosion)
- PlayField16[si] = 0;
+ if (LowByte(PlayField16[*si]) != fiExplosion)
+ PlayField16[*si] = 0;
- PlayField16[si - 2] = fiMurphy;
+ PlayField16[*si - 2] = fiMurphy;
SplitMoveFlag = 0;
- si = si - 1;
- if (HighByte(PlayField16[si]) == 1)
- subSpPortTest(si);
+ *si = *si - 1;
+ if (HighByte(PlayField16[*si]) == 1)
+ subSpPortTest(*si);
- si = si - 1;
- return subAnimateMurphy;
+ *si = *si - 1;
+
+ return;
// ==========================================================================
// Special port up to down
// ==========================================================================
loc_g_729F:
- if (LowByte(PlayField16[si]) != fiExplosion)
- PlayField16[si] = 0;
+ if (LowByte(PlayField16[*si]) != fiExplosion)
+ PlayField16[*si] = 0;
- PlayField16[si + 2 * FieldWidth] = fiMurphy;
+ PlayField16[*si + 2 * FieldWidth] = fiMurphy;
SplitMoveFlag = 0;
- si = si + FieldWidth;
- if (HighByte(PlayField16[si]) == 1)
- subSpPortTest(si);
+ *si = *si + FieldWidth;
+ if (HighByte(PlayField16[*si]) == 1)
+ subSpPortTest(*si);
+
+ *si = *si + FieldWidth;
- si = si + FieldWidth;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// Special port left to right
// ==========================================================================
loc_g_72CD:
- if (LowByte(PlayField16[si]) != fiExplosion)
- PlayField16[si] = 0;
+ if (LowByte(PlayField16[*si]) != fiExplosion)
+ PlayField16[*si] = 0;
- PlayField16[si + 2] = fiMurphy;
+ PlayField16[*si + 2] = fiMurphy;
SplitMoveFlag = 0;
- si = si + 1;
- if (HighByte(PlayField16[si]) == 1)
- subSpPortTest(si);
+ *si = *si + 1;
+ if (HighByte(PlayField16[*si]) == 1)
+ subSpPortTest(*si);
+
+ *si = *si + 1;
- si = si + 1;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// Move Red Disk up
// ==========================================================================
loc_g_72FA:
- if (LowByte(PlayField16[si]) != fiExplosion)
- PlayField16[si] = 0;
+ if (LowByte(PlayField16[*si]) != fiExplosion)
+ PlayField16[*si] = 0;
- si = si - FieldWidth;
- PlayField16[si] = fiMurphy;
- subEatRedDisk(si); // inc+show Murphy's red disks
- return subAnimateMurphy;
+ *si = *si - FieldWidth;
+ PlayField16[*si] = fiMurphy;
+ subEatRedDisk(*si); // inc+show Murphy's red disks
+
+ return;
// ==========================================================================
// Move Red Disk left
// ==========================================================================
loc_g_7318:
- if (LowByte(PlayField16[si + 1]) != fiExplosion)
- PlayField16[si + 1] = 0;
+ if (LowByte(PlayField16[*si + 1]) != fiExplosion)
+ PlayField16[*si + 1] = 0;
+
+ PlayField16[*si] = fiMurphy;
+ subEatRedDisk(*si); // inc+show Murphy's red disks
- PlayField16[si] = fiMurphy;
- subEatRedDisk(si); // inc+show Murphy's red disks
- return subAnimateMurphy;
+ return;
// ==========================================================================
// Move Red Disk down
// ==========================================================================
loc_g_7333:
- if (LowByte(PlayField16[si]) != fiExplosion)
- PlayField16[si] = 0;
+ if (LowByte(PlayField16[*si]) != fiExplosion)
+ PlayField16[*si] = 0;
+
+ *si = *si + FieldWidth;
+ PlayField16[*si] = fiMurphy;
+ subEatRedDisk(*si); // inc+show Murphy's red disks
- si = si + FieldWidth;
- PlayField16[si] = fiMurphy;
- subEatRedDisk(si); // inc+show Murphy's red disks
- return subAnimateMurphy;
+ return;
// ==========================================================================
// Move Red Disk right
// ==========================================================================
loc_g_7351:
- if (LowByte(PlayField16[si - 1]) != fiExplosion)
- PlayField16[si - 1] = 0;
+ if (LowByte(PlayField16[*si - 1]) != fiExplosion)
+ PlayField16[*si - 1] = 0;
- PlayField16[si] = fiMurphy;
- subEatRedDisk(si); // inc+show Murphy's red disks
- return subAnimateMurphy;
+ PlayField16[*si] = fiMurphy;
+ subEatRedDisk(*si); // inc+show Murphy's red disks
+
+ return;
// ==========================================================================
// Eat Red Disk up
// ==========================================================================
loc_g_736C:
- if (LowByte(PlayField16[si - FieldWidth]) != fiExplosion)
- PlayField16[si - FieldWidth] = 0;
+ if (LowByte(PlayField16[*si - FieldWidth]) != fiExplosion)
+ PlayField16[*si - FieldWidth] = 0;
+
+ subEatRedDisk(*si - FieldWidth); // inc+show Murphy's red disks
- subEatRedDisk(si - FieldWidth); // inc+show Murphy's red disks
- return subAnimateMurphy;
+ return;
// ==========================================================================
// Eat Red Disk left
// ==========================================================================
loc_g_7381:
- if (LowByte(PlayField16[si - 1]) != fiExplosion)
- PlayField16[si - 1] = 0;
+ if (LowByte(PlayField16[*si - 1]) != fiExplosion)
+ PlayField16[*si - 1] = 0;
- subEatRedDisk(si - 1); // inc+show Murphy's red disks
- return subAnimateMurphy;
+ subEatRedDisk(*si - 1); // inc+show Murphy's red disks
+
+ return;
// ==========================================================================
// Eat Red Disk down
// ==========================================================================
loc_g_7396:
- if (LowByte(PlayField16[si + FieldWidth]) != fiExplosion)
- PlayField16[si + FieldWidth] = 0;
+ if (LowByte(PlayField16[*si + FieldWidth]) != fiExplosion)
+ PlayField16[*si + FieldWidth] = 0;
+
+ subEatRedDisk(*si + FieldWidth); // inc+show Murphy's red disks
- subEatRedDisk(si + FieldWidth); // inc+show Murphy's red disks
- return subAnimateMurphy;
+ return;
// ==========================================================================
// Eat Red Disk right
// ==========================================================================
loc_g_73AB:
- if (LowByte(PlayField16[si + 1]) != fiExplosion)
- PlayField16[si + 1] = 0;
+ if (LowByte(PlayField16[*si + 1]) != fiExplosion)
+ PlayField16[*si + 1] = 0;
+
+ subEatRedDisk(*si + 1); // inc+show Murphy's red disks
- subEatRedDisk(si + 1); // inc+show Murphy's red disks
- return subAnimateMurphy;
+ return;
// ==========================================================================
// yellow disk, pushing up
// ==========================================================================
loc_g_73C0:
- if (LowByte(PlayField16[si]) != fiExplosion)
- PlayField16[si] = 0;
+ if (LowByte(PlayField16[*si]) != fiExplosion)
+ PlayField16[*si] = 0;
+
+ *si = *si - FieldWidth;
+ PlayField16[*si] = fiMurphy;
+ PlayField16[*si - FieldWidth] = fiYellowDisk;
- si = si - FieldWidth;
- PlayField16[si] = fiMurphy;
- PlayField16[si - FieldWidth] = fiYellowDisk;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// yellow disk, pushing left
// ==========================================================================
loc_g_73DD:
- if (LowByte(PlayField16[si]) != fiExplosion)
- PlayField16[si] = 0;
+ if (LowByte(PlayField16[*si]) != fiExplosion)
+ PlayField16[*si] = 0;
+
+ *si = *si - 1;
+ PlayField16[*si] = fiMurphy;
+ PlayField16[*si - 1] = fiYellowDisk;
- si = si - 1;
- PlayField16[si] = fiMurphy;
- PlayField16[si - 1] = fiYellowDisk;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// yellow disk, pushing down
// ==========================================================================
loc_g_73FA:
- if (LowByte(PlayField16[si]) != fiExplosion)
- PlayField16[si] = 0;
+ if (LowByte(PlayField16[*si]) != fiExplosion)
+ PlayField16[*si] = 0;
- si = si + FieldWidth;
- PlayField16[si] = fiMurphy;
- PlayField16[si + FieldWidth] = fiYellowDisk;
- return subAnimateMurphy;
+ *si = *si + FieldWidth;
+ PlayField16[*si] = fiMurphy;
+ PlayField16[*si + FieldWidth] = fiYellowDisk;
+
+ return;
// ==========================================================================
// yellow disk pushing right
// ==========================================================================
loc_g_7417:
- if (LowByte(PlayField16[si]) != fiExplosion)
- PlayField16[si] = 0;
+ if (LowByte(PlayField16[*si]) != fiExplosion)
+ PlayField16[*si] = 0;
+
+ *si = *si + 1;
+ PlayField16[*si] = fiMurphy;
+ PlayField16[*si + 1] = fiYellowDisk;
- si = si + 1;
- PlayField16[si] = fiMurphy;
- PlayField16[si + 1] = fiYellowDisk;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// orange disk, pushing left
// ==========================================================================
loc_g_7434:
- if (LowByte(PlayField16[si]) != fiExplosion)
- PlayField16[si] = 0;
+ if (LowByte(PlayField16[*si]) != fiExplosion)
+ PlayField16[*si] = 0;
+
+ *si = *si - 1;
+ PlayField16[*si] = fiMurphy;
+ PlayField16[*si - 1] = fiOrangeDisk;
- si = si - 1;
- PlayField16[si] = fiMurphy;
- PlayField16[si - 1] = fiOrangeDisk;
- return subAnimateMurphy;
+ return;
// ==========================================================================
// orange disk, pushing right
// ==========================================================================
loc_g_7451:
- if (LowByte(PlayField16[si]) != fiExplosion)
- PlayField16[si] = 0;
+ if (LowByte(PlayField16[*si]) != fiExplosion)
+ PlayField16[*si] = 0;
- si = si + 1;
- PlayField16[si] = fiMurphy;
- PlayField16[si + 1] = fiOrangeDisk;
- if (PlayField16[si + FieldWidth + 1] == 0) // make it fall down if below is empty
+ *si = *si + 1;
+ PlayField16[*si] = fiMurphy;
+ PlayField16[*si + 1] = fiOrangeDisk;
+ if (PlayField16[*si + FieldWidth + 1] == 0) // make it fall down if below is empty
{
- MovHighByte(&PlayField16[si + 1], 0x20);
- MovHighByte(&PlayField16[si + FieldWidth + 1], fiOrangeDisk);
+ MovHighByte(&PlayField16[*si + 1], 0x20);
+ MovHighByte(&PlayField16[*si + FieldWidth + 1], fiOrangeDisk);
}
- return subAnimateMurphy;
+ return;
// ==========================================================================
// Release a red disk
// ==========================================================================
loc_g_747F:
- PlayField16[si] = fiMurphy;
+ PlayField16[*si] = fiMurphy;
RedDiskReleasePhase = 2;
RedDiskCount = RedDiskCount - 1;
- subDisplayRedDiskCount();
- subSoundFXPush(); // Sound effects
- return subAnimateMurphy;
+ subSoundFX(*si, fiRedDisk, actDropping);
} // subAnimateMurphy
// ==========================================================================
// SUBROUTINE
// ==========================================================================
-int subExplodeSnikSnaksBelow(int si)
+void subExplodeSnikSnaksBelow(int si)
{
- int subExplodeSnikSnaksBelow;
-
int ax;
ax = LowByte(PlayField16[si + FieldWidth]);
if (ax == 0x11 || ax == 0xBB)
ExplodeFieldSP(si + FieldWidth);
-
- return subExplodeSnikSnaksBelow;
} // subExplodeSnikSnaksBelow
// ==========================================================================
// The 10-port data base is at data_h_0D28, 10 entries of 6 bytes each:
// (hi),(lo),(gravity),(freeze zonks),(freeze enemies),(unused)
// ==========================================================================
-int subSpPortTest(int si)
-{
- int subSpPortTest;
- int i, cx, bx;
+void subSpPortTest(int si)
+{
+ int i;
- cx = LInfo.SpecialPortCount; // number of special ports
- for (i = 1; i <= cx; i++)
+ for (i = 0; i < LInfo.SpecialPortCount; i++)
{
+ if (LInfo.SpecialPort[i].PortLocation / 2 == si)
{
- bx = HighByte(LInfo.SpecialPort[i].PortLocation);
- MovHighByte(&bx, LowByte(LInfo.SpecialPort[i].PortLocation));
- if (bx / 2 == si)
- {
- GravityFlag = LInfo.SpecialPort[i].Gravity;
- FreezeZonks = LInfo.SpecialPort[i].FreezeZonks;
- SnikSnaksElectronsFrozen = LInfo.SpecialPort[i].FreezeEnemies;
- // RandomTime = RandomTime Xor RandomSeed 'is RandomTime used at all? no!
- i = cx + 1;
- }
+ GravityFlag = LInfo.SpecialPort[i].Gravity;
+ FreezeZonks = LInfo.SpecialPort[i].FreezeZonks;
+ SnikSnaksElectronsFrozen = LInfo.SpecialPort[i].FreezeEnemies;
+ break;
}
}
+}
- return subSpPortTest;
-} // subSpPortTest
-
-void subCopyFieldToScreen(int si, int fi)
+void subCopyAnimToScreen(int si, int graphic, int sync_frame)
{
int X, Y;
// +++++++++++++++++++++++++++++++++++++++++
X = GetStretchX(si);
Y = GetStretchY(si);
- StretchedSprites.BltEx(X, Y, fi);
+ DDSpriteBuffer_BltImg(X, Y, graphic, sync_frame);
// +++++++++++++++++++++++++++++++++++++++++
}
+void subCopyImageToScreen(int si, int graphic)
+{
+ subCopyAnimToScreen(si, graphic, 0);
+}
+
static void subEatRedDisk(int si)
{
if (AllowRedDiskCheat == 0)
}
RedDiskCount = (RedDiskCount + 1) % 256;
- subDisplayRedDiskCount();
}
-int subAdjustZonksInfotronsAboveMurphy(int si)
+void subAdjustZonksInfotronsAboveMurphy(int si)
{
- int subAdjustZonksInfotronsAboveMurphy;
-
int ax;
if (LowByte(PlayField16[si]) != fiExplosion)
MovHighByte(&PlayField16[si - FieldWidth], 0x40); // make falling straigt down
}
- return subAdjustZonksInfotronsAboveMurphy;
+ return;
loc_g_15A8: // empty above
ax = PlayField16[si - FieldWidth - 1];
if (ax == fiZonk || ax == fiInfotron)
goto loc_g_15E8;
- return subAdjustZonksInfotronsAboveMurphy;
+ return;
loc_g_15C5: // zonk/infotron above left
ax = PlayField16[si - 1];
MovHighByte(&PlayField16[si - FieldWidth - 1], 0x60); // make roll right
PlayField16[si - FieldWidth] = 0x8888;
- return subAdjustZonksInfotronsAboveMurphy;
+
+ return;
loc_g_15E8: // zonk/infotron above right
ax = PlayField16[si + 1];
MovHighByte(&PlayField16[si - FieldWidth + 1], 0x50); // make roll left
PlayField16[si - FieldWidth] = 0x8888;
}
-
- return subAdjustZonksInfotronsAboveMurphy;
-} // subAdjustZonksInfotronsAboveMurphy
+}
projects / rocksndiamonds.git / blobdiff