tb1/tb1_linux/svmwgraph/vmw_sprite.c
Vince Weaver 137d2b45fd Move tb1 into its own subdir
I'm merging all the the tom bombem projects into one git tree
2012-12-18 21:24:06 -05:00

247 lines
5.9 KiB
C

/* Sprite implementation for the Super VMW graphics library */
#include "svmwgraph.h"
#include <stdlib.h> /* for calloc/malloc */
/* Doesn't matter if this is semi-slow */
/* It is used both to get size of the sprite, then to actually get it */
int fakeGetSprite(int x,int y,int xsize,int ysize,
vmwVisual *screen,int capture,
unsigned char *spritedata) {
int oldcolor,xtemp,ytemp=0,color,numacross,pointer=0;
oldcolor=vmwGetPixel(x,y,screen);
xtemp=0;
numacross=0;
while (ytemp<ysize) {
color=vmwGetPixel(x+xtemp,y+ytemp,screen);
if ( (color==oldcolor) && (numacross<126) && (xtemp<xsize)) numacross++;
else { /* We aren't a run */
if ((numacross==1) && (oldcolor<128)) {
/* We can fit in a single byte */
if (capture) spritedata[pointer]=oldcolor;
pointer++;
}
else { /* We fit in 2 bytes */
if (capture) spritedata[pointer]=numacross+128;
pointer++;
if (capture) spritedata[pointer]=oldcolor;
pointer++;
numacross=1; /* Because the new color already is 1 across */
}
}
oldcolor=color;
xtemp++;
if (xtemp>xsize) {
xtemp=0;
numacross=0;
ytemp++;
oldcolor=vmwGetPixel(x,y+ytemp,screen);
}
}
return pointer;
}
/* Sprites are now RLE encoded for speed and size reasons */
vmwSprite *vmwGetSprite(int x, int y,
int xsize, int ysize,vmwVisual *screen) {
vmwSprite *temp_sprite;
int sprite_size=0;
sprite_size=fakeGetSprite(x,y,xsize,ysize,
screen,0,NULL);
temp_sprite=calloc(1,sizeof(vmwSprite));
temp_sprite->spritedata=calloc(1,sprite_size);
temp_sprite->xsize=xsize;
temp_sprite->ysize=ysize;
fakeGetSprite(x,y,xsize,ysize,screen,1,temp_sprite->spritedata);
/* Original non-RLE sprite code */
/* for(ytemp=0;ytemp<ysize;ytemp++)
for(xtemp=0;xtemp<xsize;xtemp++)
*((temp_sprite->spritedata)+ytemp*xsize+xtemp)=
vmwGetPixel(xtemp+x,ytemp+y,screen);
*/
return temp_sprite;
}
void vmwFreeSprite(vmwSprite *sprite) {
free(sprite->spritedata);
free(sprite);
}
/* Sprites are now RLE-encoded for size and speed reasons */
void vmwPutSprite(vmwSprite *sprite,int x,int y,
vmwVisual *screen) {
unsigned char *temp_source,*temp_destination;
int xx=0,yy=0,run_length,i;
temp_source=sprite->spritedata;
temp_destination= (unsigned char *)(screen->memory)+(y*screen->xsize+x);
while (yy<sprite->ysize) {
if ( (*temp_source) <128) { /* Single Pixel */
if (*temp_source!=0) {
*(temp_destination)=*(temp_source);
}
xx++;
temp_source++;
temp_destination++;
}
else { /* Run */
run_length=(*temp_source)-128;
temp_source++;
/* Non-transparent */
if (*temp_source) {
for (i=0;i<run_length;i++) {
*(temp_destination)=*(temp_source);
temp_destination++;
}
}
else { /* transparent */
temp_destination+=run_length;
}
xx+=run_length;
temp_source++;
}
/* See if we are done this line */
if (xx>=sprite->xsize) {
temp_destination+=((screen->xsize-sprite->xsize));
yy++;
xx=0;
}
}
/* The old non-RLE sprite code */
/* for (yy=0;yy<sprite->ysize;yy++) {
for (xx=0;xx<sprite->xsize;xx++) {
if (*temp_source!=0) {
*(temp_destination)=*(temp_source);
}
temp_source++;
temp_destination++;
}
temp_destination+=((screen->xsize-sprite->xsize));
*/
}
void vmwPutSpriteNonTransparent(vmwSprite *sprite,int x,int y,
vmwVisual *screen) {
unsigned char *temp_source,*temp_destination;
int xx,yy,run_length,i;
temp_source=sprite->spritedata;
temp_destination= (unsigned char *)(screen->memory)+(y*screen->xsize+x);
yy=0;
xx=0;
while (yy<sprite->ysize) {
if ( (*temp_source) <128) { /* Single Pixel */
*(temp_destination)=*(temp_source);
xx++;
temp_source++;
temp_destination++;
}
else { /* Run */
run_length=(*temp_source)-128;
temp_source++;
for (i=0;i<run_length;i++) {
*(temp_destination)=*(temp_source);
temp_destination++;
}
xx+=run_length;
temp_source++;
}
/* See if we are done this line */
if (xx>=sprite->xsize) {
temp_destination+=((screen->xsize-sprite->xsize));
yy++;
xx=0;
}
}
}
void vmwPutPartialSprite(vmwVisual *destination,
vmwSprite *sprite,int x,int y,
int x_start,int x_stop,
int y_start, int y_stop)
{
unsigned char *temp_source,*temp_destination;
int xx,yy,run_length,i;
temp_source=sprite->spritedata;
temp_destination=(unsigned char *)(destination->memory)+(y*destination->xsize+x);
yy=0;
xx=0;
while (yy<sprite->ysize) {
if ( (*temp_source) <128) { /* Single Pixel */
if (*temp_source!=0) {
if ( (yy+y>=y_start) && (yy+y<=y_stop) &&
(xx+x>=x_start) && (xx+x<=x_stop) )
*(temp_destination)=*(temp_source);
}
xx++;
temp_source++;
temp_destination++;
}
else { /* Run */
run_length=(*temp_source)-128;
temp_source++;
/* Non-transparent */
if (*temp_source) {
for (i=0;i<run_length;i++) {
if ( (yy+y>=y_start) && (yy+y<=y_stop) &&
(xx+x>=x_start) && (xx+x<=x_stop) )
*(temp_destination)=*(temp_source);
temp_destination++;
}
}
else { /* transparent */
temp_destination+=run_length;
}
xx+=run_length;
temp_source++;
}
/* See if we are done this line */
if (xx>=sprite->xsize) {
temp_destination+=((destination->xsize-sprite->xsize));
yy++;
xx=0;
}
}
return;
}