]> Shamusworld >> Repos - thunder/blobdiff - src/screen.cpp
Added MCU to execution loop and it works.
[thunder] / src / screen.cpp
index 5f92f223afeffc00cabb3d0023c932e4b8032e6e..dda0f6e665eb42f349723213b4b688e370e8384c 100644 (file)
@@ -14,6 +14,7 @@
 // Who  When        What
 // ---  ----------  -----------------------------------------------------------
 // JLH  03/12/2003  Ported this steaming pile of crap from VESA to SDL
+// JLH  04/04/2014  Ported to SDL 2. Much less crappy.
 //
 
 #include "screen.h"
 #include <stdlib.h>
 #include <string>                     // For memset()
 #include "gui.h"
+#include "video.h"
 
 // Private function prototypes
 
 void DrawSprites(uint8_t priority);
 int FindPCXName(void);
-static void DrawChar(uint8_t * chr, uint8_t * ram, uint8_t sx, uint8_t sy, uint16_t scp, uint32_t baseAddr, uint32_t scrollOffset, bool transparent = true);
+//static void DrawChar(uint8_t * chr, uint8_t * ram, uint8_t sx, uint8_t sy, uint16_t scp, uint32_t baseAddr, uint32_t scrollOffset, bool transparent = true);
+static void DrawChar(uint8_t * chr, uint8_t * ram, uint8_t sx, uint8_t sy, uint16_t scp, uint32_t baseAddr, uint32_t xScroll = 0, uint32_t yScroll = 0, bool transparent = true);
 void Sprite(uint32_t sprnum, uint16_t x, uint16_t y, uint8_t flip, uint8_t horiz_bl, uint8_t vert_bl);
 
 // Private global variables
 
 uint8_t my_scr[0x14000];                       // Screen buffer...
-uint8_t palette[768];                          // Screen palette
+//uint8_t palette[768];                                // Screen palette
+uint32_t palette[256];                         // Screen palette
 uint8_t ccolor[256][8];                                // Character colors
 uint8_t scolor[128][16];                       // Sprite colors
 bool charbase;                                         // Character base pointer...
 uint8_t hScrollOffset;                         // Horizontal scroll offset
 uint8_t vScrollOffset;                         // Vertical scroll offset
 uint8_t spr_color_index;                       // Sprite color index
-uint32_t hoffsets[8] = { 0, 1, 2, 3, 4, 5, 6, 7 };// Scroll offsets...
-uint32_t voffsets[8] = { 0, 320, 640, 960, 1280, 1600, 1920, 2240 };
+//uint32_t hoffsets[8] = { 0, 1, 2, 3, 4, 5, 6, 7 };// Scroll offsets...
+//uint32_t voffsets[8] = { 0, 320, 640, 960, 1280, 1600, 1920, 2240 };
+uint32_t voffsets[8] = { 288*0, 288*1, 288*2, 288*3, 288*4, 288*5, 288*6, 288*7 };
 
 extern bool show_text;                         // Whether or not to show text
 extern bool show_scr;                          // Whether or not to show screen
@@ -53,18 +58,18 @@ extern bool show_scr;                               // Whether or not to show screen
 void BlitChar(SDL_Surface * scr, uint8_t * chr, uint8_t * ram)
 {
        // Screen structure:
-       // Screen is 288 x 224 pixels, with character and independent sprites. Tiles are 36 x 28.
-       // There are four tile planes, three of them affected by the h/vscroll values, the last
-       // one is a static display (also has highest priority). Screens are 128 bytes wide by
-       // 32 bytes high.
+       // Screen is 288 x 224 pixels, with character and independent sprites.
+       // Tiles are 36 x 28. There are four tile planes, three of them affected by
+       // the h/vscroll values, the last one is a static display (also has highest
+       // priority). Screens are 128 bytes wide by 32 bytes high.
 
        if (show_scr)
        {
                uint32_t sc_base = ((ram[0x9000] << 8) | ram[0x9001]) + 4;      // Adjust hscroll val
-               hScrollOffset = sc_base & 0x07;                                 // Horiz. fine scroll offset
-               sc_base = (sc_base & 0xFFF8) >> 2;                              // Skip odds..
+               hScrollOffset = sc_base & 0x07;         // Horiz. fine scroll offset
+               sc_base = (sc_base & 0xFFF8) >> 2;      // Skip odds..
                uint8_t vsc_base = ((ram[0x9002] + 1) & 0xF8) >> 3;// Vertical scroll addr adjust
-               vScrollOffset = ((ram[0x9002] + 1) & 0x07);             // Vertical fine scroll amount
+               vScrollOffset = ((ram[0x9002] + 1) & 0x07);     // Vertical fine scroll amount
 
                uint32_t scp0 = 0x0180 | ((sc_base + 0x04) & 0x7F);     /*0x0188;*/
                uint32_t scp1 = 0x1180 | ((sc_base + 0x04) & 0x7F);     /*0x1188;*/
@@ -72,101 +77,93 @@ void BlitChar(SDL_Surface * scr, uint8_t * chr, uint8_t * ram)
                uint32_t scp3 = 0x3208;
 
                scp0 += vsc_base * 0x80;
-               scp0 &= 0x0FFF;                                                                 // Set vertical scroll addr
+               scp0 &= 0x0FFF;                                         // Set vertical scroll addr
                scp1 += vsc_base * 0x80;
-               scp1 = 0x1000 | (scp1 & 0x0FFF);                                // Set vertical scroll addr
+               scp1 = 0x1000 | (scp1 & 0x0FFF);        // Set vertical scroll addr
                scp2 += vsc_base * 0x80;
-               scp2 = 0x2000 | (scp2 & 0x0FFF);                                // Set vertical scroll addr
+               scp2 = 0x2000 | (scp2 & 0x0FFF);        // Set vertical scroll addr
 
                // Layer 0 (bottom layer)
                for(uint8_t sy=0; sy<29; sy++)
                {
                        for(uint8_t sx=0; sx<37; sx++)
-                               DrawChar(chr, ram, sx, sy, scp0, (charbase ? 0x20000 : 0x00000), 0, false);
+                               DrawChar(chr, ram, sx, sy, scp0, (charbase ? 0x20000 : 0x00000), hScrollOffset, vScrollOffset, false);
 
                        scp0 += 0x80;
                        scp0 = 0x0000 | (scp0 & 0x0FFF);
                }
 
-               DrawSprites(0x40);                                                              // Draw sprites at lowest layer...
+               // Draw sprites at lowest layer...
+               DrawSprites(0x40);
 
                // Layer 1
                for(uint8_t sy=0; sy<29; sy++)
                {
                        for(uint8_t sx=0; sx<37; sx++)
-                               DrawChar(chr, ram, sx, sy, scp1, (charbase ? 0x30000 : 0x10000), 0);
+                               DrawChar(chr, ram, sx, sy, scp1, (charbase ? 0x30000 : 0x10000), hScrollOffset, vScrollOffset);
 
                        scp1 += 0x80;
                        scp1 = 0x1000 | (scp1 & 0x0FFF);
                }
 
-               DrawSprites(0x80);                                                              // Draw sprites under layer #2...
+               // Draw sprites under layer #2...
+               DrawSprites(0x80);
 
                // Layer 2
                for(uint8_t sy=0; sy<29; sy++)
                {
                        for(uint8_t sx=0; sx<37; sx++)
-                               DrawChar(chr, ram, sx, sy, scp2, 0x40000, 0);
+                               DrawChar(chr, ram, sx, sy, scp2, 0x40000, hScrollOffset, vScrollOffset);
 
                        scp2 += 0x80;
                        scp2 = 0x2000 | (scp2 & 0x0FFF);
                }
 
-               DrawSprites(0xC0);                                                              // Draw highest priority sprites...
+               // Draw highest priority sprites...
+               DrawSprites(0xC0);
 
                // Layer 3 (top layer)
                for(uint8_t sy=0; sy<28; sy++)
                {
                        for(uint8_t sx=0; sx<36; sx++)
-                               DrawChar(chr, ram, sx, sy, scp3, 0x50000, hScrollOffset + voffsets[vScrollOffset]);
+                               DrawChar(chr, ram, sx, sy, scp3, 0x50000);
 
                        scp3 += 0x80;
                }
        }
 
+       // Draw a msg if needed...
        if (show_text)
-               DrawText();                                                                             // Draw a msg if needed...
+               DrawText();
 
+       // Show GUI if active...
        if (ShowGUI())
-               DrawGUI();                                                                              // Show GUI if active...
+               DrawGUI();
 
-       if (SDL_LockSurface(scr) < 0)
-       {
-//             fprintf(stderr, "Couldn't lock the display surface: %s\n", SDL_GetError());
-//             exit(2);
-       }
-
-       // Rolling Thunder screen size is 288 x 224. Virtual is this, real may not be...
+       // Rolling Thunder screen size is 288 x 224. Virtual is this, real may not
+       // be... (and we don't have to care about that, the OpenGL backend takes
+       // care of it.)
 
-       // Doubled pixel blit (should be faster now!)
-       uint8_t * pMem = (uint8_t *)scr->pixels;
-       uint32_t src = (uint32_t)(hoffsets[hScrollOffset] + voffsets[vScrollOffset]),
-               dst1 = 0, dst2 = scr->pitch;
-       uint32_t srcAdd = 320 - VIRTUAL_SCREEN_WIDTH, dstAdd = (scr->pitch * 2) - (VIRTUAL_SCREEN_WIDTH * 2);
+       uint32_t src = 0;
 
        for(int i=0; i<VIRTUAL_SCREEN_HEIGHT; i++)
        {
                for (int j=0; j<VIRTUAL_SCREEN_WIDTH; j++)
                {
-                       pMem[dst1] = pMem[dst1 + 1] = pMem[dst2] = pMem[dst2 + 1] = my_scr[src++];
-                       dst1 += 2;
-                       dst2 += 2;
+                       scrBuffer[src] = palette[my_scr[src]];
+                       src++;
                }
-
-               src += srcAdd;
-               dst1 += dstAdd;
-               dst2 += dstAdd;
        }
 
-       SDL_UnlockSurface(scr);
-       SDL_UpdateRect(scr, 0, 0, 0, 0);
+       RenderScreenBuffer();
 }
 
 
 //
 // Draw character on screen
 //
-static inline void DrawChar(uint8_t * chr, uint8_t * ram, uint8_t sx, uint8_t sy, uint16_t scp, uint32_t baseAddr, uint32_t scrollOffset, bool transparent/*= true*/)
+//static inline void DrawChar(uint8_t * chr, uint8_t * ram, uint8_t sx, uint8_t sy, uint16_t scp, uint32_t baseAddr, uint32_t scrollOffset, bool transparent/*= true*/)
+static inline void DrawChar(uint8_t * chr, uint8_t * ram, uint8_t sx, uint8_t sy, uint16_t scp, uint32_t baseAddr, uint32_t xScroll/*= 0*/, uint32_t yScroll/*= 0*/, bool transparent/*= true*/)
 {
        uint8_t scp_lo = (scp + (sx << 1)) & 0x7F;// Let LO byte wrap only...
        uint16_t sp2 = (scp & 0xFF80) | scp_lo;
@@ -174,12 +171,22 @@ static inline void DrawChar(uint8_t * chr, uint8_t * ram, uint8_t sx, uint8_t sy
        uint8_t index = ram[sp2] & 0x03;
        uint8_t color = ram[sp2];
        uint32_t chind = baseAddr + (((index << 8) + tile) * 64);
-       uint32_t sc_addr = (sx * 8) + (sy * 2560) + scrollOffset;       // Start addr in my_scr[]
+       int xStart = (int)(sx * 8) - xScroll;
+       int yStart = (int)(sy * 8) - yScroll;
+       int32_t sc_addr = xStart + (yStart * 288);
 
        for(int y=0; y<8; y++)
        {
                for(int x=0; x<8; x++)
                {
+                       if (((xStart + x) < 0) || ((xStart + x) >= 288)
+                               || ((yStart + y) < 0) || ((yStart + y) >= 224))
+                       {
+                               sc_addr++;
+                               chind++;
+                               continue;
+                       }
+
                        if (transparent)
                        {
                                if (chr[chind] != 7)
@@ -192,7 +199,7 @@ static inline void DrawChar(uint8_t * chr, uint8_t * ram, uint8_t sx, uint8_t sy
                        chind++;
                }
 
-               sc_addr += 312;                                         // Do next line of char...
+               sc_addr += (288 - 8);           // Do next line of char...
        }
 }
 
@@ -202,16 +209,19 @@ static inline void DrawChar(uint8_t * chr, uint8_t * ram, uint8_t sx, uint8_t sy
 //
 void DrawSprites(uint8_t priority)
 {
-       // Sprite blocks:
-       //
-       // Offset  Note
-       // ------  -----------------------------------------------------------------------------------
-       // 4       h.fb .nnn (f = horz. flip, h = horz. expand, b = sprite offset lo bit, nnn = upper bits of sprite #)
-       // 5       Lower 7 bits of sprite #
-       // 6       Sprite color index (top 7 bits only), bottom bit is bit 8 of X position
-       // 7       Sprite X position (bits 0-7)
-       // 8       Top two bits are sprite priority, bits 4 & 2 are sprite offset hi bit, vert. expand
-       // 9       Sprite Y position (192 - value)
+// Sprite blocks:
+//
+// Offset  Note
+// ------  --------------------------------------------------------------------
+// 4       h.fb .nnn (f = horz. flip, h = horz. expand, b = sprite offset lo
+//         bit, nnn = upper bits of sprite #)
+// 5       Lower 7 bits of sprite #
+// 6       Sprite color index (top 7 bits only), bottom bit is bit 8 of X
+//         position
+// 7       Sprite X position (bits 0-7)
+// 8       Top two bits are sprite priority, bits 4 & 2 are sprite offset hi
+//         bit, vert. expand
+// 9       Sprite Y position (192 - value)
 
        extern uint8_t gram1[];                                                 // Game RAM space
 
@@ -227,8 +237,10 @@ void DrawSprites(uint8_t priority)
 
                        uint16_t y = 192 - gram1[i + 9];
                        uint8_t flip = gram1[i + 4] & 0x20;             // Horizontal flip
-                       uint32_t spr_num = ((gram1[i + 4] & 0x07) << 9) | ((gram1[i + 5] & 0x7F) << 2)
-                               | ((gram1[i + 4] & 0x10) >> 4) | ((gram1[i + 8] & 0x10) >> 3);
+                       uint32_t spr_num = ((gram1[i + 4] & 0x07) << 9)
+                               | ((gram1[i + 5] & 0x7F) << 2)
+                               | ((gram1[i + 4] & 0x10) >> 4)
+                               | ((gram1[i + 8] & 0x10) >> 3);
 
                        // Draw sprite...
                        Sprite(spr_num, x, y, flip, gram1[i + 4] & 0x80, gram1[i + 8] & 0x04);
@@ -237,233 +249,115 @@ void DrawSprites(uint8_t priority)
 }
 
 
-//
-// Sprite handler
-//
-void Sprite(uint32_t sprnum, uint16_t x, uint16_t y, uint8_t flip, uint8_t horiz_bl, uint8_t vert_bl)
+static inline void DrawSpriteBlock(uint32_t & sprnum, uint16_t x, uint16_t y, uint16_t xStart, uint16_t xEnd, int16_t xInc)
 {
        extern uint8_t spr_rom[];
-       uint32_t sc_addr;
-
-       x += hScrollOffset;                                                     // Adjust x-coord
-       y += vScrollOffset;                                                     // Adjust y-coord
-
-       sprnum <<= 7;                                                           // 128 bytes per sprite
-
-       if (!vert_bl)
-               y += 16;
 
-       if (!flip)
+       for(uint16_t sy=0; sy<16; sy++)
        {
-               for(uint16_t sy=0; sy<16; sy++)
+               for(uint16_t sx=xStart; sx<xEnd; sx+=xInc)
                {
-                       for(uint16_t sx=0; sx<16; sx+=2)
-                       {
-                               uint8_t b1 = spr_rom[sprnum] >> 4, b2 = spr_rom[sprnum++] & 0x0F;
-                               uint16_t spy = y + sy, spx = x + sx;    // Need to optimize this clipping!
+                       uint8_t b1 = spr_rom[sprnum] >> 4, b2 = spr_rom[sprnum++] & 0x0F;
+                       uint16_t spy = y + sy, spx = x + sx;    // Need to optimize this clipping! [eh?]
 
-                               if (spy > 223 || spx > 299)
-                                       sc_addr = 0x13FFE;
-                               else
-                                       sc_addr = spx + spy * 320;
+                       // This handles negative values, by casting as unsigned
+                       uint32_t sc_addr = ((spy >= 224) || (spx >= 288) ? 0x13FFE : spx + (spy * 288));
 
-                               if (b1 != 15)
-                                       my_scr[sc_addr] = scolor[spr_color_index][b1];  // Store it
+                       if (b1 != 15)
+                               my_scr[sc_addr] = scolor[spr_color_index][b1];  // Store it
 
-                               sc_addr++;
+                       sc_addr++;
 
-                               if (b2 != 15)
-                                       my_scr[sc_addr] = scolor[spr_color_index][b2];  // Store it
-                       }
+                       if (b2 != 15)
+                               my_scr[sc_addr] = scolor[spr_color_index][b2];  // Store it
                }
+       }
+}
 
-               if (horiz_bl)
+
+static inline void DrawSpriteBlock2(uint32_t & sprnum, uint16_t x, uint16_t y, uint16_t xStart, uint16_t xEnd, int16_t xInc)
+{
+       extern uint8_t spr_rom[];
+
+       for(uint16_t sy=0; sy<16; sy++)
+       {
+               for(uint16_t sx=xStart; sx!=xEnd; sx+=xInc)
                {
-                       for(uint16_t sy=0; sy<16; sy++)
-                       {
-                               for(uint16_t sx=16; sx<32; sx+=2)
-                               {
-                                       uint8_t b1 = spr_rom[sprnum] >> 4, b2 = spr_rom[sprnum++] & 0x0F;
-                                       uint16_t spy = y + sy, spx = x + sx;
+                       uint8_t b1 = spr_rom[sprnum] >> 4, b2 = spr_rom[sprnum++] & 0x0F;
+                       uint16_t spy = y + sy, spx = x + sx;    // Need to optimize this clipping! [eh?]
 
-                                       if (spy > 223 || spx > 299)
-                                               sc_addr = 0x13FFE;
-                                       else
-                                               sc_addr = spx + spy * 320;
+                       // This handles negative values, by casting as unsigned
+                       uint32_t sc_addr = ((spy >= 224) || (spx >= 288) ? 0x13FFE : spx + (spy * 288));
 
-                                       if (b1 != 15)
-                                               my_scr[sc_addr] = scolor[spr_color_index][b1];  // Store it
+                       if (b2 != 15)
+                               my_scr[sc_addr] = scolor[spr_color_index][b2];  // Store it
 
-                                       sc_addr++;
+                       sc_addr++;
 
-                                       if (b2 != 15)
-                                               my_scr[sc_addr] = scolor[spr_color_index][b2];  // Store it
-                               }
-                       }
+                       if (b1 != 15)
+                               my_scr[sc_addr] = scolor[spr_color_index][b1];  // Store it
                }
-               else
-                       sprnum += 128;                                                          // Advance to next...
+       }
+}
 
-               if (vert_bl)
-               {
-                       y += 16;                                                                        // Do next row...
 
-                       for(uint16_t sy=0; sy<16; sy++)
-                       {
-                               for(uint16_t sx=0; sx<16; sx+=2)
-                               {
-                                       uint8_t b1 = spr_rom[sprnum] >> 4, b2 = spr_rom[sprnum++] & 0x0F;
-                                       uint16_t spy = y + sy, spx = x + sx;
+//
+// Sprite handler
+//
+void Sprite(uint32_t sprnum, uint16_t x, uint16_t y, uint8_t flip,
+       uint8_t horiz_bl, uint8_t vert_bl)
+{
+       // 128 bytes per sprite (16 x 16 chunks, 4 bits per pixel)
+       sprnum <<= 7;
 
-                                       if (spy > 223 || spx > 299)
-                                               sc_addr = 0x13FFE;
-                                       else
-                                               sc_addr = spx + spy * 320;
+       if (!vert_bl)
+               y += 16;
 
-                                       if (b1 != 15)
-                                               my_scr[sc_addr] = scolor[spr_color_index][b1];  // Store it
+       if (!flip)
+       {
+               DrawSpriteBlock(sprnum, x, y, 0, 16, 2);
 
-                                       sc_addr++;
+               if (horiz_bl)
+                       DrawSpriteBlock(sprnum, x, y, 16, 32, 2);
+               else
+                       sprnum += 128;  // Advance to next...
 
-                                       if (b2 != 15)
-                                               my_scr[sc_addr] = scolor[spr_color_index][b2];  // Store it
-                               }
-                       }
+               if (vert_bl)
+               {
+                       y += 16;                // Do next row...
+
+                       DrawSpriteBlock(sprnum, x, y, 0, 16, 2);
 
                        if (horiz_bl)
-                       {
-                               for(uint16_t sy=0; sy<16; sy++)
-                               {
-                                       for(uint16_t sx=16; sx<32; sx+=2)
-                                       {
-                                               uint8_t b1 = spr_rom[sprnum] >> 4, b2 = spr_rom[sprnum++] & 0x0F;
-                                               uint16_t spy = y + sy, spx = x + sx;
-
-                                               if (spy > 223 || spx > 299)
-                                                       sc_addr = 0x13FFE;
-                                               else
-                                                       sc_addr = spx + spy * 320;
-
-                                               if (b1 != 15)
-                                                       my_scr[sc_addr] = scolor[spr_color_index][b1];  // Store it
-
-                                               sc_addr++;
-
-                                               if (b2 != 15)
-                                                       my_scr[sc_addr] = scolor[spr_color_index][b2];  // Store it
-                                       }
-                               }
-                       }
+                               DrawSpriteBlock(sprnum, x, y, 16, 32, 2);
                }
        }
        else    // Flip
        {
                if (horiz_bl)
-               {
-                       for(uint16_t sy=0; sy<16; sy++)
-                       {
-                               for(uint16_t sx=30; sx!=14; sx-=2)
-                               {
-                                       uint8_t b1 = spr_rom[sprnum] >> 4, b2 = spr_rom[sprnum++] & 0x0F;
-                                       uint16_t spy = y + sy, spx = x + sx;
-
-                                       if ((spy > 223) || (spx > 299))
-                                               sc_addr = 0x13FFE;
-                                       else
-                                               sc_addr = spx + spy * 320;
-
-                                       if (b2 != 15)
-                                               my_scr[sc_addr] = scolor[spr_color_index][b2]; // Store it
-
-                                       sc_addr++;
+                       DrawSpriteBlock2(sprnum, x, y, 30, 14, -2);
 
-                                       if (b1 != 15)
-                                               my_scr[sc_addr] = scolor[spr_color_index][b1]; // Store it
-                               }
-                       }
-               }
-
-               for(uint16_t sy=0; sy<16; sy++)
-               {
-                       for(uint16_t sx=14; sx!=0xFFFE; sx-=2)
-                       {
-                               uint8_t b1 = spr_rom[sprnum] >> 4, b2 = spr_rom[sprnum++] & 0x0F;
-                               uint16_t spy = y + sy, spx = x + sx;
+               DrawSpriteBlock2(sprnum, x, y, 14, 0xFFFE, -2);
 
-                               if ((spy > 223) || (spx > 299))
-                                       sc_addr = 0x13FFE;
-                               else
-                                       sc_addr = spx+spy*320;
-
-                               if (b2 != 15)
-                                       my_scr[sc_addr] = scolor[spr_color_index][b2]; // Store it
-
-                               sc_addr++;
-
-                               if (b1 != 15)
-                                       my_scr[sc_addr] = scolor[spr_color_index][b1]; // Store it
-                       }
-               }
-
-               if (!horiz_bl)  sprnum += 128;  // If single, skip sprite...
+               if (!horiz_bl)
+                       sprnum += 128;  // If single, skip sprite...
 
                if (vert_bl)
                {
-                       y += 16;      // Adjust Y coord...
+                       y += 16;                // Adjust Y coord...
 
                        if (horiz_bl)
-                       {
-                               for(uint16_t sy=0; sy<16; sy++)
-                               {
-                                       for(uint16_t sx=30; sx!=14; sx-=2)
-                                       {
-                                               uint8_t b1 = spr_rom[sprnum] >> 4, b2 = spr_rom[sprnum++] & 0x0F;
-                                               uint16_t spy = y + sy, spx = x + sx;
-
-                                               if ((spy > 223) || (spx > 299))
-                                                       sc_addr = 0x13FFE;
-                                               else
-                                                       sc_addr = spx + spy * 320;
-
-                                               if (b2 != 15)
-                                                       my_scr[sc_addr] = scolor[spr_color_index][b2]; // Store it
-
-                                               sc_addr++;
-
-                                               if (b1 != 15)
-                                                       my_scr[sc_addr] = scolor[spr_color_index][b1]; // Store it
-                                       }
-                               }
-                       }
-                       for(uint16_t sy=0; sy<16; sy++)
-                       {
-                               for(uint16_t sx=14; sx!=0xFFFE; sx-=2)
-                               {
-                                       uint8_t b1 = spr_rom[sprnum] >> 4, b2 = spr_rom[sprnum++] & 0x0F;
-                                       uint16_t spy = y + sy, spx = x + sx;
-
-                                       if ((spy > 223) || (spx > 299))
-                                               sc_addr = 0x13FFE;
-                                       else
-                                               sc_addr = spx + spy * 320;
+                               DrawSpriteBlock2(sprnum, x, y, 30, 14, -2);
 
-                                       if (b2 != 15)
-                                               my_scr[sc_addr] = scolor[spr_color_index][b2]; // Store it
-
-                                       sc_addr++;
-
-                                       if (b1 != 15)
-                                               my_scr[sc_addr] = scolor[spr_color_index][b1]; // Store it
-                               }
-                       }
+                       DrawSpriteBlock2(sprnum, x, y, 14, 0xFFFE, -2);
                }
        }
 }
 
 
-int FindPCXName()
+int FindPCXName(void)
 {
-       static int pcxNum = -1;                                                         // This needs to go elsewhere... (or does it?)
+       static int pcxNum = -1; // This needs to go elsewhere... (or does it?)
        char filename[30];
        FILE * fr;
 
@@ -473,8 +367,9 @@ int FindPCXName()
        {
                sprintf(filename, "thnd%04i.pcx", pcxNum);
 
+               // file does not exist - we can create it
                if ((fr = fopen(filename, "r")) == NULL)
-                       return pcxNum;                                                          // file does not exist - we can create it
+                       return pcxNum;
 
                pcxNum++;
        }
@@ -483,86 +378,82 @@ int FindPCXName()
 }
 
 
-void SnapPCX(SDL_Surface * scr)
+void SavePCXSnapshot(void)
 {
        char filename[30];
-       int i, line;
-       FILE * fw;
-       int XMax = 319;       // Need to adjust this to handle 288 bytes per line
-       int YMax = 223;
-       int bytesPerLine = 320;
-
-       // Return if failed...
-       if ((i = FindPCXName()) < 0)
+       int xMax = 287;
+       int yMax = 223;
+       int bytesPerLine = 288;
+       int i = FindPCXName();
+
+       if (i < 0)
                return;
 
        sprintf(filename, "thnd%04i.pcx", i);
+       FILE * fw = fopen(filename, "wb");
 
-       if ((fw = fopen(filename, "wb")) == NULL)
-               return;  // failed...
+       if (fw == NULL)
+               return;
 
        // Write the header
 
-       fputc(0xA, fw); // pcx signature
-       fputc(0x5, fw); // version 5
-       fputc(0x1, fw); // RLE encoding
-       fputc(0x8, fw); // bits per pixel
+       fputc(0x0A, fw);        // PCX signature
+       fputc(0x05, fw);        // Version 5
+       fputc(0x01, fw);        // RLE encoding
+       fputc(0x08, fw);        // Bits per pixel
        fputc(0, fw);
        fputc(0, fw);
        fputc(0, fw);
-       fputc(0, fw); // XMin=0,YMin=0
-       fputc(XMax & 0xFF, fw);
-       fputc(XMax >> 8, fw);
-       fputc(YMax & 0xFF, fw);
-       fputc(YMax >> 8, fw);
+       fputc(0, fw);           // XMin=0,YMin=0
+       fputc(xMax & 0xFF, fw);
+       fputc(xMax >> 8, fw);
+       fputc(yMax & 0xFF, fw);
+       fputc(yMax >> 8, fw);
        fputc(0, fw);
        fputc(0, fw);
        fputc(0, fw);
-       fputc(0,fw); // unknown DPI
+       fputc(0, fw);           // Unknown DPI
 
-       for (i=0; i<48; i++)
-               fputc(0, fw);                 // EGA color palette
+       // EGA color palette
+       for(i=0; i<48; i++)
+               fputc(0, fw);
 
-       fputc(0, fw); // reserved
-       fputc(1, fw); // number of bit planes
+       fputc(0, fw);           // Reserved
+       fputc(1, fw);           // Number of bit planes
        fputc(bytesPerLine & 0xFF, fw);
        fputc(bytesPerLine >> 8, fw);
        fputc(1, fw);
-       fputc(0, fw); // palette info - unused
-       fputc((XMax + 1) & 0xFF, fw);
-       fputc((XMax + 1) >> 8, fw);
-       fputc((YMax + 1) & 0xFF, fw);
-       fputc((YMax + 1) >> 8, fw); // screen resolution
+       fputc(0, fw);           // Palette info - unused
+       fputc((xMax + 1) & 0xFF, fw);
+       fputc((xMax + 1) >> 8, fw);
+       fputc((yMax + 1) & 0xFF, fw);
+       fputc((yMax + 1) >> 8, fw);     // Screen resolution
 
+       // Unused
        for (i=0; i<54; i++)
-               fputc(0, fw); // unused
+               fputc(0, fw);
 
-       // Instead of using the screen, we should use our internal buffer...
-       SDL_LockSurface(scr);
+       uint8_t * mem = my_scr;
 
-       uint32_t mem = scr->pitch * 8; // Skip first line... WAS:320*8;
-
-       for (line=0; line<=YMax; line++)
+       for(int line=0; line<=yMax; line++)
        {
-               int count;
-               int last;
-               int xpos;
-               uint8_t * pMem = (uint8_t *)scr->pixels;
-
-               xpos = 0;
+               int xpos = 0;
 
                while (xpos < bytesPerLine)
                {
-                       last = pMem[mem++];
+                       uint8_t count = 1;
+                       uint8_t last = *mem;
+                       mem++;
                        xpos++;
-                       count = 1;
 
-                       while (pMem[mem] == last && xpos < bytesPerLine && count < 63)
+                       while ((*mem == last) && (xpos < bytesPerLine) && (count < 63))
                        {
-                               mem++;  count++;  xpos++;
+                               mem++;
+                               count++;
+                               xpos++;
                        }
 
-                       if (count > 1 || (last & 0xC0) == 0xC0)
+                       if ((count > 1) || ((last & 0xC0) == 0xC0))
                        {
                                fputc(0xC0 | (count & 0x3F), fw);
                                fputc(last & 0xFF, fw);
@@ -570,17 +461,19 @@ void SnapPCX(SDL_Surface * scr)
                        else
                                fputc(last & 0xFF, fw);
                }
-               mem += (scr->pitch - 320);  // Handle non-standard line lengths...
        }
 
-       SDL_UnlockSurface(scr);
-
-       // Write the palette
+       // Write out the palette
        fputc(0x0C, fw);
 
-       for (i=0; i<768; i++)
-               fputc(palette[i], fw);
+       for(int i=0; i<256; i++)
+       {
+               fputc(palette[i] & 0xFF, fw);
+               fputc((palette[i] >> 8) & 0xFF, fw);
+               fputc((palette[i] >> 16) & 0xFF, fw);
+       }
 
-       fclose(fw);    // success!
+       // Success!
+       fclose(fw);
 }