]> 4ch.mooo.com Git - 16.git/blobdiff - src/lib/16_tail.c
p16 is being worked on a bunch by me wwww [16_ca needs huge amounts of work and I...
[16.git] / src / lib / 16_tail.c
index daa9fadc3192344578189bcdd8a8b762e11bb7e5..c0d6d89fdee243505a3ce0ed990b0d2d39117771 100755 (executable)
  *\r
  */\r
 /*\r
- * 16 library\r
+ * 16 tail library\r
  */\r
 \r
 #include "src/lib/16_tail.h"\r
 #include "src/lib/16text.h"\r
+\r
+static word far* clockw= (word far*) 0x046C; /* 18.2hz clock */\r
+\r
 /*\r
 ==========================\r
 =\r
@@ -127,7 +130,7 @@ void        TL_VidInit(global_game_variables_t *gvar)
        // get old video mode\r
        //in.h.ah = 0xf;\r
        //int86(0x10, &in, &out);\r
-       gvar->video.old_mode = vgaGetMode();//out.h.al;\r
+       if(!gvar->video.old_mode) gvar->video.old_mode = vgaGetMode();//out.h.al;\r
 #else\r
        gvar->video.old_mode = 3;\r
 #endif\r
@@ -281,6 +284,176 @@ void      TL_VidInit(global_game_variables_t *gvar)
 \r
 //===========================================================================\r
 \r
+/*\r
+===================\r
+=\r
+= FizzleFade\r
+=\r
+===================\r
+*/\r
+\r
+#define PIXPERFRAME     1600\r
+\r
+void FizzleFade (unsigned source, unsigned dest,\r
+       unsigned width,unsigned height, boolean abortable, global_game_variables_t *gv)\r
+{\r
+       unsigned        drawofs,pagedelta;\r
+       unsigned        char maskb[8] = {1,2,4,8,16,32,64,128};\r
+       unsigned        x,y,p,frame;\r
+       long            rndval;\r
+       word TimeCount = *clockw;\r
+       word screenseg = SCREENSEG;\r
+\r
+       pagedelta = dest-source;\r
+//++++ VL_SetScreen (dest,0);\r
+       rndval = 1;\r
+       x = y = 0;\r
+\r
+       __asm {\r
+               mov     es,[screenseg]\r
+               mov     dx,SC_INDEX\r
+               mov     al,SC_MAPMASK\r
+               out     dx,al\r
+       }\r
+\r
+       TimeCount=frame=0;\r
+       do      // while (1)\r
+       {\r
+               if (abortable)\r
+               {\r
+                       IN_ReadControl(0,gv);\r
+                       if (gv->player[0].info.button0 || gv->player[0].info.button1 || gv->in.inst->Keyboard[sc_Space]\r
+                       || gv->in.inst->Keyboard[sc_Enter])\r
+                       {\r
+//++++                         VW_ScreenToScreen (source,dest,width/8,height);\r
+                               return;\r
+                       }\r
+               }\r
+\r
+               for (p=0;p<PIXPERFRAME;p++)\r
+               {\r
+                       //\r
+                       // seperate random value into x/y pair\r
+                       //\r
+                       __asm {\r
+                               mov     ax,[WORD PTR rndval]\r
+                               mov     dx,[WORD PTR rndval+2]\r
+                               mov     bx,ax\r
+                               dec     bl\r
+                               mov     [BYTE PTR y],bl                 // low 8 bits - 1 = y xoordinate\r
+                               mov     bx,ax\r
+                               mov     cx,dx\r
+                               shr     cx,1\r
+                               rcr     bx,1\r
+                               shr     bx,1\r
+                               shr     bx,1\r
+                               shr     bx,1\r
+                               shr     bx,1\r
+                               shr     bx,1\r
+                               shr     bx,1\r
+                               shr     bx,1\r
+                               mov     [x],bx                                  // next 9 bits = x xoordinate\r
+                       //\r
+                       // advance to next random element\r
+                       //\r
+                               shr     dx,1\r
+                               rcr     ax,1\r
+                               jnc     noxor\r
+                               xor     dx,0x0001\r
+                               xor     ax,0x2000\r
+#ifdef __BORLANDC__\r
+                       }\r
+#endif\r
+noxor:\r
+#ifdef __BORLANDC__\r
+                       __asm {\r
+#endif\r
+                               mov     [WORD PTR rndval],ax\r
+                               mov     [WORD PTR rndval+2],dx\r
+                       }\r
+\r
+                       if (x>width || y>height)\r
+                               continue;\r
+                       drawofs = source+gv->video.ofs.ylookup[y];\r
+\r
+                       __asm {\r
+                               mov     cx,[x]\r
+                               mov     si,cx\r
+                               and     si,7\r
+                               mov     dx,GC_INDEX\r
+                               mov     al,GC_BITMASK\r
+                               mov     ah,BYTE PTR [maskb+si]\r
+                               out     dx,ax\r
+\r
+                               mov     si,[drawofs]\r
+                               shr     cx,1\r
+                               shr     cx,1\r
+                               shr     cx,1\r
+                               add     si,cx\r
+                               mov     di,si\r
+                               add     di,[pagedelta]\r
+\r
+                               mov     dx,GC_INDEX\r
+                               mov     al,GC_READMAP                   // leave GC_INDEX set to READMAP\r
+                               out         dx,al\r
+\r
+                               mov     dx,SC_INDEX+1\r
+                               mov     al,1\r
+                               out         dx,al\r
+                               mov     dx,GC_INDEX+1\r
+                               mov     al,0\r
+                               out         dx,al\r
+\r
+                               mov     bl,[es:si]\r
+                               xchg    [es:di],bl\r
+\r
+                               mov     dx,SC_INDEX+1\r
+                               mov     al,2\r
+                               out         dx,al\r
+                               mov     dx,GC_INDEX+1\r
+                               mov     al,1\r
+                               out         dx,al\r
+\r
+                               mov     bl,[es:si]\r
+                               xchg    [es:di],bl\r
+\r
+                               mov     dx,SC_INDEX+1\r
+                               mov     al,4\r
+                               out         dx,al\r
+                               mov     dx,GC_INDEX+1\r
+                               mov     al,2\r
+                               out         dx,al\r
+\r
+                               mov     bl,[es:si]\r
+                               xchg    [es:di],bl\r
+\r
+                               mov     dx,SC_INDEX+1\r
+                               mov     al,8\r
+                               out         dx,al\r
+                               mov     dx,GC_INDEX+1\r
+                               mov     al,3\r
+                               out         dx,al\r
+\r
+                               mov     bl,[es:si]\r
+                               xchg    [es:di],bl\r
+                       }\r
+\r
+                       if (rndval == 1)                // entire sequence has been completed\r
+                       {\r
+//++++                         VGABITMASK(255);\r
+//++++                         VGAMAPMASK(15);\r
+                               return;\r
+                       }\r
+               }\r
+               frame++;\r
+//++++         while (TimeCount<frame){}       // don't go too fast\r
+       } while (1);\r
+\r
+\r
+}\r
+\r
+//===========================================================================\r
+\r
 /*\r
 ==================\r
 =\r
@@ -319,7 +492,7 @@ void DebugMemory_(global_game_variables_t *gvar, boolean q)
 #ifdef __WATCOMC__\r
        //IN_Ack ();\r
 #endif\r
-       if(q) MM_ShowMemory (gvar);\r
+//     if(q) MM_ShowMemory (gvar);\r
 }\r
 \r
 /*\r