MAKE_BOT/MAKE_BO2.CPP
2021-09-08 21:28:03 +02:00

1546 lines
78 KiB
C++
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

#include <dos.h>
#include <math.h>
#include <alloc.h>
#include <conio.h>
#include <stdio.h>
#include <ctype.h>
#include <string.h>
#include <stdlib.h>
#include <graphics.h>
#include "c:\things\borlandc\jd_lib\f_lib\make_bot.h"
#define MB_TeclaPulsada() ( *(unsigned *) MK_FP(0x40,0x1A) != *(unsigned *) MK_FP(0x40,0x1C) )
/*ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ*/
/*Û MAKE BOTON Û*/
/*ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß*/
void ErrorOccurred(int errorcode);
struct Make_Boton {
/* unsigned */ int Up, Left, Down, Right;
unsigned char Cdf, Cb1, Cb2;
unsigned char Ab, Pb;
unsigned char Isc, Sc;
};
int P_Sec(int numero);
int lee_objeto(FILE *);
void Deprime_Image(struct Make_Boton Bot_Imp);
void Imprime_Boton(int D_Bord, struct Make_Boton Bot_Imp);
char True_Push = OFF, // Parametros para el TRUE_PUSH
Push = OFF; // PRESION REAL !!!
void far *arrow; // YA !!!
int Secuencias, *n_Botones_Secuencia;
char memoria_asignada = 0;//, vez = 0;
struct Make_Boton far *Botones; // Puntero a estructura
/*ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ*/
/*Û Control del Raton Û*/
/*ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß*/
void Carga_Puntero(void);
int Carga_Puntero_Animado(void);
void *Pantalla;
unsigned char *P_Raton1, *P_Raton2, *P_Raton3, *P_Raton4;
char raton=0, // Indica si hay un Raton = 1
PunteroRaton=0; // ¨ Se modifica el puntero ?
int x_raton=50, y_raton=50, // Tras Espera_Tecla_o_Raton(); devuelve
dir_raton [32+32]; // las coordenadas y botones pulsados...
unsigned char BLANCO = 255, GRIS_CLARO = 253, NEGRO = 240, UNKNOW = 249, AZUL = 250;
//////////////////////////////////////////////////////////////////////////////
/////////////////////////>>>> Inicio del codigo <<<<<<////////////////////////
//////////////////////////////////////////////////////////////////////////////
int carga_botones(char *f_datos)
{
FILE *fichero; // Fichero con datos del obj.
char error_lectura = OK;
static char vez = 0;
if( vez == 0 ) {
vez = 1;
atexit( Libera_Memoria );
}
if ( memoria_asignada == 1 ) { // Libera antiguos datos
free(n_Botones_Secuencia);
farfree(Botones);
memoria_asignada = 0;
}
if ( (fichero=fopen(f_datos,"r"))==NULL ) return ERROR_ABRIENDO;
error_lectura = lee_objeto(fichero);
if( fclose(fichero) != 0 ) return ERROR_CERRANDO;
// despliega_datos();
// while (!kbhit()); // Espera a que se pulse una tecla
return error_lectura;
}
//ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
// Lee un objeto del disco
//ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ
int lee_objeto(FILE *fichero)
{
char ch;
unsigned int signo=0,/*numero,*/ temp_num, temp_b;
/* unsigned */ int numero;
int SiZe_BoToN = 0;
int inc_Botones = -1;
if ( (Botones = (struct Make_Boton far *)farcalloc(1, sizeof( struct Make_Boton ) )) == NULL) {
return SIN_MEMORIA;
}
memoria_asignada = 1;
ch=fgetc(fichero); //Lee el primer caracter
while (ch!=EOF) { //Lee hasta fin de fichero
if (ch=='*') //Linea con comentario
while (ch!=EOL && ch!=EOF) ch=fgetc(fichero);
if (ch=='#') { //Numero de secuencias
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF) {
if (ch>='0' && ch<='9') numero= (numero*10+ch-48);
ch=fgetc(fichero);
}
Secuencias = numero;
if (( n_Botones_Secuencia = (int *) malloc( sizeof(int)*Secuencias ) ) == NULL) {
printf("\nNo Hay suficiente Memoria, ni para un Boton\n\n");
return SIN_MEMORIA;
}
}
if (ch=='!') { //Numero de Botones en la secuencia
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero= (numero*10+ch-48);
ch=fgetc(fichero);
}
temp_num = numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero= (numero*10+ch-48);
ch=fgetc(fichero);
}
n_Botones_Secuencia[temp_num - 1] = numero;
SiZe_BoToN += ( sizeof( struct Make_Boton ) * numero);
if ( (Botones = (struct Make_Boton far *)farrealloc(Botones, SiZe_BoToN )) == NULL) {
Secuencias = temp_num;
return SIN_MEMORIA;
}
memoria_asignada = 1;
}
if (ch=='$') { //C lculos del boton
inc_Botones++;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Botones [inc_Botones]. Left = numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Botones [inc_Botones]. Up = numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Botones [inc_Botones]. Right =numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
if(ch == '-' || ch == '-') signo = 1;
ch=fgetc(fichero);
}
if ( signo == 1 )
Botones [inc_Botones]. Down =numero * -1;
else
Botones [inc_Botones]. Down =numero;
signo = 0;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Botones [inc_Botones]. Cdf =numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Botones [inc_Botones]. Cb1 =numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Botones [inc_Botones]. Cb2 =numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Botones [inc_Botones]. Ab =numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Botones [inc_Botones]. Pb =numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Botones [inc_Botones]. Isc =numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Botones [inc_Botones]. Sc =numero;
}
if (ch!=EOF) ch=fgetc(fichero);
}
return OK;
}
void despliega_datos(void){
int SeCa;
clrscr();
for(int SeC=0; SeC<Secuencias; SeC++){
SeCa = P_Sec(SeC);
for(int Sec_S=0; Sec_S<n_Botones_Secuencia[SeC]; Sec_S++) {
printf("!%d,%d \n Up/Left/Right/Down: %d-%d-%d-%d, Cdf/Cb1/Cb2: %d-%d-%d Ab/Pb %d-%d, Isc-Sc %03d%03d\n",
SeC, Sec_S,
Botones[SeCa+Sec_S].Up,
Botones[SeCa+Sec_S].Left,
Botones[SeCa+Sec_S].Right,
Botones[SeCa+Sec_S].Down,
Botones[SeCa+Sec_S].Cdf,
Botones[SeCa+Sec_S].Cb1,
Botones[SeCa+Sec_S].Cb2,
Botones[SeCa+Sec_S].Ab,
Botones[SeCa+Sec_S].Pb,
Botones[SeCa+Sec_S].Isc,
Botones[SeCa+Sec_S].Sc );
}
}
}
int P_Sec(int numero){
int principio_secuencia = 0;
for(int i=0; i<numero; i++){
principio_secuencia += n_Botones_Secuencia[i];
}
return principio_secuencia;
}
void Imprime_Boton(int D_Bord, struct Make_Boton Bot_Imp){
int puntos[14];
unsigned char Ab = Bot_Imp.Ab;
if ( Bot_Imp.Down < 0 )
{
if(Bot_Imp.Pb > 0)
{
puntos[1] = 120;
puntos[2] = 300;
} else {
puntos[1] = 60;
puntos[2] = 240;
}
setlinestyle(0, 1, NORM_WIDTH);
setcolor(Bot_Imp.Cb1);
setfillstyle(SOLID_FILL, Bot_Imp.Cb1);
for ( puntos[0] = 0; puntos[0] < Ab; puntos[0]++ )
arc( Bot_Imp.Left, Bot_Imp.Up, puntos[1]+puntos[0], puntos[2]+puntos[0], Bot_Imp.Right - puntos[0]);
setcolor(Bot_Imp.Cb2);
setfillstyle(SOLID_FILL, Bot_Imp.Cb2);
for ( puntos[0] = 0; puntos[0] < Ab; puntos[0]++ )
arc( Bot_Imp.Left, Bot_Imp.Up, puntos[2]+puntos[0], puntos[1]+puntos[0], Bot_Imp.Right - puntos[0]);
if(D_Bord) {
setcolor(Bot_Imp.Cdf);
setfillstyle(SOLID_FILL, Bot_Imp.Cdf);
pieslice( Bot_Imp.Left, Bot_Imp.Up, 0, 360, Bot_Imp.Right - Ab);
}
if( Ab >= 2 ) {
setcolor( NEGRO );
setfillstyle(EMPTY_FILL, Bot_Imp.Cdf);
circle( Bot_Imp.Left, Bot_Imp.Up, Bot_Imp.Right);
}
} else {
if(Bot_Imp.Pb == 2) {
puntos[0] = Bot_Imp.Left; puntos[1] = Bot_Imp.Up;
puntos[2] = Bot_Imp.Right; puntos[3] = Bot_Imp.Up;
puntos[4] = Bot_Imp.Right; puntos[5] = Bot_Imp.Down;
puntos[6] = (Bot_Imp.Right-Ab); puntos[7] = (Bot_Imp.Down-Ab);
puntos[8] = (Bot_Imp.Right-Ab); puntos[9] = (Bot_Imp.Up+Ab);
puntos[10] = (Bot_Imp.Left+Ab); puntos[11] = (Bot_Imp.Up+Ab);
puntos[12] = Bot_Imp.Left; puntos[13] = Bot_Imp.Up;
} else {
puntos[0] = Bot_Imp.Left; puntos[1] = Bot_Imp.Up;
puntos[2] = Bot_Imp.Right; puntos[3] = Bot_Imp.Up;
puntos[4] = Bot_Imp.Right - Ab; puntos[5] = Bot_Imp.Up + Ab;
puntos[6] = Bot_Imp.Left + Ab; puntos[7] = Bot_Imp.Up + Ab;
puntos[8] = Bot_Imp.Left + Ab; puntos[9] = Bot_Imp.Down - Ab;
puntos[10] = Bot_Imp.Left; puntos[11] = Bot_Imp.Down;
puntos[12] = Bot_Imp.Left; puntos[13] = Bot_Imp.Up;
}
setcolor(Bot_Imp.Cb1);
setfillstyle(SOLID_FILL, Bot_Imp.Cb1);
setlinestyle(0, 1, NORM_WIDTH);
fillpoly(7, puntos);
if(Bot_Imp.Pb == 2) {
puntos[0] = Bot_Imp.Left+Ab; puntos[1] = Bot_Imp.Up+Ab;
puntos[2] = Bot_Imp.Left+Ab; puntos[3] = Bot_Imp.Down-Ab;
puntos[4] = Bot_Imp.Right-Ab; puntos[5] = Bot_Imp.Down-Ab;
puntos[6] = Bot_Imp.Right; puntos[7] = Bot_Imp.Down;
puntos[8] = Bot_Imp.Left; puntos[9] = Bot_Imp.Down;
puntos[10] = Bot_Imp.Left; puntos[11] = Bot_Imp.Up;
puntos[12] = Bot_Imp.Left+Ab; puntos[13] = Bot_Imp.Up+Ab;
} else {
puntos[0] = Bot_Imp.Right; puntos[1] = Bot_Imp.Up;
puntos[2] = Bot_Imp.Right; puntos[3] = Bot_Imp.Down;
puntos[4] = Bot_Imp.Left; puntos[5] = Bot_Imp.Down;
puntos[6] = Bot_Imp.Left+Ab; puntos[7] = Bot_Imp.Down-Ab;
puntos[8] = Bot_Imp.Right-Ab; puntos[9] = Bot_Imp.Down-Ab;
puntos[10] = Bot_Imp.Right-Ab; puntos[11] = Bot_Imp.Up+Ab;
puntos[12] = Bot_Imp.Right; puntos[13] = Bot_Imp.Up;
}
setcolor(Bot_Imp.Cb2);
setfillstyle(SOLID_FILL, Bot_Imp.Cb2);
setlinestyle(0, 1, NORM_WIDTH);
fillpoly(7, puntos);
if(D_Bord) {
setcolor(Bot_Imp.Cdf);
setfillstyle(SOLID_FILL, Bot_Imp.Cdf);
bar(Bot_Imp.Left+Ab+1, Bot_Imp.Up+Ab+1, Bot_Imp.Right-Ab-1, Bot_Imp.Down-Ab-1);
}
if( Ab >= 2 ) {
setcolor( NEGRO );
setfillstyle(EMPTY_FILL, Bot_Imp.Cdf);
rectangle(Bot_Imp.Left, Bot_Imp.Up, Bot_Imp.Right, Bot_Imp.Down);
}
}
}
void Imprime_Boton_i(struct Make_Boton Bot_Imp){
int puntos[14];
unsigned char Ab = Bot_Imp.Ab;
unsigned long size;
if ( Bot_Imp.Down < 0 )
{
if(Bot_Imp.Pb > 0)
{
puntos[1] = 120;
puntos[2] = 300;
} else {
puntos[1] = 60;
puntos[2] = 240;
}
setlinestyle(0, 1, NORM_WIDTH);
setcolor(Bot_Imp.Cb1);
setfillstyle(SOLID_FILL, Bot_Imp.Cb1);
for ( puntos[0] = 0; puntos[0] < Ab; puntos[0]++ )
arc( Bot_Imp.Left, Bot_Imp.Up, puntos[1]+puntos[0], puntos[2]+puntos[0], Bot_Imp.Right - puntos[0]);
setcolor(Bot_Imp.Cb2);
setfillstyle(SOLID_FILL, Bot_Imp.Cb2);
for ( puntos[0] = 0; puntos[0] < Ab; puntos[0]++ )
arc( Bot_Imp.Left, Bot_Imp.Up, puntos[2]+puntos[0], puntos[1]+puntos[0], Bot_Imp.Right - puntos[0]);
if( Ab >= 2 ) {
setcolor( NEGRO );
setfillstyle(EMPTY_FILL, Bot_Imp.Cdf);
circle( Bot_Imp.Left, Bot_Imp.Up, Bot_Imp.Right);
}
} else {
if(Bot_Imp.Pb == 2) {
puntos[0] = Bot_Imp.Left; puntos[1] = Bot_Imp.Up;
puntos[2] = Bot_Imp.Right; puntos[3] = Bot_Imp.Up;
puntos[4] = Bot_Imp.Right; puntos[5] = Bot_Imp.Down;
puntos[6] = (Bot_Imp.Right-Ab); puntos[7] = (Bot_Imp.Down-Ab);
puntos[8] = (Bot_Imp.Right-Ab); puntos[9] = (Bot_Imp.Up+Ab);
puntos[10] = (Bot_Imp.Left+Ab); puntos[11] = (Bot_Imp.Up+Ab);
puntos[12] = Bot_Imp.Left; puntos[13] = Bot_Imp.Up;
} else {
puntos[0] = Bot_Imp.Left; puntos[1] = Bot_Imp.Up;
puntos[2] = Bot_Imp.Right; puntos[3] = Bot_Imp.Up;
puntos[4] = Bot_Imp.Right - Ab; puntos[5] = Bot_Imp.Up + Ab;
puntos[6] = Bot_Imp.Left + Ab; puntos[7] = Bot_Imp.Up + Ab;
puntos[8] = Bot_Imp.Left + Ab; puntos[9] = Bot_Imp.Down - Ab;
puntos[10] = Bot_Imp.Left; puntos[11] = Bot_Imp.Down;
puntos[12] = Bot_Imp.Left; puntos[13] = Bot_Imp.Up;
}
setcolor(Bot_Imp.Cb2);
setfillstyle(SOLID_FILL, Bot_Imp.Cb2);
setlinestyle(0, 1, NORM_WIDTH);
fillpoly(7, puntos);
/* calculate the size of the image */
size = JD_imagesize(Bot_Imp.Left+Ab+1, Bot_Imp.Up+Ab+1, Bot_Imp.Right-Ab-1, Bot_Imp.Down-Ab-1);
/* allocate memory to hold the image */
if (True_Push == ON)
if ( (arrow = farmalloc(size)) == NULL ) Push = OFF; else {
/* grab the image */
getimage(Bot_Imp.Left+Ab+1, Bot_Imp.Up+Ab+1, Bot_Imp.Right-Ab-1, Bot_Imp.Down-Ab-1, arrow);
}
if(Push == ON && True_Push == ON ) {
if(Bot_Imp.Pb == 2) {
putimage(Bot_Imp.Left+1, Bot_Imp.Up+(Ab*2), arrow, COPY_PUT);
} else {
putimage(Bot_Imp.Left+(Ab*2), Bot_Imp.Up+(Ab*2), arrow, COPY_PUT);
}
} else {
if(Bot_Imp.Pb == 2) {
puntos[0] = Bot_Imp.Left+Ab; puntos[1] = Bot_Imp.Up+Ab;
puntos[2] = Bot_Imp.Left+Ab; puntos[3] = Bot_Imp.Down-Ab;
puntos[4] = Bot_Imp.Right-Ab; puntos[5] = Bot_Imp.Down-Ab;
puntos[6] = Bot_Imp.Right; puntos[7] = Bot_Imp.Down;
puntos[8] = Bot_Imp.Left; puntos[9] = Bot_Imp.Down;
puntos[10] = Bot_Imp.Left; puntos[11] = Bot_Imp.Up;
puntos[12] = Bot_Imp.Left+Ab; puntos[13] = Bot_Imp.Up+Ab;
} else {
puntos[0] = Bot_Imp.Right; puntos[1] = Bot_Imp.Up;
puntos[2] = Bot_Imp.Right; puntos[3] = Bot_Imp.Down;
puntos[4] = Bot_Imp.Left; puntos[5] = Bot_Imp.Down;
puntos[6] = Bot_Imp.Left+Ab; puntos[7] = Bot_Imp.Down-Ab;
puntos[8] = Bot_Imp.Right-Ab; puntos[9] = Bot_Imp.Down-Ab;
puntos[10] = Bot_Imp.Right-Ab; puntos[11] = Bot_Imp.Up+Ab;
puntos[12] = Bot_Imp.Right; puntos[13] = Bot_Imp.Up;
}
setcolor(Bot_Imp.Cb1);
setfillstyle(SOLID_FILL, Bot_Imp.Cb1);
setlinestyle(0, 1, NORM_WIDTH);
fillpoly(7, puntos);
}
if( Ab >= 2 ) {
setcolor( NEGRO );
setfillstyle(EMPTY_FILL, Bot_Imp.Cdf);
rectangle(Bot_Imp.Left, Bot_Imp.Up, Bot_Imp.Right, Bot_Imp.Down);
}
}
}
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
void Deprime_Image(struct Make_Boton Bot_Imp){
putimage(Bot_Imp.Left+Bot_Imp.Ab+1, Bot_Imp.Up+Bot_Imp.Ab+1, arrow, COPY_PUT);
farfree(arrow);
}
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
int Imprime_Estaticos(int Sec_st, char *file){
char ch, Relleno = 1, buffer[160];
unsigned char fuente, size, orientacion, color,
signo=0;
unsigned int /*numero, */ temp_num, temp_b;
int numero;
int secuencia_activa=-1, x, y;
struct Make_Boton Bot_Static;
FILE* fichero; // Fichero con datos del obj.
if ( (fichero=fopen(file,"r"))==NULL ) return ERROR_ABRIENDO;
ch=fgetc(fichero); //Lee el primer caracter
while (ch!=EOF) { //Lee hasta fin de fichero
if (ch=='*') //Linea con comentario
while (ch!=EOL && ch!=EOF) ch=fgetc(fichero);
if (ch=='­') { //Numero de Botones en la secuencia
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
secuencia_activa = numero;
}
if (ch=='&' && secuencia_activa == Sec_st) { //C lculos del boton estatico
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Bot_Static.Left = numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Bot_Static.Up = numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Bot_Static.Right =numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
if(ch == '-' || ch == '-') signo = 1;
ch=fgetc(fichero);
}
if ( signo==1 )
Bot_Static.Down =numero * -1;
else
Bot_Static.Down =numero;
signo = 0;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Bot_Static.Cdf =numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Bot_Static.Cb1 =numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Bot_Static.Cb2 =numero;
numero=0; Relleno = 1;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48; else
if(ch == '-' || ch == '-') Relleno = 0;
ch=fgetc(fichero);
}
Bot_Static.Ab =numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
Bot_Static.Pb =numero;
Imprime_Boton(Relleno, Bot_Static);
}
if (ch=='|' && secuencia_activa == Sec_st) { //C lculos del texto
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
x = numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
y = numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
fuente = numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
size = numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
orientacion = numero;
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',') {
if (ch>='0' && ch<='9') numero=numero*10+ch-48;
ch=fgetc(fichero);
}
color = numero;
buffer[0] = '\0';
numero=0;
ch=fgetc(fichero);
while (ch!=EOL && ch!=EOF && ch!=',' && numero<150 ) {
ch=fgetc(fichero);
if(ch!=',') { buffer[numero] = ch; numero++; }
}
buffer[numero] = '\0';
setcolor(color);
/* select the registered font */
settextstyle( fuente, orientacion, size);
outtextxy(x, y, buffer);
}
if (ch!=EOF) ch=fgetc(fichero);
}
if( fclose(fichero) != 0 ) return ERROR_CERRANDO;
return OK;
}
void Imprime_Secuencia(int Sec_num){
int psec = P_Sec(Sec_num-1);
for(int i=0; i<n_Botones_Secuencia[Sec_num-1]; i++)
Imprime_Boton( 1, Botones[psec+i]);
}
void Imprime_Bordes(int Sec_num, int Boton, int Color){
int psec = P_Sec(Sec_num-1);
int puntos[14];
unsigned int size;
if( Boton<=0 && Boton>n_Botones_Secuencia[Sec_num-1] ) return;
Boton--;
if( Color < 0 )
{
Imprime_Boton( 0, Botones[psec+Boton] );
return;
}
if ( Botones[psec+Boton].Down < 0 )
{
setlinestyle(0, 1, NORM_WIDTH);
setcolor(Color);
setfillstyle(SOLID_FILL, Color);
for ( puntos[0] = 0; puntos[0] < Botones[psec+Boton].Ab; puntos[0]++ )
circle( Botones[psec+Boton].Left, Botones[psec+Boton].Up, Botones[psec+Boton].Right - puntos[0]);
if( Botones[psec+Boton].Ab >= 2 ) {
setcolor( NEGRO );
setfillstyle(EMPTY_FILL, Botones[psec+Boton].Cdf);
circle( Botones[psec+Boton].Left, Botones[psec+Boton].Up, Botones[psec+Boton].Right);
}
} else {
puntos[0] = Botones[psec+Boton].Left; puntos[1] = Botones[psec+Boton].Up;
puntos[2] = Botones[psec+Boton].Right; puntos[3] = Botones[psec+Boton].Up;
puntos[4] = Botones[psec+Boton].Right; puntos[5] = Botones[psec+Boton].Down;
puntos[6] = (Botones[psec+Boton].Right-Botones[psec+Boton].Ab); puntos[7] = (Botones[psec+Boton].Down-Botones[psec+Boton].Ab);
puntos[8] = (Botones[psec+Boton].Right-Botones[psec+Boton].Ab); puntos[9] = (Botones[psec+Boton].Up+Botones[psec+Boton].Ab);
puntos[10] = (Botones[psec+Boton].Left+Botones[psec+Boton].Ab); puntos[11] = (Botones[psec+Boton].Up+Botones[psec+Boton].Ab);
puntos[12] = Botones[psec+Boton].Left; puntos[13] = Botones[psec+Boton].Up;
setcolor(Color);
setfillstyle(SOLID_FILL, Color);
setlinestyle(0, 1, NORM_WIDTH);
fillpoly(7, puntos);
puntos[0] = Botones[psec+Boton].Left+Botones[psec+Boton].Ab; puntos[1] = Botones[psec+Boton].Up+Botones[psec+Boton].Ab;
puntos[2] = Botones[psec+Boton].Left+Botones[psec+Boton].Ab; puntos[3] = Botones[psec+Boton].Down-Botones[psec+Boton].Ab;
puntos[4] = Botones[psec+Boton].Right-Botones[psec+Boton].Ab; puntos[5] = Botones[psec+Boton].Down-Botones[psec+Boton].Ab;
puntos[6] = Botones[psec+Boton].Right; puntos[7] = Botones[psec+Boton].Down;
puntos[8] = Botones[psec+Boton].Left; puntos[9] = Botones[psec+Boton].Down;
puntos[10] = Botones[psec+Boton].Left; puntos[11] = Botones[psec+Boton].Up;
puntos[12] = Botones[psec+Boton].Left+Botones[psec+Boton].Ab; puntos[13] = Botones[psec+Boton].Up+Botones[psec+Boton].Ab;
setcolor(Color);
setfillstyle(SOLID_FILL, Color);
setlinestyle(0, 1, NORM_WIDTH);
fillpoly(7, puntos);
if( Botones[psec+Boton].Ab >= 2 ) {
setcolor( NEGRO );
setfillstyle(EMPTY_FILL, Botones[psec+Boton].Cdf);
rectangle(Botones[psec+Boton].Left, Botones[psec+Boton].Up, Botones[psec+Boton].Right, Botones[psec+Boton].Down);
}
}
}
int Comprueba_Secuencia(int Sec_num){
char key, key2=0;
int i, Pulso = 0;
int psec = P_Sec(Sec_num-1);
if ( Espera_Tecla_o_Raton() == 0 ) {
if ( (key = getch())==0) key2 = getch();
for(i=0; i<n_Botones_Secuencia[Sec_num-1]; i++)
if( toupper( key ) == Botones[psec+i].Isc && key2 == Botones[psec+i].Sc) {
Push = ON;
Imprime_Boton_i(Botones[psec+i]);
delay(50);
if( Push == ON && True_Push == ON ) Deprime_Image(Botones[psec+i]);
Push = OFF;
Imprime_Boton(0, Botones[psec+i]);
return i+1;
}
if(key==0) { ungetch(key2); return (-1);
} else { ungetch(key); return (-2); }
}
for(i = 0; i < n_Botones_Secuencia[Sec_num-1]; i++)
if( Botones[psec+i].Down < 0 )
if( (x_raton >= Botones[psec+i].Left - Botones[psec+i].Right) && (x_raton <= Botones[psec+i].Left + Botones[psec+i].Right) &&
(y_raton >= Botones[psec+i].Up - Botones[psec+i].Right) && (y_raton <= Botones[psec+i].Up + Botones[psec+i].Right) ) {
Pulso = i + 1;
Push = ON;
Imprime_Boton_i(Botones[psec+Pulso-1]);
Anclar_Raton();
if( Push == ON && True_Push == ON ) Deprime_Image(Botones[psec+Pulso-1]);
Push = OFF;
Imprime_Boton(0, Botones[psec+Pulso-1]);
return Pulso;
}
else
if( (x_raton >= Botones[psec+i].Left) && (x_raton <= Botones[psec+i].Right) &&
(y_raton >= Botones[psec+i].Up) && (y_raton <= Botones[psec+i].Down) ) {
Pulso = i + 1;
Push = ON;
Imprime_Boton_i(Botones[psec+Pulso-1]);
Anclar_Raton();
if( Push == ON && True_Push == ON ) Deprime_Image(Botones[psec+Pulso-1]);
Push = OFF;
Imprime_Boton(0, Botones[psec+Pulso-1]);
return Pulso;
}
return (0);
}
void Anclar_Raton(void){
union REGS io;
io.x.ax = 3;
do {
int86(0x33, &io, &io);
} while( (io.x.bx & 1)==1 || ((io.x.bx >> 1) & 1)==1);
}
int Espera_TeclaRaton(void){
// inicializa_raton_grafico(0, 0, 624, 464);
// char boton_izq, boton_der;
char Que;
activa_raton();
union REGS io;
io.x.ax = 3;
do{
int86(0x33, &io, &io); // lee posici¢n y estados del bot¢n
// boton_izq = io.x.bx & 1;
// boton_der = (io.x.bx >> 1) & 1;
x_raton = io.x.cx;
y_raton = io.x.dx;
}while( (io.x.bx & 1) == 0 && ((io.x.bx >> 1) & 1) == 0 && !MB_TeclaPulsada() );
/////////////////////////////////////////
// RETURN Derecho Izquierdo //
// //
// 0 0 0 //
// 1 1 0 //
// 2 0 1 //
// 3 1 1 //
// //
/////////////////////////////////////////
if ( ((io.x.bx >> 1) & 1)==0 && (io.x.bx & 1)==0 ) Que = 0;
if ( ((io.x.bx >> 1) & 1)==1 && (io.x.bx & 1)==0 ) Que = 1;
if ( ((io.x.bx >> 1) & 1)==0 && (io.x.bx & 1)==1 ) Que = 2;
if ( ((io.x.bx >> 1) & 1)==1 && (io.x.bx & 1)==1 ) Que = 3;
desactiva_raton();
return Que;
}
void inicializa_raton_grafico(int x1, int y1, int x2, int y2)
{
int px = x_raton, py = y_raton;
struct SREGS seg;
union REGS ent, sal;
long dir;
ent.x.ax = 0;
int86(0x33, &ent, &sal); /* averigua si hay rat¢n conectado */
raton = sal.x.ax; /* indica a la variable global el estado
del raton */
if(raton!=0) {
ent.x.ax = 15;
ent.x.cx = 5;
ent.x.dx = 11;
int86(0x33, &ent, &sal); /* fija la raz¢n mickey/pixel */
ent.x.ax = 7;
ent.x.cx = x1;
ent.x.dx = x2;
int86(0x33, &ent, &sal); /* fija la posici¢n m x. y m¡n. horizontal */
ent.x.ax = 8;
ent.x.cx = y1;
ent.x.dx = y2;
int86(0x33, &ent, &sal); /* fija la posici¢n m x. y m¡n. vertical */
if ( PunteroRaton == 100 ) {
if ( Carga_Puntero_Animado() ) { PunteroRaton = 1; Carga_Puntero(); }
} else Carga_Puntero();
if( PunteroRaton != 100 && PunteroRaton != 0) {
dir = (long)dir_raton;
ent.x.ax = 9;
ent.x.bx = 0;
ent.x.cx = 0;
ent.x.dx = (int) dir;
seg.es = (int) (dir >> 16);
int86x(0x33, &ent, &sal, &seg); /* asigna un cursor diferente */
}
ent.x.ax = 4;
ent.x.cx = px;
x_raton=ent.x.cx >> 1;
ent.x.dx = py;
y_raton=ent.x.dx;
int86(0x33, &ent, &sal); /* fija la posici¢n del rat¢n */
ent.x.ax = 1;
if( PunteroRaton != 100 )
int86(0x33, &ent, &sal); /* muestra el puntero del rat¢n */
desactiva_raton();
}
}
void activa_raton(void)
{
union REGS ent;
ent.x.ax = 1;
int86(0x33, &ent, &ent);
}
void desactiva_raton(void)
{
union REGS ent;
ent.x.ax = 2;
int86(0x33, &ent, &ent);
}
void Initialize(int GraphDriver, int GraphMode)
{
int errorcode;
/*
if( (errorcode = registerbgifont(SMALL_FONT)) < 0 )
ErrorOccurred(errorcode);
*/
/* report any registration errors */
/* if ( (errorcode = registerbgidriver(EGAVGA_driver) ) < 0)
ErrorOccurred(errorcode);
*/
/* initialize graphics and local variables */
initgraph( &GraphDriver, &GraphMode, "" );
/* read result of initialization */
errorcode = graphresult();
if (errorcode != grOk) /* an error occurred */
ErrorOccurred(errorcode);
}
void ErrorOccurred(int errorcode) {
printf("Graphics error: %s\n", grapherrormsg(errorcode));
printf("Press any key to halt:");
getch();
exit(1); /* terminate with an error code */
}
void Libera_Memoria(void){
if ( memoria_asignada == 1 ) { // Libera antiguos datos
free(n_Botones_Secuencia);
farfree(Botones);
memoria_asignada = 0;
}
}
int Espera_Tecla_o_Raton(void){
// inicializa_raton_grafico(0, 0, 624, 464);
char Vez_Raton; int x, y;
char boton_izq=0, boton_der=0;
char Que;
// static char vez = 0;
Vez_Raton = 0;
union REGS io;
if ( PunteroRaton!=100 ){ return Espera_TeclaRaton(); }
if(raton!=0) {
desactiva_raton();
io.x.ax = 3;
}
do{
if(raton!=0) {
int86(0x33, &io, &io); // lee posici¢n y estados del bot¢n
boton_izq = io.x.bx & 1;
boton_der = (io.x.bx >> 1) & 1;
if ( x_raton != io.x.cx || y_raton != io.x.dx ) {
if(Vez_Raton==0) Vez_Raton = 1; else
putimage(x_raton, y_raton, Pantalla, COPY_PUT);
x_raton = io.x.cx;
y_raton = io.x.dx;
getimage(x_raton, y_raton, x_raton+21, y_raton+21, Pantalla);
if( Vez_Raton ==14 ) { Vez_Raton = 1; }
if( Vez_Raton ==13 ) { Vez_Raton =14; // putimage(x_raton, y_raton, P_Raton2, 0);
for(y=0; y<20; y++)
for(x=0; x<20; x++)
if( P_Raton2[x+y*20] != 253 ) putpixel(x_raton + x, y_raton + y, P_Raton2[x+y*20]);
} else
if( Vez_Raton ==12 ) { Vez_Raton =13; // putimage(x_raton, y_raton, P_Raton2, 0);
for(y=0; y<20; y++)
for(x=0; x<20; x++)
if( P_Raton2[x+y*20] != 253 ) putpixel(x_raton + x, y_raton + y, P_Raton2[x+y*20]);
} else
if( Vez_Raton ==11 ) { Vez_Raton =12; // putimage(x_raton, y_raton, P_Raton3, 0);
for(y=0; y<20; y++)
for(x=0; x<20; x++)
if( P_Raton3[x+y*20] != 253 ) putpixel(x_raton + x, y_raton + y, P_Raton3[x+y*20]);
} else
if( Vez_Raton ==10 ) { Vez_Raton =11; // putimage(x_raton, y_raton, P_Raton3, 0);
for(y=0; y<20; y++)
for(x=0; x<20; x++)
if( P_Raton3[x+y*20] != 253 ) putpixel(x_raton + x, y_raton + y, P_Raton3[x+y*20]);
} else
if( Vez_Raton == 9 ) { Vez_Raton =10; // putimage(x_raton, y_raton, P_Raton4, 0);
for(y=0; y<20; y++)
for(x=0; x<20; x++)
if( P_Raton4[x+y*20] != 253 ) putpixel(x_raton + x, y_raton + y, P_Raton4[x+y*20]);
} else
if( Vez_Raton == 8 ) { Vez_Raton = 9; // putimage(x_raton, y_raton, P_Raton4, 0);
for(y=0; y<20; y++)
for(x=0; x<20; x++)
if( P_Raton4[x+y*20] != 253 ) putpixel(x_raton + x, y_raton + y, P_Raton4[x+y*20]);
} else
if( Vez_Raton == 7 ) { Vez_Raton = 8; // putimage(x_raton, y_raton, P_Raton4, 0);
for(y=0; y<20; y++)
for(x=0; x<20; x++)
if( P_Raton4[x+y*20] != 253 ) putpixel(x_raton + x, y_raton + y, P_Raton4[x+y*20]);
} else
if( Vez_Raton == 6 ) { Vez_Raton = 7; // putimage(x_raton, y_raton, P_Raton3, 0);
for(y=0; y<20; y++)
for(x=0; x<20; x++)
if( P_Raton3[x+y*20] != 253 ) putpixel(x_raton + x, y_raton + y, P_Raton3[x+y*20]);
} else
if( Vez_Raton == 5 ) { Vez_Raton = 6; // putimage(x_raton, y_raton, P_Raton3, 0);
for(y=0; y<20; y++)
for(x=0; x<20; x++)
if( P_Raton3[x+y*20] != 253 ) putpixel(x_raton + x, y_raton + y, P_Raton3[x+y*20]);
} else
if( Vez_Raton == 4 ) { Vez_Raton = 5; // putimage(x_raton, y_raton, P_Raton2, 0);
for(y=0; y<20; y++)
for(x=0; x<20; x++)
if( P_Raton2[x+y*20] != 253 ) putpixel(x_raton + x, y_raton + y, P_Raton2[x+y*20]);
} else
if( Vez_Raton == 3 ) { Vez_Raton = 4; // putimage(x_raton, y_raton, P_Raton2, 0);
for(y=0; y<20; y++)
for(x=0; x<20; x++)
if( P_Raton2[x+y*20] != 253 ) putpixel(x_raton + x, y_raton + y, P_Raton2[x+y*20]);
} else
if( Vez_Raton == 2 ) { Vez_Raton = 3; // putimage(x_raton, y_raton, P_Raton1, 0);
for(y=0; y<20; y++)
for(x=0; x<20; x++)
if( P_Raton1[x+y*20] != 253) putpixel(x_raton + x, y_raton + y, P_Raton1[x+y*20]);
}
if( Vez_Raton == 1 ) { Vez_Raton = 2; // putimage(x_raton, y_raton, P_Raton1, 0);
for(y=0; y<20; y++)
for(x=0; x<20; x++)
if( P_Raton1[x+y*20] != 253 ) putpixel(x_raton + x, y_raton + y, P_Raton1[x+y*20]);
}
/*
if( Vez_Raton == 1 ) { Vez_Raton = 1;
for(y=0; y<=20; y++)
for(x=0; x<=20; x++)
if( P_Raton1[x+y*20] != 253 ) putpixel(x_raton + x, y_raton + y, P_Raton1[4+x+y*20]);
putimage(x_raton, y_raton, P_Raton1, 0);
}
*/
}
}
}while( boton_izq == 0 && boton_der == 0 && !MB_TeclaPulsada() );
if( raton!=0 )
putimage(x_raton, y_raton, Pantalla, COPY_PUT);
/////////////////////////////////////////
// RETURN Derecho Izquierdo //
// //
// 0 0 0 //
// 1 1 0 //
// 2 0 1 //
// 3 1 1 //
// //
/////////////////////////////////////////
if ( boton_der==0 && boton_izq==0 ) Que = 0;
if ( boton_der==1 && boton_izq==0 ) Que = 1;
if ( boton_der==0 && boton_izq==1 ) Que = 2;
if ( boton_der==1 && boton_izq==1 ) Que = 3;
/*
if(raton!=0)
activa_raton();
*/
return Que;
}
unsigned long JD_imagesize(int left, int top, int right, int bottom) {
unsigned long X_width, Y_width;
X_width= ( (left > right) ? (left - right + 1) : ( right - left + 1) );
Y_width= ( ( top > bottom) ? ( top - bottom + 1) : (bottom - top + 1) );
return (X_width * Y_width + 4);
};
void Libera_Raton_Animado(void){
if ( PunteroRaton == 100 ) {
free(P_Raton1);
free(P_Raton2);
free(P_Raton3);
free(P_Raton4);
free(Pantalla);
}
}
void Carga_Puntero(void){
switch( PunteroRaton ) {
case 0:
break;
case 1:
dir_raton [ 0] = 0x007F; /*± ± ± ± ± ± ± ± ± 1 1 1 1 1 1 1*/
dir_raton [ 1] = 0x00FF; /*± Û Û Û Û Û Û ± 1 1 1 1 1 1 1 1*/
dir_raton [ 2] = 0x01FF; /*± Û Û Û Û Û ± 1 1 1 1 1 1 1 1 1*/
dir_raton [ 3] = 0x01FF; /*± Û Û Û Û Û ± 1 1 1 1 1 1 1 1 1*/
dir_raton [ 4] = 0x00FF; /*± Û Û Û Û Û Û ± 1 1 1 1 1 1 1 1*/
dir_raton [ 5] = 0x007F; /*± Û Û ± ± Û Û Û ± 1 1 1 1 1 1 1*/
dir_raton [ 6] = 0x18FF; /*± ± ± 1 1 ± Û ± 1 1 1 1 1 1 1 1*/
dir_raton [ 7] = 0x800F; /*1 ± ± ± ± ± ± ± ± ± ± ± 1 1 1 1*/
dir_raton [ 8] = 0x8083; /*1 ± Û Û Û Û Û ± ± Û Û Û ± ± 1 1*/
dir_raton [ 9] = 0x8001; /*1 ± ± ± ± ± Û ± ± Û ± ± Û ± ± 1*/
dir_raton [10] = 0xF810; /*1 1 1 1 1 ± Û ± ± Û ± 1 ± Û ± 1*/
dir_raton [11] = 0x8810; /*1 ± ± ± 1 ± Û ± ± Û ± 1 ± Û ± 1*/
dir_raton [12] = 0x8811; /*1 ± Û ± 1 ± Û ± ± Û ± 1 ± Û ± 1*/
dir_raton [13] = 0x8003; /*1 ± Û ± ± ± Û ± ± Û ± ± Û ± 1 1*/
dir_raton [14] = 0x8007; /*1 ± Û Û Û Û Û ± ± Û Û Û ± 1 1 1*/
dir_raton [15] = 0x800F; /*1 ± ± ± ± ± ± ± ± ± ± ± 1 1 1 1*/
dir_raton [16] = 0x0000; /*0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0*/
dir_raton [17] = 0x7E00; /*0 Û Û Û Û Û Û 0 0 0 0 0 0 0 0 0*/
dir_raton [18] = 0x7C00; /*0 Û Û Û Û Û 0 0 0 0 0 0 0 0 0 0*/
dir_raton [19] = 0x7C00; /*0 Û Û Û Û Û 0 0 0 0 0 0 0 0 0 0*/
dir_raton [20] = 0x7E00; /*0 Û Û Û Û Û Û 0 0 0 0 0 0 0 0 0*/
dir_raton [21] = 0x6700; /*0 Û Û 0 0 Û Û Û 0 0 0 0 0 0 0 0*/
dir_raton [22] = 0x0200; /*0 0 0 0 0 0 Û 0 0 0 0 0 0 0 0 0*/
dir_raton [23] = 0x0000; /*0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0*/
dir_raton [24] = 0x3E70; /*0 0 Û Û Û Û Û 0 0 Û Û Û 0 0 0 0*/
dir_raton [25] = 0x0248; /*0 0 0 0 0 0 Û 0 0 Û 0 0 Û 0 0 0*/
dir_raton [26] = 0x0244; /*0 0 0 0 0 0 Û 0 0 Û 0 0 0 Û 0 0*/
dir_raton [27] = 0x0242; /*0 0 0 0 0 0 Û 0 0 Û 0 0 0 Û 0 0*/
dir_raton [28] = 0x2244; /*0 0 Û 0 0 0 Û 0 0 Û 0 0 0 Û 0 0*/
dir_raton [29] = 0x2248; /*0 0 Û 0 0 0 Û 0 0 Û 0 0 Û 0 0 0*/
dir_raton [30] = 0x3E70; /*0 0 Û Û Û Û Û 0 0 Û Û Û 0 0 0 0*/
dir_raton [31] = 0x0000; /*0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0*/
};
};
int Carga_Puntero_Animado(void) {
// char *P_Raton;
if( ((P_Raton1 = (unsigned char *)malloc( ( 22 * 22 ) ))==NULL) ||
((P_Raton2 = (unsigned char *)malloc( ( 22 * 22 ) ))==NULL) ||
((P_Raton3 = (unsigned char *)malloc( ( 22 * 22 ) ))==NULL) ||
((P_Raton4 = (unsigned char *)malloc( ( 22 * 22 ) ))==NULL) ) {
return 1;
}
if ( (Pantalla = malloc( JD_imagesize(0, 0, 22, 22) )) == NULL )
return 1;
/*
P_Raton = P_Raton1;
*P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ;
*P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ;
*P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ;
*P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ;
*P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ;
*P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ;
*P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ;
*P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = BLANCO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ;
*P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ;
*P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
P_Raton = P_Raton2;
*P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ;
*P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ;
*P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ;
*P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ;
*P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = UNKNOW ;
*P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = UNKNOW ;
*P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
P_Raton = P_Raton3;
*P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ;
*P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ;
*P_Raton++ = BLANCO ; *P_Raton++ = NEGRO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ;
*P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ;
*P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
P_Raton = P_Raton4;
*P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = BLANCO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = BLANCO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = BLANCO ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = AZUL ; *P_Raton++ = AZUL ;
*P_Raton++ = AZUL ; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO; *P_Raton++ = GRIS_CLARO;
*P_Raton++ = GRIS_CLARO; *P_Raton++ = UNKNOW ; *P_Raton++ = UNKNOW ; *P_Raton++ = GRIS_CLARO;
*/
return 0;
}
/// int MB_TeclaPulsada(void)
/* Esta funci¢n mira si se ha pulsado una tecla pero SIN llamadas a la BIOS,
de forma que no se inhabilitan las interrupciones en cada llamada, cosa
que bajar¡a mucho la calidad de reproducci¢n con el altavoz interno. */
/// {
/// return ( *(unsigned *) MK_FP(0x40,0x1A) != *(unsigned *) MK_FP(0x40,0x1C) );
/// }
aton == 8 ) { Vez_Raton = 9; // putimage(x_raton, y_raton, P_Raton4, 0);
for(y=0; y<20; y++)
for(x=0; x<20; x++)
if( P_Raton4[x+y*20] != 253 ) putpixel(x_raton + x, y_raton + y, P_Raton4[x+y*20]);
} else
if( Vez_Raton == 7 ) { Vez_Raton = 8; // putimage(x_raton, y_raton, P_Raton4, 0);
for(y=0;