// JLH = James Hammons <jlhamm@acm.org>
//
// Who When What
-// --- ---------- -------------------------------------------------------------
+// --- ---------- -----------------------------------------------------------
// JLH 01/16/2010 Created this log ;-)
//
if (objectType == 3)
{
- // Recursion needed to follow all links! This does depth-first recursion
- // on the not-taken objects
- OPDiscoverObjects(address + 8);
+ // Branch if YPOS < 2047 can be treated as a GOTO, so don't do any
+ // discovery in that case. Otherwise, have at it:
+ if ((lo & 0xFFFF) != 0x7FFB)
+ // Recursion needed to follow all links! This does depth-first
+ // recursion on the not-taken objects
+ OPDiscoverObjects(address + 8);
}
// Get the next object...
uint32_t lo = JaguarReadLong(address + 4, OP);
uint8_t objectType = lo & 0x07;
uint32_t link = ((hi << 11) | (lo >> 21)) & 0x3FFFF8;
- WriteLog("%08X: %08X %08X %s -> $08X", address, hi, lo, opType[objectType], link);
+ WriteLog("%08X: %08X %08X %s -> $%08X", address, hi, lo, opType[objectType], link);
if (objectType == 3)
{
WriteLog("\n");
+ // Yes, this is how the OP finds follow-on phrases for bitmap/scaled
+ // bitmap objects...!
if (objectType == 0)
- DumpFixedObject(OPLoadPhrase(address + 0), OPLoadPhrase(address + 8));
+ DumpFixedObject(OPLoadPhrase(address + 0),
+ OPLoadPhrase(address | 0x08));
if (objectType == 1)
- DumpScaledObject(OPLoadPhrase(address + 0), OPLoadPhrase(address + 8),
- OPLoadPhrase(address + 16));
+ DumpScaledObject(OPLoadPhrase(address + 0),
+ OPLoadPhrase(address | 0x08), OPLoadPhrase(address | 0x10));
if (address == link) // Ruh roh...
{
void OPProcessList(int halfline, bool render)
{
#warning "!!! NEED TO HANDLE MULTIPLE FIELDS PROPERLY !!!"
-// We ignore them, for now; not good
+// We ignore them, for now; not good D-:
+// N.B.: Half-lines are exactly that, half-lines. When in interlaced mode, it
+// draws the screen exactly the same way as it does in non, one line at a
+// time. The only way you know you're in field #2 is that the topmost bit
+// of VC is set. Half-line mode is so you can draw higher horizontal
+// resolutions than you normally could, as the line buffer is only 720
+// pixels wide...
halfline &= 0x7FF;
extern int op_start_log;
-// char * condition_to_str[8] =
-// { "==", "<", ">", "(opflag set)", "(second half line)", "?", "?", "?" };
op_pointer = OPGetListPointer();
// This is only theory implied by Rayman...!
// It seems that if the YPOS is zero, then bump the YPOS value so that it
// coincides with the VDB value. With interlacing, this would be slightly more
-// tricky. There's probably another bit somewhere that enables this mode--but so
-// far, doesn't seem to affect any other game in a negative way (that I've
+// tricky. There's probably another bit somewhere that enables this mode--but
+// so far, doesn't seem to affect any other game in a negative way (that I've
// seen). Either that, or it's an undocumented bug...
//No, the reason this was needed is that the OP code before was wrong. Any value
{
// Believe it or not, this is what the OP actually does...
// which is why they're required to be on a dphrase boundary!
- uint64_t p1 = OPLoadPhrase(op_pointer | 0x08);
- op_pointer += 8;
+ uint64_t p1 = OPLoadPhrase(oldOPP | 0x08);
+//unneeded op_pointer += 8;
//WriteLog("OP: Writing halfline %d with ypos == %d...\n", halfline, ypos);
//WriteLog("--> Writing %u BPP bitmap...\n", op_bitmap_bit_depth[(p1 >> 12) & 0x07]);
// OPProcessFixedBitmap(halfline, p0, p1, render);
// OP write-backs
-//???Does this really happen??? Doesn't seem to work if you do this...!
-//Probably not. Must be a bug in the documentation...!
-// uint32_t link = (p0 & 0x7FFFF000000) >> 21;
-// SET16(tom_ram_8, 0x20, link & 0xFFFF); // OLP
-// SET16(tom_ram_8, 0x22, link >> 16);
-/* uint32_t height = (p0 & 0xFFC000) >> 14;
- if (height - 1 > 0)
- height--;*/
- // NOTE: Would subtract 2 if in interlaced mode...!
-// uint64_t height = ((p0 & 0xFFC000) - 0x4000) & 0xFFC000;
-// if (height)
height--;
uint64_t data = (p0 & 0xFFFFF80000000000LL) >> 40;
p0 |= data << 40;
OPStorePhrase(oldOPP, p0);
}
-//WriteLog("\t\tOld OP: %08X -> ", op_pointer);
- // OP bottom 3 bits are hardwired to zero. The link address reflects
- // this, so we only need the top 19 bits of the address (which is
- // why we only shift 21, and not 24).
+ // OP bottom 3 bits are hardwired to zero. The link address
+ // reflects this, so we only need the top 19 bits of the address
+ // (which is why we only shift 21, and not 24).
op_pointer = (p0 & 0x000007FFFF000000LL) >> 21;
-//WriteLog("New OP: %08X\n", op_pointer);
- //kludge: Seems that memory access is mirrored in the first 8MB of
+ // KLUDGE: Seems that memory access is mirrored in the first 8MB of
// memory...
if (op_pointer > 0x1FFFFF && op_pointer < 0x800000)
op_pointer &= 0xFF1FFFFF; // Knock out bits 21-23
if (halfline >= ypos && height > 0)
{
// Believe it or not, this is what the OP actually does...
- uint64_t p1 = OPLoadPhrase(op_pointer | 0x08);
- uint64_t p2 = OPLoadPhrase(op_pointer | 0x10);
- op_pointer += 16;
-//WriteLog("OP: %08X (%d) %08X%08X %08X%08X %08X%08X\n", oldOPP, halfline, (uint32_t)(p0>>32), (uint32_t)(p0&0xFFFFFFFF), (uint32_t)(p1>>32), (uint32_t)(p1&0xFFFFFFFF), (uint32_t)(p2>>32), (uint32_t)(p2&0xFFFFFFFF));
+ // which is why they're required to be on a qphrase boundary!
+ uint64_t p1 = OPLoadPhrase(oldOPP | 0x08);
+ uint64_t p2 = OPLoadPhrase(oldOPP | 0x10);
+//unneeded op_pointer += 16;
OPProcessScaledBitmap(p0, p1, p2, render);
// OP write-backs
*/
//Here's another problem:
// [hsc: 20, vsc: 20, rem: 00]
-// Since we're not checking for $E0 (but that's what we get from the above), we end
-// up repeating this halfline unnecessarily... !!! FIX !!! [DONE, but... still not quite
-// right. Either that, or the Accolade team that wrote Bubsy screwed up royal.]
+// Since we're not checking for $E0 (but that's what we get from the above), we
+// end up repeating this halfline unnecessarily... !!! FIX !!! [DONE, but...
+// still not quite right. Either that, or the Accolade team that wrote Bubsy
+// screwed up royal.]
//Also note: $E0 = 7.0 which IS a legal vscale value...
// if (remainder & 0x80) // I.e., it's negative
//WriteLog(" [after]: rem=%02X, vscale=%02X\n", remainder, vscale);
}
- // OP bottom 3 bits are hardwired to zero. The link address reflects
- // this, so we only need the top 19 bits of the address (which is
- // why we only shift 21, and not 24).
+ // OP bottom 3 bits are hardwired to zero. The link address
+ // reflects this, so we only need the top 19 bits of the address
+ // (which is why we only shift 21, and not 24).
op_pointer = (p0 & 0x000007FFFF000000LL) >> 21;
- //kludge: Seems that memory access is mirrored in the first 8MB of
+ // KLUDGE: Seems that memory access is mirrored in the first 8MB of
// memory...
if (op_pointer > 0x1FFFFF && op_pointer < 0x800000)
op_pointer &= 0xFF1FFFFF; // Knock out bits 21-23
if (p0 & 0x08)
{
- // We need to check whether these interrupts are enabled or not, THEN
- // set an IRQ + pending flag if necessary...
+ // We need to check whether these interrupts are enabled or
+ // not, THEN set an IRQ + pending flag if necessary...
if (TOMIRQEnabled(IRQ_OPFLAG))
{
TOMSetPendingObjectInt();
- m68k_set_irq(2); // Cause a 68K IPL 2 to occur...
+ m68k_set_irq(2); // Cause a 68K IPL 2 to occur...
}
}
}
default:
// WriteLog("op: unknown object type %i\n", ((uint8_t)p0 & 0x07));
- return;
+// return;
+ ;
}
- // Here is a little sanity check to keep the OP from locking up the machine
- // when fed bad data. Better would be to count how many actual cycles it used
- // and bail out/reenter to properly simulate an overloaded OP... !!! FIX !!!
+ // Here is a little sanity check to keep the OP from locking up the
+ // machine when fed bad data. Better would be to count how many actual
+ // cycles it used and bail out/reenter to properly simulate an
+ // overloaded OP... !!! FIX !!!
#warning "Better would be to count how many actual cycles it used and bail out/reenter to properly simulate an overloaded OP... !!! FIX !!!"
opCyclesToRun--;
uint8_t * tomRam8 = TOMGetRamPointer();
uint8_t * paletteRAM = &tomRam8[0x400];
- // This is OK as long as it's used correctly: For 16-bit RAM to RAM direct copies--NOT
- // for use when using endian-corrected data (i.e., any of the *ReadWord functions!)
+ // This is OK as long as it's used correctly: For 16-bit RAM to RAM direct
+ // copies--NOT for use when using endian-corrected data (i.e., any of the
+ // *ReadWord functions!)
uint16_t * paletteRAM16 = (uint16_t *)paletteRAM;
uint16_t hscale = p2 & 0xFF;
-// Hmm. It seems that fixing the horizontal scale necessitated re-fixing this. Not sure why,
-// but seems to be consistent with the vertical scaling now (and it may turn out to be wrong!)...
+// Hmm. It seems that fixing the horizontal scale necessitated re-fixing this.
+// Not sure why, but seems to be consistent with the vertical scaling now (and
+// it may turn out to be wrong!)...
uint16_t horizontalRemainder = hscale; // Not sure if it starts full, but seems reasonable [It's not!]
// uint8_t horizontalRemainder = 0; // Let's try zero! Seems to work! Yay! [No, it doesn't!]
int32_t scaledWidthInPixels = (iwidth * phraseWidthToPixels[depth] * hscale) >> 5;
return;
// Otherwise, find the clip limits and clip the phrase as well...
- // NOTE: I'm fudging here by letting the actual blit overstep the bounds of the
- // line buffer, but it shouldn't matter since there are two unused line
- // buffers below and nothing above and I'll at most write 40 bytes outside
- // the line buffer... I could use a fractional clip begin/end value, but
- // this makes the blit a *lot* more hairy. I might fix this in the future
- // if it becomes necessary. (JLH)
- // Probably wouldn't be *that* hairy. Just use a delta that tells the inner loop
- // which pixel in the phrase is being written, and quit when either end of phrases
- // is reached or line buffer extents are surpassed.
+ // NOTE: I'm fudging here by letting the actual blit overstep the bounds of
+ // the line buffer, but it shouldn't matter since there are two
+ // unused line buffers below and nothing above and I'll at most write
+ // 40 bytes outside the line buffer... I could use a fractional clip
+ // begin/end value, but this makes the blit a *lot* more hairy. I
+ // might fix this in the future if it becomes necessary. (JLH)
+ // Probably wouldn't be *that* hairy. Just use a delta that tells the
+ // inner loop which pixel in the phrase is being written, and quit
+ // when either end of phrases is reached or line buffer extents are
+ // surpassed.
//This stuff is probably wrong as well... !!! FIX !!!
-//The strange thing is that it seems to work, but that's no guarantee that it's bulletproof!
+//The strange thing is that it seems to work, but that's no guarantee that it's
+//bulletproof!
//Yup. Seems that JagMania doesn't work correctly with this...
-//Dunno if this is the problem, but Atari Karts is showing *some* of the road now...
-//Actually, it is! Or, it was. It doesn't seem to be clipping here, so the problem lies
-//elsewhere! Hmm. Putting the scaling code into the 1/2/8 BPP cases seems to draw the ground
-// a bit more accurately... Strange!
-//It's probably a case of the REFLECT flag being set and the background being written
-//from the right side of the screen...
+//Dunno if this is the problem, but Atari Karts is showing *some* of the road
+//now...
+//Actually, it is! Or, it was. It doesn't seem to be clipping here, so the
+//problem lies elsewhere! Hmm. Putting the scaling code into the 1/2/8 BPP cases
+//seems to draw the ground a bit more accurately... Strange!
+//It's probably a case of the REFLECT flag being set and the background being
+//written from the right side of the screen...
//But no, it isn't... At least if the diagnostics are telling the truth!
// NOTE: We're just using endPos to figure out how much, if any, to clip by.
- // ALSO: There may be another case where we start out of bounds and end out of bounds...!
+ // ALSO: There may be another case where we start out of bounds and end out
+ // of bounds...!
// !!! FIX !!!
-//There's a problem here with scaledPhrasePixels in that it can be forced to zero when
-//the scaling factor is small. So fix it already! !!! FIX !!!
+//There's a problem here with scaledPhrasePixels in that it can be forced to
+//zero when the scaling factor is small. So fix it already! !!! FIX !!!
/*if (scaledPhrasePixels == 0)
{
WriteLog("OP: [Scaled] We're about to encounter a divide by zero error!\n");
projects / virtualjaguar / commitdiff