X-Git-Url: http://git.mutantstargoat.com/user/nuclear/?a=blobdiff_plain;f=src%2Fgrise.c;h=5d2068b4c23c94f07365315c01f551ba516216ef;hb=af1caae949c63a870f02b69cdbe0604c3b5ed0e9;hp=539c06d731608a14e236838f4b8672c41b37e789;hpb=533c2f86e406b946cb27b5dcda9e47cd36d8ffd9;p=dosdemo diff --git a/src/grise.c b/src/grise.c index 539c06d..5d2068b 100644 --- a/src/grise.c +++ b/src/grise.c @@ -9,6 +9,21 @@ /* APPROX. 170 FPS Minimum */ +typedef struct { + unsigned int w, h; + unsigned char *scans; +} RLEBitmap; + +static RLEBitmap rleCreate(unsigned int w, unsigned int h); +static void rleDestroy(RLEBitmap b); +static void rleBlit(unsigned short *dst, int dstW, int dstH, int dstStride, + RLEBitmap bitmap, int blitX, int blitY); +static void rleBlitScale(unsigned short *dst, int dstW, int dstH, int dstStride, + RLEBitmap bitmap, int blitX, int blitY, float scaleX, float scaleY); +static void rleBlitScaleInv(unsigned short *dst, int dstW, int dstH, int dstStride, + RLEBitmap bitmap, int blitX, int blitY, float scaleX, float scaleY); +static RLEBitmap rleEncode(unsigned char *pixels, unsigned int w, unsigned int h); + #define BG_FILENAME "data/grise.png" #define GROBJ_01_FILENAME "data/grobj_01.png" @@ -17,11 +32,14 @@ /* Every backBuffer scanline is guaranteed to have that many dummy pixels before and after */ #define PIXEL_PADDING 32 +/* Make sure this is less than PIXEL_PADDING*/ +#define MAX_DISPLACEMENT 16 + #define MIN_SCROLL PIXEL_PADDING #define MAX_SCROLL (backgroundW - fb_width - MIN_SCROLL) -#define FAR_SCROLL_SPEED 50.0f -#define NEAR_SCROLL_SPEED 400.0f +#define FAR_SCROLL_SPEED 15.0f +#define NEAR_SCROLL_SPEED 120.0f #define HORIZON_HEIGHT 100 #define REFLECTION_HEIGHT (240 - HORIZON_HEIGHT) @@ -39,7 +57,7 @@ static void processNormal(); static void initScrollTables(); static void updateScrollTables(float dt); -static void rleEncode(unsigned char *pixels, unsigned int w, unsigned int h); + static unsigned short *background = 0; static unsigned int backgroundW = 0; @@ -58,6 +76,8 @@ static int scrollTableRounded[REFLECTION_HEIGHT]; static int scrollModTable[REFLECTION_HEIGHT]; static float nearScrollAmount = 0.0f; +static RLEBitmap grobj; + static struct screen scr = { "galaxyrise", init, @@ -75,8 +95,8 @@ struct screen *grise_screen(void) static int init(void) { - unsigned char *reflectedObject; - int reflectedObjectW, reflectedObjectH; + unsigned char *tmpBitmap; + int tmpBitmapW, tmpBitmapH; /* Allocate back buffer */ backBuffer = (unsigned short*) malloc(BB_SIZE * BB_SIZE * sizeof(unsigned short)); @@ -91,14 +111,14 @@ static int init(void) convert32To16((unsigned int*)background, background, backgroundW * NORMALMAP_SCANLINE); /* Normalmap will keep its 32 bit color */ /* Load reflected objects */ - if (!(reflectedObject = img_load_pixels(GROBJ_01_FILENAME, &reflectedObjectW, &reflectedObjectH, IMG_FMT_GREY8))) { + if (!(tmpBitmap = img_load_pixels(GROBJ_01_FILENAME, &tmpBitmapW, &tmpBitmapH, IMG_FMT_GREY8))) { fprintf(stderr, "failed to load image " GROBJ_01_FILENAME "\n"); return -1; } - rleEncode(reflectedObject, reflectedObjectW, reflectedObjectH); + grobj = rleEncode(tmpBitmap, tmpBitmapW, tmpBitmapH); - img_free_pixels(reflectedObject); + img_free_pixels(tmpBitmap); initScrollTables(); @@ -117,6 +137,8 @@ static void destroy(void) backBuffer = 0; img_free_pixels(background); + + rleDestroy(grobj); } static void start(long trans_time) @@ -161,7 +183,10 @@ static void draw(void) src += backgroundW; dst += BB_SIZE; } - + + /* Blit reflections first, to be displaced */ + for (i = 0; i < 5; i++) rleBlitScaleInv(backBuffer + PIXEL_PADDING, fb_width, fb_height, BB_SIZE, grobj, 134 + (i-3) * 60, 235, 1.0f, 1.8f); + /* Perform displacement */ dst = backBuffer + HORIZON_HEIGHT * BB_SIZE + PIXEL_PADDING; src = dst + BB_SIZE; /* The pixels to be displaced are 1 scanline below */ @@ -176,14 +201,19 @@ static void draw(void) dispScanline += backgroundW; } + /* Then after displacement, blit the objects */ + for (i = 0; i < 5; i++) rleBlit(backBuffer + PIXEL_PADDING, fb_width, fb_height, BB_SIZE, grobj, 134 + (i-3) * 60, 100); + /* Blit effect to framebuffer */ src = backBuffer + PIXEL_PADDING; dst = fb_pixels; for (scanline = 0; scanline < fb_height; scanline++) { memcpy(dst, src, fb_width * 2); - src += BB_SIZE; + src += BB_SIZE; dst += fb_width; } + + } /* src and dst can be the same */ @@ -239,7 +269,7 @@ static void processNormal() { for (scanline = 0; scanline < REFLECTION_HEIGHT; scanline++) { for (i = 0; i < backgroundW; i++) { /* Remember that MIN_SCROLL is the padding around the screen, so ti's the maximum displacement we can get (positive & negative) */ - *dst2 = 2 * MIN_SCROLL * (*dst2 - minDisplacement) / (maxDisplacement - minDisplacement) - MIN_SCROLL; + *dst2 = 2 * MAX_DISPLACEMENT * (*dst2 - minDisplacement) / (maxDisplacement - minDisplacement) - MAX_DISPLACEMENT; *dst2 = (short)((float)*dst2 / scrollScaleTable[scanline] + 0.5f); /* Displacements must also scale with distance*/ dst2++; } @@ -275,44 +305,240 @@ static void updateScrollTables(float dt) { } } -static void rleEncode(unsigned char *pixels, unsigned int w, unsigned int h) { +/* ------------------------------------------------------------------------------------------------- + * RLE STUFF + * ------------------------------------------------------------------------------------------------- + */ +/* Limit streak count per scanline so we can directly jump to specific scanline */ +#define RLE_STREAKS_PER_SCANLINE 4 +/* Every streak is encoded by 2 bytes: offset and count of black pixels in the streak */ +#define RLE_BYTES_PER_SCANLINE RLE_STREAKS_PER_SCANLINE * 2 +#define RLE_FILL_COLOR 0 +#define RLE_FILL_COLOR_32 ((RLE_FILL_COLOR << 16) | RLE_FILL_COLOR) + +static RLEBitmap rleCreate(unsigned int w, unsigned int h) { + RLEBitmap ret; + ret.w = w; + ret.h = h; + + /* Add some padding at the end of the buffer, with the worst case for a scanline (w/2 streaks) */ + ret.scans = (unsigned char*) calloc(h * RLE_BYTES_PER_SCANLINE + w, 1); + + return ret; +} + +static void rleDestroy(RLEBitmap b) { + free(b.scans); +} + +static RLEBitmap rleEncode(unsigned char *pixels, unsigned int w, unsigned int h) { int scanline; int i; int penActive = 0; int counter = 0; + int accum = 0; + RLEBitmap ret; + unsigned char *output; + + /* https://www.youtube.com/watch?v=RKMR02o1I88&feature=youtu.be&t=55 */ + ret = rleCreate(w, h); for (scanline = 0; scanline < h; scanline++) { + output = ret.scans + scanline * RLE_BYTES_PER_SCANLINE; + accum = 0; for (i = 0; i < w; i++) { if (*pixels++) { if (penActive) { if (counter >= PIXEL_PADDING) { - printf("W %d ", counter); + *output++ = (unsigned char) counter; counter = 0; - printf("I %d ", counter); + *output++ = (unsigned char)accum; } counter++; + accum++; } else { - counter++; - printf("I %d ", counter); + *output++ = (unsigned char)accum; counter = 1; + accum++; penActive = 1; } } else { if (penActive) { - printf("W %d ", counter); - counter = 0; + *output++ = (unsigned char)counter; + counter = 1; + accum++; penActive = 0; } else { counter++; + accum++; } } } if (penActive) { - printf("W %d ", counter); + *output++ = (unsigned char)counter; } penActive = 0; counter = 0; - printf(" CR\n"); + } + + return ret; +} + +static void rleBlit(unsigned short *dst, int dstW, int dstH, int dstStride, + RLEBitmap bitmap, int blitX, int blitY) +{ + int scanline = 0; + int streakPos = 0; + int streakLength = 0; + int streak = 0; + unsigned char *input = bitmap.scans; + unsigned short *output; + unsigned int *output32; + + dst += blitX + blitY * dstStride; + + for (scanline = blitY; scanline < blitY + bitmap.h; scanline++) { + if (scanline < 0 || scanline >= dstH) continue; + for (streak = 0; streak < RLE_STREAKS_PER_SCANLINE; streak++) { + streakPos = *input++; + streakLength = *input++; + + if ((streakPos + blitX) <= 0) continue; + + output = dst + streakPos; + + /* Check if we need to write the first pixel as 16bit */ + if (streakLength % 2) { + *output++ = RLE_FILL_COLOR; + } + + /* Then, write 2 pixels at a time */ + streakLength >>= 1; + output32 = (unsigned int*) output; + while (streakLength--) { + *output32++ = RLE_FILL_COLOR_32; + } + } + + dst += dstStride; + } +} + +static void interpolateScan(unsigned char *output, unsigned char *a, unsigned char *b, float t) { + static int div = 1 << 23; + int ti, i; + + t += 1.0f; + ti = (*((unsigned int*)&t)) & 0x7FFFFF; + + for (i = 0; i < RLE_BYTES_PER_SCANLINE; i++) { + *output++ = ((*b++ * ti) + (*a++ * (div - ti))) >> 23; + } +} + +static void rleBlitScale(unsigned short *dst, int dstW, int dstH, int dstStride, + RLEBitmap bitmap, int blitX, int blitY, float scaleX, float scaleY) +{ + int scanline = 0; + int streakPos = 0; + int streakLength = 0; + int streak = 0; + unsigned short *output; + unsigned int *output32; + unsigned char *input; + int scanlineCounter = 0; + static unsigned char scan[512]; + + int blitW = (int) (bitmap.w * scaleX + 0.5f); + int blitH = (int)(bitmap.h * scaleY + 0.5f); + + dst += blitX + blitY * dstStride; + + for (scanline = blitY; scanline < blitY + blitH; scanline++) { + float normalScan = scanlineCounter / scaleY; + unsigned char *scan0 = bitmap.scans + RLE_BYTES_PER_SCANLINE * (int)normalScan; + unsigned char *scan1 = scan0 + RLE_BYTES_PER_SCANLINE; + normalScan -= (int)normalScan; + interpolateScan(scan, scan0, scan1, normalScan); + input = scan; + scanlineCounter++; + + if (scanline < 0 || scanline >= dstH) continue; + for (streak = 0; streak < RLE_STREAKS_PER_SCANLINE; streak++) { + streakPos = (int) ((*input++) * scaleX + 0.5f); + streakLength = (int)((*input++) * scaleX + 0.5f); + + if ((streakPos + blitX) <= 0) continue; + + output = dst + streakPos; + + /* Check if we need to write the first pixel as 16bit */ + if (streakLength % 2) { + *output++ = RLE_FILL_COLOR; + } + + /* Then, write 2 pixels at a time */ + streakLength >>= 1; + output32 = (unsigned int*)output; + while (streakLength--) { + *output32++ = RLE_FILL_COLOR_32; + } + } + + dst += dstStride; } } + +static void rleBlitScaleInv(unsigned short *dst, int dstW, int dstH, int dstStride, + RLEBitmap bitmap, int blitX, int blitY, float scaleX, float scaleY) +{ + int scanline = 0; + int streakPos = 0; + int streakLength = 0; + int streak = 0; + unsigned short *output; + unsigned int *output32; + unsigned char *input; + int scanlineCounter = 0; + static unsigned char scan[512]; + + int blitW = (int)(bitmap.w * scaleX + 0.5f); + int blitH = (int)(bitmap.h * scaleY + 0.5f); + + dst += blitX + blitY * dstStride; + + for (scanline = blitY; scanline > blitY - blitH; scanline--) { + float normalScan = scanlineCounter / scaleY; + unsigned char *scan0 = bitmap.scans + RLE_BYTES_PER_SCANLINE * (int)normalScan; + unsigned char *scan1 = scan0 + RLE_BYTES_PER_SCANLINE; + normalScan -= (int)normalScan; + interpolateScan(scan, scan0, scan1, normalScan); + input = scan; + scanlineCounter++; + + if (scanline < 0 || scanline >= dstH) continue; + for (streak = 0; streak < RLE_STREAKS_PER_SCANLINE; streak++) { + streakPos = (int)((*input++) * scaleX + 0.5f); + streakLength = (int)((*input++) * scaleX + 0.5f); + + if ((streakPos + blitX) <= 0) continue; + + output = dst + streakPos; + + /* Check if we need to write the first pixel as 16bit */ + if (streakLength % 2) { + *output++ = RLE_FILL_COLOR; + } + + /* Then, write 2 pixels at a time */ + streakLength >>= 1; + output32 = (unsigned int*)output; + while (streakLength--) { + *output32++ = RLE_FILL_COLOR_32; + } + } + + dst -= dstStride; + } +} \ No newline at end of file