255 lines
13 KiB
C++
255 lines
13 KiB
C++
#include <stdlib.h>
|
||
#include <stdio.h>
|
||
#include <conio.h>
|
||
#include <math.h>
|
||
#include <dos.h>
|
||
|
||
|
||
#include "c:\backup\fuentes\prn_cnt\prn_cnt.h"
|
||
|
||
#define INICIO 40
|
||
#define AMPLIACION 1
|
||
|
||
// S T R U C T U R E S //////////////////////////////////////////////////////
|
||
|
||
typedef struct worm_typ
|
||
{
|
||
int y; // current y position of worm
|
||
int color; // color of worm
|
||
int speed; // speed of worm
|
||
int counter; // counter
|
||
|
||
} worm, *worm_ptr;
|
||
|
||
worm worms[90]; // used to make the screen melt
|
||
|
||
unsigned int far *clock = (unsigned int far *)0x0000046C; // pointer to internal
|
||
// 18.2 clicks/sec
|
||
|
||
//////////////////////////////////////////////////////////////////////////////
|
||
|
||
void Melt( void );
|
||
void InitScreen(void);
|
||
void RemapLeds(void);
|
||
void RemapInputs(void);
|
||
void cInfoMundo(void);
|
||
|
||
void main(void)
|
||
{
|
||
char buffer[4096];
|
||
char key2;
|
||
int key = 0;
|
||
|
||
gettext(1, 1, 80, 25, buffer);
|
||
setcursortype(_NOCURSOR);
|
||
|
||
Melt();
|
||
InitScreen();
|
||
|
||
|
||
Lpt_usado = 1; /* Decimos que estamos usando el LPT1 */
|
||
|
||
/* Hay un archivo de registros?
|
||
SI: LO UTILIZA PARA SABER QUE SALIDAS ESTA ACTIVADAS
|
||
NO: LAS RESETEA
|
||
*/
|
||
if ( Register( LEER, "demo.std" ) != ok )
|
||
Reset_all();
|
||
|
||
RemapLeds();
|
||
while( key != 27 )
|
||
{
|
||
while( !kbhit() ) {
|
||
RemapInputs();
|
||
cInfoMundo();
|
||
};
|
||
key = getch();
|
||
key = key - '0';
|
||
if ( key > 0 && key < 9 )
|
||
{
|
||
|
||
/* LEE EL ESTADO DE LA SALIDA INDICADA POR EL USUARIO */
|
||
key2 = Lee_Salida( (unsigned char)(key-1) + INICIO );
|
||
|
||
/* ESCRIBE EL ESTADO CONTRARIO (leido antes) DE LA SALIDA
|
||
INDICADA POR EL USUARIO, ANTES. */
|
||
Escribe_Salida( (unsigned char)(key-1+INICIO), (char)!key2 );
|
||
RemapLeds();
|
||
}
|
||
else key = key + '0';
|
||
|
||
};
|
||
|
||
|
||
/* SI TODAS LAS SALIDAS ESTAN A CERO LAS RESETEA ( por simple formalidad )
|
||
DE LO CONTRARIO GUARDA EL ESTADO DE LOS REGISTROS EN "demo.std" */
|
||
if ( Lee_Salidas( AMPLIACION, NULL ) == 0 )
|
||
Reset_all();
|
||
else
|
||
Register( ESCRIBIR, "demo.std" );
|
||
|
||
puttext(1, 1, 80, 25, buffer);
|
||
}
|
||
|
||
|
||
void cInfoMundo(void)
|
||
{
|
||
static char state, pulse = 0;
|
||
|
||
gotoxy( 2, 12 );
|
||
textcolor( state % 16 ); cprintf("I");
|
||
textcolor( ++state % 16 ); cprintf("n");
|
||
textcolor( state % 16 ); cprintf("f");
|
||
textcolor( ++state % 16 ); cprintf("o");
|
||
textcolor( state % 16 ); cprintf("M");
|
||
textcolor( ++state % 16 ); cprintf("u");
|
||
textcolor( state % 16 ); cprintf("n");
|
||
textcolor( ++state % 16 ); cprintf("d");
|
||
textcolor( state % 16 ); cprintf("o");
|
||
|
||
}
|
||
|
||
void RemapLeds(void)
|
||
{
|
||
gotoxy(22,9);
|
||
unsigned char i;
|
||
|
||
for( i=0; i<8; i++)
|
||
{
|
||
if ( Lee_Salida( i + INICIO ) )
|
||
textcolor( LIGHTGREEN );
|
||
else
|
||
textcolor( LIGHTRED );
|
||
cprintf("<EFBFBD> ");
|
||
}
|
||
}
|
||
|
||
void RemapInputs(void)
|
||
{
|
||
int i;
|
||
|
||
for( i=0; i<8; i++)
|
||
{
|
||
gotoxy((29+(i*2)),15-i);
|
||
if ( Lee_Entrada( i + INICIO ) )
|
||
{
|
||
textcolor( LIGHTGREEN );
|
||
cprintf("<EFBFBD>");
|
||
} else {
|
||
textcolor( LIGHTRED );
|
||
cprintf("<EFBFBD>");
|
||
}
|
||
}
|
||
}
|
||
|
||
//////////////////////////////////////////////////////////////////////////////
|
||
//////////////////////////////////////////////////////////////////////////////
|
||
//// //////////////////////////////////////////////////////////////////
|
||
//// ////////////////////////////////////////////////////////////////////////
|
||
//// ////// // // // // // // // //// /////////
|
||
//// //// // // // // ////// // /// // // // // / ////////
|
||
//// ////// // // // // ////// // /// // // // ///////// ////////
|
||
//// ////// // // // // // // // // // /////////
|
||
//////////////////////////////////////////////////////////////////////////////
|
||
//////////////////////////////////////////////////////////////////////////////
|
||
//////// ///////////// //////////////// ////// // ///////////
|
||
//////// ///////////// /// ////////////////// ////////// // ///////////
|
||
//////// // ////// /// // // // // // // // ///
|
||
//// // ////// //////// // // // ////// // // /////// ///
|
||
//// // // ///////// /////// // // // // // // // ///
|
||
//// // ////// /////// // // // // // // // ///
|
||
//////////////////////////////////////////////////////////////////////////////
|
||
void InitScreen(void)
|
||
{
|
||
clrscr();
|
||
gotoxy(1,1);
|
||
/*
|
||
cprintf("Grafista:<3A><><EFBFBD><EFBFBD>JD<4A><44><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>_____<5F><5F><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
cprintf("\r\nProgramador:<3A>JD<4A><44><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>___________________/|||||/|_<><5F><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
cprintf("\r\n <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Joshua<75><61><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD>===<3D><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>|/#####|//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
cprintf("\r\nHardware:<3A><><EFBFBD><EFBFBD>Lopez<65><7A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
cprintf("\r\n <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Millan<61><6E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>/<2F>_______<5F><5F><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>_______<5F><5F><EFBFBD><EFBFBD><EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
cprintf("\r\n<><6E><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><> /<2F>/_______/|<7C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>/_______/|<7C><>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
cprintf("\r\n<><6E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20> /<2F><>|<7C>_<EFBFBD>_<EFBFBD>_<EFBFBD>|/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>|<7C>_<EFBFBD>_<EFBFBD>_<EFBFBD>|/<2F>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
cprintf("\r\nBienbenidos<6F>a<EFBFBD>una<6E><61><EFBFBD>/<2F><>________________ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
cprintf("\r\nnueva<76>era, /<2F><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20> <20><><EFBFBD> <20><> /<2F><><EFBFBD><EFBFBD><EFBFBD>===<3D><>/<2F><>Pulsa<73>un<75>n<EFBFBD>mero<72>del<65>(0-7)");
|
||
cprintf("\r\n<>bienvenidos<6F>a<EFBFBD><61>/<2F><>/_<>_<EFBFBD>_<EFBFBD>_<EFBFBD>_<EFBFBD>_<EFBFBD>_<EFBFBD>_<EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD>===<3D><>/<2F><>para<72>activar/desactivar<61>la<6C>");
|
||
cprintf("\r\n <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>/<2F><>____<5F><5F><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>===<3D><>/<2F><>salida<64>correspondiente.<2E><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
cprintf("\r\n<>InfoMundo<64><6F>/<2F><>/<2F>JD<4A>/|<7C><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>===<3D><>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
cprintf("\r\n /<2F><>/___<5F>/<2F>!<21><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>===<3D><>/<2F><><EFBFBD>Las<61>led<65>indican<61>el<65>estado<64><6F><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
cprintf("\r\n <20><>/<2F><><EFBFBD>|____|!<21><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>===<3D><>/<2F><><EFBFBD>de<64>las<61>entradas.<2E><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
cprintf("\r\n /<2F><><EFBFBD>________________<5F><5F><EFBFBD><EFBFBD><EFBFBD><EFBFBD>===<3D><>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
cprintf("\r\n<><6E><EFBFBD><EFBFBD>/<2F><><EFBFBD>/________________/|<7C><><EFBFBD>===<3D><>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
cprintf("\r\n<><6E>/<2F><><EFBFBD><EFBFBD>|<7C>.<2E>.<2E>.<2E>.<2E>.<2E>.<2E>.<2E>.<2E>|/ /<2F><><EFBFBD><EFBFBD>Programa<6D>ejemplo<6C>en<65>modo<64>TEXTO.<2E>ver<65>1.1");
|
||
cprintf("\r\n/______<5F>\\<5C>.<2E>.<2E>.<2E>.<2E>.<2E>.<2E>.<2E>/______/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>InfoMundo<64>1996<39>(c).<2E>_-<2D>FuTuRe<52>ViSiOn<4F>-_");
|
||
cprintf("\r\n ------------- <20><><EFBFBD><EFBFBD>");
|
||
*/
|
||
|
||
|
||
textcolor(WHITE);cprintf("Grafista:<3A><><EFBFBD><EFBFBD>JD<4A><44><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");textcolor(BLUE); cprintf("_____<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
textcolor(WHITE);cprintf("\r\nProgramador:<3A>JD<4A><44><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");textcolor(YELLOW+BLINK); cprintf("<EFBFBD><EFBFBD>");textcolor(GREEN); cprintf("___________________");textcolor(BLUE); cprintf("/|||||/|");textcolor(GREEN); cprintf("_<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
textcolor(WHITE);cprintf("\r\n <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Joshua<75><61><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");textcolor(GREEN); cprintf("/");textcolor(LIGHTGRAY); cprintf("<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");textcolor(CYAN); cprintf("===");textcolor(LIGHTGRAY); cprintf("<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");textcolor(BLUE); cprintf("|/#####|/");textcolor(GREEN); cprintf("/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
textcolor(WHITE);cprintf("\r\nHardware:<3A><><EFBFBD><EFBFBD>Lopez<65><7A><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");textcolor(GREEN); cprintf("/");textcolor(MAGENTA); cprintf("<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");textcolor(GREEN); cprintf("<EFBFBD><EFBFBD><EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
textcolor(WHITE);cprintf("\r\n <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Millan<61><6E><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");textcolor(GREEN); cprintf("/");textcolor(DARKGRAY); cprintf("<EFBFBD>_______<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>_______<EFBFBD><EFBFBD><EFBFBD>");textcolor(GREEN); cprintf("<EFBFBD><EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
textcolor(WHITE);cprintf("\r\n<EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><> ");textcolor(GREEN); cprintf("/");textcolor(DARKGRAY); cprintf("<EFBFBD>/_______/|<7C><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>/_______/|<7C>");textcolor(GREEN); cprintf("<EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
textcolor(WHITE);cprintf("\r\n<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20> ");textcolor(GREEN); cprintf("/");textcolor(DARKGRAY); cprintf("<EFBFBD><EFBFBD>|");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(DARKGRAY); cprintf("_");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(DARKGRAY); cprintf("_");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(DARKGRAY); cprintf("_");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(DARKGRAY); cprintf("|/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>|");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(DARKGRAY); cprintf("_");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(DARKGRAY); cprintf("_");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(DARKGRAY); cprintf("_");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(DARKGRAY); cprintf("|/");textcolor(GREEN); cprintf("<EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
textcolor(WHITE);cprintf("\r\nBienbenidos<EFBFBD>a<EFBFBD>una<EFBFBD><EFBFBD><EFBFBD>");textcolor(GREEN); cprintf("/");textcolor(DARKGRAY); cprintf("<EFBFBD><EFBFBD>________________ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");textcolor(GREEN); cprintf("<EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
textcolor(WHITE);cprintf("\r\nnueva<EFBFBD>era, ");textcolor(GREEN); cprintf("/");textcolor(DARKGRAY); cprintf("<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20> <20><><EFBFBD> <20><> /<2F><><EFBFBD>");textcolor(LIGHTGRAY); cprintf("<EFBFBD><EFBFBD>");textcolor(CYAN); cprintf("===");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(GREEN); cprintf("<EFBFBD>/<2F><>");textcolor(WHITE); cprintf("Pulsa<EFBFBD>un<EFBFBD>n<EFBFBD>mero<EFBFBD>del<EFBFBD>(0-7)");
|
||
textcolor(WHITE);cprintf("\r\n<EFBFBD>bienvenidos<EFBFBD>a<EFBFBD><EFBFBD>");textcolor(GREEN); cprintf("/");textcolor(DARKGRAY); cprintf("<EFBFBD><EFBFBD>/_");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(DARKGRAY); cprintf("_");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(DARKGRAY); cprintf("_");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(DARKGRAY); cprintf("_");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(DARKGRAY); cprintf("_");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(DARKGRAY); cprintf("_");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(DARKGRAY); cprintf("_");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(DARKGRAY); cprintf("_");textcolor(LIGHTGRAY); cprintf("<EFBFBD>"); textcolor(DARKGRAY); cprintf("/<2F><><EFBFBD>");textcolor(LIGHTGRAY); cprintf("<EFBFBD><EFBFBD>");textcolor(CYAN); cprintf("===");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(GREEN); cprintf("<EFBFBD>/<2F><>");textcolor(WHITE); cprintf("para<EFBFBD>activar/desactivar<61>la<6C>");
|
||
textcolor(WHITE);cprintf("\r\n <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");textcolor(GREEN); cprintf("/");textcolor(DARKGRAY); cprintf("<EFBFBD><EFBFBD>____<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");textcolor(LIGHTGRAY); cprintf("<EFBFBD><EFBFBD>");textcolor(CYAN); cprintf("===");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(GREEN); cprintf("<EFBFBD>/<2F><>");textcolor(WHITE); cprintf("salida<EFBFBD>correspondiente.<2E><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
textcolor(WHITE);cprintf("\r\n<EFBFBD>InfoMundo<EFBFBD><EFBFBD>");textcolor(GREEN); cprintf("/");textcolor(DARKGRAY); cprintf("<EFBFBD><EFBFBD>/<2F>JD<4A>/|<7C><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>");textcolor(LIGHTGRAY); cprintf("<EFBFBD><EFBFBD>");textcolor(CYAN); cprintf("===");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(GREEN); cprintf("<EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
textcolor(WHITE);cprintf("\r\n ");textcolor(GREEN); cprintf("/");textcolor(DARKGRAY); cprintf("<EFBFBD><EFBFBD>/___<5F>/<2F>");textcolor(LIGHTGRAY); cprintf("!");textcolor(DARKGRAY); cprintf("<EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>");textcolor(LIGHTGRAY); cprintf("<EFBFBD><EFBFBD>");textcolor(CYAN); cprintf("===");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(GREEN); cprintf("<EFBFBD>/<2F><><EFBFBD>");textcolor(WHITE); cprintf("Las<EFBFBD>led<EFBFBD>indican<EFBFBD>el<EFBFBD>estado<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
textcolor(WHITE);cprintf("\r\n <20><>");textcolor(GREEN); cprintf("/");textcolor(DARKGRAY); cprintf("<EFBFBD><EFBFBD><EFBFBD>|____|");textcolor(LIGHTGRAY); cprintf("!");textcolor(DARKGRAY); cprintf("<EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>");textcolor(LIGHTGRAY); cprintf("<EFBFBD><EFBFBD>");textcolor(CYAN); cprintf("===");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(GREEN); cprintf("<EFBFBD>/<2F><><EFBFBD>");textcolor(WHITE); cprintf("de<EFBFBD>las<EFBFBD>entradas.<2E><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
textcolor(WHITE);cprintf("\r\n ");textcolor(GREEN); cprintf("/");textcolor(BLUE); cprintf("<EFBFBD><EFBFBD><EFBFBD>________________<EFBFBD>");textcolor(DARKGRAY); cprintf("<EFBFBD><EFBFBD><EFBFBD>");textcolor(LIGHTGRAY); cprintf("<EFBFBD><EFBFBD>");textcolor(CYAN); cprintf("===");textcolor(LIGHTGRAY); cprintf("<EFBFBD>");textcolor(GREEN); cprintf("<EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
textcolor(WHITE);cprintf("\r\n<EFBFBD><EFBFBD><EFBFBD><EFBFBD>");textcolor(GREEN); cprintf("/");textcolor(BLUE); cprintf("<EFBFBD><EFBFBD><EFBFBD>/________________/|");textcolor(LIGHTGRAY); cprintf("<EFBFBD><EFBFBD><EFBFBD>");textcolor(CYAN); cprintf("===");textcolor(LIGHTGRAY); cprintf("<EFBFBD><EFBFBD>");textcolor(GREEN); cprintf("/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>");
|
||
textcolor(WHITE);cprintf("\r\n<EFBFBD><EFBFBD>");textcolor(GREEN); cprintf("/");textcolor(BLUE); cprintf("<EFBFBD><EFBFBD><EFBFBD>|<7C>.<2E>.<2E>.<2E>.<2E>.<2E>.<2E>.<2E>.<2E>|/ ");textcolor(GREEN); cprintf("/");textcolor(WHITE); cprintf("<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Programa<EFBFBD>ejemplo<EFBFBD>en<EFBFBD>modo<EFBFBD>TEXTO.<2E>ver<65>1.1");
|
||
textcolor(WHITE);cprintf("\r\n");textcolor(GREEN); cprintf("/_____<5F>");textcolor(BLUE); cprintf("\\<EFBFBD>.<2E>.<2E>.<2E>.<2E>.<2E>.<2E>.<2E>/");textcolor(GREEN); cprintf("______/");textcolor(WHITE); cprintf("<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>InfoMundo<EFBFBD>1996<EFBFBD>(c).<2E>_-<2D>FuTuRe<52>ViSiOn<4F>-_");
|
||
textcolor(BLUE); cprintf("\r\n ------------- <20><><EFBFBD><EFBFBD>");
|
||
|
||
}
|
||
|
||
//////////////////////////////////////////////////////////////////////////////
|
||
void Melt( void )
|
||
{
|
||
|
||
int index,ticks=0;
|
||
|
||
for (index=1; index< 81; index++)
|
||
{
|
||
worms[index].speed = 3 + rand()%9;
|
||
worms[index].y = 0;
|
||
worms[index].counter = 0;
|
||
gotoxy( index, 1 );
|
||
cprintf(" ");
|
||
}
|
||
|
||
while(++ticks<290)
|
||
{
|
||
delay(10);
|
||
|
||
for (index=1; index<81; index++)
|
||
{
|
||
if (++worms[index].counter == worms[index].speed)
|
||
{
|
||
worms[index].counter = 0;
|
||
if (worms[index].y < 25)
|
||
{
|
||
gotoxy( index, worms[index].y );
|
||
cprintf("<EFBFBD>");
|
||
gotoxy( index, worms[index].y-1 );
|
||
cprintf(" ");
|
||
worms[index].y++;
|
||
} else {
|
||
gotoxy( index, 24 );
|
||
cprintf(" ");
|
||
}
|
||
}
|
||
}
|
||
if (!(ticks % 500))
|
||
{
|
||
for (index=1; index<81; index++)
|
||
worms[index].speed--;
|
||
}
|
||
}
|
||
}
|