home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Misc / CBMDevKit4.dms / CBMDevKit4.adf / IFF / newiff39.lha / newiff39 / modules / bmprintc.c next >
Encoding:
C/C++ Source or Header  |  1993-09-28  |  4.5 KB  |  187 lines
  1. /*--------------------------------------------------------------*/ 
  2. /*                                */ 
  3. /*            bmprintc.c                */ 
  4. /*                                */ 
  5. /* print out a C-language representation of data for bitmap    */ 
  6. /*                                */  
  7. /* By Jerry Morrison and Steve Shaw, Electronic Arts.        */ 
  8. /* This software is in the public domain.            */ 
  9. /*                                */ 
  10. /* This version for the Commodore-Amiga computer.        */ 
  11. /* Cleaned up and modified a bit by Chuck McManis, Aug 1988    */ 
  12. /* Modified 05/91 by CBM for use with iffparse modules          */
  13. /*                                */ 
  14. /*--------------------------------------------------------------*/ 
  15.  
  16. #include "iffp/ilbmapp.h"
  17. #include <stdio.h> 
  18.  
  19. #define NO  0 
  20. #define YES 1 
  21.  
  22. void PSprite(struct BitMap *bm, FILE *fp, UBYTE *name, int p, BOOL dohead);
  23. void PrCRLF(FILE *fp);
  24. void PrintBob(struct BitMap *bm, FILE *fp, UBYTE *name);
  25. void PrintSprite(struct BitMap *bm, FILE *fp, UBYTE *name,
  26.          BOOL attach, BOOL dohdr);
  27.  
  28. static BOOL doCRLF; 
  29. char sp_colors[] = ".oO@";
  30.  
  31. void PrCRLF(FILE *fp)  
  32. { 
  33.     if (doCRLF)  
  34.         fprintf(fp, "%c%c", 0xD, 0xA);  
  35.     else 
  36.         fprintf(fp, "\n"); 
  37. } 
  38.      
  39. void PrintBob(struct BitMap *bm, FILE *fp, UBYTE *name)  
  40. { 
  41.     register UWORD     *wp;    /* Pointer to the bitmap data */ 
  42.  
  43.     short     p,i,j,nb;    /* temporaries */ 
  44.     short     nwords = (bm->BytesPerRow/2)*bm->Rows; 
  45.      
  46.     fprintf(fp, "/*----- bitmap : w = %ld, h = %ld ------ */", 
  47.             bm->BytesPerRow*8, bm->Rows); 
  48.  
  49.     PrCRLF(fp); 
  50.      
  51.     for (p = 0; p < bm->Depth; ++p) {    /* For each bit plane */ 
  52.         wp = (UWORD *)bm->Planes[p]; 
  53.         fprintf(fp, "/*------ plane # %ld: --------*/", p); 
  54.         PrCRLF(fp); 
  55.         fprintf(fp, "UWORD %s%c[%ld] = { ", name, (p?('0'+p):' '), nwords); 
  56.         PrCRLF(fp); 
  57.         for (j = 0; j < bm->Rows; j++, wp += (bm->BytesPerRow >> 1)) {  
  58.             fprintf(fp, "    "); 
  59.             for (nb = 0; nb < (bm->BytesPerRow) >> 1; nb++) 
  60.                 fprintf(fp, "0x%04x,", *(wp+nb)); 
  61.             if (bm->BytesPerRow <= 6) { 
  62.                  fprintf(fp, "\t/* "); 
  63.                 for (nb = 0; nb < (bm->BytesPerRow) >> 1; nb++) 
  64.                     for (i=0 ; i<16; i++) 
  65.                         fprintf(fp, "%c", 
  66.                         (((*(wp+nb)>>(15-i))&1) ? '*' : '.')); 
  67.                 fprintf(fp, " */"); 
  68.             } 
  69.             PrCRLF(fp); 
  70.          
  71.         } 
  72.         fprintf(fp,"    };"); 
  73.         PrCRLF(fp); 
  74.     } 
  75. } 
  76.  
  77.  
  78.  
  79. void PSprite(struct BitMap *bm, FILE *fp, UBYTE *name, int p, BOOL dohead)  
  80. { 
  81.     UWORD     *wp0, *wp1;    /* Pointer temporaries     */ 
  82.     short     i, j, nwords,    /* Counter temporaries     */ 
  83.         color;        /* pixel color        */ 
  84.     short     wplen = bm->BytesPerRow/2; 
  85.  
  86.     nwords =  2*bm->Rows + (dohead?4:0); 
  87.     wp0 = (UWORD *)bm->Planes[p]; 
  88.     wp1 = (UWORD *)bm->Planes[p+1]; 
  89.  
  90.     fprintf(fp, "UWORD %s[%ld] = {", name, nwords); 
  91.     PrCRLF(fp); 
  92.  
  93.     if (dohead) { 
  94.         fprintf(fp,"  0x0000, 0x0000, /* VStart, VStop */"); 
  95.         PrCRLF(fp); 
  96.     } 
  97.     for (j=0 ; j < bm->Rows; j++) { 
  98.         fprintf(fp, "  0x%04x, 0x%04x", *wp0, *wp1); 
  99.         if (dohead || (j != bm->Rows-1)) { 
  100.             fprintf(fp, ","); 
  101.         } 
  102.         fprintf(fp, "\t/*  "); 
  103.         for (i = 0; i < 16; i++) { 
  104.             color = ((*wp1 >> (14-i)) & 2) + ((*wp0 >> (15-i)) & 1); 
  105.             fprintf(fp, "%c", sp_colors[color]); 
  106.         } 
  107.         fprintf(fp,"  */"); 
  108.         PrCRLF(fp); 
  109.         wp0 += wplen; 
  110.         wp1 += wplen; 
  111.     } 
  112.     if (dohead)  
  113.         fprintf(fp, "  0x0000, 0x0000 }; /* End of Sprite */"); 
  114.     else  
  115.         fprintf(fp," };");     
  116.     PrCRLF(fp); 
  117.     PrCRLF(fp); 
  118. } 
  119.  
  120. void PrintSprite(struct BitMap *bm, FILE *fp, UBYTE *name,
  121.          BOOL attach, BOOL dohdr)
  122. { 
  123.     fprintf(fp,"/*----- Sprite format: h = %ld ------ */", bm->Rows); 
  124.     PrCRLF(fp); 
  125.  
  126.     if (bm->Depth > 1) { 
  127.         fprintf(fp, "/*--Sprite containing lower order two planes:   */"); 
  128.         PrCRLF(fp); 
  129.         PSprite(bm, fp, name, 0, dohdr); 
  130.     } 
  131.     if (attach && (bm->Depth > 3) ) { 
  132.         strcat(name, "1"); 
  133.         fprintf(fp, "/*--Sprite containing higher order two planes:   */"); 
  134.         PrCRLF(fp); 
  135.         PSprite(bm, fp, name, 2, dohdr); 
  136.     }  
  137. } 
  138.  
  139. #define BOB     0 
  140. #define SPRITE     1 
  141.  
  142. /* BMPrintCRep
  143.  * Passed pointer to BitMap structure, C filehandle opened for write,
  144.  * name associated with file, and string describing the output
  145.  * format desired (see cases below), outputs C representation of the ILBM.
  146.  */
  147. void BMPrintCRep(struct BitMap *bm, FILE *fp, UBYTE *name, UBYTE *fmt)  
  148. { 
  149.     BOOL attach, doHdr; 
  150.     char c; 
  151.     SHORT type; 
  152.  
  153.     doCRLF = NO; 
  154.     doHdr = YES; 
  155.     type = BOB; 
  156.     attach = NO; 
  157.     while ( (c=*fmt++) != 0 )  
  158.         switch (c) { 
  159.             case 'b':  
  160.                 type = BOB;  
  161.                 break; 
  162.             case 's':  
  163.                 type = SPRITE; 
  164.                 attach = NO;  
  165.                 break; 
  166.             case 'a':  
  167.                 type = SPRITE;  
  168.                 attach = YES;  
  169.                 break; 
  170.             case 'n':  
  171.                 doHdr = NO;  
  172.                 break; 
  173.             case 'c':  
  174.                 doCRLF = YES;  
  175.                 break; 
  176.         } 
  177.     switch(type) { 
  178.         case BOB:  
  179.             PrintBob(bm, fp, name);  
  180.             break; 
  181.         case SPRITE:   
  182.             PrintSprite(bm, fp, name, attach, doHdr); 
  183.             break; 
  184.     } 
  185. }
  186.  
  187.