OSDN Git Service

major changes to entire project for tweaking it amd making it cleaner!! OK PNGWEN...
[proj16/16.git] / src / lib / modex16.c
index 36b31d1..af4c946 100644 (file)
@@ -1,13 +1,40 @@
+/* Project 16 Source Code~
+ * Copyright (C) 2012-2015 sparky4 & pngwen & andrius4669
+ *
+ * This file is part of Project 16.
+ *
+ * Project 16 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Project 16 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>, or
+ * write to the Free Software Foundation, Inc., 51 Franklin Street,
+ * Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ */
+
 #include <dos.h>
 #include <string.h>
 #include <mem.h>
 #include <conio.h>
 #include <stdio.h>
 #include <stdlib.h>
-#include "src\lib\modex16.h"
-
+#include "src/lib/modex16.h"
 
 byte far* VGA=(byte far*) 0xA0000000;  /* this points to video memory. */
+/*word text_mask[16] = {
+       0x0002, 0x0102, 0x0202, 0x0302,
+       0x0402, 0x0502, 0x0602, 0x0702,
+       0x0802, 0x0902, 0x0A02, 0x0B02,
+       0x0C02, 0x0D02, 0x0E02, 0x0F02
+};*/
 
 static void fadePalette(sbyte fade, sbyte start, word iter, byte *palette);
 static byte tmppal[PAL_SIZE];
@@ -91,6 +118,7 @@ modexDefaultPage() {
     page.dy = 0;
     page.width = SCREEN_WIDTH;
     page.height = SCREEN_HEIGHT;
+       page.id = 0;
 
     return page;
 }
@@ -107,6 +135,23 @@ modexNextPage(page_t *p) {
     result.dy = 0;
     result.width = p->width;
     result.height = p->height;
+       result.id = p->id+1;
+
+    return result;
+}
+
+//next page with defined dimentions~
+page_t
+modexNextPage0(page_t *p, word x, word y)
+{
+       page_t result;
+
+       result.data = p->data + (p->width/4)*p->height;  /* compute the offset */
+       result.dx = 0;
+       result.dy = 0;
+       result.width = x;
+       result.height = y;
+       result.id = p->id+1;
 
     return result;
 }
@@ -216,6 +261,28 @@ modexClearRegion(page_t *page, int x, int y, int w, int h, byte  color) {
 
 
 void
+oldDrawBmp(byte far* page, int x, int y, bitmap_t *bmp, byte sprite)
+{
+       byte plane;
+       word px, py;
+       word offset;
+
+       /* TODO Make this fast.  It's SLOOOOOOW */
+       for(plane=0; plane < 4; plane++) {
+               modexSelectPlane(PLANE(plane+x));
+               for(px = plane; px < bmp->width; px+=4) {
+                       offset=px;
+                       for(py=0; py<bmp->height; py++) {
+                       if(!sprite || bmp->data[offset])
+                               page[PAGE_OFFSET(x+px, y+py)] = bmp->data[offset];
+                       offset+=bmp->width;
+                       }
+               }
+       }
+}
+
+
+void
 modexDrawBmp(page_t *page, int x, int y, bitmap_t *bmp) {
     /* draw the region (the entire freakin bitmap) */
     modexDrawBmpRegion(page, x, y, 0, 0, bmp->width, bmp->height, bmp);
@@ -481,7 +548,7 @@ fadePalette(sbyte fade, sbyte start, word iter, byte *palette) {
 
     /* handle the case where we just update */
     if(iter == 0) {
-       modexPalUpdate2(palette);
+       modexPalUpdate1(palette);
        return;
     }
 
@@ -494,7 +561,7 @@ fadePalette(sbyte fade, sbyte start, word iter, byte *palette) {
                tmppal[i] = 63;
            }
        }
-        modexPalUpdate2(tmppal);
+        modexPalUpdate1(tmppal);
        iter--;
        dim += fade;
     }
@@ -593,17 +660,13 @@ modexPalWhite() {
 void
 modexPalUpdate(bitmap_t *bmp, word *i, word qp, word aqoffset)
 {
-//---- static word count=0;
        byte *p = bmp->palette;
        word w=0;
        word q=0;
        word qq=0;
-       //word ii;
-       static word a[PAL_SIZE];
+       static word a[PAL_SIZE];        //palette array of change values!
        word z=0, aq=0, aa=0, pp=0;
-       //sword aqpw;
 
-       //printf("1     (*i)=%02d\n", (*i)/3);
        modexWaitBorder();
        if((*i)==0)
        {
@@ -621,7 +684,6 @@ modexPalUpdate(bitmap_t *bmp, word *i, word qp, word aqoffset)
 //             printf("q: %02d\n", (q));
 //             printf("qq: %02d\n", (qq));
                //printf("      (*i)-q=%02d\n", (*i)-q);
-//             printf("================\n");
                outp(PAL_WRITE_REG, qq);  /* start at the beginning of palette */
        }
        if((*i)<PAL_SIZE/2 && w==0)
@@ -635,30 +697,25 @@ modexPalUpdate(bitmap_t *bmp, word *i, word qp, word aqoffset)
                                w++;
                                break;
                        }
-                       else if(qp>0 && (*i)>=(qp*3) && (*i)<((qp*3)+3))
+                       else if(qp>0 && (*i)>=(qp) && (*i)<((qp)+3))
                        {
-                               /*
-                                                                       note to self
-                                                                       use a[qp] instead of bmp->offset for this spot!
-                               */
                                //printf("qp=%d\n", qp);
-                               //printf("                                              (*i)=%d\n", (*i)/3);
-                               //for(w=(*i); w<()){
-                               printf("                (*i)=%d a[%d]=%d\n", (*i), qp, a[qp]);
-                               printf("                %d's color=%d\n", (*i), (a[qp])*3);//+(aqoffset*3)
-                               outp(PAL_DATA_REG, p[((a[qp])*3)]);// fix this shit!
-                               if((*i)+1==(qp*3)+3){ w++; /*(*i)++;*/ break; }
+                               //printf("              (*i)=%d a[%d]=%d\n", (*i), qp, a[qp]);
+                               printf("                %d's color=%d\n", (*i), (a[qp])-(bmp->offset*3)+qp);
+                               //outp(PAL_DATA_REG, p[((a[qp])-(bmp->offset*3)+qp)]);// fix this shit!
+                               if((*i)+1==(qp)+3){ w++; /*(*i)++;*/ break; }
                        }
                        else
                        {
                                if(bmp->offset==0 && (*i)<3 && q==0) outp(PAL_DATA_REG, 0);
                                else
                                if(qp==0) outp(PAL_DATA_REG, p[(*i)-q]);
-                               else outp(PAL_DATA_REG, p[((*i)-(bmp->offset*3)/*+(aqoffset*3)*/)]);
+                               else{ //outp(PAL_DATA_REG, p[((*i)-(bmp->offset*3)+qp)]);
+                               printf("p[]=%d  qp=%d   p[]-qp=%d\n", ((*i)-(bmp->offset*3)), qp, ((*i)-(bmp->offset*3))+qp); }
                        }
                }
                //if(qp>0) printf("qp=%d\n", qp);
-               if(qp>0) printf("                                               (*i)=%d\n", (*i)/3);
+               //if(qp>0) printf("                                             (*i)=%d\n", (*i)/3);
        }
        modexWaitBorder();          /* waits one retrace -- less flicker */
        if((*i)>=PAL_SIZE/2 && w==0)
@@ -671,28 +728,25 @@ modexPalUpdate(bitmap_t *bmp, word *i, word qp, word aqoffset)
                                w++;
                                break;
                        }
-                       else if(qp>0 && (*i)>=(qp*3) && (*i)<((qp*3)+3))
+                       else if(qp>0 && (*i)>=(qp) && (*i)<((qp)+3))
                        {
                                //printf("qp=%d\n", qp);
-                               //printf("                                              (*i)=%d\n", (*i)/3);
-                               printf("        (*i)=%d bmp->offset*3=%d        (qp*3)=%d\n", (*i), (bmp->offset), (qp));
-                               printf("                %d's color=%d\n", (*i)/3, ((*i)-(bmp->offset)+(qp*3)));
-                               //printf("              %d's color2=%d\n", (*i)/3, ((*i)-(bmp->offset*3))-(qp*3));
-                               //outp(PAL_DATA_REG, p[((*i)-(bmp->offset*3))+()]);
-                               (*i)++;
-                               break;
+                               //printf("              (*i)=%d a[%d]=%d\n", (*i), qp, a[qp]);
+                               printf("                %d's color=%d\n", (*i), (a[qp]-(bmp->offset*3)+qp));
+                               //outp(PAL_DATA_REG, p[((a[qp])-(bmp->offset*3)+qp)]);// fix this shit!
+                               if((*i)+1==(qp)+3){ w++; /*(*i)++;*/ break; }
                        }
                        else
                        {
                                if(qp==0) outp(PAL_DATA_REG, p[(*i)-q]);
-                               else outp(PAL_DATA_REG, p[((*i)-(bmp->offset*3))+(qp*3)]);
+                               else{ //outp(PAL_DATA_REG, p[((*i)-(bmp->offset*3)+qp)]);
+                               printf("p[]=%d  qp=%d   p[]-qp=%d\n", ((*i)-(bmp->offset*3)), qp, ((*i)-(bmp->offset*3))+qp); }
                        }
                }
                //printf("                                              (*i)=%d\n", (*i)/3);
        }
 
-//     if(q>0) 
-//     printf("2       (*i)=%02d\n", (*i)/3);
+printf("\nqqqqqqqq\n\n");
 
        //palette checker~
        if(q>0 && qp==0)
@@ -705,7 +759,6 @@ modexPalUpdate(bitmap_t *bmp, word *i, word qp, word aqoffset)
                chkcolor(bmp, &q, &a, &aa, &z, i);
                //printf("2(*i)=%02d\n", (*i)/3);
                //printf("2z=%02d\n", z/3);
-
                aq=0;
 aqpee:
                while(aq<=aa)
@@ -714,20 +767,24 @@ aqpee:
                        if(a[aq]==-1) aq++;
                        else { aqoffset++; break; }
                }
-
+//update the image data here!
        for(lq=0; lq<bufSize; lq++)
        {
-               
                                /*
                                                                        note to self
                                                                        use a[qp] instead of bmp->offset for this spot!
+                                                                       NO! wwww
                                */
 
+                               /*
+                               Facking bloody point the values of the changed palette to correct values.... major confusion! wwww
+                               */
 
                //(offset/bmp->offset)*bmp->offset
 
 
-               
+               //printf("%02d ",bmp->data[lq]+bmp->offset);
+               //if(lq > 0 && lq%bmp->width==0) printf("\n");
                //printf("%02d_", bmp->data[lq]+bmp->offset);
                /*if(bmp->data[lq]+bmp->offset==aq)
                {
@@ -768,7 +825,7 @@ aqpee:
 }
 
 void
-modexPalUpdate2(byte *p)
+modexPalUpdate1(byte *p)
 {
        int i;
        modexWaitBorder();
@@ -785,7 +842,7 @@ modexPalUpdate2(byte *p)
 }
 
 void
-modexPalUpdate3(byte *p)
+modexPalUpdate0(byte *p)
 {
        int i;
        modexWaitBorder();
@@ -813,12 +870,14 @@ void chkcolor(bitmap_t *bmp, word *q, word *a, word *aa, word *z, word *i/*, wor
                printf("chkcolor start~\n");
                printf("1                               (*z): %d\n", (*z)/3);
                printf("1                               (*i): %d\n", (*i)/3);
+//             printf("1 offset of color in palette    (*q): %d\n", (*q)/3);
+               printf("wwwwwwwwwwwwwwww\n");
                //check palette for dups
                for(; (*z)<PAL_SIZE; (*z)+=3)
                {
-//                     printf("\n              z: %d\n", (*z));
-//                     printf("                q: %d\n", (*q));
-//                     printf("                z+q: %d\n\n", ((*z)+(*q)));
+                       //printf("\n            z: %d\n", (*z));
+                       //printf("              q: %d\n", (*q));
+                       //printf("              z+q: %d\n\n", ((*z)+(*q)));
                        //if((*z)%3==0)
                        //{
 //----                         if(pal[(*z)]==pal[(*z)+3] && pal[(*z)+1]==pal[(*z)+4] && pal[(*z)+2]==pal[(*z)+5])
@@ -831,11 +890,10 @@ void chkcolor(bitmap_t *bmp, word *q, word *a, word *aa, word *z, word *i/*, wor
                                }
                                else for(zz=0; zz<(*q); zz+=3)
                                {
-                                       //zq=(zz+(q-3));
                                        //printf("zz: %02d\n", zz/3);
                                        if(zz%3==0)
                                        {
-                                               if(pal[((*z)+(*q))]==pal[((*z)+(*q))+3] && pal[((*z)+(*q))+1]==pal[((*z)+(*q))+4] && pal[((*z)+(*q))+2]==pal[((*z)+(*q))+5])
+                                               if(pal[((*z)+(*q))]==pal[((*z)+(*q))+3] && pal[((*z)+(*q))+1]==pal[((*z)+(*q))+4] && pal[((*z)+(*q))+2]==pal[((*z)+(*q))+5])    //break if duplicate colors found in palette because it have reached the end of the current data of the palette
                                                {
 //                                                     (*z)-=3;
 //                                                     (*i)-=3;
@@ -852,17 +910,20 @@ void chkcolor(bitmap_t *bmp, word *q, word *a, word *aa, word *z, word *i/*, wor
 //                                                     printf("        z : %d  [%02d][%02d][%02d] offset value~\n", (*z)/3, pal[(*z)], pal[(*z)+1], pal[(*z)+2]);
 //++++                                                 (*i)--;
 //                                                     (*z)--;
-
                                                        //expand dong here
 /*
 planned features that i plan to implement~
 image that has values on the pallete list!
-wwww 
-
+wwww
+no... wait.... no wwww
 */
-                                                       a[(((*z)+(*q)))]=zz;
+                                                       //for(zzii=0; zzii<3; zzii++)
+                                                       //{
+                                                               //printf("z+q: %d\n\n", ((*z)+(*q)));
+                                                               a[(((*z)+(*q)))]=zz;
+                                                       //}
                                                        (*aa)=(((*z)+(*q)));
-                                                       printf("!!                              a[%02d]: %d\n", (((*z)+(*q))/3), zz/3);
+                                                       printf("!!                                      a[%02d]: %d\n", (((*z)+(*q))/3), zz/3);
 //                                                     printf("\n              aa: %d\n\n", (*aa));
 //                                                     printf("        a[%02d]=(%02d) offset array i think the palette should be updated again~\n", ((*z)+(*q))/3, a[((*z)+(*q))/3]);
 //                                                     printf("wwwwwwwwwwwwwwww\n\n");
@@ -878,13 +939,11 @@ wwww
                                                //printf("[%d]", (zz+q));
                                        }
                                }
-                               //printf("\nz:  %d\n", z);
-                               //printf("q:    %d\n", q);
-                               //printf("zz:   %d\n", zz);
-                       //}
                }
+               printf("wwwwwwwwwwwwwwww\n");
                printf("2                               (*z): %d\n", (*z)/3);
                printf("2                               (*i): %d\n", (*i)/3);
+//             printf("2 offset of color in palette    (*q): %d\n", (*q)/3);
                printf("chkcolor end~\n");
                free(pal);
 }
@@ -899,3 +958,67 @@ modexWaitBorder() {
        /* spin */
     }
 }
+
+/*****************************************************************************
+find 8x8 font in VGA BIOS ROM
+*****************************************************************************/
+byte far *bios_8x8_font(void)
+{
+       byte far *font;
+       regs_t regs;
+
+/* use BIOS INT 10h AX=1130h to find font #3 (8x8) in ROM */
+       memset(&regs, 0, sizeof(regs)); /* for Watcom C */
+       regs.w.ax = 0x1130;
+       regs.w.bx = 0x0300;
+       intr(0x10, &regs);
+       font = (byte far *)MK_FP(regs.w.es, regs.w.bp);
+       return font;
+}
+
+/*****************************************************************************
+*****************************************************************************/
+void bputs(page_t *pee, int x, int y, const byte far *s)
+{
+       //int i, skip;
+       byte far *font;
+       byte far *font_pntr;
+       //byte c, temp;
+
+       font = bios_8x8_font();
+       //skip = 2 - ((pee->width/4) << 3);
+       //printf("font=%Fp\n", font);
+       for(; *s != '\0'; s++)
+       {
+               //src.raster = font + 8 * (*s);
+               //BLOODY!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!111111111111!!!11!!11!111!11!!1111!!111!11!!1!!!11!11!!1!!111!11!!
+//             (*(bmp->data)) = (*(font + 8 * (*s)));
+               font_pntr = font + 8 * (*s);
+//             font_pntr = font + (c << 3);
+//             i=8;
+//             while (i--) {
+//                     temp = *font_pntr++;
+//                     outpw(SC_INDEX, text_mask[temp & 0x0F]);
+                       //*vga_ptr++ = color;
+
+//                     outpw(SC_INDEX, text_mask[temp >> 4]);
+                       //*vga_ptr-- = color;
+                       //vga_ptr += widthBytes;
+//             }
+
+               //printf("fontoffset=%Fp\n", font + 8 * (*s));
+               //printf("*fontoffset=%s\n", *(font + 8 * (*s)));
+               //printf("w.data=%Fp\n", (w.data));
+               //printf("*w.data=%s\n", *(w.data));
+               //blit1(&src, bmp, x, y);
+//             modexDrawSprite(page, x, y, bmp);
+//             modexDrawBmp(page, x, y, bmp);
+//             printf("%x\n", (*(font + 8 * (*s))));
+               //_fmemset(VGA, *(font + 8 * (*s)), _msize(font));
+               //draw text?!?! wwww
+
+               modexClearRegion(pee, x, y, 8, 8, 4);
+//             x += 8;
+       }
+//     printf("\n");
+}