src/tesuto.c

   1 #include "src/tesuto.h"
   2
   3 static unsigned char palette[768];
   4 global_game_variables_t gvar;
   5
   6 int main(int argc,char **argv) {
   7         struct vrl1_vgax_header *vrl_header;
   8         vrl1_vgax_offset_t *vrl_lineoffs;
   9         unsigned char *buffer;
  10         unsigned int bufsz;
  11         int fd;
  12
  13         if (argc < 3) {
  14                 fprintf(stderr,"drawvrl <VRL file> <palette file>\n");
  15                 return 1;
  16         }
  17
  18         fd = open(argv[1],O_RDONLY|O_BINARY);
  19         if (fd < 0) {
  20                 fprintf(stderr,"Unable to open '%s'\n",argv[1]);
  21                 return 1;
  22         }
  23         {
  24                 unsigned long sz = lseek(fd,0,SEEK_END);
  25                 if (sz < sizeof(*vrl_header)) return 1;
  26                 if (sz >= 65535UL) return 1;
  27
  28                 bufsz = (unsigned int)sz;
  29                 buffer = malloc(bufsz);
  30                 if (buffer == NULL) return 1;
  31
  32                 lseek(fd,0,SEEK_SET);
  33                 if ((unsigned int)read(fd,buffer,bufsz) < bufsz) return 1;
  34
  35                 vrl_header = (struct vrl1_vgax_header*)buffer;
  36                 if (memcmp(vrl_header->vrl_sig,"VRL1",4) || memcmp(vrl_header->fmt_sig,"VGAX",4)) return 1;
  37                 if (vrl_header->width == 0 || vrl_header->height == 0) return 1;
  38         }
  39         close(fd);
  40
  41         probe_dos();
  42         if (!probe_vga()) {
  43                 printf("VGA probe failed\n");
  44                 return 1;
  45         }
  46         int10_setmode(19);
  47         update_state_from_vga();
  48         VGAmodeX(1, &gvar);
  49         //vga_enable_256color_modex(); // VGA mode X
  50
  51
  52         /* load color palette */
  53         fd = open(argv[2],O_RDONLY|O_BINARY);
  54         if (fd >= 0) {
  55                 unsigned int i;
  56
  57                 read(fd,palette,768);
  58                 close(fd);
  59
  60                 vga_palette_lseek(0);
  61                 for (i=0;i < 256;i++) vga_palette_write(palette[(i*3)+0]>>2,palette[(i*3)+1]>>2,palette[(i*3)+2]>>2);
  62         }
  63
  64         /* preprocess the sprite to generate line offsets */
  65         vrl_lineoffs = vrl1_vgax_genlineoffsets(vrl_header,buffer+sizeof(*vrl_header),bufsz-sizeof(*vrl_header));
  66         if (vrl_lineoffs == NULL) return 1;
  67
  68         draw_vrl1_vgax_modex(0,0,vrl_header,vrl_lineoffs,buffer+sizeof(*vrl_header),bufsz-sizeof(*vrl_header));
  69         while (getch() != 13);
  70
  71         {
  72                 unsigned int i;
  73
  74                 for (i=1;i < 320;i++)
  75                         draw_vrl1_vgax_modex(i,0,vrl_header,vrl_lineoffs,buffer+sizeof(*vrl_header),bufsz-sizeof(*vrl_header));
  76         }
  77         while (getch() != 13);
  78
  79         {
  80                 unsigned int i;
  81
  82                 for (i=1;i < 200;i++)
  83                         draw_vrl1_vgax_modex(i,i,vrl_header,vrl_lineoffs,buffer+sizeof(*vrl_header),bufsz-sizeof(*vrl_header));
  84         }
  85         while (getch() != 13);
  86
  87         {
  88                 unsigned int i;
  89
  90                 for (i=(2 << 6)/*200%*/;i >= (1 << 4)/*25%*/;i--)
  91                         draw_vrl1_vgax_modexstretch(0,0,i,vrl_header,vrl_lineoffs,buffer+sizeof(*vrl_header),bufsz-sizeof(*vrl_header));
  92         }
  93         while (getch() != 13);
  94         {
  95                 unsigned int i;
  96
  97                 for (i=(2 << 6)/*200%*/;i >= (1 << 4)/*25%*/;i--)
  98                         draw_vrl1_vgax_modexystretch(0,0,i,i,vrl_header,vrl_lineoffs,buffer+sizeof(*vrl_header),bufsz-sizeof(*vrl_header));
  99         }
 100         while (getch() != 13);
 101
 102         int10_setmode(3);
 103         //VGAmodeX(0, &gvar);
 104         free(vrl_lineoffs);
 105         buffer = NULL;
 106         free(buffer);
 107         bufsz = 0;
 108         return 0;
 109 }
 110