github publish

PCX/PCXTST.C

@@ -0,0 +1,173 @@
+#include "..\types.h"
+#include <malloc.h>
+#include <mem.h>
+#include <stdio.h>
+#include "..\bgraph.h"
+#define A_8BIT 8
+#define A_15BIT 15
+#define A_FADE_PAL 256*8
+
+typedef struct pcxrecord
+     {
+     unsigned short id;
+     char encoding;
+     char bitperpixel;
+     unsigned short xmin,ymin,xmax,ymax;
+     unsigned short hdpi,vdpi;
+     char colormap[48];
+     char reserved;
+     char mplanes;
+     unsigned short bytesperline;
+     unsigned short paleteinfo;
+     unsigned short hscreen,vscreen;
+     char filler[54];
+     }PCXHEADER;
+
+
+
+void decomprimate_line_256(char *src,char *trg,int linelen,int *srcstep)
+  {
+  char *srcsave;
+
+  srcsave=src;
+  while (linelen--)
+     {
+     if (*src>=0xc0)
+        {
+        int i;
+        i=*src++ & 0x3f;memset(trg,*src++,i);
+        trg+=i;linelen-=i-1;
+        }
+     else
+        *trg++=*src++;
+     }
+  *srcstep=src-srcsave;
+  }
+void decomprimate_line_hi(char *src,unsigned short *trg,unsigned short *paleta,int linelen,int *srcstep)
+  {
+  char *srcsave;
+
+  srcsave=src;
+  while (linelen--)
+     {
+     if (*src>=0xc0)
+        {
+        int i,j;
+        i=(*src++) & 0x3f;
+        for (j=0;j<i;j++) *trg++=paleta[*src];
+        src++;
+        linelen-=i-1;
+        }
+     else
+        *trg++=paleta[*src++];
+     }
+  *srcstep=src-srcsave;
+  }
+
+
+int load_pcx(FILE *pcx,long fsize,int conv_type,char **buffer, ... )
+  //dale nasleduji int hodnoty poctu prechodu a R,G,B barvy
+  {
+  long curptr;
+  char *src_buff;
+  char paleta1[256][3];
+  unsigned short paleta2[256];
+  char *ptr1;unsigned short *ptr2;
+  char *ptr3;
+  int i;
+  PCXHEADER pcxdata;
+  int xsize,ysize;
+
+
+  curptr=ftell(pcx);
+  fseek(pcx,fsize-768,SEEK_SET);
+  fread(&paleta1,768,1,pcx);
+  ptr1=paleta1;ptr2=paleta2;
+  for (i=0;i<256;i++)
+     {
+     *ptr2=*(ptr1++)>>3;
+     *ptr2=(*ptr2<<5)+(*(ptr1++)>>3);
+     *ptr2=(*ptr2<<5)+(*(ptr1++)>>3);
+     ptr2++;
+     }
+
+  fseek(pcx,curptr,SEEK_SET);
+  fread(&pcxdata,sizeof(pcxdata),1,pcx);
+  xsize=pcxdata.xmax-pcxdata.xmin+1;
+  ysize=pcxdata.ymax-pcxdata.ymin+1;
+  switch (conv_type)
+     {
+     case A_8BIT: *buffer=(char *)malloc(xsize*ysize+512+6+16);break;
+     case A_15BIT: *buffer=(char *)malloc(xsize*ysize*2+6+16);break;
+     case A_FADE_PAL: *buffer=(char *)malloc(xsize*ysize+512*5+6+16);break;
+     default: return -2; //invalid type specificied
+     }
+  ptr1=*buffer;
+  *(word *)ptr1++=xsize;ptr1++;
+  *(word *)ptr1++=ysize;ptr1++;
+  *(word *)ptr1++=conv_type;ptr1++;
+  src_buff=(char *)malloc(fsize);ptr3=src_buff;
+  fread(src_buff,fsize-768-sizeof(pcxdata),1,pcx);
+  if (conv_type==A_8BIT)
+     {
+     memcpy(ptr1,paleta2,512);
+     ptr1+=512;
+     }
+  while (--ysize)
+     {
+     int step;
+     if (conv_type==15)
+        {
+        decomprimate_line_hi(ptr3,(word *)ptr1,paleta2,pcxdata.bytesperline,&step);
+        ptr1+=2*xsize;
+        }
+     else
+        {
+        decomprimate_line_256(ptr3,ptr1,pcxdata.bytesperline,&step);
+        ptr1+=xsize;
+        }
+     ptr3+=step;
+     }
+  free(src_buff);
+  return 0;
+  }
+
+int open_pcx(char *filename,int type,char **buffer)
+  {
+  FILE *pcx;
+  long fsize;
+
+  pcx=fopen(filename,"rb");
+  if (pcx==NULL) return -1;
+  fseek(pcx,0,SEEK_END);
+  fsize=ftell(pcx);
+  fseek(pcx,0,SEEK_SET);
+  fsize=load_pcx(pcx,fsize,type,buffer);
+  fclose(pcx);
+  return fsize;
+  }
+
+void initmode32b();
+
+main()
+  {
+  char *buf;
+
+  initmode32b();
+  getchar();
+  //open_pcx("d:\\tycoon2\\scr2.pcx",A_8BIT,&buf);
+  //put_picture(0,0,buf);free(buf);
+  open_pcx("desk.pcx",A_15BIT,&buf);
+  put_picture(0,480-101,buf);free(buf);
+  open_pcx("topbar.pcx",A_15BIT,&buf);
+  put_picture(0,0,buf);free(buf);
+
+  showview(0,0,0,0);
+  getchar();
+  return 0;
+  }
+
+
+
+
+