\r
static void fadePalette(sbyte fade, sbyte start, word iter, byte *palette);\r
static byte tmppal[PAL_SIZE];\r
-//int old_mode;\r
\r
/////////////////////////////////////////////////////////////////////////////\r
// //\r
{\r
union REGS in, out;\r
\r
- if(!vq)\r
- { // deinit the video\r
- // change to the video mode we were in before we switched to mode 13h\r
- modexLeave();\r
- in.h.ah = 0x00;\r
- in.h.al = gv->old_mode;\r
- int86(0x10, &in, &out);\r
-\r
- }\r
- else if(vq==1)\r
- { // init the video\r
- // get old video mode\r
- in.h.ah = 0xf;\r
- int86(0x10, &in, &out);\r
- gv->old_mode = out.h.al;\r
- // enter mode\r
- modexEnter();\r
+ switch (vq)\r
+ {\r
+ case 0: // deinit the video\r
+ // change to the video mode we were in before we switched to mode 13h\r
+ modexLeave();\r
+ in.h.ah = 0x00;\r
+ in.h.al = gv->video.old_mode;\r
+ int86(0x10, &in, &out);\r
+ break;\r
+ default: // init the video\r
+ // get old video mode\r
+ //in.h.ah = 0xf;\r
+ //int86(0x10, &in, &out);\r
+ gv->video.old_mode = vgaGetMode();//out.h.al;\r
+ // enter mode\r
+ modexEnter(vq, gv);\r
+ break;\r
}\r
}\r
\r
int86(VIDEO_INT, ®s, ®s);\r
}\r
\r
+//---------------------------------------------------\r
+//\r
+// Use the bios to get the current video mode\r
+//\r
+\r
+long\r
+vgaGetMode()\r
+{\r
+ union REGS rg;\r
+\r
+ rg.h.ah = 0x0f;\r
+ int86(VIDEO_INT, &rg, &rg);\r
+\r
+ return rg.h.al;\r
+}\r
\r
/* -========================= Entry Points ==========================- */\r
void\r
-modexEnter() {\r
- word i;\r
- dword far*ptr=(dword far*)VGA; /* used for faster screen clearing */\r
- word CRTParms[] = {\r
- 0x0d06, /* vertical total */\r
- 0x3e07, /* overflow (bit 8 of vertical counts) */\r
- 0x4109, /* cell height (2 to double-scan */\r
- 0xea10, /* v sync start */\r
- 0xac11, /* v sync end and protect cr0-cr7 */\r
- 0xdf12, /* vertical displayed */\r
- 0x0014, /* turn off dword mode */\r
- 0xe715, /* v blank start */\r
- 0x0616, /* v blank end */\r
- 0xe317 /* turn on byte mode */\r
- };\r
- int CRTParmCount = sizeof(CRTParms) / sizeof(CRTParms[0]);\r
-\r
- /* TODO save current video mode and palette */\r
- vgaSetMode(VGA_256_COLOR_MODE);\r
-\r
- /* disable chain4 mode */\r
- outpw(SC_INDEX, 0x0604);\r
-\r
- /* synchronous reset while setting Misc Output */\r
- outpw(SC_INDEX, 0x0100);\r
-\r
- /* select 25 MHz dot clock & 60 Hz scanning rate */\r
- outp(MISC_OUTPUT, 0xe3);\r
-\r
- /* undo reset (restart sequencer) */\r
- outpw(SC_INDEX, 0x0300);\r
-\r
- /* reprogram the CRT controller */\r
- outp(CRTC_INDEX, 0x11); /* VSync End reg contains register write prot */\r
- outp(CRTC_DATA, 0x7f); /* get current write protect on varios regs */\r
-\r
- /* send the CRTParms */\r
- for(i=0; i<CRTParmCount; i++) {\r
- outpw(CRTC_INDEX, CRTParms[i]);\r
- }\r
+modexEnter(sword vq, global_game_variables_t *gv)\r
+{\r
+ word i;\r
+ dword far*ptr=(dword far*)VGA; /* used for faster screen clearing */\r
+ int CRTParmCount;\r
+ /* common mode X initiation stuff~ */\r
+ modexsetBaseXMode(gv->video.page);\r
\r
- /* clear video memory */\r
- outpw(SC_INDEX, 0x0f02);\r
- for(i=0; i<0x8000; i++) {\r
- ptr[i] = 0x0000;\r
- }\r
-}\r
+ switch(vq)\r
+ {\r
+ case 1:\r
+ CRTParmCount = sizeof(ModeX_320x240regs) / sizeof(ModeX_320x240regs[0]);\r
+ /* width and height */\r
+ gv->video.page[0].sw=320;\r
+ gv->video.page[0].sh=240;\r
+\r
+ /* send the CRTParms */\r
+ for(i=0; i<CRTParmCount; i++) {\r
+ outpw(CRTC_INDEX, ModeX_320x240regs[i]);\r
+ }\r
\r
+ /* clear video memory */\r
+ outpw(SC_INDEX, 0x0f02);\r
+ for(i=0; i<0x8000; i++) {\r
+ ptr[i] = 0x0000;\r
+ }\r
+ break;\r
+ case 2:\r
+ CRTParmCount = sizeof(ModeX_160x120regs) / sizeof(ModeX_160x120regs[0]);\r
+ /* width and height */\r
+ gv->video.page[0].sw=120;\r
+ gv->video.page[0].sh=160;\r
+\r
+ /* send the CRTParms */\r
+ for(i=0; i<CRTParmCount; i++) {\r
+ outpw(CRTC_INDEX, ModeX_160x120regs[i]);\r
+ }\r
+\r
+ /* clear video memory */\r
+ outpw(SC_INDEX, 0x0f02);\r
+ for(i=0; i<0x8000; i++) {\r
+ ptr[i] = 0x0000;\r
+ }\r
+ break;\r
+ case 3:\r
+ CRTParmCount = sizeof(ModeX_320x200regs) / sizeof(ModeX_320x200regs[0]);\r
+ /* width and height */\r
+ gv->video.page[0].sw=320;\r
+ gv->video.page[0].sh=200;\r
+\r
+ /* send the CRTParms */\r
+ for(i=0; i<CRTParmCount; i++) {\r
+ outpw(CRTC_INDEX, ModeX_320x200regs[i]);\r
+ }\r
+\r
+ /* clear video memory */\r
+ outpw(SC_INDEX, 0x0f02);\r
+ for(i=0; i<0x8000; i++) {\r
+ ptr[i] = 0x0000;\r
+ }\r
+ break;\r
+ case 4:\r
+ CRTParmCount = sizeof(ModeX_192x144regs) / sizeof(ModeX_192x144regs[0]);\r
+ /* width and height */\r
+ gv->video.page[0].sw=192;\r
+ gv->video.page[0].sh=144;\r
+\r
+ /* send the CRTParms */\r
+ for(i=0; i<CRTParmCount; i++) {\r
+ outpw(CRTC_INDEX, ModeX_192x144regs[i]);\r
+ }\r
+\r
+ /* clear video memory */\r
+ outpw(SC_INDEX, 0x0f02);\r
+ for(i=0; i<0x8000; i++) {\r
+ ptr[i] = 0x0000;\r
+ }\r
+ break;\r
+ case 5:\r
+ CRTParmCount = sizeof(ModeX_256x192regs) / sizeof(ModeX_256x192regs[0]);\r
+ /* width and height */\r
+ gv->video.page[0].sw=256;\r
+ gv->video.page[0].sh=192;\r
+\r
+ /* send the CRTParms */\r
+ for(i=0; i<CRTParmCount; i++) {\r
+ outpw(CRTC_INDEX, ModeX_256x192regs[i]);\r
+ }\r
+\r
+ /* clear video memory */\r
+ outpw(SC_INDEX, 0x0f02);\r
+ for(i=0; i<0x8000; i++) {\r
+ ptr[i] = 0x0000;\r
+ }\r
+ break;\r
+ }\r
+ gv->video.page[0].tilesw = gv->video.page[0].sw/TILEWH;\r
+ gv->video.page[0].tilesh = gv->video.page[0].sh/TILEWH;\r
+ //TODO MAKE FLEXIBLE~\r
+ gv->video.page[0].tilemidposscreenx = gv->video.page[0].tilesw;\r
+ gv->video.page[0].tilemidposscreeny = (gv->video.page[0].tilesh/2)+1;\r
+ #define PAGE_SIZE (word)(gv->video.page[0].sw/4 * gv->video.page[0].sh)\r
+}\r
\r
void\r
modexLeave() {\r
vgaSetMode(TEXT_MODE);\r
}\r
\r
+// setBaseXMode() does the initialization to make the VGA ready to\r
+// accept any combination of configuration register settings. This\r
+// involves enabling writes to index 0 to 7 of the CRT controller (port\r
+// 0x3D4), by clearing the most significant bit (bit 7) of index 0x11.\r
+void\r
+modexsetBaseXMode(page_t *page)\r
+{\r
+ word temp;\r
+ /* TODO save current video mode and palette */\r
+ vgaSetMode(VGA_256_COLOR_MODE);\r
+\r
+ /* disable chain4 mode */\r
+ outpw(SC_INDEX, 0x0604);\r
+\r
+ /* synchronous reset while setting Misc Output */\r
+ outpw(SC_INDEX, 0x0100);\r
+\r
+ /* select 25 MHz dot clock & 60 Hz scanning rate */\r
+ outp(MISC_OUTPUT, 0xe3);\r
+\r
+ /* undo reset (restart sequencer) */\r
+ outpw(SC_INDEX, 0x0300);\r
+\r
+ /* reprogram the CRT controller */\r
+ outp(CRTC_INDEX, 0x11); /* VSync End reg contains register write prot */\r
+// temp = inp(CRTC_DATA) & 0x7F;\r
+// outp(CRTC_INDEX, 0x11);\r
+ outp(CRTC_DATA, 0x7f); /* get current write protect on varios regs */\r
+// outp(CRTC_DATA, temp); /* get current write protect on varios regs */\r
+}\r
\r
page_t\r
-modexDefaultPage() {\r
+modexDefaultPage(page_t *p)\r
+{\r
page_t page;\r
\r
/* default page values */\r
page.data = VGA;\r
page.dx = 0;\r
page.dy = 0;\r
- page.width = SCREEN_WIDTH;\r
- page.height = SCREEN_HEIGHT;\r
- page.id = 0;\r
+ page.sw = p->sw;\r
+ page.sh = p->sh;\r
+ page.width = p->sw;\r
+ page.height = p->sh;\r
+ page.tw = page.sw/TILEWH;\r
+ page.th = page.sh/TILEWH;\r
+ page.tilemidposscreenx = page.tw/2;\r
+ page.tilemidposscreeny = (page.th/2)+1;\r
+ page.tilesw=p->tilesw;\r
+ page.tilesh=p->tilesh;\r
+ //pageSize = p->sw*p->sh;\r
+ page.id = 0;\r
\r
return page;\r
}\r
modexNextPage(page_t *p) {\r
page_t result;\r
\r
- result.data = p->data + (p->width/4)*p->height; /* compute the offset */\r
+ result.data = p->data + (p->width/4)*p->height;\r
result.dx = 0;\r
result.dy = 0;\r
result.width = p->width;\r
result.height = p->height;\r
- result.id = p->id+1;\r
+ result.tw = p->width/TILEWH;\r
+ result.th = p->height/TILEWH;\r
+ result.id = p->id+1;\r
\r
- return result;\r
+ return result;\r
+// return modexNextPageFlexibleSize(&p, p->width, p->height);\r
}\r
\r
//next page with defined dimentions~\r
page_t\r
-modexNextPageAppend(page_t *p, word x, word y)\r
+modexNextPageFlexibleSize(page_t *p, word x, word y)\r
{\r
- page_t result;\r
-\r
- result.data = p->data + (p->width/4)*p->height; /* compute the offset */\r
- result.dx = 0;\r
- result.dy = 0;\r
- result.width = x;\r
- result.height = y;\r
- result.id = p->id+1;\r
-\r
- return result;\r
+ page_t result;\r
+\r
+ result.data = p->data + (p->width/4)*p->height; /* compute the offset */\r
+ result.dx = 0;\r
+ result.dy = 0;\r
+ result.width = x;\r
+ result.height = y;\r
+ result.tw = p->width/TILEWH;\r
+ result.th = p->height/TILEWH;\r
+ result.id = p->id+1;\r
+\r
+ return result;\r
}\r
\r
\r
}\r
}\r
\r
+void\r
+DrawPBuf(page_t *page, int x, int y, planar_buf_t *p, byte sprite)\r
+{\r
+ int plane;\r
+ int px, py, i;\r
+// byte near *buff;\r
+\r
+ px=x;\r
+ py=y;\r
+// buff = _nmalloc(p->pwidth+1);\r
+ // TODO Make this fast. It's SLOOOOOOW\r
+// for(plane=0; plane < 4; plane++) {\r
+// i=0;\r
+// modexSelectPlane(PLANE(plane+x));\r
+// for(px = plane; px < p->width; px+=4) {\r
+// offset=px;\r
+// for(py=0; py<p->height/2; py++) {\r
+// //SELECT_ALL_PLANES();\r
+// if(!sprite || p->plane[offset])\r
+// page->data = &(p->plane[offset][i++]);\r
+// offset+=p->width;\r
+// offset++;\r
+// }\r
+// }\r
+// }\r
+ for(plane=0; plane < 4; plane++) {\r
+ i=0;\r
+ modexSelectPlane(PLANE(plane+x));\r
+ for(; y < py+p->height; y++) {\r
+ //for(px=0; px < p->width; px++) {\r
+ //printf("%02X ", (int) p->plane[plane][i++]);\r
+// _fmemcpy(buff, &(p->plane[plane][i+=p->pwidth]), p->pwidth);\r
+// printf("buff %u==%s\n", y, *buff);\r
+// _fmemcpy(page->data + (((page->width/4) * (y+page->dy)) + ((x+page->dx) / 4)), buff, p->pwidth);\r
+ _fmemcpy(page->data + (((page->width/4) * (y+page->dy)) + ((x+page->dx) / 4)), &(p->plane[plane][i+=p->pwidth]), p->pwidth);\r
+ //}\r
+ }\r
+ x=px;\r
+ y=py;\r
+ }\r
+// _nfree(buff);\r
+}\r
\r
void\r
oldDrawBmp(byte far* page, int x, int y, bitmap_t *bmp, byte sprite)\r
modexDrawBmpRegion(page, x, y, 0, 0, bmp->width, bmp->height, bmp);\r
}\r
\r
-\r
void\r
modexDrawBmpRegion(page_t *page, int x, int y,\r
int rx, int ry, int rw, int rh, bitmap_t *bmp) {\r
}\r
}\r
\r
-\r
void\r
modexDrawPlanarBuf(page_t *page, int x, int y, planar_buf_t *bmp) {\r
/* TODO - adapt from test code */\r
modexDrawSpriteRegion(page, x, y, 0, 0, bmp->width, bmp->height, bmp);\r
}\r
\r
-void\r
+/*void\r
modexDrawSpriteRegion(page_t *page, int x, int y,\r
int rx, int ry, int rw, int rh, bitmap_t *bmp) {\r
word poffset = (word)page->data + y*(page->width/4) + x/4;\r
DEC planeCounter\r
JNZ PLANE_LOOP ; do all 4 planes\r
}\r
-}\r
+}//backup!*/\r
\r
+void\r
+modexDrawSpriteRegion(page_t *page, int x, int y,\r
+ int rx, int ry, int rw, int rh, bitmap_t *bmp) {\r
+ word poffset = (word)page->data + y*(page->width/4) + x/4;\r
+ byte huge *data = bmp->data;//+bmp->offset;\r
+ word bmpOffset = (word) data + ry * bmp->width + rx;\r
+ word width = rw;\r
+ word height = rh;\r
+ byte plane = 1 << ((byte) x & 0x03);\r
+ word scanCount = width/4 + (width%4 ? 1 :0);\r
+ word nextPageRow = page->width/4 - scanCount;\r
+ word nextBmpRow = (word) bmp->width - width;\r
+ word rowCounter;\r
+ byte planeCounter = 4;\r
+\r
+ __asm {\r
+ MOV AX, SCREEN_SEG ; go to the VGA memory\r
+ MOV ES, AX\r
+\r
+ MOV DX, SC_INDEX ; point at the map mask register\r
+ MOV AL, MAP_MASK ;\r
+ OUT DX, AL ;\r
+\r
+ PLANE_LOOP:\r
+ MOV DX, SC_DATA ; select the current plane\r
+ MOV AL, plane ;\r
+ OUT DX, AL ;\r
+\r
+ ;-- begin plane painting\r
+ MOV AX, height ; start the row counter\r
+ MOV rowCounter, AX ;\r
+ MOV DI, poffset ; go to the first pixel\r
+ MOV SI, bmpOffset ; go to the bmp pixel\r
+ ROW_LOOP:\r
+ MOV CX, width ; count the columns\r
+ SCAN_LOOP:\r
+ LODSB\r
+ DEC SI\r
+ CMP AL, 0\r
+ JNE DRAW_PIXEL ; draw non-zero pixels\r
+\r
+ INC DI ; skip the transparent pixel\r
+ ADD SI, 1\r
+ JMP NEXT_PIXEL\r
+ DRAW_PIXEL:\r
+ MOVSB ; copy the pixel\r
+ NEXT_PIXEL:\r
+ SUB CX, 3 ; we skip the next 3\r
+ ADD SI, 3 ; skip the bmp pixels\r
+ LOOP SCAN_LOOP ; finish the scan\r
+\r
+ MOV AX, nextPageRow\r
+ ADD DI, AX ; go to the next row on screen\r
+ MOV AX, nextBmpRow\r
+ ADD SI, AX ; go to the next row on bmp\r
+\r
+ DEC rowCounter\r
+ JNZ ROW_LOOP ; do all the rows\r
+ ;-- end plane painting\r
+\r
+ MOV AL, plane ; advance to the next plane\r
+ SHL AL, 1 ;\r
+ AND AL, 0x0f ; mask the plane properly\r
+ MOV plane, AL ; store the plane\r
+\r
+ INC bmpOffset ; start bmp at the right spot\r
+\r
+ DEC planeCounter\r
+ JNZ PLANE_LOOP ; do all 4 planes\r
+ }\r
+}\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
}\r
}\r
\r
+void\r
+modexPalOverscan(byte *p, word col)\r
+{\r
+ modexWaitBorder();\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 chkcolor(bitmap_t *bmp, word *q, word *a, word *aa, word *z, word *i/*, word *offset*/)\r
\r
for(x=0;x<xh*4;x+=4)\r
{\r
- if(x+4>=SCREEN_WIDTH-1){ x=0; yy+=4; }\r
+ if(x+4>=page[0].sw-1){ x=0; yy+=4; }\r
modexClearRegion(page, x+xl, y+yy, 4, 4, color);\r
}\r
//modexputPixel(page, x+xl, y, color);\r
}\r
}\r
\r
+/* palette dump on display! */\r
+void pdump(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