]> 4ch.mooo.com Git - 16.git/blobdiff - src/lib/modex16.c
><
[16.git] / src / lib / modex16.c
index d3275e3d64887ffb79eca1f47b04c86b8fd381f8..9b7f4c4c57c84fe1bb42002af490ac0c90ecefa6 100755 (executable)
@@ -29,7 +29,6 @@ byte far* VGA=(byte far*) 0xA0000000;   /* this points to video memory. */
 \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
@@ -40,23 +39,23 @@ void VGAmodeX(sword vq, global_game_variables_t *gv)
 {\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
@@ -70,57 +69,127 @@ vgaSetMode(byte mode)
   int86(VIDEO_INT, &regs, &regs);\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
@@ -128,19 +197,57 @@ modexLeave() {
     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.tw = page.width/TILEWH;\r
-       page.th = page.height/TILEWH;\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
@@ -287,35 +394,82 @@ modexClearRegion(page_t *page, int x, int y, int w, int h, byte  color) {
     }\r
 }\r
 \r
+//TODO! ADD CLIPPING!!\r
+//memory management needs to be added\r
+//void\r
+//modexDrawBmpRegion   (page_t *page, int x, int y, int rx, int ry, int rw, int rh, bitmap_t *bmp)\r
+void modexDrawPBufRegion        (page_t *page, int x, int y, int rx, int ry, int rw, int rh, planar_buf_t *p, boolean sprite)\r
+{\r
+        int plane;\r
+        int px, py, i;\r
+        px=x;\r
+        py=y;\r
+        for(plane=0; plane < 4; plane++) {\r
+                i=(rx/4)+((rx/4)*ry);\r
+                modexSelectPlane(PLANE(plane+x));\r
+                for(; y < py+rh; 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)), &(p->plane[plane][i+=rw]), rw/4);\r
+                        //}\r
+                }\r
+                x=px;\r
+                y=py;\r
+        }\r
+}\r
+\r
 \r
+/*temp*/\r
 void\r
-oldDrawBmp(byte far* page, int x, int y, bitmap_t *bmp, byte sprite)\r
+DrawPBuf(page_t *page, int x, int y, planar_buf_t *p, boolean sprite)\r
 {\r
-       byte plane;\r
-       word px, py;\r
-       word offset;\r
-\r
-       /* TODO Make this fast.  It's SLOOOOOOW */\r
+       int plane;\r
+       int px, py, i;\r
+//     byte near *buff;\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(px = plane; px < bmp->width; px+=4) {\r
-                       offset=px;\r
-                       for(py=0; py<bmp->height; py++) {\r
-                       if(!sprite || bmp->data[offset])\r
-                               page[PAGE_OFFSET(x+px, y+py)] = bmp->data[offset];\r
-                       offset+=bmp->width;\r
-                       }\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
-CDrawBmp(byte far* vgamem, page_t* page, int x, int y, bitmap_t *bmp, byte sprite)\r
+oldDrawBmp(byte far* page, int x, int y, bitmap_t *bmp, byte sprite)\r
 {\r
        byte plane;\r
        word px, py;\r
-       word offset=0;\r
-\r
+       word offset;\r
 \r
        /* TODO Make this fast.  It's SLOOOOOOW */\r
        for(plane=0; plane < 4; plane++) {\r
@@ -324,8 +478,7 @@ CDrawBmp(byte far* vgamem, page_t* page, int x, int y, bitmap_t *bmp, byte sprit
                        offset=px;\r
                        for(py=0; py<bmp->height; py++) {\r
                        if(!sprite || bmp->data[offset])\r
-                               //modexputPixel(page, x+px, y+py, bmp->data[offset]);\r
-                               vgamem[PAGE_OFFSET(x+px, y+py)] = bmp->data[offset];\r
+                               page[PAGE_OFFSET(x+px, y+py)] = bmp->data[offset];\r
                        offset+=bmp->width;\r
                        }\r
                }\r
@@ -338,7 +491,6 @@ modexDrawBmp(page_t *page, int x, int y, bitmap_t *bmp) {
     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
@@ -406,18 +558,6 @@ modexDrawBmpRegion(page_t *page, int x, int y,
     }\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
-        int plane;\r
-        for(plane=0; plane < 4; plane++)\r
-        {\r
-                //fack\r
-        }\r
-}\r
-\r
-\r
 void\r
 modexDrawSprite(page_t *page, int x, int y, bitmap_t *bmp) {\r
     /* draw the whole sprite */\r
@@ -496,7 +636,6 @@ modexDrawSpriteRegion(page_t *page, int x, int y,
     }\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
  * regions and the memory areas do not overlap.\r
@@ -912,6 +1051,14 @@ modexPalUpdate0(byte *p)
         }\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
@@ -1039,7 +1186,7 @@ void modexhlin(page_t *page, word xl, word xh, word y, word color)
 \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
@@ -1052,6 +1199,7 @@ void modexprint(page_t *page, word x, word y, word t, word col, word bgcol, cons
        word addr = (word) l;\r
        word chw=0;\r
        byte c;\r
+       //byte near *bakapee;\r
 \r
        switch(t)\r
        {\r
@@ -1104,9 +1252,14 @@ void modexprint(page_t *page, word x, word y, word t, word col, word bgcol, cons
                DEC CX\r
                JNZ L1\r
        }\r
-\r
+       //bakapee = _nmalloc(sizeof(byte)*8);\r
+//TODO: OPTIMIZE THIS!!!!\r
                for(i=0; i<w; i++)\r
                {\r
+                       /*modexSelectPlane(PLANE(x));\r
+                       j=1<<8;\r
+                       *bakapee=(l[i] & j ? col:bgcol);\r
+                       _fmemcpy(page->data + (((page->width/4) * (y+page->dy+i)) + ((x+page->dx+chw) / 4)), bakapee, 8);*/\r
                        j=1<<8;\r
                        xp=0;\r
                        while(j)\r
@@ -1118,6 +1271,7 @@ void modexprint(page_t *page, word x, word y, word t, word col, word bgcol, cons
                }\r
                chw += xp;\r
        }\r
+       //_nfree(bakapee);\r
 }\r
 \r
 void modexprintbig(page_t *page, word x, word y, word t, word col, word bgcol, const byte *str)\r
@@ -1195,6 +1349,21 @@ void modexprintbig(page_t *page, word x, word y, word t, word col, word bgcol, c
        }\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