]> 4ch.mooo.com Git - 16.git/blobdiff - src/lib/modex16.c
trying to fix~ palette updater bug! wwww
[16.git] / src / lib / modex16.c
index 398cb662cbfa9af05d44cf89a4f39a2691e5ae0d..1886172ca2c5d9e3faa1880590832196f8bba8a1 100644 (file)
@@ -591,64 +591,253 @@ modexPalWhite() {
 
 /* utility */
 void
-modexPalUpdate(bitmap_t *bmp, word *i)
+modexPalUpdate(bitmap_t *bmp, word *i, word qp, word aqpp)
 {
+//---- static word count=0;
        byte *p = bmp->palette;
        word w=0;
        word q=0;
-       long lq;
-       long bufSize = (bmp->width * bmp->height);
+       word qq=0;
+       word ii;
+       static word a[256] = { 0 };
+       word z=0, aq=0, aa=0, pp=0;
+       sword aqpw;
+
+       //printf("1     (*i)=%02d\n", (*i)/3);
        modexWaitBorder();
        if((*i)==0) outp(PAL_WRITE_REG, 0);  /* start at the beginning of palette */
-       else q=(*i);
+       else if(qp==0)
+       {
+               q=(*i);
+       }
+       else
+       {
+               q=(*i);
+               qq=(*i)/3;
+//             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)
        {
-//             printf("        %d      1st half\n", (*i));
                for(; (*i)<PAL_SIZE/2; (*i)++)
                {
                        //if(i%3==0 && (p[i+5]==p[i+4] && p[i+4]==p[i+3] && p[i+3]==p[i+2] && p[i+2]==p[i+1] && p[i+1]==p[i] && p[i+5]==p[i]))
-                       if(((*i)-q)%3==0 && (p[((*i)-q)]==p[((*i)-q)+3] && p[((*i)-q)+1]==p[((*i)-q)+4] && p[((*i)-q)+2]==p[((*i)-q)+5]))
+//____                 if((qp>0)&&((*i)-q)%3==0 && (p[((*i)-q)]==p[((*i)-q)+3] && p[((*i)-q)+1]==p[((*i)-q)+4] && p[((*i)-q)+2]==p[((*i)-q)+5])) outp(PAL_DATA_REG, p[(*i)-q]); else
+                       if(((((*i)-q)%3==0) || ((qp>0)&&((*i)-(bmp->offset*3))%3==0)) && (p[((*i)-q)]==p[((*i)-q)+3] && p[((*i)-q)+1]==p[((*i)-q)+4] && p[((*i)-q)+2]==p[((*i)-q)+5]))
                        {
-//                             printf("[%d]", p[((*i)-q)]);    printf("[%d]", p[((*i)-q)+1]);  printf("[%d]", p[((*i)-q)+2]);  printf("[%d]", p[((*i)-q)+3]);                  printf("[%d]", p[((*i)-q)+4]);                  printf("[%d]", p[((*i)-q)+5]);                  printf("        %d [%d]\n", (*i), p[((*i)-q)]);
-                               //printf("              1st break\n");
+                               if(qp>0)
+                               {
+                                       (*i)-=(aqpp*3);
+                                       aqpw=aqpp-1;
+                                       outp(PAL_WRITE_REG, qq+(((*i)+(aqpw*3)-(bmp->offset*3))/3));
+                                       for(ii=aqpp; ii>0; ii--)
+                                       {
+                                               outp(PAL_DATA_REG, p[((((*i)+((aqpp-ii)*3))+((aqpp+ii)*3))-(bmp->offset*3))]);
+                                               outp(PAL_DATA_REG, p[((((*i)+((aqpp-ii)*3))+((aqpp+ii)*3)+1)-(bmp->offset*3))]);
+                                               outp(PAL_DATA_REG, p[((((*i)+((aqpp-ii)*3))+((aqpp+ii)*3)+2)-(bmp->offset*3))]);
+//                                             printf("position        =       %d\n", qq+(((*i)+(aqpw*3)-(bmp->offset*3))/3));
+/*if(qp>0){ //printf("[%d]", p[((*i)-q)]);     printf("[%d]", p[((*i)-q)+1]);  printf("[%d]", p[((*i)-q)+2]);  printf("[%d]", p[((*i)-q)+3]);                  printf("[%d]", p[((*i)-q)+4]);                  printf("[%d]", p[((*i)-q)+5]);                  printf("        %d [%d]\n", (*i), p[((*i)-q)]); }
+printf("[%d]", p[((((*i)+((aqpp-ii)*3)))-(bmp->offset*3))]);
+printf("[%d]", p[((((*i)+((aqpp-ii)*3))+1)-(bmp->offset*3))]);
+printf("[%d] | ", p[((((*i)+((aqpp-ii)*3))+2)-(bmp->offset*3))]);
+printf("[%d]", p[((((*i)+((aqpp-ii)*3))+3)-(bmp->offset*3))]);
+printf("[%d]", p[((((*i)+((aqpp-ii)*3))+4)-(bmp->offset*3))]);
+printf("[%d]", p[((((*i)+((aqpp-ii)*3))+5)-(bmp->offset*3))]);
+printf("       %d [%d]\n",((((*i)+((aqpp-ii)*3))+((aqpp+ii)*3))-(bmp->offset*3))/3, p[((((*i)+((aqpp-ii)*3))+((aqpp+ii)*3))-(bmp->offset*3))]); }*/
+                                               //printf("%d\n", ((*i)+((ii)*3))/3);
+                                               //printf("ii=%d\n", ii);
+                                               //printf("aqpp=%d\n", aqpp);
+                                               //printf("                      %d\n", ((*i)+((aqpp-ii)*3))/3);
+                                       }
+                                       //printf("      %d\n",((((*i)+((aqpp-ii)*3)))-(bmp->offset*3)));
+                                       //printf("      %d\n",((((*i)+((aqpp-ii)*3))+1)-(bmp->offset*3)));
+                                       //printf("      %d\n",((((*i)+((aqpp-ii)*3))+2)-(bmp->offset*3)));
+                                       //printf("(*i)=%d\n", (*i));
+                               }
+                               //if(q>0) printf("%d\n", (*i)/3);
+                               //printf("[%d]", p[((*i)-q)]);  printf("[%d]", p[((*i)-q)+1]);  printf("[%d]", p[((*i)-q)+2]);  printf("[%d]", p[((*i)-q)+3]);                  printf("[%d]", p[((*i)-q)+4]);                  printf("[%d]", p[((*i)-q)+5]);                  printf("        %d [%d]\n", (*i), p[((*i)-q)]);
                                w++;
-                               //(*i)=(*i)+3;
                                break;
                        }
                        else
                        {
-                               outp(PAL_DATA_REG, p[(*i)-q]);
-//                             if((*i)>(88*3)) printf("                %d      %d\n", (*i), p[(*i)]);
+                               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))]);
                        }
                }
        }
        modexWaitBorder();          /* waits one retrace -- less flicker */
        if((*i)>=PAL_SIZE/2 && w==0)
        {
-               //printf("              2nd half\n");
                for(; (*i)<PAL_SIZE; (*i)++)
                {
-                       if(((*i)-q)%3==0 && (p[((*i)-q)]==p[((*i)-q)+3] && p[((*i)-q)+1]==p[((*i)-q)+4] && p[((*i)-q)+2]==p[((*i)-q)+5]))
+//____                 if((qp>0)&&((*i)-q)%3==0 && (p[((*i)-q)]==p[((*i)-q)+3] && p[((*i)-q)+1]==p[((*i)-q)+4] && p[((*i)-q)+2]==p[((*i)-q)+5])) outp(PAL_DATA_REG, p[(*i)-q]); else
+                       if(((((*i)-q)%3==0) || ((qp>0)&&((*i)-(bmp->offset*3))%3==0)) && (p[((*i)-q)]==p[((*i)-q)+3] && p[((*i)-q)+1]==p[((*i)-q)+4] && p[((*i)-q)+2]==p[((*i)-q)+5]))
                        {
-//                             printf("[%d]", p[((*i)-q)]);    printf("[%d]", p[((*i)-q)+1]);  printf("[%d]", p[((*i)-q)+2]);  printf("[%d]", p[((*i)-q)+3]);                  printf("[%d]", p[((*i)-q)+4]);                  printf("[%d]", p[((*i)-q)+5]);                  printf("        %d [%d]\n", (*i), p[((*i)-q)]);
-                               //printf("              1st break\n");
+                               if(qp>0)
+                               {
+                                       (*i)-=(aqpp*3);
+                                       aqpw=aqpp-1;
+                                       outp(PAL_WRITE_REG, qq+(((*i)+(aqpw*3)-(bmp->offset*3))/3));
+                                       for(ii=aqpp; ii>0; ii--)
+                                       {
+                                               outp(PAL_DATA_REG, p[((((*i)+((aqpp-ii)*3))+((aqpp+ii)*3))-(bmp->offset*3))]);
+                                               outp(PAL_DATA_REG, p[((((*i)+((aqpp-ii)*3))+((aqpp+ii)*3)+1)-(bmp->offset*3))]);
+                                               outp(PAL_DATA_REG, p[((((*i)+((aqpp-ii)*3))+((aqpp+ii)*3)+2)-(bmp->offset*3))]);
+//                                             printf("position        =       %d\n", qq+(((*i)+(aqpw*3)-(bmp->offset*3))/3));
+/*if(qp>0){ //printf("[%d]", p[((*i)-q)]);     printf("[%d]", p[((*i)-q)+1]);  printf("[%d]", p[((*i)-q)+2]);  printf("[%d]", p[((*i)-q)+3]);                  printf("[%d]", p[((*i)-q)+4]);                  printf("[%d]", p[((*i)-q)+5]);                  printf("        %d [%d]\n", (*i), p[((*i)-q)]); }
+printf("[%d]", p[((((*i)+((aqpp-ii)*3)))-(bmp->offset*3))]);
+printf("[%d]", p[((((*i)+((aqpp-ii)*3))+1)-(bmp->offset*3))]);
+printf("[%d] | ", p[((((*i)+((aqpp-ii)*3))+2)-(bmp->offset*3))]);
+printf("[%d]", p[((((*i)+((aqpp-ii)*3))+3)-(bmp->offset*3))]);
+printf("[%d]", p[((((*i)+((aqpp-ii)*3))+4)-(bmp->offset*3))]);
+printf("[%d]", p[((((*i)+((aqpp-ii)*3))+5)-(bmp->offset*3))]);
+printf("       %d [%d]\n",((((*i)+((aqpp-ii)*3))+((aqpp+ii)*3))-(bmp->offset*3))/3, p[((((*i)+((aqpp-ii)*3))+((aqpp+ii)*3))-(bmp->offset*3))]); }*/
+                                               //printf("%d\n", ((*i)+((ii)*3))/3);
+                                               //printf("ii=%d\n", ii);
+                                               //printf("aqpp=%d\n", aqpp);
+                                               //printf("                      %d\n", ((*i)+((aqpp-ii)*3))/3);
+                                       }
+                                       //printf("      %d\n",((((*i)+((aqpp-ii)*3)))-(bmp->offset*3)));
+                                       //printf("      %d\n",((((*i)+((aqpp-ii)*3))+1)-(bmp->offset*3)));
+                                       //printf("      %d\n",((((*i)+((aqpp-ii)*3))+2)-(bmp->offset*3)));
+                                       //printf("(*i)=%d\n", (*i));
+                               }
+                               //if(q>0) printf("%d\n", (*i)/3);
+                               //printf("[%d]", p[((*i)-q)]);  printf("[%d]", p[((*i)-q)+1]);  printf("[%d]", p[((*i)-q)+2]);  printf("[%d]", p[((*i)-q)+3]);                  printf("[%d]", p[((*i)-q)+4]);                  printf("[%d]", p[((*i)-q)+5]);                  printf("        %d [%d]\n", (*i), p[((*i)-q)]);
                                w++;
-                               //(*i)=(*i)+3;
                                break;
                        }
                        else
                        {
-                               outp(PAL_DATA_REG, p[(*i)-q]);
-//                             if((*i)>(88*3)) printf("                %d      %d\n", (*i), p[(*i)]);
+                               if(qp==0) outp(PAL_DATA_REG, p[(*i)-q]);
+                               else outp(PAL_DATA_REG, p[((*i)-(bmp->offset*3))]);
                        }
                }
        }
-       if((*i)>0)
+
+//     if(q>0) 
+       printf("2       (*i)=%02d\n", (*i)/3);
+
+       //palette checker~
+       if(q>0 && qp==0)
+       {
+               long lq;
+               long bufSize = (bmp->width * bmp->height);
+               pp = q;
+               //printf("1(*i)=%02d\n", (*i)/3);
+               //printf("1z=%02d\n", z/3);
+               chkcolor(bmp, &q, &a, &aa, &z, i);
+               //printf("2(*i)=%02d\n", (*i)/3);
+               //printf("2z=%02d\n", z/3);
+
+               /*printf("z=%d\n", z/3);
+               printf("q+z=%d\n", (q+z)/3);
+               printf("z-ppee=%d\n", (z-ppee)/3);*/
+               //printf("      q=%d\n", q/3);
+               //printf("aa=%d\n", aa);
+
+               aq=0;//ppee=q;
+aqpee:
+               while(aq<=aa)
+               {
+                       //printf("a[%02d]=(%d)", aq, a[aq]);
+                       if(a[aq]==0) aq++;
+                       else{ aqpp++; break; }
+               }
+
+               //printf("(*i)  =%02d\n", (*i)/3);
+               //printf("z     =%02d\n", z/3);
+               printf("aq=%02d\n", aq);
+               //printf("aqpp=%02d\n", aqpp);
+
        for(lq=0; lq<bufSize; lq++)
        {
-               bmp->data[lq]+=bmp->offset;
-               printf("%02d", bmp->data[lq]);
-               if(lq%bmp->width==0) printf("\n");
+               if(bmp->data[lq]+bmp->offset==aq)
+               {
+                       //printf("\n%02d\n", bmp->data[lq]);
+                       //printf("\n%02d\n", bmp->offset);
+                       //printf("\naq= %02d\n", aq);
+                       //printf("a[aq]=        %02d\n", a[aq]);
+                       //bmp->data[lq]=((bmp->data[lq]+bmp->offset)-a[aq]);
+                       bmp->data[lq]=a[aq];
+                       printf("_%d ", bmp->data[lq]);
+                       if(lq > 0 && lq%bmp->width==0) printf("\n");
+               }
+               else if(bmp->data[lq]+bmp->offset < ((*i)/3)-aqpp)
+               {
+                       if(bmp->data[lq]+bmp->offset >= aq)
+                       {
+                               bmp->data[lq]=(bmp->data[lq]+bmp->offset)-aqpp-((z-(*i))/3);
+                               //printf("_%d \n", bmp->data[lq]);
+                       }
+                       else bmp->data[lq]+=(bmp->offset);
+               }
+
+               //printf("%02d ", bmp->data[lq]);
+               //if(lq > 0 && lq%bmp->width==0) printf("\n");
+       }
+
+       /*while(pp<=(aq*3))
+       {
+               if(((pp/3)==aq || spee>0))
+               {
+                       printf("spee=%d\n", spee);
+                       printf("                pp=%02d ", pp/3);
+                       printf("old     bmp: [%d]", bmp->palette[(pp-ppee)]);
+                       printf("[%d]", bmp->palette[(pp-ppee)+1]);
+                       printf("[%d]\n", bmp->palette[(pp-ppee)+2]);
+                       //if(spee==0) printf("\npp=%02d\n\n", pp/3);
+                       //if(bmp->cleaned==0)
+                       //{
+                               bmp->palette[(pp-ppee)]=                bmp->palette[(pp-ppee)+3];
+                               bmp->palette[(pp-ppee)+1]=      bmp->palette[(pp-ppee)+4];
+                               bmp->palette[(pp-ppee)+2]=      bmp->palette[(pp-ppee)+5];
+                       //}
+                       if(spee==0) spee++;
+               }
+               printf("                pp=%02d ", pp/3);
+               printf("        bmp: [%d]", bmp->palette[(pp-ppee)]);
+               printf("[%d]", bmp->palette[(pp-ppee)+1]);
+               printf("[%d]\n", bmp->palette[(pp-ppee)+2]);
+               pp+=3;
+               //if(pp==(aq*3)) bmp->cleaned++;
+       }*/
+
+//printf("             aq=%02d\n", aq);
+//printf("             aa=%02d\n", aa);/
+
+       //update the palette~
+       //printf("      aqpp=           %d\n", aqpp);
+       //printf("1     pp=     %d\n", pp/3);
+       modexPalUpdate(bmp, &pp, 1, aqpp);
+       (*i)=pp;
+       //printf("      (*i)=%d\n", (*i)/3);
+       //printf("2     pp=%02d\n", pp/3);
+
+       //printf(".\n");
+       //printf("      aqpp=           %d\n", aqpp);
+       /*printf("aq=   %02d\n", aq);
+       printf("aa=     %02d\n", aa);
+       printf("                ppee=   %02d\n", ppee);*/
+
+       if(aq<aa){ /*printf("~~~~\n"); */pp=q; aq++; goto aqpee; }
+       /*printf("ppee=%d\n", ppee);
+       printf("pp=%d\n", pp);
+       printf("q=%d\n", q);
+       printf("(*i)=%d\n", (*i));*/
+       /*if(q>0)
+       {
+               //printf("z=%d\n", z/3);
+               //printf("(*i)=%d\n", (*i)/3);
+               //(*i)+=3;
+//----         printf("count=%d\n", count);
+       }*/
        }
 }
 
@@ -669,6 +858,100 @@ modexPalUpdate2(byte *p)
        }
 }
 
+void
+modexPalUpdate3(byte *p)
+{
+       int i;
+       modexWaitBorder();
+       outp(PAL_WRITE_REG, 0);  /* start at the beginning of palette */
+       for(i=0; i<PAL_SIZE/2; i++)
+       {
+               outp(PAL_DATA_REG, rand());
+       }
+       modexWaitBorder();          /* waits one retrace -- less flicker */
+       for(; i<PAL_SIZE; i++)
+       {
+               outp(PAL_DATA_REG, rand());
+       }
+}
+
+//color checker~
+//i want to make another vesion that checks the palette when the palette is being appened~
+void chkcolor(bitmap_t *bmp, word *q, word *a, word *aa, word *z, word *i)
+{
+               byte *pal;
+               word zz=0;
+               pal = modexNewPal();
+               modexPalSave(pal);
+               //printf("q: %02d\n", (*q));
+
+               //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)));
+                       if((*z)%3==0)
+                       {
+//----                         if(pal[(*z)]==pal[(*z)+3] && pal[(*z)+1]==pal[(*z)+4] && pal[(*z)+2]==pal[(*z)+5])
+                               if((*z)==(*i))
+                               {
+//                                     printf("\n%d    [%02d][%02d][%02d]\n", (*z), pal[(*z)], pal[(*z)+1], pal[(*z)+2]);
+//                                     printf("%d      [%02d][%02d][%02d]\n\n", (*z)+3, pal[(*z)+3], pal[(*z)+4], pal[(*z)+5]);
+//0000                                 (*z)-=3;
+                                       break;
+                               }
+                               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])
+                                               {
+//                                                     (*z)-=3;
+//                                                     (*i)-=3;
+//                                                     printf("\nzq1:%d[%02d][%02d][%02d]\n", (zz+q), pal[(zz+q)], pal[(zz+q)+1], pal[(zz+q)+2]);
+//                                                     printf("zq2:%d[%02d][%02d][%02d]\n\n", (zz+q)+3, pal[(zz+q)+3], pal[(zz+q)+4], pal[(zz+q)+5]);
+//0000                                                 printf("wwww\n");
+                                                       break;
+                                               }
+                                               else if(pal[zz]==pal[((*z)+(*q))] && pal[zz+1]==pal[((*z)+(*q))+1] && pal[zz+2]==pal[((*z)+(*q))+2])
+                                               {
+//                                                     printf("\n\nwwwwwwwwwwwwwwww\n");
+//                                                     printf("        zq: %d  [%02d][%02d][%02d] value that is needing to be changed~\n", ((*z)+(*q))/3, pal[((*z)+(*q))], pal[((*z)+(*q))+1], pal[((*z)+(*q))+2]);
+//                                                     printf("        zz: %d  [%02d][%02d][%02d] value that the previous value is going to change to~\n", (zz)/3, pal[zz], pal[zz+1], pal[zz+2]);
+//                                                     //printf("      zv: %d  [%02d][%02d][%02d] wwww\n", (zz-z+q)/3, pal[(zz-z+q)], pal[(zz-z+q)+1], pal[(zz-z+q)+2]);
+//                                                     printf("        z : %d  [%02d][%02d][%02d] offset value~\n", (*z)/3, pal[(*z)], pal[(*z)+1], pal[(*z)+2]);
+                                                       a[((*z)+(*q))/3]=zz/3;
+                                                       (*aa)=((*z)+(*q))/3;
+                                                       //(*i)--;
+//                                                     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");
+                                               }
+                                               /*else
+                                               {
+                                                       printf("================\n");
+                                                       printf("zq: %d  [%02d][%02d][%02d]\n", ((*z)+(*q))/3, pal[((*z)+(*q))], pal[((*z)+(*q))+1], pal[((*z)+(*q))+2]);
+                                                       printf("zz: %d  [%02d][%02d][%02d]\n", (zz)/3, pal[zz], pal[zz+1], pal[zz+2]);
+                                                       printf("z : %d  [%02d][%02d][%02d]\n", (*z)/3, pal[(*z)], pal[(*z)+1], pal[(*z)+2]);
+                                                       printf("================\n");
+                                               }*/
+                                               //printf("[%d]", (zz+q));
+                                       }
+                               }
+                               //printf("\nz:  %d\n", z);
+                               //printf("q:    %d\n", q);
+                               //printf("zz:   %d\n", zz);
+                       }
+               }
+               //printf("              aa: %d\n", (*aa));
+               printf("                                (*z): %d\n", (*z)/3);
+               printf("                                (*i): %d\n", (*i)/3);
+               free(pal);
+}
+
 void
 modexWaitBorder() {
     while(inp(INPUT_STATUS_1)  & 8)  {