home *** CD-ROM | disk | FTP | other *** search
- /*▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒
- ▒▒ ▒▒
- ▒▒ Ejemplo de inicialización y uso del modo X. Fondo de fundido. ▒▒
- ▒▒ ▒▒
- ▒▒ 1996 Compiler SoftWare ▒▒
- ▒▒ ▒▒
- ▒▒ Creado con Borland C 3.1, pero creo que funcionará con todos los de ▒▒
- ▒▒ Borland a partir de la v2.0, y con Turbo C/C++. ▒▒
- ▒▒ ▒▒
- ▒▒ Ver COMPILER.NFO ▒▒
- ▒▒ ▒▒
- ▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒;-)▒▒▒▒
- */
-
- #include "MODOX.H"
-
- /* Función principal: Gradiente verde-rojo de TWEAK*/
-
- void main( )
- {
- unsigned char y;
-
- Set_320x200X();
-
- outportb(0x3c8, 0); /*color*/
-
- for (y = 0; y<240; y++)
- {
- outportb(0x3c9, y>>2); /* cambiamos la paleta*/
- outportb(0x3c9, (256-y)>>2); /* al mismo tiempo que*/
- outportb(0x3c9, y>>2); /* ponemos los puntos */
- asm mov ax , 0xa000
- asm mov es , ax
- _DI = (y*80) ; /* algo arcaico */
- asm mov cx, 80
- asm mov al , [y]
- asm rep stosb /* 80 píxels de golpe */
- } /* en 4 planos = 320 pix.*/
-
- asm xor ax, ax
- asm int 16h
- asm mov ax , 3h
- asm int 10h /* volvemos al modo 3 de texto */
- }
-
-