+ byte *pal=&(gv->video.palette);\r
+ word zz=0;\r
+ //pal = modexNewPal();\r
+// modexPalSave(pal);\r
+ CHKCOLDBGOUT1\r
+ //check palette for dups\r
+ for(; (*z)<PAL_SIZE; (*z)+=3)\r
+ {\r
+ CHKCOLDBGOUT2\r
+ //if((*z)%3==0)\r
+ //{\r
+//---- if(pal[(*z)]==pal[(*z)+3] && pal[(*z)+1]==pal[(*z)+4] && pal[(*z)+2]==pal[(*z)+5])\r
+ if((*z)==(*i))\r
+ {\r
+ CHKCOLDBGOUT3\r
+//0000 (*z)-=3;\r
+ break;\r
+ }\r
+ else for(zz=0; zz<(*q); zz+=3)\r
+ {\r
+ CHKCOLDBGOUT4\r
+ if(zz%3==0)\r
+ {\r
+ 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\r
+ {\r
+// (*z)-=3;\r
+// (*i)-=3;\r
+ CHKCOLDBGOUT5\r
+ break;\r
+ }\r
+ else if(pal[zz]==pal[((*z)+(*q))] && pal[zz+1]==pal[((*z)+(*q))+1] && pal[zz+2]==pal[((*z)+(*q))+2])\r
+ {\r
+ CHKCOLDBGOUT6\r
+//++++ (*i)--;\r
+// (*z)--;\r
+ //expand dong here\r
+/*\r
+planned features that i plan to implement~\r
+image that has values on the pallete list!\r
+wwww\r
+no... wait.... no wwww\r
+*/\r
+ //for(zzii=0; zzii<3; zzii++)\r
+ //{\r
+ CHKCOLDBGOUT7\r
+ a[(((*z)+(*q)))]=zz;\r
+ //}\r
+ (*aa)=(((*z)+(*q)));\r
+ CHKCOLDBGOUT8\r
+ }\r
+ /*else\r
+ {\r
+ printf("================\n");\r
+ printf("zq: %d [%02d][%02d][%02d]\n", ((*z)+(*q))/3, pal[((*z)+(*q))], pal[((*z)+(*q))+1], pal[((*z)+(*q))+2]);\r
+ printf("zz: %d [%02d][%02d][%02d]\n", (zz)/3, pal[zz], pal[zz+1], pal[zz+2]);\r
+ printf("z : %d [%02d][%02d][%02d]\n", (*z)/3, pal[(*z)], pal[(*z)+1], pal[(*z)+2]);\r
+ printf("================\n");\r
+ }*/\r
+ CHKCOLDBGOUT9\r
+ }\r
+ }\r
+ }\r
+ CHKCOLDBGOUT10\r
+ //free(pal);\r
+}\r
+\r
+//what is *i, w, q, qq, z, aq, aa, pp, qp, and aqoffset...\r
+//pp is related to i\r
+\r
+void\r
+VL_palette(imgtestpal_t *bmp, byte *p, word *i, word qp, word aqoffset, word *apal, global_game_variables_t *gv)\r
+{\r
+ //byte *p = bmp->palette;\r