X-Git-Url: http://4ch.mooo.com/gitweb/?a=blobdiff_plain;f=src%2Flib%2Fmodex16.c;h=4ce84b8cb6f639117d2b18f7ac27bdeb685fdba7;hb=9fc23c615f73feec783ba0d021d726da3cb37067;hp=c3a808aa7c7913734e536eba307498ea9195df52;hpb=382c52a610e89948ad695a356879daf54653bb4c;p=16.git

diff --git a/src/lib/modex16.c b/src/lib/modex16.c
index c3a808aa..4ce84b8c 100644
--- a/src/lib/modex16.c
+++ b/src/lib/modex16.c
@@ -481,7 +481,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 +494,7 @@ fadePalette(sbyte fade, sbyte start, word iter, byte *palette) {
 		tmppal[i] = 63;
 	    }
 	}
-        modexPalUpdate2(tmppal);
+        modexPalUpdate1(tmppal);
 	iter--;
 	dim += fade;
     }
@@ -591,34 +591,64 @@ modexPalWhite() {
 
 /* utility */
 void
-modexPalUpdate(bitmap_t *bmp, word *i, word qp)
+modexPalUpdate(bitmap_t *bmp, word *i, word qp, word aqoffset)
 {
 	byte *p = bmp->palette;
 	word w=0;
 	word q=0;
-
-	if(qp>0) printf("(*i)=%02d\n", (*i)/3);
+	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 if(qp==0) q=(*i);// else outp(PAL_WRITE_REG, (*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)
 	{
 		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((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]))
+			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)]);
 				w++;
 				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(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)
@@ -626,194 +656,229 @@ modexPalUpdate(bitmap_t *bmp, word *i, word qp)
 		for(; (*i)<PAL_SIZE; (*i)++)
 		{
 //____			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]))
+			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)]);
 				w++;
 				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(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)
 	{
-		static word a[256] = { 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
+modexPalUpdate1(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, p[i]);
+	}
+	modexWaitBorder();	    /* waits one retrace -- less flicker */
+	for(; i<PAL_SIZE; i++)
+	{
+		outp(PAL_DATA_REG, p[(i)]);
+	}
+}
+
+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 z, zz=0,aq=0,aa=0,pp=0,aqpp=0,spee=0,ppp=0;
+		word zz=0;
 		pal = modexNewPal();
 		modexPalSave(pal);
-		//q-=3;
-		printf("q: %02d\n", (q/3));
+		//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=0; z<PAL_SIZE; z+=3)
+		for(; (*z)<PAL_SIZE; (*z)+=3)
 		{
-			if(z%3==0)
-			{
-				if(pal[z]==pal[z+3] && pal[z+1]==pal[z+4] && pal[z+2]==pal[z+5])
+			//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]);
+//					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)
+				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;
 //							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])
+						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("	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;
-//							printf("	a[%02d]=(%02d) offset array i think the palette should be updated again~\n", (z+q)/3, a[(z+q)/3]);
+//							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("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("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("z=%d\n", z/3);
-//		printf("q+z=%d\n", (q+z)/3);
-//		printf("z-q=%d\n", (z-q)/3);
-//		printf("%d\n", (z-(z-q))/3);
-//		printf("q=%d\n", q/3);
-//		printf("aa=%d\n", aa);
-
-		aq=0; pp = q; ppp=q;//(aq)*3;
-aqpee:
-		while(aq<aa)
-		{
-			//printf("a[%02d]=(%d)", aq, a[aq]);
-			if(a[aq]==0) aq++;
-			else break;
-		}
-
-//		spee=0;
-
-		aqpp=(aq*3);
-		//aqpp=q*2;
-
-//			printf("\naq=%02d\n", aq);
-//			printf("spee=%02d\n\n", spee);
-			//printf("aqpp=%02d\n\n", aqpp/3);
-
-	for(lq=0; lq<bufSize; lq++)
-	{
-		if(bmp->data[lq]+bmp->offset==aq)
-		{
-			//printf("%02d", bmp->data[lq]);
-			//printf("\n%02d\n", bmp->offset);
-			//printf("%02d\n", a[aq]);
-			bmp->data[lq]=((bmp->data[lq]+bmp->offset)-a[aq]);
-		}
-		else if(bmp->data[lq]+bmp->offset < z/3){ bmp->data[lq]+=bmp->offset; }
-		//printf("%02d ", bmp->data[lq]);
-		//if(lq > 0 && lq%bmp->width==0) printf("\n");
-	}
-
-//	if(spee==0)
-//	{
-	while(pp<=aqpp)
-	{
-		//if(pp<(z-1))
-		/*printf("pp=%02d	", pp/3);
-		printf("bmp: [%d]", bmp->palette[pp-q]);
-		printf("[%d]", bmp->palette[(pp-q)+1]);
-		printf("[%d]\n", bmp->palette[(pp-q)+2]);*/
-		if(((pp/3)==aq || spee>0))
-		{
-			printf("spee=%d\n", spee);
-			printf("		pp=%02d	", pp/3);
-			printf("old	bmp: [%d]", bmp->palette[(pp-ppp)]);
-			printf("[%d]", bmp->palette[(pp-ppp)+1]);
-			printf("[%d]\n", bmp->palette[(pp-ppp)+2]);
-			//if(spee==0) printf("\npp=%02d\n\n", pp/3);
-			bmp->palette[(pp-ppp)]=		bmp->palette[(pp-ppp)+3];
-			bmp->palette[(pp-ppp)+1]=	bmp->palette[(pp-ppp)+4];
-			bmp->palette[(pp-ppp)+2]=	bmp->palette[(pp-ppp)+5];
-			if(spee==0) spee++;
-		}
-/*		bmp->palette[pp]=		bmp->palette[pp+3];
-		bmp->palette[pp+1]=	bmp->palette[pp+4];
-		bmp->palette[pp+2]=	bmp->palette[pp+5];*/
-		printf("		pp=%02d	", pp/3);
-		printf("	bmp: [%d]", bmp->palette[(pp-ppp)]);
-		printf("[%d]", bmp->palette[(pp-ppp)+1]);
-		printf("[%d]\n", bmp->palette[(pp-ppp)+2]);
-/*		printf("bmp: [%d]", bmp->palette[pp]);
-		printf("[%d]", bmp->palette[pp+1]);
-		printf("[%d]\n", bmp->palette[pp+2]);*/
-		//aqpp=(pp-q);
-		//else if(pp==(z-1)) bmp->palette[pp]=0;
-		pp+=3;
-	}
-//	spee++;
-	printf("aqpp=	%02d\n", aqpp/3);
-	//printf("&aqpp=	%02d\n", &aqpp);
-	//printf("q=	%02d\n", q/3);
-	//printf("z=	%02d\n", z/3);
-	//printf("&q=	%02d\n", &q);
-	//modexPalUpdate(bmp, &q, 1);
-	//modexPalUpdate(bmp, &, 1);
-//	if(pp<=aqpp) 
-	//modexPalUpdate(bmp, &ppp, 1);
-	modexPalUpdate(bmp, 0, 1);
-//	}
-
-//	modexPalUpdate(bmp, 0, 1);
-
-	if(aq<aa){ printf("~~~~\n"); ppp=q; /*spee=0;*/ aq++; goto aqpee; }
-
-	}
-}
-
-void
-modexPalUpdate2(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, p[i]);
-	}
-	modexWaitBorder();	    /* waits one retrace -- less flicker */
-	for(; i<PAL_SIZE; i++)
-	{
-		outp(PAL_DATA_REG, p[(i)]);
-	}
+		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