*** empty log message ***

diff --git a/win/gem/tile2img.c b/win/gem/tile2img.c
new file mode 100644 (file)
index 0000000..fa52fed
--- /dev/null
+++ b/win/gem/tile2img.c
@@ -0,0 +1,156 @@
+/*     SCCS Id: @(#)tile2bmp.c 3.2     95/09/06        */
+/*   Copyright (c) NetHack PC Development Team 1995                 */
+/*   NetHack may be freely redistributed.  See license for details. */
+
+/*
+ * Edit History:
+ *
+ *     Initial Creation                        M.Allison       94/01/11
+ * Marvin was here                     Marvin          97/01/11
+ *
+ */
+
+/* #include <stdlib.h> */
+#include "hack.h"
+#include "tile.h"
+#include "bitmfile.h"
+
+/* #define COLORS_IN_USE MAXCOLORMAPSIZE       /* 256 colors */
+#define COLORS_IN_USE 16                       /* 16 colors */
+
+
+extern char *FDECL(tilename, (int, int));
+static void FDECL(build_ximgtile,(pixel (*)[TILE_X]));
+void get_color(unsigned int colind, struct RGB *rgb);
+void get_pixel(int x, int y, unsigned int *colind);
+
+#if COLORS_IN_USE==16
+#define MAX_X 320              /* 2 per byte, 4 bits per pixel */
+#else
+#define MAX_X 640
+#endif
+#define MAX_Y 1200
+
+FILE *tibfile2;
+
+pixel tilepixels[TILE_Y][TILE_X];
+
+char *tilefiles[] = {  "..\\win\\share\\monsters.txt",
+                       "..\\win\\share\\objects.txt",
+                       "..\\win\\share\\other.txt"};
+
+unsigned int **Bild_daten;
+int num_colors = 0;
+int tilecount;
+int max_tiles_in_row = 40;
+int tiles_in_row;
+int filenum;
+int initflag;
+int yoffset,xoffset;
+char bmpname[128];
+FILE *fp;
+
+int
+main(argc, argv)
+int argc;
+char *argv[];
+{
+       int i;
+
+       if (argc != 2) {
+               Fprintf(stderr, "usage: tile2img outfile.img\n");
+               exit(EXIT_FAILURE);
+       } else
+               strcpy(bmpname, argv[1]);
+
+#ifdef OBSOLETE
+       bmpfile2 = fopen(NETHACK_PACKED_TILEFILE, WRBMODE);
+       if (bmpfile2 == (FILE *)0) {
+               Fprintf(stderr, "Unable to open output file %s\n",
+                               NETHACK_PACKED_TILEFILE);
+               exit(EXIT_FAILURE);
+       }
+#endif
+
+       tilecount = 0;
+       xoffset = yoffset = 0;
+       initflag = 0;
+       filenum = 0;
+       fp = fopen(bmpname,"wb");
+       if (!fp) {
+           printf("Error creating tile file %s, aborting.\n",bmpname);
+           exit(1);
+       }
+       fclose(fp);
+
+       Bild_daten=(unsigned int **)malloc(MAX_Y*sizeof(unsigned int *));
+       for(i=0;i<MAX_Y;i++)
+               Bild_daten[i]=(unsigned int *)malloc(MAX_X*sizeof(unsigned int));
+
+       while (filenum < 3) {
+               if (!fopen_text_file(tilefiles[filenum], RDTMODE)) {
+                       Fprintf(stderr,
+                               "usage: tile2img (from the util directory)\n");
+                       exit(EXIT_FAILURE);
+               }
+               num_colors = colorsinmap;
+               if (num_colors > 62) {
+                       Fprintf(stderr, "too many colors (%d)\n", num_colors);
+                       exit(EXIT_FAILURE);
+               }
+               while (read_text_tile(tilepixels)) {
+                       build_ximgtile(tilepixels);
+                       tilecount++;
+                       xoffset += TILE_X;
+                       if (xoffset >= MAX_X) {
+                               yoffset += TILE_Y;
+                               xoffset = 0;
+                       }
+               }
+               (void) fclose_text_file();
+               ++filenum;
+       }
+       Fprintf(stderr, "Total of %d tiles in memory.\n",tilecount);
+
+       bitmap_to_file(XIMG, MAX_X, (tilecount/20+1)*16, 372, 372, 4, 16, bmpname, get_color, get_pixel ) ;
+
+       Fprintf(stderr, "Total of %d tiles written to %s.\n",tilecount, bmpname);
+
+       exit(EXIT_SUCCESS);
+       /*NOTREACHED*/
+       return 0;
+}
+
+void get_color(unsigned int colind, struct RGB *rgb){
+       rgb->r=(1000L*(long)ColorMap[CM_RED][colind])/0xFF;
+       rgb->g=(1000L*(long)ColorMap[CM_GREEN][colind])/0xFF;
+       rgb->b=(1000L*(long)ColorMap[CM_BLUE][colind])/0xFF;
+}
+
+void get_pixel(int x, int y, unsigned int *colind){
+       *colind=Bild_daten[y][x];
+}
+
+static void
+build_ximgtile(pixels)
+pixel (*pixels)[TILE_X];
+{
+       int cur_x, cur_y, cur_color;
+       int x,y;
+
+       for (cur_y = 0; cur_y < TILE_Y; cur_y++) {
+               for (cur_x = 0; cur_x < TILE_X; cur_x++) {
+                   for (cur_color = 0; cur_color < num_colors; cur_color++) {
+                               if (ColorMap[CM_RED][cur_color] == pixels[cur_y][cur_x].r &&
+                                   ColorMap[CM_GREEN][cur_color] == pixels[cur_y][cur_x].g &&
+                                   ColorMap[CM_BLUE][cur_color] == pixels[cur_y][cur_x].b)
+                                       break;
+                   }
+                   if (cur_color >= num_colors)
+                               Fprintf(stderr, "color not in colormap!\n");
+                   y = cur_y + yoffset;
+                   x = cur_x + xoffset;
+                   Bild_daten[y][x] =cur_color;
+               }
+       }
+}