#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. */
/* handle the case where we just update */
if(iter == 0) {
- modexPalUpdate2(palette);
+ modexPalUpdate1(palette);
return;
}
tmppal[i] = 63;
}
}
- modexPalUpdate2(tmppal);
+ modexPalUpdate1(tmppal);
iter--;
dim += fade;
}
/* utility */
void
-modexPalUpdate(byte *p, word *i)
+modexPalUpdate(bitmap_t *bmp, word *i, word qp, word aqoffset)
{
+ byte *p = bmp->palette;
word w=0;
word q=0;
+ word qq=0;
+ static word a[PAL_SIZE]; //palette array of change values!
+ word z=0, aq=0, aa=0, pp=0;
+
modexWaitBorder();
- if((*i)==0) outp(PAL_WRITE_REG, 0); /* start at the beginning of palette */
- else q=(*i);
+ if((*i)==0)
+ {
+ memset(a, -1, sizeof(a));
+ outp(PAL_WRITE_REG, 0); /* start at the beginning of palette */
+ }
+ 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);
+ 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)) && (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");
w++;
- //(*i)=(*i)+3;
break;
}
+ else if(qp>0 && (*i)>=(qp) && (*i)<((qp)+3))
+ {
+ //printf("qp=%d\n", qp);
+ //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
{
- 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)+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);
}
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)) && (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");
w++;
- //(*i)=(*i)+3;
break;
}
+ else if(qp>0 && (*i)>=(qp) && (*i)<((qp)+3))
+ {
+ //printf("qp=%d\n", qp);
+ //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
{
- 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)+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);
+ }
+
+printf("\nqqqqqqqq\n\n");
+
+ //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);
+ aq=0;
+aqpee:
+ while(aq<=aa)
+ {
+// printf("a[%02d]=(%d)\n", aq, a[aq]);
+ 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)
+ {
+ //printf("%02d", bmp->data[lq]);
+ //printf("\n%02d\n", bmp->offset);
+ printf("aq=%02d ", aq);
+ printf("a[aq]=%02d ", a[aq]);
+ printf("a[aq]+aqpp=%02d ", a[aq]+aqpp);
+ printf("a[aq]-aqpp=%02d\n", a[aq]-aqpp);
+ //bmp->data[lq]=((bmp->data[lq]+bmp->offset)-a[aq]);
+//++++ bmp->data[lq]=a[aq]-aqpp;
+// 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 ", bmp->data[lq]+bmp->offset)-aqpp-((z-(*i))/3);
+ }
+ else bmp->data[lq]+=(bmp->offset-aqpp);
+ }*/
+
+ //printf("%02d`", bmp->data[lq]);
+ //if(lq > 0 && lq%bmp->width==0) printf("\n");
+ }
+
+//printf(" aq=%02d\n", aq);
+//printf(" aa=%02d\n", aa);
+
+ //update the palette~
+ modexPalUpdate(bmp, &pp, aq, aqoffset);
+ (*i)=pp;
+
+ if(aq<aa){ pp=q; aq++; goto aqpee; }
}
}
void
-modexPalUpdate2(byte *p)
+modexPalUpdate1(byte *p)
{
int i;
modexWaitBorder();
}
}
+void
+modexPalUpdate0(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/*, word *offset*/)
+{
+ byte *pal;
+ word zz=0;
+ pal = modexNewPal();
+ modexPalSave(pal);
+ //printf("q: %02d\n", (*q));
+ 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)));
+ //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)
+ {
+ //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]) //break if duplicate colors found in palette because it have reached the end of the current data of the palette
+ {
+// (*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]);
+ 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]);
+//++++ (*i)--;
+// (*z)--;
+ //expand dong here
+/*
+planned features that i plan to implement~
+image that has values on the pallete list!
+wwww
+no... wait.... no wwww
+*/
+ //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("\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("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);
+}
+
void
modexWaitBorder() {
while(inp(INPUT_STATUS_1) & 8) {