X-Git-Url: http://git.osdn.net/view?a=blobdiff_plain;ds=sidebyside;f=src%2Flib%2Fmodex16.c;h=ea61e718c3cc916a476a081539b8818235bd4e1b;hb=3b3532b173704f75e3079dd5d4effea885ab493d;hp=e346ab3e6204f3167614ca22a067e3f086460ea5;hpb=064eedc8b51015c259233375ec7744e2bf20d65c;p=proj16%2F16.git

diff --git a/src/lib/modex16.c b/src/lib/modex16.c
old mode 100644
new mode 100755
index e346ab3e..ea61e718
--- a/src/lib/modex16.c
+++ b/src/lib/modex16.c
@@ -1,920 +1,1311 @@
-#include <dos.h>
-#include <string.h>
-#include <mem.h>
-#include <conio.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include "src\lib\modex16.h"
-
-
-byte far* VGA=(byte far*) 0xA0000000; 	/* this points to video memory. */
-
-static void fadePalette(sbyte fade, sbyte start, word iter, byte *palette);
-static byte tmppal[PAL_SIZE];
-
-static void
-vgaSetMode(byte mode)
-{
-  union REGS regs;
-
-  regs.h.ah = SET_MODE;
-  regs.h.al = mode;
-  int86(VIDEO_INT, &regs, &regs);
-}
-
-
-/* -========================= Entry  Points ==========================- */
-void
-modexEnter() {
-    word i;
-    dword far*ptr=(dword far*)VGA;      /* used for faster screen clearing */
-    word CRTParms[] = {
-	0x0d06,		/* vertical total */
-	0x3e07,		/* overflow (bit 8 of vertical counts) */
-	0x4109,		/* cell height (2 to double-scan */
-	0xea10,		/* v sync start */
-	0xac11,		/* v sync end and protect cr0-cr7 */
-	0xdf12,		/* vertical displayed */
-	0x0014,		/* turn off dword mode */
-	0xe715,		/* v blank start */
-	0x0616,		/* v blank end */
-	0xe317		/* turn on byte mode */
-    };
-    int CRTParmCount = sizeof(CRTParms) / sizeof(CRTParms[0]);
-
-    /* TODO save current video mode and palette */
-    vgaSetMode(VGA_256_COLOR_MODE);
-
-    /* disable chain4 mode */
-    outpw(SC_INDEX, 0x0604);
-
-    /* synchronous reset while setting Misc Output */
-    outpw(SC_INDEX, 0x0100);
-
-    /* select 25 MHz dot clock & 60 Hz scanning rate */
-    outp(MISC_OUTPUT, 0xe3);
-
-    /* undo reset (restart sequencer) */
-    outpw(SC_INDEX, 0x0300);
-
-    /* reprogram the CRT controller */
-    outp(CRTC_INDEX, 0x11); /* VSync End reg contains register write prot */
-    outp(CRTC_DATA, 0x7f);  /* get current write protect on varios regs */
-
-    /* send the CRTParms */
-    for(i=0; i<CRTParmCount; i++) {
-	outpw(CRTC_INDEX, CRTParms[i]);
-    }
-
-    /* clear video memory */
-    outpw(SC_INDEX, 0x0f02);
-    for(i=0; i<0x8000; i++) {
-	ptr[i] = 0x0000;
-    }
-}
-
-
-void
-modexLeave() {
-    /* TODO restore original mode and palette */
-    vgaSetMode(TEXT_MODE);
-}
-
-
-page_t
-modexDefaultPage() {
-    page_t page;
-
-    /* default page values */
-    page.data = VGA;
-    page.dx = 0;
-    page.dy = 0;
-    page.width = SCREEN_WIDTH;
-    page.height = SCREEN_HEIGHT;
-
-    return page;
-}
-
-/* returns the next page in contiguous memory
- * the next page will be the same size as p, by default
- */
-page_t
-modexNextPage(page_t *p) {
-    page_t result;
-
-    result.data = p->data + (p->width/4)*p->height;  /* compute the offset */
-    result.dx = 0;
-    result.dy = 0;
-    result.width = p->width;
-    result.height = p->height;
-
-    return result;
-}
-
-
-void
-modexShowPage(page_t *page) {
-    word high_address;
-    word low_address;
-    word offset;
-    byte crtcOffset;
-
-    /* calculate offset */
-    offset = (word) page->data;
-    offset += page->dy * (page->width >> 2 );
-    offset += page->dx >> 2;
-
-    /* calculate crtcOffset according to virtual width */
-    crtcOffset = page->width >> 3;
-
-    high_address = HIGH_ADDRESS | (offset & 0xff00);
-    low_address  = LOW_ADDRESS  | (offset << 8);
-
-    /* wait for appropriate timing and then program CRTC */
-    while ((inp(INPUT_STATUS_1) & DISPLAY_ENABLE));
-    outpw(CRTC_INDEX, high_address);
-    outpw(CRTC_INDEX, low_address);
-    outp(CRTC_INDEX, 0x13);
-    outp(CRTC_DATA, crtcOffset);
-
-    /*  wait for one retrace */
-    while (!(inp(INPUT_STATUS_1) & VRETRACE)); 
-
-    /* do PEL panning here */
-    outp(AC_INDEX, 0x33);
-    outp(AC_INDEX, (page->dx & 0x03) << 1);
-}
-
-
-void
-modexPanPage(page_t *page, int dx, int dy) {
-    page->dx = dx;
-    page->dy = dy;
-}
-
-
-void
-modexSelectPlane(byte plane) {
-    outp(SC_INDEX, MAP_MASK);          /* select plane */
-    outp(SC_DATA,  plane);
-}
-
-
-void
-modexClearRegion(page_t *page, int x, int y, int w, int h, byte  color) {
-    word pageOff = (word) page->data;
-    word xoff=x/4;       /* xoffset that begins each row */
-    word scanCount=w/4;  /* number of iterations per row (excluding right clip)*/
-    word poffset = pageOff + y*(page->width/4) + xoff; /* starting offset */
-    word nextRow = page->width/4-scanCount-1;  /* loc of next row */
-    byte lclip[] = {0x0f, 0x0e, 0x0c, 0x08};  /* clips for rectangles not on 4s */
-    byte rclip[] = {0x00, 0x01, 0x03, 0x07};
-    byte left = lclip[x&0x03];
-    byte right = rclip[(x+w)&0x03];
-
-    /* handle the case which requires an extra group */
-    if((x & 0x03) && !((x+w) & 0x03)) {
-      right=0x0f;
-    }
-
-    __asm {
-		MOV AX, SCREEN_SEG      ; go to the VGA memory
-		MOV ES, AX
-		MOV DI, poffset		; go to the first pixel
-		MOV DX, SC_INDEX	; point to the map mask
-		MOV AL, MAP_MASK
-		OUT DX, AL
-		INC DX
-		MOV AL, color		; get ready to write colors
-	SCAN_START:
-		MOV CX, scanCount	; count the line
-		MOV BL, AL		; remember color
-		MOV AL, left		; do the left clip
-		OUT DX, AL		; set the left clip
-		MOV AL, BL		; restore color
-		STOSB			; write the color
-		DEC CX
-		JZ SCAN_DONE		; handle 1 group stuff
-
-		;-- write the main body of the scanline
-		MOV BL, AL	  	; remember color
-		MOV AL, 0x0f		; write to all pixels
-		OUT DX, AL
-		MOV AL, BL		; restore color
-		REP STOSB		; write the color
-	SCAN_DONE:
-		MOV BL, AL		; remeber color
-		MOV AL, right
-		OUT DX, AL		; do the right clip
-		MOV AL, BL		; restore color
-		STOSB			; write pixel
-		ADD DI, nextRow		; go to the next row
-		DEC h
-		JNZ SCAN_START
-    }
-}
-
-
-void
-modexDrawBmp(page_t *page, int x, int y, bitmap_t *bmp) {
-    /* draw the region (the entire freakin bitmap) */
-    modexDrawBmpRegion(page, x, y, 0, 0, bmp->width, bmp->height, bmp);
-}
-
-
-void
-modexDrawBmpRegion(page_t *page, int x, int y,
-                   int rx, int ry, int rw, int rh, bitmap_t *bmp) {
-    word poffset = (word) page->data  + y*(page->width/4) + x/4;
-    byte *data = bmp->data;//+bmp->offset;
-    word bmpOffset = (word) data + ry * bmp->width + rx;
-    word width = rw;
-    word height = rh;
-    byte plane = 1 << ((byte) x & 0x03);
-    word scanCount = width/4 + (width%4 ? 1 :0);
-    word nextPageRow = page->width/4 - scanCount;
-    word nextBmpRow = (word) bmp->width - width;
-    word rowCounter;
-    byte planeCounter = 4;
-
-	//code is a bit slow here
-    __asm {
-		MOV AX, SCREEN_SEG      ; go to the VGA memory
-		MOV ES, AX
-
-		MOV DX, SC_INDEX	; point at the map mask register
-		MOV AL, MAP_MASK	;
-		OUT DX, AL		;
-
-	PLANE_LOOP:
-		MOV DX, SC_DATA		; select the current plane
-		MOV AL, plane		;
-		OUT DX, AL		;
-
-		;-- begin plane painting
-		MOV AX, height		; start the row counter
-		MOV rowCounter, AX	; 
-		MOV DI, poffset		; go to the first pixel
-		MOV SI, bmpOffset	; go to the bmp pixel
-	ROW_LOOP:
-		MOV CX, width		; count the columns
-	SCAN_LOOP:
-		MOVSB			; copy the pixel
-		SUB CX, 3		; we skip the next 3
-		ADD SI, 3		; skip the bmp pixels
-		LOOP SCAN_LOOP		; finish the scan
-
-		MOV AX, nextPageRow
-		ADD DI, AX		; go to the next row on screen
-		MOV AX, nextBmpRow
-		ADD SI, AX		; go to the next row on bmp
-
-		DEC rowCounter
-		JNZ ROW_LOOP		; do all the rows
-		;-- end plane painting
-
-		MOV AL, plane		; advance to the next plane
-		SHL AL, 1		;
-		AND AL, 0x0f		; mask the plane properly
-		MOV plane, AL		; store the plane
-
-		INC bmpOffset		; start bmp at the right spot
-
-		DEC planeCounter
-		JNZ PLANE_LOOP		; do all 4 planes
-    }
-}
-
-
-void
-modexDrawPlanarBuf(page_t *page, int x, int y, planar_buf_t *bmp) {
-    /* TODO - adapt from test code */
-	int plane;
-	for(plane=0; plane < 4; plane++)
-	{
-		//fack
-	}
-}
-
-
-void
-modexDrawSprite(page_t *page, int x, int y, bitmap_t *bmp) {
-    /* draw the whole sprite */
-    modexDrawSpriteRegion(page, x, y, 0, 0, bmp->width, bmp->height, bmp);
-}
-
-void
-modexDrawSpriteRegion(page_t *page, int x, int y,
-		      int rx, int ry, int rw, int rh, bitmap_t *bmp) {
-    word poffset = (word)page->data + y*(page->width/4) + x/4;
-    byte *data = bmp->data;//+bmp->offset;
-    word bmpOffset = (word) data + ry * bmp->width + rx;
-    word width = rw;
-    word height = rh;
-    byte plane = 1 << ((byte) x & 0x03);
-    word scanCount = width/4 + (width%4 ? 1 :0);
-    word nextPageRow = page->width/4 - scanCount;
-    word nextBmpRow = (word) bmp->width - width;
-    word rowCounter;
-    byte planeCounter = 4;
-
-    __asm {
-		MOV AX, SCREEN_SEG      ; go to the VGA memory
-		MOV ES, AX
-
-		MOV DX, SC_INDEX	; point at the map mask register
-		MOV AL, MAP_MASK	;
-		OUT DX, AL		;
-
-	PLANE_LOOP:
-		MOV DX, SC_DATA		; select the current plane
-		MOV AL, plane		;
-		OUT DX, AL		;
-
-		;-- begin plane painting
-		MOV AX, height		; start the row counter
-		MOV rowCounter, AX	; 
-		MOV DI, poffset		; go to the first pixel
-		MOV SI, bmpOffset	; go to the bmp pixel
-	ROW_LOOP:
-		MOV CX, width		; count the columns
-	SCAN_LOOP:
-		LODSB
-		DEC SI
-		CMP AL, 0
-		JNE DRAW_PIXEL		; draw non-zero pixels
-
-		INC DI			; skip the transparent pixel
-		ADD SI, 1
-		JMP NEXT_PIXEL
-	DRAW_PIXEL:
-		MOVSB			; copy the pixel
-	NEXT_PIXEL:
-		SUB CX, 3		; we skip the next 3
-		ADD SI, 3		; skip the bmp pixels
-		LOOP SCAN_LOOP		; finish the scan
-
-		MOV AX, nextPageRow
-		ADD DI, AX		; go to the next row on screen
-		MOV AX, nextBmpRow
-		ADD SI, AX		; go to the next row on bmp
-
-		DEC rowCounter
-		JNZ ROW_LOOP		; do all the rows
-		;-- end plane painting
-
-		MOV AL, plane		; advance to the next plane
-		SHL AL, 1		;
-		AND AL, 0x0f		; mask the plane properly
-		MOV plane, AL		; store the plane
-
-		INC bmpOffset		; start bmp at the right spot
-
-		DEC planeCounter
-		JNZ PLANE_LOOP		; do all 4 planes
-    }
-}
-
-
-/* copy a region of video memory from one page to another.
- * It assumes that the left edge of the tile is the same on both
- * regions and the memory areas do not overlap.
- */
-void
-modexCopyPageRegion(page_t *dest, page_t *src,
-		    word sx, word sy,
-		    word dx, word dy,
-		    word width, word height)
-{
-    word doffset = (word)dest->data + dy*(dest->width/4) + dx/4;
-    word soffset = (word)src->data + sy*(src->width/4) + sx/4;
-    word scans   = width/4;
-    word nextSrcRow = src->width/4 - scans - 1;
-    word nextDestRow = dest->width/4 - scans - 1;
-    byte lclip[] = {0x0f, 0x0e, 0x0c, 0x08};  /* clips for rectangles not on 4s */
-    byte rclip[] = {0x0f, 0x01, 0x03, 0x07};
-    byte left = lclip[sx&0x03];
-    byte right = rclip[(sx+width)&0x03];
-
-    __asm {
-		MOV AX, SCREEN_SEG	; work in the vga space
-		MOV ES, AX		;
-		MOV DI, doffset		;
-		MOV SI, soffset		;
-
-		MOV DX, GC_INDEX	; turn off cpu bits
-		MOV AX, 0008h		;
-		OUT DX, AX
-
-		MOV AX, SC_INDEX	; point to the mask register
-		MOV DX, AX		;
-		MOV AL, MAP_MASK	;
-		OUT DX, AL		;
-		INC DX			;
-
-	ROW_START:
-		PUSH DS
-		MOV AX, ES
-		MOV DS, AX
-		MOV CX, scans		; the number of latches
-
-		MOV AL, left		; do the left column
-		OUT DX, AL		;
-		MOVSB			;
-		DEC CX			;
-
-		MOV AL, 0fh		; do the inner columns
-		OUT DX, AL
-		REP MOVSB		; copy the pixels
-
-		MOV AL, right		; do the right column
-		OUT DX, AL
-		MOVSB
-		POP DS
-
-		MOV AX, SI		; go the start of the next row
-		ADD AX, nextSrcRow	;
-		MOV SI, AX		;
-		MOV AX, DI		;
-		ADD AX, nextDestRow	;
-		MOV DI, AX		;
-
-		DEC height		; do the rest of the actions
-		JNZ ROW_START		;
-
-		MOV DX, GC_INDEX+1	; go back to CPU data
-		MOV AL, 0ffh		; none from latches
-		OUT DX, AL		;
-    }
-}
-
-
-/* fade and flash */
-void
-modexFadeOn(word fade, byte *palette) {
-    fadePalette(-fade, 64, 64/fade+1, palette);
-}
-
-
-void
-modexFadeOff(word fade, byte *palette) {
-    fadePalette(fade, 0, 64/fade+1, palette);
-}
-
-
-void
-modexFlashOn(word fade, byte *palette) {
-    fadePalette(fade, -64, 64/fade+1, palette);
-}
-
-
-void
-modexFlashOff(word fade, byte *palette) {
-    fadePalette(-fade, 0, 64/fade+1, palette);
-}
-
-
-static void
-fadePalette(sbyte fade, sbyte start, word iter, byte *palette) {
-    word i;
-    byte dim = start;
-
-    /* handle the case where we just update */
-    if(iter == 0) {
-	modexPalUpdate2(palette);
-	return;
-    }
-
-    while(iter > 0) {  /* FadeLoop */
-	for(i=0; i<PAL_SIZE; i++) { /* loadpal_loop */
-	    tmppal[i] = palette[i] - dim;
-	    if(tmppal[i] > 127) {
-		tmppal[i] = 0;
-	    } else if(tmppal[i] > 63) {
-		tmppal[i] = 63;
-	    }
-	}
-        modexPalUpdate2(tmppal);
-	iter--;
-	dim += fade;
-    }
-}
-
-
-/* save and load */
-void
-modexPalSave(byte *palette) {
-    int  i;
-
-    outp(PAL_READ_REG, 0);	/* start at palette entry 0 */
-    for(i=0; i<PAL_SIZE; i++) {
-	palette[i] = inp(PAL_DATA_REG); /* read the palette data */
-    }
-}
-
-
-byte *
-modexNewPal() {
-    byte *ptr;
-    ptr = malloc(PAL_SIZE);
-
-    /* handle errors */
-    if(!ptr) {
-	printf("Could not allocate palette.\n");
-	exit(-1);
-    }
-
-    return ptr;
-}
-
-
-void
-modexLoadPalFile(byte *filename, byte **palette) {
-    FILE *file;
-    byte *ptr;
-
-    /* free the palette if it exists */
-    if(*palette) {
-	free(*palette);
-    }
-
-    /* allocate the new palette */
-    *palette = modexNewPal();
-
-    /* open the file */
-    file = fopen(filename, "rb");
-    if(!file) {
-	printf("Could not open palette file: %s\n", filename);
-	exit(-2);
-    }
-
-    /* read the file */
-    ptr = *palette;
-    while(!feof(file)) {
-	*ptr++ = fgetc(file);
-    }
-
-    fclose(file);
-}
-
-
-void
-modexSavePalFile(char *filename, byte *pal) {
-    unsigned int i;
-    FILE *file;
-
-    /* open the file for writing */
-    file = fopen(filename, "wb");
-    if(!file) {
-	printf("Could not open %s for writing\n", filename);
-	exit(-2);
-    }
-
-    /* write the data to the file */
-    fwrite(pal, 1, PAL_SIZE, file);
-    fclose(file);
-}
-
-
-/* blanking */
-void
-modexPalBlack() {
-    fadePalette(-1, 64, 1, tmppal);
-}
-
-
-void
-modexPalWhite() {
-    fadePalette(-1, -64, 1, tmppal);
-}
-
-
-/* utility */
-void
-modexPalUpdate(bitmap_t *bmp, word *i, word qp, word qr)
-{
-	byte *p = bmp->palette;
-	word w=0;
-	word q=0;
-	word qq=0;
-	word *qqqq;
-	static word a[256] = { 0 };
-	word z=0,aq=0,aa=0;
-	word pp=0,aqpp=0,spee=0,ppee=0;
-
-//	if(qp>0) printf("(*i)=%02d\n", (*i));
-	modexWaitBorder();
-	if((*i)==0) outp(PAL_WRITE_REG, 0);  /* start at the beginning of palette */
-	else if(qp==0)
-	{
-		q=(*i);
-		(*qqqq)=(*i)-q;
-		//mxi1=PAL_SIZE/2;
-		//mxi2=PAL_SIZE;
-	}
-	else
-	{
-		q=(*i);
-		qq=(*i)/3;
-		(*qqqq)=(*i)-(bmp->offset*3);
-		//mxi1=q+3;
-		//mxi2=q+3;
-//		printf("q: %02d\n", (q));
-		//printf("mxi1: %02d\n", mxi1);
-//		printf("qq: %02d\n", (qq));
-		//printf("	((*i)-(bmp->offset*3))=%02d\n", ((*i)-(bmp->offset*3)));
-		//printf("	(*i)-q=%02d\n", (*i)-q);
-//		printf("qqqq: %d\n",(*qqqq));
-//		printf("================\n");
-		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 || ((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)]);
-				w++;
-				break;
-			}
-			else
-			{
-				/*if(qp>0)
-				{
-					printf("	((*i)-(bmp->offset*3))=%02d\n", ((*i)-(bmp->offset*3)));
-				}*/
-				/*if(q>0 && qp==0)
-				{
-					printf("(*i)-q=%02d", (*i)-q);
-					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)]);
-				}*/
-				if(qp==0) outp(PAL_DATA_REG, p[(*i)-q]);
-				else outp(PAL_DATA_REG, p[((*i)-(bmp->offset*3))]);
-				/*if(q>0 && qp==0)
-				{
-					qq=(*i)-q;
-					chkcolor(bmp, &q, &a, &aa, &z);
-					if(a[(*i)-q]==0)
-					{
-						printf("%d	qqqq\n", qq);
-						outp(PAL_DATA_REG, p[(*i)-q]);
-					}
-				}
-				else
-				{
-					outp(PAL_DATA_REG, p[(*i)-q]);
-				}*/
-			}
-		}
-	}
-	modexWaitBorder();	    /* waits one retrace -- less flicker */
-	if((*i)>=PAL_SIZE/2 && w==0)
-	{
-		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 || ((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)]);
-				w++;
-				break;
-			}
-			else
-			{
-				/*if(qp>0)
-				{
-					printf("	((*i)-(bmp->offset*3))=%02d\n", ((*i)-(bmp->offset*3)));
-				}*/
-				/*if(q>0 && qp==0)
-				{
-					printf("(*i)-q=%02d", (*i)-q);
-					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)]);
-				}*/
-				if(qp==0) outp(PAL_DATA_REG, p[(*i)-q]);
-				else outp(PAL_DATA_REG, p[((*i)-(bmp->offset*3))]);
-				/*if(q>0 && qp==0)
-				{
-					qq=(*i)-q;
-					chkcolor(bmp, &q, &a, &aa, &z);
-					if(a[(*i)-q]==0)
-					{
-						printf("%d	qqqq\n", qq);
-						outp(PAL_DATA_REG, p[(*i)-q]);
-					}
-				}
-				else
-				{
-					outp(PAL_DATA_REG, p[(*i)-q]);
-				}*/
-			}
-		}
-	}
-
-//	if(qp>0) printf("(*i)=%02d\n", (*i));
-
-	//palette checker~
-	if(q>0 && qp==0/* && qr==0*/)
-	{
-		word qw=0;
-		long lq;
-		long bufSize = (bmp->width * bmp->height);
-		chkcolor(bmp, &q, &a, &aa, &z);
-
-		printf("z=%d\n", z/3);
-		printf("q+z=%d\n", (q+z)/3);
-		printf("z-ppee=%d\n", (z-ppee)/3);
-//		printf("%d\n", (z-(z-ppee))/3);
-		printf("q=%d\n", q/3);
-		printf("aa=%d\n", aa);
-
-		aq=0; pp = q; ppee=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-ppee]);
-		printf("[%d]", bmp->palette[(pp-ppee)+1]);
-		printf("[%d]\n", bmp->palette[(pp-ppee)+2]);*/
-		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);
-			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++;
-		}
-/*		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-ppee)]);
-		printf("[%d]", bmp->palette[(pp-ppee)+1]);
-		printf("[%d]\n", bmp->palette[(pp-ppee)+2]);
-/*		printf("bmp: [%d]", bmp->palette[pp]);
-		printf("[%d]", bmp->palette[pp+1]);
-		printf("[%d]\n", bmp->palette[pp+2]);*/
-		//aqpp=(pp-ppee);
-		//else if(pp==(z-1)) bmp->palette[pp]=0;
-		//if(pp<aqpp-3) 
-		pp+=3;
-	}
-//	spee++;
-	//ppp=aqpp-ppee;
-	//printf("aqpp=	%02d\n", aqpp/3);
-	//printf("pp=	%02d\n", pp/3);
-	//printf("ppp=	%02d\n", ppp/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, &aqpp, 1, aqpp);
-	printf("aqpp=	%02d\n", aqpp/3);
-	printf("aq=	%02d\n", aq);
-	printf("aa=	%02d\n", aa);
-//	}
-
-//	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)]);
-	}
-}
-
-void chkcolor(bitmap_t *bmp, word *q, word *a, word *aa, word *z)
-{
-		byte *pal;
-		word zz=0;
-		pal = modexNewPal();
-		modexPalSave(pal);
-		//q-=3;
-		//printf("q: %02d\n", (*q));
-		//check palette for dups
-		for((*z)=0; (*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])
-				{
-//					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]);
-					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])
-						{
-//							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]);
-							a[((*z)+(*q))/3]=zz/3;
-							(*aa)=((*z)+(*q))/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("\nz:	%d\n", z);
-				//printf("q:	%d\n", q);
-				//printf("zz:	%d\n", zz);
-			}
-		}
-		free(pal);
-}
-
-void
-modexWaitBorder() {
-    while(inp(INPUT_STATUS_1)  & 8)  {
-	/* spin */
-    }
-
-    while(!(inp(INPUT_STATUS_1)  & 8))  {
-	/* spin */
-    }
-}
+/* Project 16 Source Code~
+ * Copyright (C) 2012-2015 sparky4 & pngwen & andrius4669
+ *
+ * This file is part of Project 16.
+ *
+ * Project 16 is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Project 16 is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>, or
+ * write to the Free Software Foundation, Inc., 51 Franklin Street,
+ * Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ */
+
+#include <conio.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include "src/lib/modex16.h"
+
+byte far* VGA=(byte far*) 0xA0000000;   /* this points to video memory. */
+
+static void fadePalette(sbyte fade, sbyte start, word iter, byte *palette);
+static byte tmppal[PAL_SIZE];
+//int old_mode;
+
+/////////////////////////////////////////////////////////////////////////////
+//																														//
+// setvideo() - This function Manages the video modes												//
+//																														//
+/////////////////////////////////////////////////////////////////////////////
+void VGAmodeX(sword vq, global_game_variables_t *gv)
+{
+	union REGS in, out;
+
+	if(!vq)
+	{ // deinit the video
+		// change to the video mode we were in before we switched to mode 13h
+		modexLeave();
+		in.h.ah = 0x00;
+		in.h.al = gv->old_mode;
+		int86(0x10, &in, &out);
+
+	}
+	else if(vq==1)
+	{ // init the video
+		// get old video mode
+		in.h.ah = 0xf;
+		int86(0x10, &in, &out);
+		gv->old_mode = out.h.al;
+		// enter mode
+		modex__320x240_256__Enter(gv);
+	}
+}
+
+static void
+vgaSetMode(byte mode)
+{
+  union REGS regs;
+
+  regs.h.ah = SET_MODE;
+  regs.h.al = mode;
+  int86(VIDEO_INT, &regs, &regs);
+}
+
+/* -========================= Entry  Points ==========================- */
+void
+modex__320x240_256__Enter(global_game_variables_t *gv)
+{
+	word i;
+	dword far*ptr=(dword far*)VGA;      /* used for faster screen clearing */
+	word CRTParms[] = {
+//		0xe300,		/* horizontal total */
+		0x4f01,		/* horizontal display enable end */
+		0x5002,		/*  */
+		0x5404,		/*  */
+		0x8005,		/*  */
+		0x0d06,         /* vertical total */
+		0x3e07,         /* overflow (bit 8 of vertical counts) */
+		0x4109,         /* cell height (2 to double-scan */
+		0xea10,         /* v sync start */
+		0xac11,         /* v sync end and protect cr0-cr7 */
+		0xdf12,         /* vertical displayed */
+		0x2813,		/* offset/logical width */
+		0x0014,         /* turn off dword mode */
+		0xe715,         /* v blank start */
+		0x0616,         /* v blank end */
+		0xe317          /* turn on byte mode */
+	};
+
+	int CRTParmCount = sizeof(CRTParms) / sizeof(CRTParms[0]);
+	/* width and height */
+	//TODO WWWW
+
+	/* disable chain4 mode */
+	outpw(SC_INDEX, 0x0604);
+
+	/* synchronous reset while setting Misc Output */
+	outpw(SC_INDEX, 0x0100);
+
+	/* select 25 MHz dot clock & 60 Hz scanning rate */
+	outp(MISC_OUTPUT, 0xe3);
+
+	/* undo reset (restart sequencer) */
+	outpw(SC_INDEX, 0x0300);
+
+	/* reprogram the CRT controller */
+	outp(CRTC_INDEX, 0x11); /* VSync End reg contains register write prot */
+	outp(CRTC_DATA, 0x7f);  /* get current write protect on varios regs */
+
+	/* send the CRTParms */
+	for(i=0; i<CRTParmCount; i++) {
+		outpw(CRTC_INDEX, CRTParms[i]);
+	}
+
+	/* clear video memory */
+	outpw(SC_INDEX, 0x0f02);
+	for(i=0; i<0x8000; i++) {
+		ptr[i] = 0x0000;
+	}
+}
+
+//    setBaseXMode() does the initialization to make the VGA ready to
+//    accept any combination of configuration register settings.  This
+//    involves enabling writes to index 0 to 7 of the CRT controller (port
+//    0x3D4), by clearing the most significant bit (bit 7) of index 0x11.
+void
+modexsetBaseXMode(void)
+{
+	int temp;
+
+	/* TODO save current video mode and palette */
+	vgaSetMode(VGA_256_COLOR_MODE);
+
+	outp(CRTC_INDEX, 0x11);
+	temp = inp(CRTC_DATA) & 0x7F;
+	outp(CRTC_INDEX, 0x11);
+	outp(CRTC_DATA, temp);
+}
+
+void
+modexLeave() {
+    /* TODO restore original mode and palette */
+    vgaSetMode(TEXT_MODE);
+}
+
+
+page_t
+modexDefaultPage() {
+    page_t page;
+
+    /* default page values */
+    page.data = VGA;
+    page.dx = 0;
+    page.dy = 0;
+    page.width = SCREEN_WIDTH;
+    page.height = SCREEN_HEIGHT;
+	page.tw = page.width/TILEWH;
+	page.th = page.height/TILEWH;
+	page.id = 0;
+
+    return page;
+}
+
+/* returns the next page in contiguous memory
+ * the next page will be the same size as p, by default
+ */
+page_t
+modexNextPage(page_t *p) {
+    page_t result;
+
+    result.data = p->data + (p->width/4)*p->height;
+    result.dx = 0;
+    result.dy = 0;
+    result.width = p->width;
+    result.height = p->height;
+	result.tw = p->width/TILEWH;
+	result.th = p->height/TILEWH;
+	result.id = p->id+1;
+
+	return result;
+// 	return modexNextPageFlexibleSize(&p, p->width, p->height);
+}
+
+//next page with defined dimentions~
+page_t
+modexNextPageFlexibleSize(page_t *p, word x, word y)
+{
+	page_t result;
+
+	result.data = p->data + (p->width/4)*p->height;  /* compute the offset */
+	result.dx = 0;
+	result.dy = 0;
+	result.width = x;
+	result.height = y;
+	result.tw = p->width/TILEWH;
+	result.th = p->height/TILEWH;
+	result.id = p->id+1;
+
+	return result;
+}
+
+
+void
+modexShowPage(page_t *page) {
+    word high_address;
+    word low_address;
+    word offset;
+    byte crtcOffset;
+
+    /* calculate offset */
+    offset = (word) page->data;
+    offset += page->dy * (page->width >> 2 );
+    offset += page->dx >> 2;
+
+    /* calculate crtcOffset according to virtual width */
+    crtcOffset = page->width >> 3;
+
+    high_address = HIGH_ADDRESS | (offset & 0xff00);
+    low_address  = LOW_ADDRESS  | (offset << 8);
+
+    /* wait for appropriate timing and then program CRTC */
+    while ((inp(INPUT_STATUS_1) & DISPLAY_ENABLE));
+    outpw(CRTC_INDEX, high_address);
+    outpw(CRTC_INDEX, low_address);
+    outp(CRTC_INDEX, 0x13);
+    outp(CRTC_DATA, crtcOffset);
+
+    /*  wait for one retrace */
+    while (!(inp(INPUT_STATUS_1) & VRETRACE));
+
+    /* do PEL panning here */
+    outp(AC_INDEX, 0x33);
+    outp(AC_INDEX, (page->dx & 0x03) << 1);
+}
+
+
+void
+modexPanPage(page_t *page, int dx, int dy) {
+    page->dx = dx;
+    page->dy = dy;
+}
+
+
+void
+modexSelectPlane(byte plane) {
+    outp(SC_INDEX, MAP_MASK);          /* select plane */
+    outp(SC_DATA,  plane);
+}
+
+
+void
+modexClearRegion(page_t *page, int x, int y, int w, int h, byte  color) {
+    word pageOff = (word) page->data;
+    word xoff=x/4;       /* xoffset that begins each row */
+    word scanCount=w/4;  /* number of iterations per row (excluding right clip)*/
+    word poffset = pageOff + y*(page->width/4) + xoff; /* starting offset */
+    word nextRow = page->width/4-scanCount-1;  /* loc of next row */
+    byte lclip[] = {0x0f, 0x0e, 0x0c, 0x08};  /* clips for rectangles not on 4s */
+    byte rclip[] = {0x00, 0x01, 0x03, 0x07};
+    byte left = lclip[x&0x03];
+    byte right = rclip[(x+w)&0x03];
+
+    /* handle the case which requires an extra group */
+    if((x & 0x03) && !((x+w) & 0x03)) {
+      right=0x0f;
+    }
+
+    __asm {
+                MOV AX, SCREEN_SEG      ; go to the VGA memory
+                MOV ES, AX
+                MOV DI, poffset         ; go to the first pixel
+                MOV DX, SC_INDEX        ; point to the map mask
+                MOV AL, MAP_MASK
+                OUT DX, AL
+                INC DX
+                MOV AL, color           ; get ready to write colors
+        SCAN_START:
+                MOV CX, scanCount       ; count the line
+                MOV BL, AL              ; remember color
+                MOV AL, left            ; do the left clip
+                OUT DX, AL              ; set the left clip
+                MOV AL, BL              ; restore color
+                STOSB                   ; write the color
+                DEC CX
+                JZ SCAN_DONE            ; handle 1 group stuff
+
+                ;-- write the main body of the scanline
+                MOV BL, AL              ; remember color
+                MOV AL, 0x0f            ; write to all pixels
+                OUT DX, AL
+                MOV AL, BL              ; restore color
+                REP STOSB               ; write the color
+        SCAN_DONE:
+                MOV BL, AL              ; remeber color
+                MOV AL, right
+                OUT DX, AL              ; do the right clip
+                MOV AL, BL              ; restore color
+                STOSB                   ; write pixel
+                ADD DI, nextRow         ; go to the next row
+                DEC h
+                JNZ SCAN_START
+    }
+}
+
+
+void
+oldDrawBmp(byte far* page, int x, int y, bitmap_t *bmp, byte sprite)
+{
+	byte plane;
+	word px, py;
+	word offset;
+
+	/* TODO Make this fast.  It's SLOOOOOOW */
+	for(plane=0; plane < 4; plane++) {
+		modexSelectPlane(PLANE(plane+x));
+		for(px = plane; px < bmp->width; px+=4) {
+			offset=px;
+			for(py=0; py<bmp->height; py++) {
+			if(!sprite || bmp->data[offset])
+				page[PAGE_OFFSET(x+px, y+py)] = bmp->data[offset];
+			offset+=bmp->width;
+			}
+		}
+	}
+}
+
+void
+CDrawBmp(byte far* vgamem, page_t* page, int x, int y, bitmap_t *bmp, byte sprite)
+{
+	byte plane;
+	word px, py;
+	word offset=0;
+
+
+	/* TODO Make this fast.  It's SLOOOOOOW */
+	for(plane=0; plane < 4; plane++) {
+		modexSelectPlane(PLANE(plane+x));
+		for(px = plane; px < bmp->width; px+=4) {
+			offset=px;
+			for(py=0; py<bmp->height; py++) {
+			if(!sprite || bmp->data[offset])
+				//modexputPixel(page, x+px, y+py, bmp->data[offset]);
+				vgamem[PAGE_OFFSET(x+px, y+py)] = bmp->data[offset];
+			offset+=bmp->width;
+			}
+		}
+	}
+}
+
+void
+modexDrawBmp(page_t *page, int x, int y, bitmap_t *bmp) {
+    /* draw the region (the entire freakin bitmap) */
+    modexDrawBmpRegion(page, x, y, 0, 0, bmp->width, bmp->height, bmp);
+}
+
+
+void
+modexDrawBmpRegion(page_t *page, int x, int y,
+                   int rx, int ry, int rw, int rh, bitmap_t *bmp) {
+    word poffset = (word) page->data  + y*(page->width/4) + x/4;
+    byte far *data = bmp->data;//+bmp->offset;
+    word bmpOffset = (word) data + ry * bmp->width + rx;
+    word width = rw;
+    word height = rh;
+    byte plane = 1 << ((byte) x & 0x03);
+    word scanCount = width/4 + (width%4 ? 1 :0);
+    word nextPageRow = page->width/4 - scanCount;
+    word nextBmpRow = (word) bmp->width - width;
+    word rowCounter;
+    byte planeCounter = 4;
+
+/*	printf("bmp->data=%Fp\n",bmp->data);
+	printf("*bmp->data=%Fp\n",*(bmp->data));
+	printf("&bmp->data=%Fp\n",&(bmp->data));*/
+
+        //code is a bit slow here
+    __asm {
+                MOV AX, SCREEN_SEG      ; go to the VGA memory
+                MOV ES, AX
+
+                MOV DX, SC_INDEX        ; point at the map mask register
+                MOV AL, MAP_MASK        ;
+                OUT DX, AL              ;
+
+        PLANE_LOOP:
+                MOV DX, SC_DATA         ; select the current plane
+                MOV AL, plane           ;
+                OUT DX, AL              ;
+
+                ;-- begin plane painting
+                MOV AX, height          ; start the row counter
+                MOV rowCounter, AX      ;
+                MOV DI, poffset         ; go to the first pixel
+                MOV SI, bmpOffset       ; go to the bmp pixel
+        ROW_LOOP:
+                MOV CX, width           ; count the columns
+        SCAN_LOOP:
+                MOVSB                   ; copy the pixel
+                SUB CX, 3               ; we skip the next 3
+                ADD SI, 3               ; skip the bmp pixels
+                LOOP SCAN_LOOP          ; finish the scan
+
+                MOV AX, nextPageRow
+                ADD DI, AX              ; go to the next row on screen
+                MOV AX, nextBmpRow
+                ADD SI, AX              ; go to the next row on bmp
+
+                DEC rowCounter
+                JNZ ROW_LOOP            ; do all the rows
+                ;-- end plane painting
+
+                MOV AL, plane           ; advance to the next plane
+                SHL AL, 1               ;
+                AND AL, 0x0f            ; mask the plane properly
+                MOV plane, AL           ; store the plane
+
+                INC bmpOffset           ; start bmp at the right spot
+
+                DEC planeCounter
+                JNZ PLANE_LOOP          ; do all 4 planes
+    }
+}
+
+void
+modex_sparky4_DrawBmpRegion(page_t *page, int x, int y,
+                   int rx, int ry, int rw, int rh, bitmap_t *bmp) {
+    word poffset = (word) page->data  + y*(page->width/4) + x/4;
+    byte far *data = bmp->data;//+bmp->offset;
+    word bmpOffset = (word) data + ry * bmp->width + rx;
+    word width = rw;
+    word height = rh;
+    byte plane = 1 << ((byte) x & 0x03);
+    word scanCount = width/4 + (width%4 ? 1 :0);
+    word nextPageRow = page->width/4 - scanCount;
+    word nextBmpRow = (word) bmp->width - width;
+    word rowCounter;
+    byte planeCounter = 4;
+
+/*	printf("bmp->data=%Fp\n",bmp->data);
+	printf("*bmp->data=%Fp\n",*(bmp->data));
+	printf("&bmp->data=%Fp\n",&(bmp->data));*/
+
+        //code is a bit slow here
+    __asm {
+                MOV AX, SCREEN_SEG      ; go to the VGA memory
+                MOV ES, AX
+
+                MOV DX, SC_INDEX        ; point at the map mask register
+                MOV AL, MAP_MASK        ;
+                OUT DX, AL              ;
+
+        PLANE_LOOP:
+                MOV DX, SC_DATA         ; select the current plane
+                MOV AL, plane           ;
+                OUT DX, AL              ;
+
+                ;-- begin plane painting
+                MOV AX, height          ; start the row counter
+                MOV rowCounter, AX      ;
+                MOV DI, poffset         ; go to the first pixel
+                MOV SI, bmpOffset       ; go to the bmp pixel
+        ROW_LOOP:
+                MOV CX, width           ; count the columns
+        SCAN_LOOP:
+                MOVSB                   ; copy the pixel
+                SUB CX, 3               ; we skip the next 3
+                ADD SI, 3               ; skip the bmp pixels
+                LOOP SCAN_LOOP          ; finish the scan
+
+                MOV AX, nextPageRow
+                ADD DI, AX              ; go to the next row on screen
+                MOV AX, nextBmpRow
+                ADD SI, AX              ; go to the next row on bmp
+
+                DEC rowCounter
+                JNZ ROW_LOOP            ; do all the rows
+                ;-- end plane painting
+
+                MOV AL, plane           ; advance to the next plane
+                SHL AL, 1               ;
+                AND AL, 0x0f            ; mask the plane properly
+                MOV plane, AL           ; store the plane
+
+                INC bmpOffset           ; start bmp at the right spot
+
+                DEC planeCounter
+                JNZ PLANE_LOOP          ; do all 4 planes
+    }
+}
+
+void
+modexDrawPlanarBuf(page_t *page, int x, int y, planar_buf_t *bmp) {
+    /* TODO - adapt from test code */
+        int plane;
+        for(plane=0; plane < 4; plane++)
+        {
+                //fack
+        }
+}
+
+
+void
+modexDrawSprite(page_t *page, int x, int y, bitmap_t *bmp) {
+    /* draw the whole sprite */
+    modexDrawSpriteRegion(page, x, y, 0, 0, bmp->width, bmp->height, bmp);
+}
+
+void
+modexDrawSpriteRegion(page_t *page, int x, int y,
+                      int rx, int ry, int rw, int rh, bitmap_t *bmp) {
+    word poffset = (word)page->data + y*(page->width/4) + x/4;
+    byte *data = bmp->data;//+bmp->offset;
+    word bmpOffset = (word) data + ry * bmp->width + rx;
+    word width = rw;
+    word height = rh;
+    byte plane = 1 << ((byte) x & 0x03);
+    word scanCount = width/4 + (width%4 ? 1 :0);
+    word nextPageRow = page->width/4 - scanCount;
+    word nextBmpRow = (word) bmp->width - width;
+    word rowCounter;
+    byte planeCounter = 4;
+
+    __asm {
+                MOV AX, SCREEN_SEG      ; go to the VGA memory
+                MOV ES, AX
+
+                MOV DX, SC_INDEX        ; point at the map mask register
+                MOV AL, MAP_MASK        ;
+                OUT DX, AL              ;
+
+        PLANE_LOOP:
+                MOV DX, SC_DATA         ; select the current plane
+                MOV AL, plane           ;
+                OUT DX, AL              ;
+
+                ;-- begin plane painting
+                MOV AX, height          ; start the row counter
+                MOV rowCounter, AX      ;
+                MOV DI, poffset         ; go to the first pixel
+                MOV SI, bmpOffset       ; go to the bmp pixel
+        ROW_LOOP:
+                MOV CX, width           ; count the columns
+        SCAN_LOOP:
+                LODSB
+                DEC SI
+                CMP AL, 0
+                JNE DRAW_PIXEL          ; draw non-zero pixels
+
+                INC DI                  ; skip the transparent pixel
+                ADD SI, 1
+                JMP NEXT_PIXEL
+        DRAW_PIXEL:
+                MOVSB                   ; copy the pixel
+        NEXT_PIXEL:
+                SUB CX, 3               ; we skip the next 3
+                ADD SI, 3               ; skip the bmp pixels
+                LOOP SCAN_LOOP          ; finish the scan
+
+                MOV AX, nextPageRow
+                ADD DI, AX              ; go to the next row on screen
+                MOV AX, nextBmpRow
+                ADD SI, AX              ; go to the next row on bmp
+
+                DEC rowCounter
+                JNZ ROW_LOOP            ; do all the rows
+                ;-- end plane painting
+
+                MOV AL, plane           ; advance to the next plane
+                SHL AL, 1               ;
+                AND AL, 0x0f            ; mask the plane properly
+                MOV plane, AL           ; store the plane
+
+                INC bmpOffset           ; start bmp at the right spot
+
+                DEC planeCounter
+                JNZ PLANE_LOOP          ; do all 4 planes
+    }
+}
+
+
+/* copy a region of video memory from one page to another.
+ * It assumes that the left edge of the tile is the same on both
+ * regions and the memory areas do not overlap.
+ */
+void
+modexCopyPageRegion(page_t *dest, page_t *src,
+                    word sx, word sy,
+                    word dx, word dy,
+                    word width, word height)
+{
+    word doffset = (word)dest->data + dy*(dest->width/4) + dx/4;
+    word soffset = (word)src->data + sy*(src->width/4) + sx/4;
+    word scans   = width/4;
+    word nextSrcRow = src->width/4 - scans - 1;
+    word nextDestRow = dest->width/4 - scans - 1;
+    byte lclip[] = {0x0f, 0x0e, 0x0c, 0x08};  /* clips for rectangles not on 4s */
+    byte rclip[] = {0x0f, 0x01, 0x03, 0x07};
+    byte left = lclip[sx&0x03];
+    byte right = rclip[(sx+width)&0x03];
+
+    __asm {
+                MOV AX, SCREEN_SEG      ; work in the vga space
+                MOV ES, AX              ;
+                MOV DI, doffset         ;
+                MOV SI, soffset         ;
+
+                MOV DX, GC_INDEX        ; turn off cpu bits
+                MOV AX, 0008h           ;
+                OUT DX, AX
+
+                MOV AX, SC_INDEX        ; point to the mask register
+                MOV DX, AX              ;
+                MOV AL, MAP_MASK        ;
+                OUT DX, AL              ;
+                INC DX                  ;
+
+        ROW_START:
+                PUSH DS
+                MOV AX, ES
+                MOV DS, AX
+                MOV CX, scans           ; the number of latches
+
+                MOV AL, left            ; do the left column
+                OUT DX, AL              ;
+                MOVSB                   ;
+                DEC CX                  ;
+
+                MOV AL, 0fh             ; do the inner columns
+                OUT DX, AL
+                REP MOVSB               ; copy the pixels
+
+                MOV AL, right           ; do the right column
+                OUT DX, AL
+                MOVSB
+                POP DS
+
+                MOV AX, SI              ; go the start of the next row
+                ADD AX, nextSrcRow      ;
+                MOV SI, AX              ;
+                MOV AX, DI              ;
+                ADD AX, nextDestRow     ;
+                MOV DI, AX              ;
+
+                DEC height              ; do the rest of the actions
+                JNZ ROW_START           ;
+
+                MOV DX, GC_INDEX+1      ; go back to CPU data
+                MOV AL, 0ffh            ; none from latches
+                OUT DX, AL              ;
+    }
+}
+
+
+/* fade and flash */
+void
+modexFadeOn(word fade, byte *palette) {
+    fadePalette(-fade, 64, 64/fade+1, palette);
+}
+
+
+void
+modexFadeOff(word fade, byte *palette) {
+    fadePalette(fade, 0, 64/fade+1, palette);
+}
+
+
+void
+modexFlashOn(word fade, byte *palette) {
+    fadePalette(fade, -64, 64/fade+1, palette);
+}
+
+
+void
+modexFlashOff(word fade, byte *palette) {
+    fadePalette(-fade, 0, 64/fade+1, palette);
+}
+
+
+static void
+fadePalette(sbyte fade, sbyte start, word iter, byte *palette) {
+    word i;
+    byte dim = start;
+
+    /* handle the case where we just update */
+    if(iter == 0) {
+        modexPalUpdate1(palette);
+        return;
+    }
+
+    while(iter > 0) {  /* FadeLoop */
+        for(i=0; i<PAL_SIZE; i++) { /* loadpal_loop */
+            tmppal[i] = palette[i] - dim;
+            if(tmppal[i] > 127) {
+                tmppal[i] = 0;
+            } else if(tmppal[i] > 63) {
+                tmppal[i] = 63;
+            }
+        }
+        modexPalUpdate1(tmppal);
+        iter--;
+        dim += fade;
+    }
+}
+
+
+/* save and load */
+void
+modexPalSave(byte *palette) {
+    int  i;
+
+    outp(PAL_READ_REG, 0);      /* start at palette entry 0 */
+    for(i=0; i<PAL_SIZE; i++) {
+        palette[i] = inp(PAL_DATA_REG); /* read the palette data */
+    }
+}
+
+
+byte *
+modexNewPal() {
+    byte *ptr;
+    ptr = malloc(PAL_SIZE);
+
+    /* handle errors */
+    if(!ptr) {
+        printf("Could not allocate palette.\n");
+        exit(-1);
+    }
+
+    return ptr;
+}
+
+
+void
+modexLoadPalFile(byte *filename, byte **palette) {
+    FILE *file;
+    byte *ptr;
+
+    /* free the palette if it exists */
+    if(*palette) {
+        free(*palette);
+    }
+
+    /* allocate the new palette */
+    *palette = modexNewPal();
+
+    /* open the file */
+    file = fopen(filename, "rb");
+    if(!file) {
+        printf("Could not open palette file: %s\n", filename);
+        exit(-2);
+    }
+
+    /* read the file */
+    ptr = *palette;
+    while(!feof(file)) {
+        *ptr++ = fgetc(file);
+    }
+
+    fclose(file);
+}
+
+
+void
+modexSavePalFile(char *filename, byte *pal) {
+    unsigned int i;
+    FILE *file;
+
+    /* open the file for writing */
+    file = fopen(filename, "wb");
+    if(!file) {
+        printf("Could not open %s for writing\n", filename);
+        exit(-2);
+    }
+
+    /* write the data to the file */
+    fwrite(pal, 1, PAL_SIZE, file);
+    fclose(file);
+}
+
+
+/* blanking */
+void
+modexPalBlack() {
+    fadePalette(-1, 64, 1, tmppal);
+}
+
+
+void
+modexPalWhite() {
+    fadePalette(-1, -64, 1, tmppal);
+}
+
+
+/* utility */
+void
+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)
+        {
+                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]))
+                        {
+                                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
+                        {
+                                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)
+        {
+                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]))
+                        {
+                                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
+                        {
+                                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
+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 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 modexputPixel(page_t *page, int x, int y, byte color)
+{
+	word pageOff = (word) page->data;
+        /* Each address accesses four neighboring pixels, so set
+           Write Plane Enable according to which pixel we want
+           to modify.  The plane is determined by the two least
+           significant bits of the x-coordinate: */
+	modexSelectPlane(PLANE(x));
+	//outp(SC_INDEX, 0x02);
+	//outp(SC_DATA, 0x01 << (x & 3));
+
+	/* The offset of the pixel into the video segment is
+	   offset = (width * y + x) / 4, and write the given
+	   color to the plane we selected above.  Heed the active
+	   page start selection. */
+	VGA[(unsigned)((page->width/4) * y) + (x / 4) + pageOff] = color;
+
+}
+
+byte modexgetPixel(page_t *page, int x, int y)
+{
+	word pageOff = (word) page->data;
+	/* Select the plane from which we must read the pixel color: */
+	outpw(GC_INDEX, 0x04);
+	outpw(GC_INDEX+1, x & 3);
+
+	return VGA[(unsigned)((page->width/4) * y) + (x / 4) + pageOff];
+
+}
+
+void modexhlin(page_t *page, word xl, word xh, word y, word color)
+{
+	word x;
+	word yy=0;
+
+	for(x=0;x<xh*4;x+=4)
+	{
+		if(x+4>=SCREEN_WIDTH-1){ x=0; yy+=4; }
+		modexClearRegion(page, x+xl, y+yy, 4, 4, color);
+	}
+	//modexputPixel(page, x+xl, y, color);
+}
+
+void modexprint(page_t *page, word x, word y, word t, word col, word bgcol, const byte *str)
+{
+	word i, s, o, w, j, xp;
+	byte l[1024];
+	word addr = (word) l;
+	word chw=0;
+	byte c;
+
+	switch(t)
+	{
+		case 0:
+			w=14;
+		break;
+		case 1:
+			w=8;
+		break;
+		case 2:
+			w=8;
+		break;
+		case 3:
+			w=16;
+		break;
+		default:
+			t=3;
+			w=16;
+		break;
+	}
+
+	s=romFonts[t].seg;
+	o=romFonts[t].off;
+
+	for(; *str != '\0'; str++)
+	{
+	c = (*str);
+	if((c=='\n'/* || c=="\
+"*/) || chw
+>=page->width)
+	{
+		chw=0;
+		y+=w;
+		continue;
+	}
+	//load the letter 'A'
+	__asm {
+		MOV DI, addr
+		MOV SI, o
+		MOV ES, s
+		SUB AH, AH
+		MOV AL, c	; the letter
+		MOV CX, w
+		MUL CX
+		ADD SI, AX	;the address of charcter
+	L1:	MOV AX, ES:SI
+		MOV DS:DI, AX
+		INC SI
+		INC DI
+		DEC CX
+		JNZ L1
+	}
+
+		for(i=0; i<w; i++)
+		{
+			j=1<<8;
+			xp=0;
+			while(j)
+			{
+				modexputPixel(page, x+xp+chw, y+i, l[i] & j ? col:bgcol);
+				xp++;
+				j>>=1;
+			}
+		}
+		chw += xp;
+	}
+}
+
+void modexprintbig(page_t *page, word x, word y, word t, word col, word bgcol, const byte *str)
+{
+	word i, s, o, w, j, xp;
+	byte l[1024];
+	word addr = (word) l;
+	word chw=0;
+	byte c;
+
+	switch(t)
+	{
+		case 0:
+			w=14;
+		break;
+		case 1:
+			w=8;
+		break;
+		case 2:
+			w=8;
+		break;
+		case 3:
+			w=16;
+		break;
+		default:
+			t=3;
+			w=16;
+		break;
+	}
+
+	s=romFonts[t].seg;
+	o=romFonts[t].off;
+
+	for(; *str != '\0'; str++)
+	{
+	c = (*str);
+	if((c=='\n'/* || c=="\
+"*/)/* || chw>=page->width*/)
+	{
+		chw=0;
+		y+=w;
+		continue;
+	}
+	//load the letter 'A'
+	__asm {
+		MOV DI, addr
+		MOV SI, o
+		MOV ES, s
+		SUB AH, AH
+		MOV AL, c	; the letter
+		MOV CX, w
+		MUL CX
+		ADD SI, AX	;the address of charcter
+	L1:	MOV AX, ES:SI
+		MOV DS:DI, AX
+		INC SI
+		INC DI
+		DEC CX
+		JNZ L1
+	}
+
+		for(i=0; i<w; i++)
+		{
+			j=1<<8;
+			xp=0;
+			while(j)
+			{
+				//modexputPixel(page, x+xp+chw, y+i, l[i] & j ? col:bgcol);
+				modexClearRegion(page, (x+xp+chw)*8, (y+i)*8, 8, 8, l[i] & j ? col:bgcol);
+				xp++;
+				j>>=1;
+			}
+		}
+		chw += xp;
+	}
+}
+
+/////////////////////////////////////////////////////////////////////////////
+//																		 //
+// cls() - This clears the screen to the specified color, on the VGA or on //
+//		 the Virtual screen.											 //
+//																		 //
+/////////////////////////////////////////////////////////////////////////////
+void cls(page_t *page, byte color, byte *Where)
+{
+	//modexClearRegion(page, 0, 0, page->width, page->height, color);
+	/* set map mask to all 4 planes */
+	outpw(SC_INDEX, 0xff02);
+	//_fmemset(VGA, color, 16000);
+	_fmemset(Where, color, page->width*(page->height));
+}
+
+void
+modexWaitBorder() {
+    while(inp(INPUT_STATUS_1)  & 8)  {
+        /* spin */
+    }
+
+    while(!(inp(INPUT_STATUS_1)  & 8))  {
+        /* spin */
+    }
+}