+ video->vmem_remain=65535U;\r
+ video->num_of_pages=0;\r
+ (video->page[0]) = modexDefaultPage(&(video->page[0])); video->num_of_pages++; //video->page[0].width += (TILEWHD); video->page[0].height += (TILEWHD);\r
+ (video->page[1]) = modexNextPage(&(video->page[0])); video->num_of_pages++;\r
+ (video->page[2]) = modexNextPageFlexibleSize(&(video->page[1]), TILEWH*4, TILEWH*4); video->num_of_pages++;\r
+ (video->page[3]) = modexNextPageFlexibleSize(&(video->page[2]), video->page[0].sw, 208); video->num_of_pages++;\r
+// (video->page[2]) = modexNextPageFlexibleSize(&(video->page[1]), video->page[0].width, 172); video->num_of_pages++;\r
+// (video->page[3]) = modexNextPageFlexibleSize(&(video->page[2]), 72, 128); video->num_of_pages++;\r
+ modexCalcVmemRemain(video);\r
+ video->p=0;\r
+ video->r=1;\r
+}\r
+\r
+void\r
+modexShowPage(page_t *page) {\r
+ word high_address;\r
+ word low_address;\r
+ word offset;\r
+ byte crtcOffset;\r
+\r
+ /* calculate offset */\r
+ offset = (word) page->data;\r
+ offset += page->dy * (page->width >> 2 );\r
+ offset += page->dx >> 2;\r
+\r
+ /* calculate crtcOffset according to virtual width */\r
+ crtcOffset = page->width >> 3;\r
+\r
+ high_address = HIGH_ADDRESS | (offset & 0xff00);\r
+ low_address = LOW_ADDRESS | (offset << 8);\r
+\r
+ /* wait for appropriate timing and then program CRTC */\r
+ while ((inp(INPUT_STATUS_1) & DISPLAY_ENABLE));\r
+ outpw(CRTC_INDEX, high_address);\r
+ outpw(CRTC_INDEX, low_address);\r
+ outp(CRTC_INDEX, 0x13);\r
+ outp(CRTC_DATA, crtcOffset);\r
+\r
+ /* wait for one retrace */\r
+ while (!(inp(INPUT_STATUS_1) & VRETRACE));\r
+\r
+ /* do PEL panning here */\r
+ outp(AC_INDEX, 0x33);\r
+ outp(AC_INDEX, (page->dx & 0x03) << 1);\r
+}\r
+\r
+void\r
+modexPanPage(page_t *page, int dx, int dy) {\r
+ page->dx = dx;\r
+ page->dy = dy;\r
+}\r
+\r
+void\r
+modexSelectPlane(byte plane) {\r
+ outp(SC_INDEX, MAP_MASK); /* select plane */\r
+ outp(SC_DATA, plane);\r
+}\r
+\r
+void\r
+modexClearRegion(page_t *page, int x, int y, int w, int h, byte color) {\r
+ word pageOff = (word) page->data;\r
+ word xoff=x/4; /* xoffset that begins each row */\r
+ word scanCount=w/4; /* number of iterations per row (excluding right clip)*/\r
+ word poffset = pageOff + y*(page->stridew) + xoff; /* starting offset */\r
+ word nextRow = page->stridew-scanCount-1; /* loc of next row */\r
+ byte lclip[] = {0x0f, 0x0e, 0x0c, 0x08}; /* clips for rectangles not on 4s */\r
+ byte rclip[] = {0x00, 0x01, 0x03, 0x07};\r
+ byte left = lclip[x&0x03];\r
+ byte right = rclip[(x+w)&0x03];\r
+\r
+ /* handle the case which requires an extra group */\r
+ if((x & 0x03) && !((x+w) & 0x03)) {\r
+ right=0x0f;\r
+ }\r
+\r
+ __asm {\r
+ PUSHF\r
+ PUSH ES\r
+ PUSH AX\r
+ PUSH BX\r
+ PUSH CX\r
+ PUSH DX\r
+ PUSH SI\r
+ PUSH DI\r
+ MOV AX, SCREEN_SEG ; go to the VGA memory\r
+ MOV ES, AX\r
+ MOV DI, poffset ; go to the first pixel\r
+ MOV DX, SC_INDEX ; point to the map mask\r
+ MOV AL, MAP_MASK\r
+ OUT DX, AL\r
+ INC DX\r
+ MOV AL, color ; get ready to write colors\r
+ SCAN_START:\r
+ MOV CX, scanCount ; count the line\r
+ MOV BL, AL ; remember color\r
+ MOV AL, left ; do the left clip\r
+ OUT DX, AL ; set the left clip\r
+ MOV AL, BL ; restore color\r
+ STOSB ; write the color\r
+ DEC CX\r
+ JZ SCAN_DONE ; handle 1 group stuff\r
+\r
+ ;-- write the main body of the scanline\r
+ MOV BL, AL ; remember color\r
+ MOV AL, 0x0f ; write to all pixels\r
+ OUT DX, AL\r
+ MOV AL, BL ; restore color\r
+ REP STOSB ; write the color\r
+ SCAN_DONE:\r
+ MOV BL, AL ; remeber color\r
+ MOV AL, right\r
+ OUT DX, AL ; do the right clip\r
+ MOV AL, BL ; restore color\r
+ STOSB ; write pixel\r
+ ADD DI, nextRow ; go to the next row\r
+ DEC h\r
+ JNZ SCAN_START\r
+ POP DI\r
+ POP SI\r
+ POP DX\r
+ POP CX\r
+ POP BX\r
+ POP AX\r
+ POP ES\r
+ POPF\r
+ }\r
+}\r
+\r
+/* moved to src/lib/modex16/16render.c */\r
+\r
+/* copy a region of video memory from one page to another.\r
+ * It assumes that the left edge of the tile is the same on both\r
+ * regions and the memory areas do not overlap.\r
+ */\r
+void\r
+modexCopyPageRegion(page_t *dest, page_t *src,\r
+ word sx, word sy,\r
+ word dx, word dy,\r
+ word width, word height)\r
+{\r
+ word doffset = (word)dest->data + dy*(dest->stridew) + dx/4;\r
+ word soffset = (word)src->data + sy*(src->stridew) + sx/4;\r
+ word scans = vga_state.vga_stride;\r
+ word nextSrcRow = src->stridew - scans - 1;\r
+ word nextDestRow = dest->stridew - scans - 1;\r
+ byte lclip[] = {0x0f, 0x0e, 0x0c, 0x08}; /* clips for rectangles not on 4s */\r
+ byte rclip[] = {0x0f, 0x01, 0x03, 0x07};\r
+ byte left = lclip[sx&0x03];\r
+ byte right = rclip[(sx+width)&0x03];\r
+\r
+ __asm {\r
+ PUSHF\r
+ PUSH ES\r
+ PUSH AX\r
+ PUSH BX\r
+ PUSH CX\r
+ PUSH DX\r
+ PUSH SI\r
+ PUSH DI\r
+\r
+ MOV AX, SCREEN_SEG ; work in the vga space\r
+ MOV ES, AX ;\r
+ MOV DI, doffset ;\r
+ MOV SI, soffset ;\r
+\r
+ MOV DX, GC_INDEX ; turn off cpu bits\r
+ MOV AX, 0008h ;\r
+ OUT DX, AX\r
+\r
+ MOV AX, SC_INDEX ; point to the mask register\r
+ MOV DX, AX ;\r
+ MOV AL, MAP_MASK ;\r
+ OUT DX, AL ;\r
+ INC DX ;\r
+\r
+ ROW_START:\r
+ PUSH DS\r
+ MOV AX, ES\r
+ MOV DS, AX\r
+ MOV CX, scans ; the number of latches\r
+\r
+ MOV AL, left ; do the left column\r
+ OUT DX, AL ;\r
+ MOVSB ;\r
+ DEC CX ;\r
+\r
+ MOV AL, 0fh ; do the inner columns\r
+ OUT DX, AL\r
+ REP MOVSB ; copy the pixels\r
+\r
+ MOV AL, right ; do the right column\r
+ OUT DX, AL\r
+ MOVSB\r
+ POP DS\r
+\r
+ MOV AX, SI ; go the start of the next row\r
+ ADD AX, nextSrcRow ;\r
+ MOV SI, AX ;\r
+ MOV AX, DI ;\r
+ ADD AX, nextDestRow ;\r
+ MOV DI, AX ;\r
+\r
+ DEC height ; do the rest of the actions\r
+ JNZ ROW_START ;\r
+\r
+ MOV DX, GC_INDEX+1 ; go back to CPU data\r
+ MOV AL, 0ffh ; none from latches\r
+ OUT DX, AL ;\r
+\r
+ POP DI\r
+ POP SI\r
+ POP DX\r
+ POP CX\r
+ POP BX\r
+ POP AX\r
+ POP ES\r
+ POPF\r
+ }\r
+}\r
+\r
+\r
+/* fade and flash */\r
+void\r
+modexFadeOn(word fade, byte *palette) {\r
+ fadePalette(-fade, 64, 64/fade+1, palette);\r
+}\r
+\r
+\r
+void\r
+modexFadeOff(word fade, byte *palette) {\r
+ fadePalette(fade, 0, 64/fade+1, palette);\r
+}\r
+\r
+\r
+void\r
+modexFlashOn(word fade, byte *palette) {\r
+ fadePalette(fade, -64, 64/fade+1, palette);\r
+}\r
+\r
+\r
+void\r
+modexFlashOff(word fade, byte *palette) {\r
+ fadePalette(-fade, 0, 64/fade+1, palette);\r
+}\r
+\r
+\r
+static void\r
+fadePalette(sbyte fade, sbyte start, word iter, byte *palette) {\r
+ word i;\r
+ byte dim = start;\r
+\r
+ /* handle the case where we just update */\r
+ if(iter == 0) {\r
+ modexPalUpdate1(palette);\r
+ return;\r
+ }\r
+\r
+ while(iter > 0) { /* FadeLoop */\r
+ for(i=0; i<PAL_SIZE; i++) { /* loadpal_loop */\r
+ tmppal[i] = palette[i] - dim;\r
+ if(tmppal[i] > 127) {\r
+ tmppal[i] = 0;\r
+ } else if(tmppal[i] > 63) {\r
+ tmppal[i] = 63;\r
+ }\r
+ }\r
+ modexPalUpdate1(tmppal);\r
+ iter--;\r
+ dim += fade;\r
+ }\r
+}\r
+\r
+\r
+/* save and load */\r
+void\r
+modexPalSave(byte *palette) {\r
+ int i;\r
+\r
+ outp(PAL_READ_REG, 0); /* start at palette entry 0 */\r
+ for(i=0; i<PAL_SIZE; i++) {\r
+ palette[i] = inp(PAL_DATA_REG); /* read the palette data */\r
+ }\r
+}\r
+\r
+\r
+byte *\r
+modexNewPal() {\r
+ byte *ptr;\r
+ ptr = malloc(PAL_SIZE);\r
+\r
+ /* handle errors */\r
+ if(!ptr) {\r
+ printf("Could not allocate palette.\n");\r
+ exit(-1);\r
+ }\r
+\r
+ return ptr;\r
+}\r
+\r
+\r
+void\r
+modexLoadPalFile(byte *filename, byte **palette) {\r
+ FILE *file;\r
+ byte *ptr;\r
+\r
+ /* free the palette if it exists */\r
+ if(*palette) {\r
+ free(*palette);\r
+ }\r
+\r
+ /* allocate the new palette */\r
+ *palette = modexNewPal();\r
+\r
+ /* open the file */\r
+ file = fopen(filename, "rb");\r
+ if(!file) {\r
+ printf("Could not open palette file: %s\n", filename);\r
+ exit(-2);\r
+ }\r
+\r
+ /* read the file */\r
+ ptr = *palette;\r
+ while(!feof(file)) {\r
+ *ptr++ = fgetc(file);\r
+ }\r
+\r
+ fclose(file);\r
+}\r
+\r
+\r
+void\r
+modexSavePalFile(char *filename, byte *pal) {\r
+ unsigned int i;\r
+ FILE *file;\r
+\r
+ /* open the file for writing */\r
+ file = fopen(filename, "wb");\r
+ if(!file) {\r
+ printf("Could not open %s for writing\n", filename);\r
+ exit(-2);\r
+ }\r
+\r
+ /* write the data to the file */\r
+ fwrite(pal, 1, PAL_SIZE, file);\r
+ fclose(file);\r
+}\r
+\r
+\r
+/* blanking */\r
+void\r
+modexPalBlack() {\r
+ fadePalette(-1, 64, 1, tmppal);\r
+}\r
+\r
+\r
+void\r
+modexPalWhite() {\r
+ fadePalette(-1, -64, 1, tmppal);\r
+}\r
+\r
+\r
+/* utility */\r
+void\r
+modexPalUpdate(bitmap_t *bmp, word *i, word qp, word aqoffset)\r
+{\r
+ byte *p = bmp->palette;\r
+ word w=0;\r
+ word q=0;\r
+ word qq=0;\r
+ static word a[PAL_SIZE]; //palette array of change values!\r
+ word z=0, aq=0, aa=0, pp=0;\r
+\r
+ //modexWaitBorder();\r
+ vga_wait_for_vsync();\r
+ if((*i)==0)\r
+ {\r
+ memset(a, -1, sizeof(a));\r
+ outp(PAL_WRITE_REG, 0); /* start at the beginning of palette */\r
+ }\r
+ else if(qp==0)\r
+ {\r
+ q=(*i);\r
+ }\r
+ else\r
+ {\r
+ q=(*i);\r
+ qq=(*i)/3;\r
+// printf("q: %02d\n", (q));\r
+// printf("qq: %02d\n", (qq));\r
+ //printf(" (*i)-q=%02d\n", (*i)-q);\r
+ outp(PAL_WRITE_REG, qq); /* start at the beginning of palette */\r
+ }\r
+ if((*i)<PAL_SIZE/2 && w==0)\r
+ {\r
+ for(; (*i)<PAL_SIZE/2; (*i)++)\r
+ {\r
+ //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]))\r
+//____ 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\r
+ 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]))\r
+ {\r
+ w++;\r
+ break;\r
+ }\r
+ else if(qp>0 && (*i)>=(qp) && (*i)<((qp)+3))\r
+ {\r
+ //printf("qp=%d\n", qp);\r
+ //printf(" (*i)=%d a[%d]=%d\n", (*i), qp, a[qp]);\r
+ printf(" %d's color=%d\n", (*i), (a[qp])-(bmp->offset*3)+qp);\r
+ //outp(PAL_DATA_REG, p[((a[qp])-(bmp->offset*3)+qp)]);// fix this shit!\r
+ if((*i)+1==(qp)+3){ w++; /*(*i)++;*/ break; }\r
+ }\r
+ else\r
+ {\r
+ if(bmp->offset==0 && (*i)<3 && q==0) outp(PAL_DATA_REG, 0);\r
+ else\r
+ if(qp==0) outp(PAL_DATA_REG, p[(*i)-q]);\r
+ else{ //outp(PAL_DATA_REG, p[((*i)-(bmp->offset*3)+qp)]);\r
+ printf("p[]=%d qp=%d p[]-qp=%d\n", ((*i)-(bmp->offset*3)), qp, ((*i)-(bmp->offset*3))+qp); }\r
+ }\r
+ }\r
+ //if(qp>0) printf("qp=%d\n", qp);\r
+ //if(qp>0) printf(" (*i)=%d\n", (*i)/3);\r
+ }\r
+ //modexWaitBorder(); /* waits one retrace -- less flicker */\r
+ vga_wait_for_vsync();\r
+ if((*i)>=PAL_SIZE/2 && w==0)\r
+ {\r
+ for(; (*i)<PAL_SIZE; (*i)++)\r
+ {\r
+//____ 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\r
+ 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]))\r
+ {\r
+ w++;\r
+ break;\r
+ }\r
+ else if(qp>0 && (*i)>=(qp) && (*i)<((qp)+3))\r
+ {\r
+ //printf("qp=%d\n", qp);\r
+ //printf(" (*i)=%d a[%d]=%d\n", (*i), qp, a[qp]);\r
+ printf(" %d's color=%d\n", (*i), (a[qp]-(bmp->offset*3)+qp));\r
+ //outp(PAL_DATA_REG, p[((a[qp])-(bmp->offset*3)+qp)]);// fix this shit!\r
+ if((*i)+1==(qp)+3){ w++; /*(*i)++;*/ break; }\r
+ }\r
+ else\r
+ {\r
+ if(qp==0) outp(PAL_DATA_REG, p[(*i)-q]);\r
+ else{ //outp(PAL_DATA_REG, p[((*i)-(bmp->offset*3)+qp)]);\r
+ printf("p[]=%d qp=%d p[]-qp=%d\n", ((*i)-(bmp->offset*3)), qp, ((*i)-(bmp->offset*3))+qp); }\r
+ }\r
+ }\r
+ //printf(" (*i)=%d\n", (*i)/3);\r
+ }\r
+\r
+printf("\nqqqqqqqq\n\n");\r
+\r
+ //palette checker~\r
+ if(q>0 && qp==0)\r
+ {\r
+ long lq;\r
+ long bufSize = (bmp->width * bmp->height);\r
+ pp = q;\r
+ //printf("1(*i)=%02d\n", (*i)/3);\r
+ //printf("1z=%02d\n", z/3);\r
+ modexchkcolor(bmp, &q, &a, &aa, &z, i);\r
+ //printf("2(*i)=%02d\n", (*i)/3);\r
+ //printf("2z=%02d\n", z/3);\r
+ aq=0;\r
+aqpee:\r
+ while(aq<=aa)\r
+ {\r
+// printf("a[%02d]=(%d)\n", aq, a[aq]);\r
+ if(a[aq]==-1) aq++;\r
+ else { aqoffset++; break; }\r
+ }\r
+//update the image data here!\r
+ for(lq=0; lq<bufSize; lq++)\r
+ {\r
+ /*\r
+ note to self\r
+ use a[qp] instead of bmp->offset for this spot!\r
+ NO! wwww\r
+ */\r
+\r
+ /*\r
+ Facking bloody point the values of the changed palette to correct values.... major confusion! wwww\r
+ */\r
+\r
+ //(offset/bmp->offset)*bmp->offset\r
+\r
+\r
+ //printf("%02d ",bmp->data[lq]+bmp->offset);\r
+ //if(lq > 0 && lq%bmp->width==0) printf("\n");\r
+ //printf("%02d_", bmp->data[lq]+bmp->offset);\r
+ /*if(bmp->data[lq]+bmp->offset==aq)\r
+ {\r
+ //printf("%02d", bmp->data[lq]);\r
+ //printf("\n%02d\n", bmp->offset);\r
+ printf("aq=%02d ", aq);\r
+ printf("a[aq]=%02d ", a[aq]);\r
+ printf("a[aq]+aqpp=%02d ", a[aq]+aqpp);\r
+ printf("a[aq]-aqpp=%02d\n", a[aq]-aqpp);\r
+ //bmp->data[lq]=((bmp->data[lq]+bmp->offset)-a[aq]);\r
+//++++ bmp->data[lq]=a[aq]-aqpp;\r
+// printf("_%d ", bmp->data[lq]);\r
+ //if(lq > 0 && lq%bmp->width==0) printf("\n");\r
+ }\r
+ else if(bmp->data[lq]+bmp->offset < ((*i)/3)-aqpp)\r
+ {\r
+ if(bmp->data[lq]+bmp->offset >= aq)\r
+ {\r
+ bmp->data[lq]=(bmp->data[lq]+bmp->offset)-aqpp;//-((z-(*i))/3);\r
+ //printf("_%d ", bmp->data[lq]+bmp->offset)-aqpp-((z-(*i))/3);\r
+ }\r
+ else bmp->data[lq]+=(bmp->offset-aqpp);\r
+ }*/\r
+\r
+ //printf("%02d`", bmp->data[lq]);\r
+ //if(lq > 0 && lq%bmp->width==0) printf("\n");\r
+ }\r
+\r
+//printf(" aq=%02d\n", aq);\r
+//printf(" aa=%02d\n", aa);\r
+\r
+ //update the palette~\r
+ modexPalUpdate(bmp, &pp, aq, aqoffset);\r
+ (*i)=pp;\r
+\r
+ if(aq<aa){ pp=q; aq++; goto aqpee; }\r
+ }\r
+}\r
+\r
+void\r
+modexPalUpdate1(byte *p)\r
+{\r
+ int i;\r
+ //modexWaitBorder();\r
+ vga_wait_for_vsync();\r
+ outp(PAL_WRITE_REG, 0); /* start at the beginning of palette */\r
+ for(i=0; i<PAL_SIZE/2; i++)\r
+ {\r
+ outp(PAL_DATA_REG, p[i]);\r
+ }\r
+ //modexWaitBorder(); /* waits one retrace -- less flicker */\r
+ vga_wait_for_vsync();\r
+ for(; i<PAL_SIZE; i++)\r
+ {\r
+ outp(PAL_DATA_REG, p[(i)]);\r
+ }\r
+}\r
+\r
+void\r
+modexPalUpdate0(byte *p)\r
+{\r
+ int i;\r
+ //modexWaitBorder();\r
+ vga_wait_for_vsync();\r
+ outp(PAL_WRITE_REG, 0); /* start at the beginning of palette */\r
+ for(i=0; i<PAL_SIZE/2; i++)\r
+ {\r
+ outp(PAL_DATA_REG, rand());\r
+ }\r
+ //modexWaitBorder(); /* waits one retrace -- less flicker */\r
+ vga_wait_for_vsync();\r
+ for(; i<PAL_SIZE; i++)\r
+ {\r
+ outp(PAL_DATA_REG, rand());\r
+ }\r
+}\r
+\r
+void\r
+modexPalOverscan(word col)\r
+{\r
+ //modexWaitBorder();\r
+ vga_wait_for_vsync();\r
+ outp(PAL_WRITE_REG, 0); /* start at the beginning of palette */\r
+ outp(PAL_DATA_REG, col);\r
+}\r
+\r
+//color checker~\r
+//i want to make another vesion that checks the palette when the palette is being appened~\r
+void modexchkcolor(bitmap_t *bmp, word *q, word *a, word *aa, word *z, word *i/*, word *offset*/)\r
+{\r
+ byte *pal;\r
+ word zz=0;\r
+ pal = modexNewPal();\r
+ modexPalSave(pal);\r
+ //printf("q: %02d\n", (*q));\r
+ printf("chkcolor start~\n");\r
+ printf("1 (*z): %d\n", (*z)/3);\r
+ printf("1 (*i): %d\n", (*i)/3);\r
+// printf("1 offset of color in palette (*q): %d\n", (*q)/3);\r
+ printf("wwwwwwwwwwwwwwww\n");\r
+ //check palette for dups\r
+ for(; (*z)<PAL_SIZE; (*z)+=3)\r
+ {\r
+ //printf("\n z: %d\n", (*z));\r
+ //printf(" q: %d\n", (*q));\r
+ //printf(" z+q: %d\n\n", ((*z)+(*q)));\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
+// printf("\n%d [%02d][%02d][%02d]\n", (*z), pal[(*z)], pal[(*z)+1], pal[(*z)+2]);\r
+// printf("%d [%02d][%02d][%02d]\n\n", (*z)+3, pal[(*z)+3], pal[(*z)+4], pal[(*z)+5]);\r
+//0000 (*z)-=3;\r
+ break;\r
+ }\r
+ else for(zz=0; zz<(*q); zz+=3)\r
+ {\r
+ //printf("zz: %02d\n", zz/3);\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
+// printf("\nzq1:%d[%02d][%02d][%02d]\n", (zz+q), pal[(zz+q)], pal[(zz+q)+1], pal[(zz+q)+2]);\r
+// printf("zq2:%d[%02d][%02d][%02d]\n\n", (zz+q)+3, pal[(zz+q)+3], pal[(zz+q)+4], pal[(zz+q)+5]);\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
+// printf("\n\nwwwwwwwwwwwwwwww\n");\r
+// 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]);\r
+// 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]);\r
+// //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]);\r
+// printf(" z : %d [%02d][%02d][%02d] offset value~\n", (*z)/3, pal[(*z)], pal[(*z)+1], pal[(*z)+2]);\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
+ //printf("z+q: %d\n\n", ((*z)+(*q)));\r
+ a[(((*z)+(*q)))]=zz;\r
+ //}\r
+ (*aa)=(((*z)+(*q)));\r
+ printf("!! a[%02d]: %d\n", (((*z)+(*q))/3), zz/3);\r
+// printf("\n aa: %d\n\n", (*aa));\r
+// printf(" a[%02d]=(%02d) offset array i think the palette should be updated again~\n", ((*z)+(*q))/3, a[((*z)+(*q))/3]);\r
+// printf("wwwwwwwwwwwwwwww\n\n");\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
+ //printf("[%d]", (zz+q));\r
+ }\r
+ }\r
+ }\r
+ printf("wwwwwwwwwwwwwwww\n");\r
+ printf("2 (*z): %d\n", (*z)/3);\r
+ printf("2 (*i): %d\n", (*i)/3);\r
+// printf("2 offset of color in palette (*q): %d\n", (*q)/3);\r
+ printf("chkcolor end~\n");\r
+ free(pal);\r
+}\r
+\r
+void modexputPixel(page_t *page, int x, int y, byte color)\r
+{\r
+ word pageOff = (word) page->data;\r
+ /* Each address accesses four neighboring pixels, so set\r
+ Write Plane Enable according to which pixel we want\r
+ to modify. The plane is determined by the two least\r
+ significant bits of the x-coordinate: */\r
+ modexSelectPlane(PLANE(x));\r
+ //outp(SC_INDEX, 0x02);\r
+ //outp(SC_DATA, 0x01 << (x & 3));\r
+\r
+ /* The offset of the pixel into the video segment is\r
+ offset = (width * y + x) / 4, and write the given\r
+ color to the plane we selected above. Heed the active\r
+ page start selection. */\r
+ VGA[(unsigned)((page->width/4) * y) + (x / 4) + pageOff] = color;\r
+\r
+}\r
+\r
+byte modexgetPixel(page_t *page, int x, int y)\r
+{\r
+ word pageOff = (word) page->data;\r
+ /* Select the plane from which we must read the pixel color: */\r
+ outpw(GC_INDEX, 0x04);\r
+ outpw(GC_INDEX+1, x & 3);\r
+\r
+ return VGA[(unsigned)((page->width/4) * y) + (x / 4) + pageOff];\r
+\r
+}\r
+\r
+void modexprint(page_t *page, word x, word y, word t, word col, word bgcol, const byte *str)\r
+{\r
+ word s, o, w;\r
+ word x_draw = x;\r
+ word addr = (word) romFontsData.l;\r
+ word addrq = (page->width/4) * y + (x / 4) + ((word)page->data);\r
+ word addrr = addrq;\r
+ byte c;\r
+\r
+ s=romFonts[t].seg;\r
+ o=romFonts[t].off;\r
+ w=romFonts[t].charSize;\r
+ romFontsData.chw=0;\r
+\r
+ for(; *str != '\0'; str++)\r
+ {\r
+ c = (*str);\r
+ if(c=='\n')\r
+ {\r
+ x = x_draw;\r
+ romFontsData.chw = 0;\r
+ addrq += (page->width / 4) * 8;\r
+ addrr = addrq;\r
+ y += 8;\r
+ continue;\r
+ }\r
+\r
+ // load the character into romFontsData.l\r
+ // no need for inline assembly!\r
+ // NTS: It might even be faster to just let the modexDrawChar point directly at ROM font than to copy per char! --J.C.\r
+ _fmemcpy(romFontsData.l,MK_FP(s,o+(w*c))/*ROM font location*/,w/*char size*/);\r
+ modexDrawChar(page, x_draw/*for mode X planar use*/, t, col, bgcol, addrr);\r
+ x_draw += 8; /* track X for edge of screen */\r
+ addrr += 2; /* move 8 pixels over (2 x 4 planar pixels per byte) */\r
+ }\r
+}\r
+\r
+void modexprintbig(page_t *page, word x, word y, word t, word col, word bgcol, const byte *str)\r
+{\r
+ word i, s, o, w, j, xp;\r
+ byte l[1024];\r
+ word addr = (word) l;\r
+ word chw=0;\r
+ byte c;\r
+\r
+ switch(t)\r
+ {\r
+ case 0:\r
+ w=14;\r
+ break;\r
+ case 1:\r
+ w=8;\r
+ break;\r
+ case 2:\r
+ w=8;\r
+ break;\r
+ case 3:\r
+ w=16;\r
+ break;\r
+ default:\r
+ t=3;\r
+ w=16;\r
+ break;\r
+ }\r
+\r
+ s=romFonts[t].seg;\r
+ o=romFonts[t].off;\r
+\r
+ for(; *str != '\0'; str++)\r
+ {\r
+ c = (*str);\r
+ if((c=='\n'/* || c=="\\r
+"*/)/* || chw>=page->width*/)\r
+ {\r
+ chw=0;\r
+ y+=w;\r
+ continue;\r
+ }\r
+ //load the letter 'A'\r
+ __asm {\r
+ PUSHF\r
+ PUSH ES\r
+ PUSH AX\r
+ PUSH BX\r
+ PUSH CX\r
+ PUSH DX\r
+ PUSH SI\r
+ PUSH DI\r
+\r
+ MOV DI, addr\r
+ MOV SI, o\r
+ MOV ES, s\r
+ SUB AH, AH\r
+ MOV AL, c ; the letter\r
+ MOV CX, w\r
+ MUL CX\r
+ ADD SI, AX ;the address of charcter\r
+ L1: MOV AX, ES:SI\r
+ MOV DS:DI, AX\r
+ INC SI\r
+ INC DI\r
+ DEC CX\r
+ JNZ L1\r
+\r
+ POP DI\r
+ POP SI\r
+ POP DX\r
+ POP CX\r
+ POP BX\r
+ POP AX\r
+ POP ES\r
+ POPF\r
+ }\r
+\r
+ for(i=0; i<w; i++)\r
+ {\r
+ j=1<<8;\r
+ xp=0;\r
+ while(j)\r
+ {\r
+ //modexputPixel(page, x+xp+chw, y+i, l[i] & j ? col:bgcol);\r
+ modexClearRegion(page, (x+xp+chw)*8, (y+i)*8, 8, 8, l[i] & j ? col:bgcol);\r
+ xp++;\r
+ j>>=1;\r
+ }\r
+ }\r
+ chw += xp;\r
+ }\r
+}\r
+\r
+/* palette dump on display! */\r
+void modexpdump(page_t *pee)\r
+{\r
+ int mult=(QUADWH);\r
+ int palq=(mult)*TILEWH;\r
+ int palcol=0;\r
+ int palx, paly;\r
+ for(paly=0; paly<palq; paly+=mult){\r
+ for(palx=0; palx<palq; palx+=mult){\r
+ modexClearRegion(pee, palx+TILEWH, paly+TILEWH, mult, mult, palcol);\r
+ palcol++;\r
+ }\r
+ }\r
+}\r
+\r
+/////////////////////////////////////////////////////////////////////////////\r
+// //\r
+// cls() - This clears the screen to the specified color, on the VGA or on //\r
+// the Virtual screen. //\r
+// //\r
+/////////////////////////////////////////////////////////////////////////////\r
+void modexcls(page_t *page, byte color, byte *Where)\r
+{\r
+ //modexClearRegion(page, 0, 0, page->width, page->height, color);\r
+ /* set map mask to all 4 planes */\r
+ outpw(SC_INDEX, 0xff02);\r
+ //_fmemset(VGA, color, 16000);\r
+ _fmemset(Where, color, page->width*(page->height)/4);\r
+}\r
+\r
+void\r
+modexWaitBorder() {\r
+ while(inp(INPUT_STATUS_1) & 8) {\r
+ // spin\r
+ }\r
+\r
+ while(!(inp(INPUT_STATUS_1) & 8)) {\r
+ //spin\r
+ }\r
+}\r
+\r
+void bios_cls() {\r
+ VGA_ALPHA_PTR ap;\r
+ VGA_RAM_PTR rp;\r
+ unsigned char m;\r
+\r
+ m = int10_getmode();\r
+ if ((rp=vga_state.vga_graphics_ram) != NULL && !(m <= 3 || m == 7)) {\r
+ unsigned int i,im;\r
+\r
+ im = (FP_SEG(vga_state.vga_graphics_ram_fence) - FP_SEG(vga_state.vga_graphics_ram));\r
+ if (im > 0xFFE) im = 0xFFE;\r
+ im <<= 4;\r
+ for (i=0;i < im;i++) vga_state.vga_graphics_ram[i] = 0;\r
+ }\r
+ else if ((ap=vga_state.vga_alpha_ram) != NULL) {\r
+ unsigned int i,im;\r
+\r
+ im = (FP_SEG(vga_state.vga_alpha_ram_fence) - FP_SEG(vga_state.vga_alpha_ram));\r
+ if (im > 0x7FE) im = 0x7FE;\r
+ im <<= 4 - 1; /* because ptr is type uint16_t */\r
+ for (i=0;i < im;i++) vga_state.vga_alpha_ram[i] = 0x0720;\r
+ }\r
+ else {\r
+ printf("WARNING: bios cls no ptr\n");\r
+ }\r
+}\r
+\r
+void modexprintmeminfo(video_t *v)\r
+{\r
+ byte i;\r
+ printf("video memory remaining: %u\n", v->vmem_remain);\r
+ printf("page ");\r
+ for(i=0; i<v->num_of_pages;i++)\r
+ {\r
+ printf(" [%u]=", i);\r
+ printf("(%Fp)", (v->page[i].data));\r
+ printf(" size=%u", v->page[i].pagesize);\r
+ printf(" sw=%lu sh=%lu ", (unsigned long)v->page[i].sw, (unsigned long)v->page[i].sh);\r
+ printf(" width=%lu height=%lu", (unsigned long)v->page[i].width, (unsigned long)v->page[i].height);\r
+ printf("\n");\r
+ }\r
+}\r
+\r
+void vga_write_crtc_mode_(struct vga_mode_params *p,unsigned int flags) {\r
+ unsigned char c,c2,syncreset=0;\r
+\r
+ if (!(vga_state.vga_flags & VGA_IS_VGA))\r
+ return;\r
+\r
+ /* sync disable unless told not to */\r
+ if (!(flags & VGA_WRITE_CRTC_MODE_NO_CLEAR_SYNC)) {\r
+ c = vga_read_CRTC(0x17);\r
+ vga_write_CRTC(0x17,c&0x7F);\r
+ }\r
+\r
+ c = inp(0x3CC); /* misc out reg */\r
+ /* if changing the clock select bits then we need to do a reset of the sequencer */\r
+ if (p->clock_select != ((c >> 2) & 3)) syncreset=1;\r
+ /* proceed to change bits */\r
+ c &= ~((3 << 2) | (1 << 6) | (1 << 7));\r
+ c |= (p->clock_select&3) << 2;\r
+ c |= p->hsync_neg << 6;\r
+ c |= p->vsync_neg << 7;\r
+ if (syncreset) vga_write_sequencer(0,0x01/*SR=0 AR=1 start synchronous reset*/);\r
+ outp(0x3C2,c); /* misc out */\r
+ if (syncreset) vga_write_sequencer(0,0x03/*SR=1 AR=1 restart sequencer*/);\r
+\r
+ vga_write_sequencer(1,\r
+ (p->shift_load_rate << 2) |\r
+ (p->shift4_enable << 4) |\r
+ ((p->clock9 ^ 1) << 0) |\r
+ (p->clock_div2 << 3));\r
+\r
+ c = 0; /* use 'c' as overflow register */\r
+ c2 = vga_read_CRTC(0x09); /* read max scan line */\r
+ c2 &= ~(1 << 5); /* mask out start vertical blank bit 9 */\r
+ vga_write_CRTC(0x11, /* NTS: we leave bit 7 (protect) == 0 so we can program regs 0-7 in this routine */\r
+ (((p->refresh_cycles_per_scanline == 5) ? 1 : 0) << 6) |\r
+ (p->vertical_end_retrace & 0xF));\r
+ vga_write_CRTC(0x06,(p->vertical_total - 2));\r
+ c |= (((p->vertical_total - 2) >> 8) & 1) << 0;\r
+ c |= (((p->vertical_total - 2) >> 9) & 1) << 5;\r
+ vga_write_CRTC(0x10,p->vertical_start_retrace);\r
+ c |= ((p->vertical_start_retrace >> 8) & 1) << 2;\r
+ c |= ((p->vertical_start_retrace >> 9) & 1) << 7;\r
+ vga_write_CRTC(0x12,p->vertical_display_end - 1);\r
+ c |= (((p->vertical_display_end - 1) >> 8) & 1) << 1;\r
+ c |= (((p->vertical_display_end - 1) >> 9) & 1) << 6;\r
+ vga_write_CRTC(0x15,p->vertical_blank_start - 1);\r
+ c |= (((p->vertical_blank_start - 1) >> 8) & 1) << 3;\r
+ c2|= (((p->vertical_blank_start - 1) >> 9) & 1) << 5;\r
+\r
+ /* NTS: this field is 7 bits wide but "Some SVGA chipsets use all 8" as VGADOC says. */\r
+ /* writing it in this way resolves the partial/full screen blanking problems with Intel 855/915/945 chipsets */\r
+ vga_write_CRTC(0x16,p->vertical_blank_end - 1);\r
+\r
+ vga_write_CRTC(0x14, /* NTS we write "underline location == 0" */\r
+ (p->dword_mode << 6) |\r
+ (p->inc_mem_addr_only_every_4th << 5));\r
+ vga_write_CRTC(0x07,c); /* overflow reg */\r
+\r
+ c2 &= ~(0x9F); /* mask out SD + Max scanline */\r
+ c2 |= (p->scan_double << 7);\r
+ c2 |= (p->max_scanline - 1) & 0x1F;\r
+ vga_write_CRTC(0x09,c2);\r
+ vga_write_CRTC(0x13,p->offset);\r
+ vga_write_CRTC(0,(p->horizontal_total - 5));\r
+ vga_write_CRTC(1,(p->horizontal_display_end - 1));\r
+ vga_write_CRTC(2,p->horizontal_blank_start - 1);\r
+ vga_write_CRTC(3,((p->horizontal_blank_end - 1) & 0x1F) | (p->horizontal_start_delay_after_total << 5) | 0x80);\r
+ vga_write_CRTC(4,p->horizontal_start_retrace);\r
+ vga_write_CRTC(5,((((p->horizontal_blank_end - 1) >> 5) & 1) << 7) | (p->horizontal_start_delay_after_retrace << 5) |\r
+ (p->horizontal_end_retrace & 0x1F));\r
+\r
+ /* finish by writing reg 0x17 which also enables sync */\r
+ vga_write_CRTC(0x17,\r
+ (p->sync_enable << 7) |\r
+ (vga_read_CRTC(0x17) & 0x10) | /* NTS: one undocumented bit, perhaps best not to change it */\r
+ ((p->word_mode^1) << 6) |\r
+ (p->address_wrap_select << 5) |\r
+ (p->memaddr_div2 << 3) |\r
+ (p->scanline_div2 << 2) |\r
+ ((p->map14 ^ 1) << 1) |\r
+ ((p->map13 ^ 1) << 0));\r
+\r
+ /* reinforce write protect */\r
+ c = vga_read_CRTC(0x11);\r
+ vga_write_CRTC(0x11,c|0x80);\r
+}\r
+\r
+void vga_read_crtc_mode_(struct vga_mode_params *p) {\r
+ unsigned char c,c2;\r
+\r
+ if (!(vga_state.vga_flags & VGA_IS_VGA))\r
+ return;\r
+\r
+ c = inp(0x3CC); /* misc out reg */\r
+ p->clock_select = (c >> 2) & 3;\r
+ p->hsync_neg = (c >> 6) & 1;\r
+ p->vsync_neg = (c >> 7) & 1;\r
+\r
+ c = vga_read_sequencer(1);\r
+ p->clock9 = (c & 1) ^ 1;\r
+ p->clock_div2 = (c >> 3) & 1;\r
+ p->shift4_enable = (c >> 4) & 1;\r
+ p->shift_load_rate = (c >> 2) & 1;\r
+\r
+ p->sync_enable = (vga_read_CRTC(0x17) >> 7) & 1;\r
+ p->word_mode = ((vga_read_CRTC(0x17) >> 6) & 1) ^ 1;\r
+ p->address_wrap_select = (vga_read_CRTC(0x17) >> 5) & 1;\r
+ p->memaddr_div2 = (vga_read_CRTC(0x17) >> 3) & 1;\r
+ p->scanline_div2 = (vga_read_CRTC(0x17) >> 2) & 1;\r
+ p->map14 = ((vga_read_CRTC(0x17) >> 1) & 1) ^ 1;\r
+ p->map13 = ((vga_read_CRTC(0x17) >> 0) & 1) ^ 1;\r
+\r
+ p->dword_mode = (vga_read_CRTC(0x14) >> 6) & 1;\r
+ p->horizontal_total = vga_read_CRTC(0) + 5;\r
+ p->horizontal_display_end = vga_read_CRTC(1);// + 1;\r
+ p->horizontal_blank_start = vga_read_CRTC(2) + 1;\r
+ p->horizontal_blank_end = ((vga_read_CRTC(3) & 0x1F) | ((vga_read_CRTC(5) >> 7) << 5) |\r
+ ((p->horizontal_blank_start - 1) & (~0x3F))) + 1;\r
+ if (p->horizontal_blank_start >= p->horizontal_blank_end)\r
+ p->horizontal_blank_end += 0x40;\r
+ p->horizontal_start_retrace = vga_read_CRTC(4);\r
+ p->horizontal_end_retrace = (vga_read_CRTC(5) & 0x1F) |\r
+ (p->horizontal_start_retrace & (~0x1F));\r
+ if ((p->horizontal_start_retrace&0x1F) >= (p->horizontal_end_retrace&0x1F))\r
+ p->horizontal_end_retrace += 0x20;\r
+ p->horizontal_start_delay_after_total = (vga_read_CRTC(3) >> 5) & 3;\r
+ p->horizontal_start_delay_after_retrace = (vga_read_CRTC(5) >> 5) & 3;\r
+\r
+ c = vga_read_CRTC(7); /* c = overflow reg */\r
+ c2 = vga_read_CRTC(9);\r
+\r
+ p->scan_double = (c2 >> 7) & 1;\r
+ p->max_scanline = (c2 & 0x1F) + 1;\r
+ p->offset = vga_read_CRTC(0x13);\r
+ p->vertical_total = (vga_read_CRTC(6) | ((c & 1) << 8) | (((c >> 5) & 1) << 9)) + 2;\r
+ p->vertical_start_retrace = (vga_read_CRTC(0x10) | (((c >> 2) & 1) << 8) | (((c >> 7) & 1) << 9));\r
+ p->vertical_end_retrace = (vga_read_CRTC(0x11) & 0xF) |\r
+ (p->vertical_start_retrace & (~0xF));\r
+ if ((p->vertical_start_retrace&0xF) >= (p->vertical_end_retrace&0xF))\r
+ p->vertical_end_retrace += 0x10;\r
+ p->refresh_cycles_per_scanline = ((vga_read_CRTC(0x11) >> 6) & 1) ? 5 : 3;\r
+ p->inc_mem_addr_only_every_4th = (vga_read_CRTC(0x14) >> 5) & 1;\r
+ p->vertical_display_end = ((vga_read_CRTC(0x12) | (((c >> 1) & 1) << 8) | (((c >> 6) & 1) << 9))) + 1;\r
+ p->vertical_blank_start = ((vga_read_CRTC(0x15) | (((c >> 3) & 1) << 8) | (((c2 >> 5) & 1) << 9))) + 1;\r
+ p->vertical_blank_end = ((vga_read_CRTC(0x16) & 0x7F) | ((p->vertical_blank_start - 1) & (~0x7F))) + 1;\r
+ if (p->vertical_blank_start >= p->vertical_blank_end)\r
+ p->vertical_blank_end += 0x80;\r
+}\r