First commit 09/04/1995

This commit is contained in:
José David Guillén 2021-09-03 17:50:32 +02:00
commit e0a9c4f8c9
120 changed files with 13455 additions and 0 deletions

72
640X400.ASM Normal file
View File

@ -0,0 +1,72 @@
_TEXT SEGMENT BYTE PUBLIC 'CODE'
ASSUME CS:_TEXT
PUBLIC _VUELCA_PANTALLA
_VUELCA_PANTALLA PROC NEAR
PUSH BP
MOV BP,SP
PUSH AX
PUSH BX
PUSH CX
PUSH DI
PUSH DS
PUSH DX
PUSH ES
PUSH SI
LDS SI,[BP+4]
MOV AX,0A000h
MOV ES,AX
MOV DI,0
MOV AH,00010001b
MOV DX, 400
CLD
SIG_LINEA: MOV BX,4
SON_4_PLANOS: PUSH AX
PUSH DX
MOV DX,3C4H ;MASCARA DE PLANOS
MOV AL,2
OUT DX,AX
POP DX
POP AX
MOV CX,80
LINEA: MOV AL,ES:[DI]
MOVSB
CMP SI,0
JNZ MISMO_SEG
MOV BP,DS
ADD BP,1000h
MOV DS,BP
MISMO_SEG: LOOP LINEA
SUB DI,80
ROL AH,1
DEC BX
JNZ SON_4_PLANOS
ADD DI,80
DEC DX
JNZ SIG_LINEA
POP SI
POP ES
POP DX
POP DS
POP DI
POP CX
POP BX
POP AX
POP BP
RET
_VUELCA_PANTALLA ENDP
_TEXT ENDS
END

72
640X480.ASM Normal file
View File

@ -0,0 +1,72 @@
_TEXT SEGMENT BYTE PUBLIC 'CODE'
ASSUME CS:_TEXT
PUBLIC _VUELCA_PANTALLA_B
_VUELCA_PANTALLA_B PROC NEAR
PUSH BP
MOV BP,SP
PUSH AX
PUSH BX
PUSH CX
PUSH DI
PUSH DS
PUSH DX
PUSH ES
PUSH SI
LDS SI,[BP+4]
MOV AX,0A000h
MOV ES,AX
MOV DI,0
MOV AH,00010001b
MOV DX, 480
CLD
SIG_LINEA: MOV BX,4
SON_4_PLANOS: PUSH AX
PUSH DX
MOV DX,3C4H ;MASCARA DE PLANOS
MOV AL,2
OUT DX,AX
POP DX
POP AX
MOV CX,80
LINEA: MOV AL,ES:[DI]
MOVSB
CMP SI,0
JNZ MISMO_SEG
MOV BP,DS
ADD BP,1000h
MOV DS,BP
MISMO_SEG: LOOP LINEA
SUB DI,80
ROL AH,1
DEC BX
JNZ SON_4_PLANOS
ADD DI,80
DEC DX
JNZ SIG_LINEA
POP SI
POP ES
POP DX
POP DS
POP DI
POP CX
POP BX
POP AX
POP BP
RET
_VUELCA_PANTALLA_B ENDP
_TEXT ENDS
END

BIN
640X480.LIB Normal file

Binary file not shown.

312
CD_CFG.CPP Normal file
View File

@ -0,0 +1,312 @@
#include <dos.h>
#include <stdio.h>
#include <stdlib.h>
#include <conio.h> // Para getch();
#include <graphics.h> // Para outtextxy(...); y cleardevice(...);
#include "..\libs\make_bot\make_bot.h" // Fuciones de MAKE_BOTON
#include "cd_icons.h"
#include "CD_SND.H"
#define SIN_COMENTARIO 0
#define CON_COMENTARIO 1
#define DOS 1
#define WINDOWS 2
extern int /*far _cdecl*/ Fichero_cd_img(char Dinamicos_Estaticos);
struct CFG_str {
char Nombre_del_Programa[70];
char Comentario_Inicial[70];
char VerHi, VerLow;
char Register;
long Records;
};
struct CFG_str CD_cabecera1;
typedef struct {
unsigned int Exit_after_EXE : 1;
unsigned int With_Out_Sound : 1;
unsigned int Auto_Install : 1;
unsigned int Check_Free_Size : 1;
unsigned int Format_Always : 1;
unsigned int Without_Backgr : 1;
unsigned int Futura_Ampliac : 4;
} Cd_CFG;
Cd_CFG CD_CFG1;
FILE *CD_CFG;
int CFG;
void Init_CFG(void);
void Abre_Ficha_CD_CFG(int R_W);
void Poner_a_cero_estructura_actual_CFG(void);
#define SIN_COMENTARIO 0
#define CON_COMENTARIO 1
extern void Imprime_Lista(char Como);
extern void Sonido(char Sonido);
void Init_CFG(void){
int ok = 0;
int Salvar = 0;
Abre_Ficha_CD_CFG(0);
setfillstyle(SOLID_FILL, 240);
bar(395, 140, 625, 410);
// Imprime_Estaticos( 4, "cd_out.img"); // Imprime botones estaticos 'Seccion 4'
Fichero_cd_img(4);
Imprime_Secuencia(2); // Imprime secuencia 1.
// Imprime_Estaticos( 5, "cd_out.img"); // Imprime textos estaticos 'Seccion 5'
Fichero_cd_img(5);
if ( CD_CFG1 . Exit_after_EXE ) Imprime_Bordes(2, 4, 248);
if ( CD_CFG1 . With_Out_Sound ) Imprime_Bordes(2, 5, 248);
if ( CD_CFG1 . Auto_Install ) Imprime_Bordes(2, 6, 248);
if ( CD_CFG1 . Check_Free_Size ) Imprime_Bordes(2, 7, 248);
if ( CD_CFG1 . Format_Always ) Imprime_Bordes(2, 8, 248);
if ( CD_CFG1 . Without_Backgr ) Imprime_Bordes(2, 9, 248);
while(!ok){ // Bucle infinito
switch( Comprueba_Secuencia( 2 ) ) { // Iniciamos comprobacion de 2¦ sec
case 0: // No se pulso ningun BOTON
// Pero el raton fue presionado en
// algun sitio...
// Sonido("CD_OUT01.WAV");
Sonido( Mouse_Press );
break;
case -2: // Hay una tecla normal en BUFFER
getch(); // La eliminamos
// Sonido("CD_OUT01.WAV");
Sonido( Mouse_Press );
break;
case -1: // Hay una tecla especial en BUFFER
getch(); // La eliminamos
// Sonido("CD_OUT01.WAV");
Sonido( Mouse_Press );
break;
// Boton Cancelar
case 1:
// Sonido("CD_OUT0F.WAV");
Sonido( Cancel );
Salvar = 0;
ok = 1;
break;
// Boton Salvar
case 2:
// Sonido("CD_OUT10.WAV");
Sonido( Save_until_exit );
Salvar = 1;
break;
// Boton Anterior
case 3:
// Sonido("CD_OUT0E.WAV");
Sonido( Ok );
ok = 1;
break;
// Boton Salir despues de ejecutar
case 4:
if ( CD_CFG1 . Exit_after_EXE ) {
Imprime_Bordes(2, 4, -1);
CD_CFG1 . Exit_after_EXE = 0;
// Sonido("CD_OUT0C.WAV");
Sonido( No );
} else {
CD_CFG1 . Exit_after_EXE = 1;
Imprime_Bordes(2, 4, 248);
// Sonido("CD_OUT0B.WAV");
Sonido( Yes );
}
break;
// Boton Desactivar sonidos
case 5:
if ( CD_CFG1 . With_Out_Sound ) {
Imprime_Bordes(2, 5, -1);
CD_CFG1 . With_Out_Sound = 0;
// Sonido("CD_OUT0C.WAV");
Sonido( No );
} else {
CD_CFG1 . With_Out_Sound = 1;
Imprime_Bordes(2, 5, 248);
// Sonido("CD_OUT0B.WAV");
Sonido( Yes );
}
break;
// Boton Auto_Instalaci¢n
case 6:
if ( CD_CFG1 . Auto_Install ) {
Imprime_Bordes(2, 6, -1);
CD_CFG1 . Auto_Install = 0;
// Sonido("CD_OUT0C.WAV");
Sonido( No );
} else {
CD_CFG1 . Auto_Install = 1;
Imprime_Bordes(2, 6, 248);
// Sonido("CD_OUT0B.WAV");
Sonido( Yes );
}
break;
// Boton Comprobar espacio libre
case 7:
if ( CD_CFG1 . Check_Free_Size ) {
Imprime_Bordes(2, 7, -1);
CD_CFG1 . Check_Free_Size = 0;
// Sonido("CD_OUT0C.WAV");
Sonido( No );
} else {
CD_CFG1 . Check_Free_Size = 1;
Imprime_Bordes(2, 7, 248);
// Sonido("CD_OUT0B.WAV");
Sonido( Yes );
}
break;
// Boton Formatear en caso de unidades A: y B:
case 8:
if ( CD_CFG1 . Format_Always ) {
Imprime_Bordes(2, 8, -1);
CD_CFG1 . Format_Always = 0;
// Sonido("CD_OUT0C.WAV");
Sonido( No );
} else {
CD_CFG1 . Format_Always = 1;
Imprime_Bordes(2, 8, 248);
// Sonido("CD_OUT0B.WAV");
Sonido( Yes );
}
break;
// Boton sin dibujo de Fondo
case 9:
if ( CD_CFG1 . Without_Backgr ) {
Imprime_Bordes(2, 9, -1);
CD_CFG1 . Without_Backgr = 0;
// Sonido("CD_OUT0C.WAV");
Sonido( No );
} else {
CD_CFG1 . Without_Backgr = 1;
Imprime_Bordes(2, 9, 248);
// Sonido("CD_OUT0B.WAV");
Sonido( Yes );
}
break;
// Boton Imprime Lista Sin Comentarios
case 10:
// Sonido("CD_OUT0D.WAV");
Sonido( Printing );
Imprime_Lista(SIN_COMENTARIO);
break;
// // Boton Imprime Lista Con Comentarios
// case 10:
// Imprime_Lista(CON_COMENTARIOS);
// break;
default:
while( kbhit() ) getch(); // Limpiamos posibles teclas en BUFFER
// Sonido("CD_OUT11.WAV");
Sonido( Unknow_error );
break;
}
}
setfillstyle(SOLID_FILL, 240);
bar(395, 140, 625, 410);
if ( Salvar == 1 && CFG != 0 ) Abre_Ficha_CD_CFG(1); else Abre_Ficha_CD_CFG(0);
return;
}
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//Û Û
//Û ÜÜ ÜÜÜ ÜÜÜ ÜÜÜ ÜÜÜÜÜ Ü Ü ÜÜÜ ÜÜ ÜÜÜ Û
//Û Û Û Û Û Û Û Û Û Û Û Û Û Û Û Û Û
//Û ÛßßÛ Ûßß Ûß ÛßÛ Û Û Û ÛßÛ ÛßßÛ ßßÜ Û
//Û Û Û Û ÛÜÜ Û Û Û ÛÜÜÛ Û Û Û Û ÜÜÜß Û
//Û Û
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
void Abre_Ficha_CD_CFG(int R_W){
char ArchivoDatos[]="C:\\CD_out.CFG";
char Memoria;
CFG = 1;
//ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ//
//Û CD_in Apertura de Indice, y Datos, o creaci¢n... Û//
//ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß//
int LSJ = sizeof(struct CFG_str);
int LSC = sizeof(Cd_CFG);
if ( (CD_CFG = fopen( ArchivoDatos, "r+b"))==NULL) {
FILE *fa;
if ( (fa = fopen( ArchivoDatos, "wb" ) )!=NULL ) {
Poner_a_cero_estructura_actual_CFG();
CD_cabecera1.Records = 0;
rewind(fa);
fwrite(&CD_cabecera1, LSJ, 1, fa); fseek(fa, (long)LSJ, SEEK_SET);
fwrite(&CD_CFG1, LSC, 1, fa);
if (fclose(fa) == EOF ) CFG = 0;
}
if ( (CD_CFG = fopen( ArchivoDatos, "r+b"))==NULL) CFG = 0;
}
if ( CFG != 0 ) {
rewind(CD_CFG);
if ( fread(&CD_cabecera1, LSJ, 1, CD_CFG) != 1 ) CFG = 0;
}
if( R_W == 0 ) {
if ( CFG != 0 ) {
fseek(CD_CFG, (long)LSJ, SEEK_SET);
if ( fread(&CD_CFG1, LSC, 1, CD_CFG) != 1 ) CFG = 0;
}
} else {
if ( CFG != 0 ) {
fseek(CD_CFG, (long)LSJ, SEEK_SET);
if ( fwrite(&CD_CFG1, LSC, 1, CD_CFG) != 1 ) CFG = 0;
}
}
if (fclose(CD_CFG) == EOF ) CFG = 0;
}
void Poner_a_cero_estructura_actual_CFG(void){
char CR = 13, LF = 10, BEEP = 7, ANY = 26;
sprintf( CD_cabecera1.Nombre_del_Programa, "%c %c %c - CD_OUT - %c %c Fichero de Configuraci¢n %c %c", CR, LF, BEEP, CR, LF, CR, LF );
sprintf( CD_cabecera1.Comentario_Inicial, "Jos David Guilln %c %c %c %c", CR, LF, BEEP, ANY );
CD_cabecera1.VerHi = 1; CD_cabecera1.VerLow = 0;
CD_cabecera1.Register = 1;
CD_CFG1 . Exit_after_EXE = 1;
CD_CFG1 . With_Out_Sound = 0;
CD_CFG1 . Auto_Install = 1;
CD_CFG1 . Check_Free_Size = 1;
CD_CFG1 . Format_Always = 0;
CD_CFG1 . Without_Backgr = 0;
CD_CFG1 . Futura_Ampliac = 0;
}

838
CD_EDIT.CPP Normal file
View File

@ -0,0 +1,838 @@
#include <alloc.h>
#include <dos.h>
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include <conio.h> // Para getch();
#include <graphics.h> // Para outtextxy(...); y cleardevice(...);
#include "..\libs\make_bot\make_bot.h" // Fuciones de MAKE_BOTON
#include "cd_icons.h"
#include "cd_file.h"
#include "..\libs\wavplav\wavplay.h"
#include "CD_SND.H"
#include "EMMC.h"
extern int pagenum, /*n£mero de p ginas EMS*/
handle, /*Handle para acceder a la memoria EMS*/
i; /*contador de bucle*/
extern WORD pageseg ; /*direcci¢n de segmento del Page-Frame*/
extern BYTE emmver; /*n£mero de versi¢n de la EMM*/
extern int /*far _cdecl*/ Fichero_cd_img(char Dinamicos_Estaticos);
#define DOS 1
#define WINDOWS 2
#define SIN_COMENTARIO 0
#define CON_COMENTARIO 1
extern int file_exists(char *filename);
extern void Carga_PCX(char *Imagen);
extern void Sonido(char Sonido);
void Muestra_Comentario(int Ini);
int Abre_Ficha_CD_in(void);
void GetLineCD_in(void);
void Inicializa_Apertura(void);
void BEEP(void);
void Mueve_Abajo_CD_in(void);
void Mueve_Arriba_CD_in(void);
void PrintWholeScreenCD_in(void);
void textxy( int x, int y, char *P_Texto );
void Borra_Campo_Visual(void);
FILE *CD_in;
CD_FILE CD_in1, CD_in2;
struct Cabecera CD_cabecera;
int Comprueba_Impresora(void);
extern int Muestra_Mensaje(int Mensaje, char *file);
void Imprime_Lista(char Como);
extern char _XMS;
extern int CFG;
extern void Init_CFG(void);
extern void Init_EXE(int CurrIcon);
extern void Init_Install(int CurrIcon);
void Coloca_Iconos(int Start_Icon);
void Menu_de_Edicion(void);
unsigned char Items_for = DOS;
unsigned char Item_select = 1;
unsigned int CurrTopLineCD_in = 1; unsigned char CurrRowCD_in = 1;
unsigned char CurrRowCD_in2 = 0;
char NEW_PUSH = 0;
char Fichero_Abierto;
char SONIDO = 0;
void Menu_de_Edicion(void){
int ok = 0;
char cont;
char Buffer[80];
int Curr_Item = 1;
Imprime_Bordes(1, 1, 251);
settextstyle( SMALL_FONT, HORIZ_DIR, 4);
Inicializa_Apertura();
while(!ok){ // Bucle infinito
switch( Comprueba_Secuencia( 1 ) ) { // Iniciamos comprobacion de iconos
case 0: // No se pulso ningun BOTON
// Pero el raton fue presionado en
// algun sitio...
// Sonido("CD_OUT01.WAV");
Sonido( Mouse_Press );
break;
case -2: // Hay una tecla normal en BUFFER
getch(); // La eliminamos
// Sonido("CD_OUT02.WAV");
Sonido( Key_Press );
break;
case -1: // Hay una tecla especial en BUFFER
switch ( getch() ){ // La utilizamos
/*
// INICIO
case 71:
if ( Fichero_Abierto ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
CurrRowCD_in = 1;
CurrTopLineCD_in = 1;
PrintWholeScreenCD_in();
GetLineCD_in();
}
break;
// FIN
case 79:
if ( Fichero_Abierto ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
CurrRowCD_in = 1;
CurrTopLineCD_in = (CD_cabecera.Records + 1);
PrintWholeScreenCD_in();
GetLineCD_in();
}
break;
*/
// ReP g
case 71://73:
// CurrRow = 1;
if ( Fichero_Abierto ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
if( CurrTopLineCD_in + CurrRowCD_in > 10 ) { CurrTopLineCD_in -= 9; } else { CurrTopLineCD_in = 1; CurrRowCD_in = 1;}
if( CurrTopLineCD_in + CurrRowCD_in< 1 ) { CurrTopLineCD_in = 1; CurrRowCD_in = 1;}
PrintWholeScreenCD_in();
GetLineCD_in();
}
break;
// AvP g
case 79://81:
// CurrRow = 1;
if ( Fichero_Abierto ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
CurrTopLineCD_in += 11;
if ( (CurrTopLineCD_in +CurrRowCD_in-1) > CD_cabecera.Records) { CurrTopLineCD_in = CD_cabecera.Records; CurrRowCD_in = 1; }
if (CurrTopLineCD_in ==0) CurrTopLineCD_in = 1;
PrintWholeScreenCD_in();
GetLineCD_in();
}
break;
default:
break;
}
break;
// Boton DOS
case 1:
// Sonido("CD_OUT04.WAV");
Sonido( Play_DOS );
Imprime_Bordes(1, 2, -1);
Items_for = DOS;
Imprime_Bordes(1, 1, 251);
fclose(CD_in);
Inicializa_Apertura();
break;
// Boton WINDOWS
case 2:
// Sonido("CD_OUT05.WAV");
Sonido( Play_WINDOWS );
Imprime_Bordes(1, 1, -1);
Items_for = WINDOWS;
Imprime_Bordes(1, 2, 251);
fclose(CD_in);
Muestra_Comentario(0);
Inicializa_Apertura();
break;
// Boton 1§ Icono
case 3:
// Sonido("CD_OUT06.WAV");
Sonido( Select_Icono );
if(Curr_Item==16){
// Muestra_Creditos();
if ( _XMS == 1) {
strcpy( Buffer, "cd_out.cr1" );
if ( file_exists(Buffer) )
{
SONIDO = 1;
Carga_PCX(Buffer);
SONIDO = 0;
}
}
while( kbhit() ) getch();
}else{
Item_select = Curr_Item;
fclose(CD_in);
Inicializa_Apertura();
}
break;
// Boton Flecha Derecha
case 4:
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
Curr_Item--; if( Curr_Item < 1 ) Curr_Item = 16;
Coloca_Iconos(Curr_Item);
break;
// Boton Flecha Izquierda
case 5:
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
Curr_Item++; if( Curr_Item > 16 ) Curr_Item = 1;
Coloca_Iconos(Curr_Item);
break;
// Botones de Letras...
case 6:
if ( Fichero_Abierto && ( CurrTopLineCD_in + 1 - 2 ) <= CD_cabecera.Records ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
CurrRowCD_in = 1;
GetLineCD_in();
CD_in2 = CD_in1;
Muestra_Comentario(1);
}
break;
case 7:
if ( Fichero_Abierto && ( CurrTopLineCD_in + 2 - 2 ) <= CD_cabecera.Records ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
CurrRowCD_in = 2;
GetLineCD_in();
CD_in2 = CD_in1;
Muestra_Comentario(1);
}
break;
case 8:
if ( Fichero_Abierto && ( CurrTopLineCD_in + 3 - 2 ) <= CD_cabecera.Records ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
CurrRowCD_in = 3;
GetLineCD_in();
CD_in2 = CD_in1;
Muestra_Comentario(1);
}
break;
case 9:
if ( Fichero_Abierto && ( CurrTopLineCD_in + 4 - 2 ) <= CD_cabecera.Records ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
CurrRowCD_in = 4;
GetLineCD_in();
CD_in2 = CD_in1;
Muestra_Comentario(1);
}
break;
case 10:
if ( Fichero_Abierto && ( CurrTopLineCD_in + 5 - 2 ) <= CD_cabecera.Records ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
CurrRowCD_in = 5;
GetLineCD_in();
CD_in2 = CD_in1;
Muestra_Comentario(1);
}
break;
case 11:
if ( Fichero_Abierto && ( CurrTopLineCD_in + 6 - 2 ) <= CD_cabecera.Records ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
CurrRowCD_in = 6;
GetLineCD_in();
CD_in2 = CD_in1;
Muestra_Comentario(1);
}
break;
case 12:
if ( Fichero_Abierto && ( CurrTopLineCD_in + 7 - 2 ) <= CD_cabecera.Records ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
CurrRowCD_in = 7;
GetLineCD_in();
CD_in2 = CD_in1;
Muestra_Comentario(1);
}
break;
case 13:
if ( Fichero_Abierto && ( CurrTopLineCD_in + 8 - 2 ) <= CD_cabecera.Records ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
CurrRowCD_in = 8;
GetLineCD_in();
CD_in2 = CD_in1;
Muestra_Comentario(1);
}
break;
case 14:
if ( Fichero_Abierto && ( CurrTopLineCD_in + 9 - 2 ) <= CD_cabecera.Records ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
CurrRowCD_in = 9;
GetLineCD_in();
CD_in2 = CD_in1;
Muestra_Comentario(1);
}
break;
case 15:
if ( Fichero_Abierto && ( CurrTopLineCD_in + 10 - 2 ) <= CD_cabecera.Records ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
CurrRowCD_in =10;
GetLineCD_in();
CD_in2 = CD_in1;
Muestra_Comentario(1);
}
break;
// Boton Instalar
case 16:
if ( CD_in1.Alt_Install.Usar_LHA==0 && NEW_PUSH ) {
// Sonido("CD_OUT07.WAV");
Sonido( Install );
DeInitSB();
Init_Install(Curr_Item);
}
break;
// Boton Configurar
case 17:
if( CFG != 0 ) {
// Sonido("CD_OUT08.WAV");
Sonido( Setup );
Init_CFG();
NEW_PUSH = 0;
}
break;
// Boton Ejecutar
case 18:
if ( Fichero_Abierto && CD_in1.Typo.Ejecutable == 1 && NEW_PUSH ) {
// Sonido("CD_OUT09.WAV");
Sonido( Run );
DeInitSB();
Init_EXE(Curr_Item);
}
break;
// Boton Salir
case 19:
ok = 1;
break;
// Boton Mueve Arriba Programas
case 20:
if ( Fichero_Abierto ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
Mueve_Arriba_CD_in();
}
break;
// Boton Mueve Abajo Programas
case 21:
if ( Fichero_Abierto ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
Mueve_Abajo_CD_in();
}
break;
// Boton Mueve Arriba Comentario
case 22:
if ( NEW_PUSH && CurrRowCD_in2 > 0 ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
CurrRowCD_in2--;
Muestra_Comentario(2);
}
break;
// Boton Mueve Abajo Comentario
case 23:
if ( NEW_PUSH && CurrRowCD_in2 < /*10*/15 ) {
// Sonido("CD_OUT03.WAV");
Sonido( Mouse_Key_Tick );
CurrRowCD_in2++;
Muestra_Comentario(2);
}
break;
// Boton Ver Dibujo
case 24:
if ( NEW_PUSH && Fichero_Abierto && CD_in1.Typo.T_Dibujo == 1 && _XMS == 1) {
// Sonido("CD_OUT0A.WAV");
Sonido( Show_Image );
sprintf(Buffer, "imagenes\\%s.pcx", CD_in2.N_Img);
if ( file_exists(Buffer) )
Carga_PCX(Buffer);
}
break;
default:
while( kbhit() ) getch(); // Limpiamos posibles teclas en BUFFER
// Sonido("CD_OUT11.WAV");
Sonido( Unknow_error );
break;
}
}
fclose(CD_in);
return;
}
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//Û Û
//Û ÜÜ ÜÜÜ ÜÜÜ ÜÜÜ ÜÜÜÜÜ Ü Ü ÜÜÜ ÜÜ ÜÜÜ Û
//Û Û Û Û Û Û Û Û Û Û Û Û Û Û Û Û Û
//Û ÛßßÛ Ûßß Ûß ÛßÛ Û Û Û ÛßÛ ÛßßÛ ßßÜ Û
//Û Û Û Û ÛÜÜ Û Û Û ÛÜÜÛ Û Û Û Û ÜÜÜß Û
//Û Û
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
int Abre_Ficha_CD_in(void){
char ArchivoDatos[80];
char Memoria;
void *Imagen;
int cm;
cm = JD_imagesize(200, 212, 440, 267);
if ( (Imagen = malloc( cm /*imagesize(200, 212, 440, 267)*/ ) ) == NULL ) Memoria = 0;
else {
Memoria = 1;
getimage( 200, 212, 440, 267, Imagen );
// Imprime_Estaticos( 113, "cd_out.img");
Fichero_cd_img(113);
// Sonido("CD_OUT71.WAV");
Sonido( Error_113 );
settextstyle( SMALL_FONT, HORIZ_DIR, 4);
}
if (Items_for == DOS)
sprintf(ArchivoDatos, "DATOS\\CD_D%02d.dat", Item_select );
else
sprintf(ArchivoDatos, "DATOS\\CD_W%02d.dat", Item_select );
//ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ//
//Û CD_in Apertura de Indice, y Datos, o creaci¢n... Û//
//ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß//
int LSJ = sizeof(struct Cabecera);
int LSC = sizeof(CD_FILE);
if ( (CD_in = fopen( ArchivoDatos, "r+b"))==NULL) {
Fichero_Abierto = 0;
Borra_Campo_Visual();
NEW_PUSH = 0;
if( Memoria ) {
// Imprime_Estaticos( 108, "cd_out.img");
Fichero_cd_img(108);
// Sonido("CD_OUT6C.WAV");
Sonido( Error_108 );
Espera_Tecla_o_Raton();
Anclar_Raton();
putimage( 200, 212, Imagen, COPY_PUT);
free(Imagen);
}
return -1;
} else Fichero_Abierto = 1;
rewind(CD_in);
if ( fread(&CD_cabecera, LSJ, 1, CD_in) != 1 ) {
if ( Memoria ) free(Imagen);
restorecrtmode();
printf("NO SE PUDO LEER EN EL FICHERO: INDICE");
exit(1);
}
fseek(CD_in, (long)LSJ, SEEK_SET);
if ( fread(&CD_in1, LSC, 1, CD_in) != 1 ) {
if ( Memoria ) free(Imagen);
restorecrtmode();
printf("NO SE PUDO LEER EN EL FICHERO: DATOS");
exit(1);
}
if( Memoria ) {
putimage( 200, 212, Imagen, COPY_PUT);
free(Imagen);
}
return 1;
}
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//Û Û
//Û ÜÜ ÜÜÜ ÜÜÜ Ü Ü ÜÜÜ Ü Ü ÜÜÜÜ Û
//Û Û Û Û Û Û Û Û Û Û Û Û Û Û
//Û ÛßßÛ ÛßÛ Û ÛßßÛ Û Û Û Û Û Û
//Û Û Û Û Û ÛÜÜ Û Û ÜÛÜ ßÜß ÛÜÜÛ Û
//Û Û
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
void GetLineCD_in(void){
long LSJ = sizeof(struct Cabecera);
long LSC = sizeof(CD_FILE);
long CurrRecord = CurrTopLineCD_in + CurrRowCD_in - 1;
fseek(CD_in, (long)LSJ + ( LSC * CurrRecord ) - LSC, SEEK_SET); // Se coloca
fread(&CD_in1, LSC, 1, CD_in); // Y lee
}
void Inicializa_Apertura(void) {
CurrTopLineCD_in = 1;
CurrRowCD_in = 1;
// CurrColCD_in = 1;
if ( Abre_Ficha_CD_in() != -1 ) {
PrintWholeScreenCD_in();
GetLineCD_in();
} else Muestra_Comentario(-1);
}
void BEEP(void){
sound(440);
delay(50);
nosound();
}
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//Û Û
//Û ÜÜÜ ÜÜ Ü Ü ÜÜÜÜÜ ÜÜ Ü Ü ÜÜ Û
//Û Û Û Û Û ÛÛ Û Û Û Û Û Û Û Û Û
//Û Ûßß ÛßßÛ Û ÛÛ Û ÛßßÛ Û Û ÛßßÛ Û
//Û Û Û Û Û Û Û Û Û ÛÜÜ ÛÜÜ Û Û Û
//Û Û
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
void Mueve_Abajo_CD_in(void){
if ( (CurrTopLineCD_in /*+ CurrRowCD_in - 1*/) >= ( CD_cabecera.Records + 1)-8 ) BEEP();
else { CurrTopLineCD_in++;
PrintWholeScreenCD_in();
}
}
void Mueve_Arriba_CD_in(void){
// CurrRowCD_in = 1;
if ( CurrTopLineCD_in <= 1) BEEP();
else {
CurrTopLineCD_in--;
PrintWholeScreenCD_in();
}
}
void PrintWholeScreenCD_in(void){
int tmp = CurrRowCD_in;
setcolor(240);
setfillstyle(SOLID_FILL, 240);
Borra_Campo_Visual();
setusercharsize(7, 6, 1, 1);
for(CurrRowCD_in = 1; CurrRowCD_in < (10+1); CurrRowCD_in++)
if ( (CurrTopLineCD_in + CurrRowCD_in - 1) <= (CD_cabecera.Records + 1) ) {
GetLineCD_in();
switch(CurrRowCD_in){
case 1:
textxy( 15, 238, CD_in1.Nombre );
break;
case 2:
textxy( 15, 261, CD_in1.Nombre );
break;
case 3:
textxy( 15, 284, CD_in1.Nombre );
break;
case 4:
textxy( 15, 307, CD_in1.Nombre );
break;
case 5:
textxy( 15, 330, CD_in1.Nombre );
break;
case 6:
textxy( 15, 353, CD_in1.Nombre );
break;
case 7:
textxy( 15, 376, CD_in1.Nombre );
break;
case 8:
textxy( 15, 399, CD_in1.Nombre );
break;
case 9:
textxy( 15, 422, CD_in1.Nombre );
break;
case 10:
textxy( 15, 445, CD_in1.Nombre );
break;
}
}
CurrRowCD_in = tmp;
}
void textxy( int x, int y, char *P_Texto ) {
setcolor(255);
outtextxy( x+1+2, y+1, P_Texto );
setcolor(240);
outtextxy( x+2, y, P_Texto );
}
void Muestra_Comentario(int Ini){
int Linea, inc;
char Buffer[80];
switch( Ini ) {
// Borra la pantalla de comentario
case -1:
setfillstyle(SOLID_FILL, 240);
bar(396, 141, 624, 410);
break;
case 1:
CurrRowCD_in2 = 0;
NEW_PUSH = 1;
setfillstyle(SOLID_FILL, 240);
// bar(396, 141, 624, 161);
bar(396, 141, 624, 410);
setfillstyle(9, 242);
bar(396, 141, 624, 161);
setusercharsize(3, 2, 8, 5);
setcolor(250);
inc = textwidth(CD_in2.Nombre);
if ( inc<0 ) inc = 0;
else
inc = (228-inc)/2;
outtextxy( 398+inc, 142, CD_in2.Nombre );
setcolor(255);
outtextxy( 397+inc, 141, CD_in2.Nombre );
settextstyle( SMALL_FONT, HORIZ_DIR, 4);
for(Linea=0; Linea<22/*32*/; Linea++ )
outtextxy( 397, 165+Linea*11, CD_in2.Comentario[Linea] );
break;
case 2:
setfillstyle(SOLID_FILL, 240);
// bar(396, 162, 624, 410);
setcolor(255);
settextstyle( SMALL_FONT, HORIZ_DIR, 4);
if(CurrRowCD_in2<=10) {
for(Linea=0; Linea<22/*32*/; Linea++ ) {
bar( 396, 165+Linea*11, 624, 165+Linea*11 + 11); // relleno, y Borra el campo
outtextxy( 397, 165+Linea*11, CD_in2.Comentario[Linea+CurrRowCD_in2] );
}
} else {
for(Linea=0; Linea<22-(CurrRowCD_in2-10)/*32*/; Linea++ ) {
bar( 396, 165+Linea*11, 624, 165+Linea*11 + 11); // relleno, y Borra el campo
outtextxy( 397, 165+Linea*11, CD_in2.Comentario[Linea+10+(CurrRowCD_in2-10)] );
}
for(Linea=(22-(CurrRowCD_in2-10)); Linea< 22; Linea++ ) {
bar( 396, 165+Linea*11, 624, 165+Linea*11 + 11); // relleno, y Borra el campo
}
setcolor(242);
sprintf( Buffer, "Informe:");
if ( CurrRowCD_in2 == 12 )
outtextxy( 397, 165+21*11, Buffer );
if ( CurrRowCD_in2 == 13 )
outtextxy( 397, 165+20*11, Buffer );
if ( CurrRowCD_in2 == 14 )
outtextxy( 397, 165+19*11, Buffer );
if ( CurrRowCD_in2 == 15 )
outtextxy( 397, 165+18*11, Buffer );
strcpy( Buffer, " \0" );
if ( CD_in2.Alt_Install.Usar_LHA == 0) {
strcat( Buffer, "Instalable" );
if ( CD_in2.Typo.Ejecutable == 1 || CD_in2.Typo.T_Dibujo == 1)
strcat( Buffer, ", " );
}
if ( CD_in2.Typo.Ejecutable == 1 ) {
strcat( Buffer, "Ejecutable" );
if ( CD_in2.Typo.T_Dibujo == 1 )
strcat( Buffer, ", " );
}
if ( CD_in2.Typo.T_Dibujo == 1 ) strcat( Buffer, "Posee Dibujo" );
if ( CD_in2.Typo.Ejecutable == 0 && CD_in1.Typo.T_Dibujo == 0 && CD_in2.Alt_Install.Usar_LHA == 1 )
strcpy( Buffer, "Archivo no accesible por CD_OUT" );
if ( CurrRowCD_in2 == 14 )
outtextxy( 397, 165+21*11, Buffer );
if ( CurrRowCD_in2 == 15 )
outtextxy( 397, 165+20*11, Buffer );
strcpy( Buffer, "\0" );
strrev( CD_in2.Dir_P );
strncpy( Buffer, CD_in2.Dir_P, 34 );
strrev( CD_in2.Dir_P );
strrev( Buffer );
if ( CurrRowCD_in2 == 15 )
outtextxy( 397, 165+21*11, Buffer );
}
break;
default:
break;
}
}
void Borra_Campo_Visual(void){
setfillstyle( SOLID_FILL, 253);
bar( 15+1, 237+1, 196-1, 253-1);
bar( 15+1, 260+1, 196-1, 276-1);
bar( 15+1, 283+1, 196-1, 299-1);
bar( 15+1, 306+1, 196-1, 322-1);
bar( 15+1, 329+1, 196-1, 345-1);
bar( 15+1, 352+1, 196-1, 368-1);
bar( 15+1, 375+1, 196-1, 392-1);
bar( 15+1, 398+1, 196-1, 414-1);
bar( 15+1, 421+1, 196-1, 437-1);
bar( 15+1, 444+1, 196-1, 460-1);
}
void Imprime_Lista(char Como){
int tmpRow = CurrRowCD_in;
int tmpTop = CurrTopLineCD_in;
void *Imagen; char Memoria = 0;
if ( Comprueba_Impresora() == 0 ) {
Muestra_Mensaje(115, "CD_OUT.IMG");
return;
}
if ( (Imagen = malloc( JD_imagesize(200, 212, 440, 267) ) ) != NULL ) {
getimage( 200, 212, 440, 267, Imagen );
// Imprime_Estaticos( 116, "CD_OUT.IMG" );
Fichero_cd_img(116);
// Sonido("CD_OUT74.WAV");
Sonido( Error_116 );
Memoria = 1;
}
CurrTopLineCD_in = 1;
fprintf( stdprn, "ÚÄÄÄÄÄÄÄÄÄÄÄÄÄ¿\n\r");
fprintf( stdprn, "³ JD & CD_OUT ³\n\r");
fprintf( stdprn, "ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÙ\n\r");
fprintf( stdprn, "\n\r");
for(CurrTopLineCD_in = 1; CurrTopLineCD_in <= (CD_cabecera.Records + 1); CurrTopLineCD_in++) {
GetLineCD_in();
if ( Como == SIN_COMENTARIO ) {
fprintf( stdprn, "%-26s ³ ", CD_in1.Nombre);
if( (CurrTopLineCD_in + 1) <= (CD_cabecera.Records + 1) ) {
CurrTopLineCD_in++;
GetLineCD_in();
fprintf( stdprn, "%-26s\n\r", CD_in1.Nombre);
}
}
}
fputc(12, stdprn);
CurrRowCD_in = tmpRow;
CurrTopLineCD_in = tmpTop;
if ( Memoria == 1 ) {
putimage( 200, 212, Imagen, COPY_PUT);
free(Imagen);
}
}
int Comprueba_Impresora(void){
// unsigned int tmp;
union REGS Impresora_in, Impresora_out;
/*
struct byte {
int a : 1;
int b : 1;
int c : 1;
int d : 1;
int e : 1;
int f : 1;
int g : 1;
int h : 1;
};
union bits {
char ch;
struct byte bit;
} Imp_out;
*/
Impresora_in.h.ah = 0x02;
Impresora_in.x.dx = 0x0;
int86(0x17, &Impresora_in, &Impresora_out);
return ( Impresora_out.h.ah ? 1 : 0 );
}

14
CD_ERROR.H Normal file
View File

@ -0,0 +1,14 @@
#define SIN_CVN 100
#define SIN_XMS 101
#define E_ICONO 102
#define E_PCX 103
#define E_WAV 104
#define E_EXE 105
#define ERROR_ D 107
#define E_O 108
#define E_W 109
#define E_R 110
#define E_C 111

407
CD_EXE.CPP Normal file
View File

@ -0,0 +1,407 @@
#include <dir.h>
#include <dos.h>
#include <alloc.h>
#include <process.h>
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include <conio.h> // Para getch();
#include <graphics.h> // Para outtextxy(...); y cleardevice(...);
#include "..\libs\make_bot\make_bot.h" // Fuciones de MAKE_BOTON
#include "cd_icons.h"
#include "cd_error.h"
#include "cd_file.h"
#include "CD_SND.H"
extern int /*far _cdecl*/ Fichero_cd_img(char Dinamicos_Estaticos);
#define DOS 1
#define WINDOWS 2
extern void Sonido(char Sonido);
void Init_EXE(int CurrIcon);
char *current_directory(char *path);
extern void Inicializa_Dibujo(int L_Imagen, char *N_Imagen2);
extern void Inicializa_Iconos(void);
extern void Coloca_Iconos_Dos_Windows(void);
extern char far *Icono; // 18
void InicializaSVGA(void);
extern char dac[256*3];
extern "C" void APAGA_PANTALLA(char *);
extern "C" void ENCIENDE_PANTALLA(char *);
extern void Inicializa_Apertura(void);
extern void Coloca_Iconos(int Start_Icon);
typedef struct {
unsigned int Exit_after_EXE : 1;
unsigned int With_Out_Sound : 1;
unsigned int Auto_Install : 1;
unsigned int Check_Free_Size : 1;
unsigned int Format_Always : 1;
unsigned int Without_Backgr : 1;
unsigned int Futura_Ampliac : 4;
} Cd_CFG;
extern Cd_CFG CD_CFG1;
char Restaura_Pantalla_CFG(void);
char Salva_Pantalla_CFG(void);
extern FILE *CD_in;
extern CD_FILE CD_in2;
extern int file_exists(char *filename);
extern int Muestra_Mensaje(int Mensaje, char *file);
void Init_EXE(int CurrIcon){
int ok = 0, exe = 0;
char curdir[80];
char Buffer[80];
int ERROR_SALVA = 0;
struct ffblk ffblk;
// Comprobamos que existe el fichero a ejecutar...
strcpy( Buffer, CD_in2.Dir_P );
Buffer[0] = getdisk() + 'A';
strcat( Buffer, "\\" );
strcat( Buffer, CD_in2.N_Exe );
strcat( Buffer, ".*" );
if ( findfirst( Buffer, &ffblk,0) != 0 )
/* if ( !file_exists(Buffer) )*/ { Muestra_Mensaje(114, "cd_out.img");
// Sonido("CD_OUT72.WAV");
Sonido( Error_114 );
return; }
ERROR_SALVA = Salva_Pantalla_CFG();
/*
void far *Mascara;
if( (Mascara = farmalloc( imagesize(118, 160, 521, 335) ) ) == NULL) {
closegraph();
cprintf("\n\rSALIENDO");
cprintf("\n\rImposible encontrar %dKbytes en el Heap", ok);
exit(SIN_MEMORIA);
}
getimage(118, 159, 521, 335, Mascara);
*/
// Imprime_Estaticos(10, "cd_out.img"); // Imprime botones estaticos 'Seccion 4'
Fichero_cd_img(10);
Imprime_Secuencia(3); // Imprime secuencia 1.
// Imprime_Estaticos(11, "cd_out.img"); // Imprime textos estaticos 'Seccion 5'
Fichero_cd_img(11);
while(!ok){ // Bucle infinito
switch( Comprueba_Secuencia( 3 ) ) { // Iniciamos comprobacion de 2¦ sec
case 0: // No se pulso ningun BOTON
// Pero el raton fue presionado en
// algun sitio...
// Sonido("CD_OUT01.WAV");
Sonido( Mouse_Press );
break;
case -2: // Hay una tecla normal en BUFFER
switch( getch() ) { // La utilizamos
// Intro ( ACEPTAR )
case 13:
// Sonido("CD_OUT0E.WAV");
Sonido( Ok );
exe = 1;
ok = 1;
break;
// ESC ( CANCELAR )
case 14:
// Sonido("CD_OUT0F.WAV");
Sonido( Cancel );
exe = 0;
ok = 1;
break;
default:
// Sonido("CD_OUT02.WAV");
Sonido( Key_Press );
break;
}
break;
case -1: // Hay una tecla especial en BUFFER
getch(); // La eliminamos
break;
// Boton Aceptar
case 1:
exe = 1;
ok = 1;
break;
// Boton Cancelar
case 2:
exe = 0;
ok = 1;
break;
default:
while( kbhit() ) getch(); // Limpiamos posibles teclas en BUFFER
break;
}
}
// if ( CD_CFG1.Exit_after_EXE == 0)
ERROR_SALVA = Restaura_Pantalla_CFG();
/*
putimage(118, 160, Mascara, COPY_PUT);
farfree(Mascara);
*/
if ( exe == 1 ) {
/// Liberamos la memoria asignada para al DRIVER gr fico...
current_directory(curdir);
APAGA_PANTALLA(dac);
closegraph();
Libera_Memoria();
/*
free(P_Raton1);
free(P_Raton2);
free(P_Raton3);
free(P_Raton4);
free(Pantalla);
*/
Libera_Raton_Animado();
farfree(Icono);
fclose(CD_in);
closegraph();
/*
C O M I E N Z A L A E J E C U C I O N D E L P R O G R A M A
*/
// if ( system( getenv( "COMSPEC") ) != 0 ) { printf("\n\nImposible salir a MS-DOS\n\n"); sleep(5); }
cprintf("ÚÄÄÄÄÄÄÄÄÄÄÄÄÄ¿\n\r");
cprintf("³ JD & CD_OUT ³\n\r");
cprintf("ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÙ\n\r");
cprintf("EJECUTANDO PROGRAMA: [%s]\n\r", Buffer);
strcpy( Buffer, CD_in2.Dir_P );
Buffer[0] = getdisk() + 'A';
chdir(Buffer);
if ( spawnl(P_WAIT, CD_in2.N_Exe, NULL) == -1 ) {
printf("Imposible ejecutar %s, el archivo no esta disponible", Buffer);
getch();
} else if ( CD_CFG1.Exit_after_EXE == 1 ) {
clrscr();
cprintf("ÚÄÄÄÄÄÄÄÄÄÄÄÄÄ¿\n\r");
cprintf("³ JD & CD_OUT ³\n\r");
cprintf("ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÙ\n\r");
cprintf("No se regresera a CD_OUT a petici¢n del usuario...\n\r");
exit(1);
}
clrscr();
cprintf("ÚÄÄÄÄÄÄÄÄÄÄÄÄÄ¿\n\r");
cprintf("³ JD & CD_OUT ³\n\r");
cprintf("ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÙ\n\r");
cprintf("Regresando a CD_OUT...\n\r");
//// Recargamos el Programa...
chdir(curdir); // Refresamos a nuestro directorio
// de origen
InicializaSVGA(); // Reinicializamos la SVGA
APAGA_PANTALLA(dac); // Apagamos la Pantalla
Inicializa_Dibujo( (-1), "NADA"); // Inicializamos un nuevo dibujo
// if( carga_botones("cd_out.img") // Recarga botones del fichero "CD_out.img"
if ( Fichero_cd_img(0)
!= OK ) {
// Imprime_Estaticos( 112, "cd_out.img");
Fichero_cd_img(112);
Espera_Tecla_o_Raton();
closegraph();
cprintf("\n\rError en la CARGA DE BOTONES");
exit(112);
}
// Imprime_Estaticos( 1, "cd_out.img"); // Imprime botones estaticos 'Seccion 1'
Fichero_cd_img(1);
Imprime_Secuencia(1); // Imprime secuencia 1.
// Imprime_Estaticos( 2, "cd_out.img"); // Imprime botones estaticos 'Seccion 2'
// para los textos
Fichero_cd_img(2);
Inicializa_Iconos();
Coloca_Iconos_Dos_Windows();
Coloca_Iconos(CurrIcon);
ENCIENDE_PANTALLA(dac);
/*
if ( (Pantalla = malloc( JD_imagesize(0, 0, 21, 21) )) == NULL ) {
Imprime_Estaticos( SIN_CVN, "cd_out.img");
Espera_Tecla_o_Raton();
closegraph();
cprintf("\n\rError en la asignaci¢n de memoria para la mascara del raton");
exit(2);
}
*/
Imprime_Bordes(1, 1, 251);
settextstyle( SMALL_FONT, HORIZ_DIR, 4);
Inicializa_Apertura();
PunteroRaton = 100;
inicializa_raton_grafico( 0, 0, 618, 460);
True_Push = ON; // Activa el TRUE PUSH ( PRESION REAL )
} else
if ( ERROR_SALVA == 1 ){
APAGA_PANTALLA(dac);
closegraph();
Libera_Memoria();
Libera_Raton_Animado();
/*
free(P_Raton1);
free(P_Raton2);
free(P_Raton3);
free(P_Raton4);
free(Pantalla);
*/
farfree(Icono);
fclose(CD_in);
printf( "Ha ocurrido un ERROR en el fichero Temporal CD_OUT.TMP" );
exit(2);
}
}
char *current_directory(char *path)
{
strcpy(path, "X:\\"); /* fill string with form of response: X:\ */
path[0] = 'A' + getdisk(); /* replace X with current drive letter */
getcurdir(0, path+3); /* fill rest of string with current directory */
return(path);
}
char Salva_Pantalla_CFG(void){
FILE *Salva;
// unsigned char Pixel_Line[405];
int t;
void *Imagen;
if ( (Salva = fopen( "C:\\CD_OUT.TMP", "wb" ) ) == NULL ) {
CD_CFG1.Exit_after_EXE = 1;
return 1;
}
// 118, 160, 521, 335
// 118,160 320,160 521,160
// * - *
// 118, 160, 320, 248
// 320, 160, 521, 248 118,248 320,248 521,248
// 118, 248, 320, 335 _ _ _
// 118, 248, 320, 335
//
// 118,335 320,335 521,335
// * - *
rewind(Salva);
t = JD_imagesize(118, 160, 320, 248);
if ( (Imagen = malloc( t )) == NULL ) { closegraph(); printf("No hay suficiente espacion en el HEAP o C:\\\n"); }
getimage(118, 160, 320, 248, Imagen);
fwrite( Imagen, t, 1, Salva );
fseek( Salva, t, SEEK_CUR);
t = JD_imagesize(320, 160, 521, 248);
if ( (Imagen = realloc( Imagen, t )) == NULL ) { closegraph(); printf("No hay suficiente espacion en el HEAP o C:\\\n"); }
getimage(320, 160, 521, 248, Imagen);
fwrite( Imagen, t, 1, Salva );
fseek( Salva, t, SEEK_CUR);
t = JD_imagesize(118, 248, 320, 335);
if ( (Imagen = realloc( Imagen, t )) == NULL ) { closegraph(); printf("No hay suficiente espacion en el HEAP o C:\\\n"); }
getimage(118, 248, 320, 335, Imagen);
fwrite( Imagen, t, 1, Salva );
fseek( Salva, t, SEEK_CUR);
t = JD_imagesize(320, 248, 521, 335);
if ( (Imagen = realloc( Imagen, t )) == NULL ) { closegraph(); printf("No hay suficiente espacion en el HEAP o C:\\\n"); }
getimage(320, 248, 521, 335, Imagen);
fwrite( Imagen, t, 1, Salva );
free(Imagen);
if ( fclose(Salva) == EOF ) {
CD_CFG1.Exit_after_EXE = 1;
return 1;
}
return 0;
}
char Restaura_Pantalla_CFG(void){
FILE *Restaura;
int t;
void *Imagen;
unsigned char Pixel_Line;
int x, y;
if ( (Restaura = fopen( "C:\\CD_OUT.TMP", "rb" ) ) == NULL ) {
CD_CFG1.Exit_after_EXE = 1;
return 1;
}
rewind(Restaura);
t = JD_imagesize(118, 160, 320, 248);
if ( (Imagen = malloc( t )) == NULL ) { closegraph(); printf("No hay suficiente espacion en el HEAP o C:\\\n"); }
fread( Imagen, t, 1, Restaura );
putimage(118, 160, Imagen, COPY_PUT);
fseek( Restaura, t, SEEK_CUR);
t = JD_imagesize(320, 160, 521, 248);
if ( (Imagen = realloc( Imagen, t )) == NULL ) { closegraph(); printf("No hay suficiente espacion en el HEAP o C:\\\n"); }
fread( Imagen, t, 1, Restaura );
putimage(320, 160, Imagen, COPY_PUT);
fseek( Restaura, t, SEEK_CUR);
t = JD_imagesize(118, 248, 320, 335);
if ( (Imagen = realloc( Imagen, t )) == NULL ) { closegraph(); printf("No hay suficiente espacion en el HEAP o C:\\\n"); }
fread( Imagen, t, 1, Restaura );
putimage(118, 248, Imagen, COPY_PUT);
fseek( Restaura, t, SEEK_CUR);
t = JD_imagesize(320, 248, 521, 335);
if ( (Imagen = realloc( Imagen, t )) == NULL ) { closegraph(); printf("No hay suficiente espacion en el HEAP o C:\\\n"); }
fread( Imagen, t, 1, Restaura );
putimage(320, 248, Imagen, COPY_PUT);
free(Imagen);
if ( fclose(Restaura) == EOF ) {
CD_CFG1.Exit_after_EXE = 1;
return 1;
}
if ( unlink("C:\\CD_OUT.TMP")!=0 ){
CD_CFG1.Exit_after_EXE = 1;
return 1;
}
return 0;
}

45
CD_FILE.CPP Normal file
View File

@ -0,0 +1,45 @@
struct byte {
int DOS_WINDOWS : 1;
int Tipo_de_Programa : 4;
int Dibujo : 1;
int Install : 1;
int Ejecutable : 1;
};
struct Install {
int Usar_VGA_COPY : 1;
int Usar_ARJ : 1;
int Usar_ZIP : 1;
int Usar_LHA : 1;
int Usar_XCopy : 1;
int Usar_Install_P : 1;
int Manual_Automatico : 1;
};
typedef struct {
struct byte Typo; // 1 bit DOS o WINDOWS
// 4 bit Tipo de programa, ( Juegos, Dibujo, ... )
// 1 bit ( Tiene Dibujo SI / NO )
// 1 bit Instalable ( SI / NO )
// 1 bit Ejecutable
char Nombre[26+1]; // Nombre del programa
char Comentario[44][35 + 1]; // Comentario
char N_Img[8+1]; // Nombre de la imagen ( sin extensi¢n )
char Dir_P[80+1];
// Instalacion alternativa...
struct Install Alt_Install;
char N_Install[8+1];
char N_Exe[8+1];
} CD_FILE;

60
CD_FILE.H Normal file
View File

@ -0,0 +1,60 @@
struct byte {
unsigned int T_Dibujo : 1;
unsigned int DOS_WINDOWS : 1;
unsigned int Install : 1;
unsigned int Ejecutable : 1;
unsigned int Tipo_de_Programa : 4;
};
struct Install {
unsigned int Usar_VGA_COPY : 1;
unsigned int Usar_ARJ : 1;
unsigned int Usar_ZIP : 1;
unsigned int Usar_LHA : 1;
unsigned int Usar_XCopy : 1;
unsigned int Usar_Install_P : 1;
unsigned int Manual_Automatico : 1;
};
typedef struct {
struct byte Typo; // 1 bit DOS o WINDOWS
// 4 bit Tipo de programa, ( Juegos, Dibujo, ... )
// 1 bit ( Tiene Dibujo SI / NO )
// 1 bit Instalable ( SI / NO )
// 1 bit Ejecutable
char Nombre[26+1]; // Nombre del programa
char Comentario[32][35 + 1]; // Comentario
char N_Img[8+1]; // Nombre de la imagen ( sin extensi¢n )
char Dir_P[50+1];
// Instalacion alternativa...
struct Install Alt_Install;
char N_Install[8+1];
char N_Exe[8+1];
} CD_FILE;
struct Cabecera {
char Nombre_del_Programa[70];
char Comentario_Inicial[70];
// const char R1 = 13, R2 =10;
// const char Comentario_Inicial[] = {"Jos David Guilln Dominguez"};
// const char R3 = 13, R4 =10;
// const char R5 = 7, R6 =26;
char VerHi, VerLow;
char Register;
long Records;
};

14
CD_GRAPH.CPP Normal file
View File

@ -0,0 +1,14 @@
unsigned far JD_imagesize(int left, int top, int right, int bottom);
unsigned far 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= ( ( up > down) ? ( up - down + 1) : ( down - up + 1) );
return (X_width * Y_width + 4);
};

1
CD_GRAPH.H Normal file
View File

@ -0,0 +1 @@
unsigned far JD_imagesize(int left, int top, int right, int bottom);

428
CD_ICONS.CPP Normal file
View File

@ -0,0 +1,428 @@
///////////////////////////// FICHEROS A INCLUIR /////////////////////////////
#include <conio.h>
#include <alloc.h>
#include <stdio.h>
#include <stdlib.h>
#include <graphics.h>
#include "cd_icons.h"
#include "cd_error.h"
////////////////////////////////// VARIABLES /////////////////////////////////
extern char raton;
extern char PunteroRaton;
extern char dac[256*3];
unsigned char far *Icono; // 18
void Coloca_Iconos_Dos_Windows(void);
void Coloca_Iconos(int Start_Icon);
//////////////////////// DECLARACIONES DE FUNCIONES //////////////////////////
extern "C" void ENCIENDE_PANTALLA(char *);
extern unsigned char *P_Raton1, *P_Raton2, *P_Raton3, *P_Raton4;
///////////////////////////////// PROGRAMA ///////////////////////////////////
void Inicializa_Iconos(void)
{
FILE *handle;
int ancho, alto;
int Posicion[18] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
int esq_x1, esq_y1, esq_x2, esq_y2;
unsigned char byte, contador;
int n = (20*20);
int PR1, PR2, PR3, PR4;
PR1 = PR2 = PR3 = PR4 = -1;
if( (Icono = (unsigned char far *)farcalloc( (39762), sizeof(unsigned char) ) ) == NULL )
{
closegraph();
printf("No se encontr¢ memoria suficiente");
exit(1);
}
if((handle=fopen("CD_OUT2.IMG", "rb"))==NULL)
{
restorecrtmode();
printf("No se encontr¢ el archivo de iconos");
exit(1);
}
if(10!=getc(handle))
{
restorecrtmode();
printf("El archivo de iconos, esta da¤ado");
exit(1);
}
getw(handle); getc(handle);
esq_x1=getw(handle); esq_y1=getw(handle);
esq_x2=getw(handle); esq_y2=getw(handle);
ancho=esq_x2-esq_x1+1;
alto =esq_y2-esq_y1+1;
fseek(handle, 128, 0);
for(alto=(esq_y2-esq_y1+1); alto>0; alto--)
{
for(ancho=(esq_x2-esq_x1+1); ancho>0; )
{
byte=getc(handle);
if(byte<=0xC0)
{
if( ancho>=272 && ancho <=318 && alto >=152 && alto <= 198 ) {
Posicion[0] ++;
Icono[ Posicion[0] ] = byte;
} else
if( ancho>=224 && ancho <=270 && alto >=152 && alto <= 198 ) {
Posicion[1] ++;
Icono[ Posicion[1]+2209*1 ] = byte;
} else
if( ancho>=176 && ancho <=222 && alto >=152 && alto <= 198 ) {
Posicion[2] ++;
Icono[ Posicion[2]+2209*2 ] = byte;
} else
if( ancho>=128 && ancho <=174 && alto >=152 && alto <= 198 ) {
Posicion[3] ++;
Icono[ Posicion[3]+2209*3 ] = byte;
} else
if( ancho>=80 && ancho <=126 && alto >=152 && alto <= 198 ) {
Posicion[4] ++;
Icono[ Posicion[4]+2209*4 ] = byte;
} else
if( ancho>=32 && ancho <=78 && alto >=152 && alto <= 198 ) {
Posicion[5] ++;
Icono[ Posicion[5]+2209*5 ] = byte;
} else
////////////////////////////////////////////////////////////////////////////////////
if( ancho>=272 && ancho <=318 && alto >=104 && alto <= 150 ) {
Posicion[6] ++;
Icono[ Posicion[6]+2209*6 ] = byte;
} else
if( ancho>=224 && ancho <=270 && alto >=104 && alto <= 150 ) {
Posicion[7] ++;
Icono[ Posicion[7]+2209*7 ] = byte;
} else
if( ancho>=176 && ancho <=222 && alto >=104 && alto <= 150 ) {
Posicion[8] ++;
Icono[ Posicion[8]+2209*8 ] = byte;
} else
if( ancho>=128 && ancho <=174 && alto >=104 && alto <= 150 ) {
Posicion[9] ++;
Icono[ Posicion[9]+2209*9 ] = byte;
} else
if( ancho>=80 && ancho <=126 && alto >=104 && alto <= 150 ) {
Posicion[10] ++;
Icono[ Posicion[10]+2209*10 ] = byte;
} else
if( ancho>=32 && ancho <=78 && alto >=104 && alto <= 150 ) {
Posicion[11] ++;
Icono[ Posicion[11]+2209*11] = byte;
} else
////////////////////////////////////////////////////////////////////////////////////
if( ancho>=272 && ancho <=318 && alto >=56 && alto <= 102 ) {
Posicion[12] ++;
Icono[ Posicion[12]+2209*12 ] = byte;
} else
if( ancho>=224 && ancho <=270 && alto >=56 && alto <= 102 ) {
Posicion[13] ++;
Icono[ Posicion[13]+2209*13 ] = byte;
} else
if( ancho>=176 && ancho <=222 && alto >=56 && alto <= 102 ) {
Posicion[14] ++;
Icono[ Posicion[14]+2209*14 ] = byte;
} else
if( ancho>=128 && ancho <=174 && alto >=56 && alto <= 102 ) {
Posicion[15] ++;
Icono[ Posicion[15]+2209*15 ] = byte;
} else
if( ancho>=80 && ancho <=126 && alto >=56 && alto <= 102 ) {
Posicion[16] ++;
Icono[ Posicion[16]+2209*16 ] = byte;
} else
if( ancho>=32 && ancho <=78 && alto >=56 && alto <= 102 ) {
Posicion[17] ++;
Icono[ Posicion[17]+2209*17] = byte;
} else
////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
if( ancho>=/*272*/279 && ancho <=/*318*/316 && alto >= /*8*/11 && alto <= 29 ) {
// Flecha Izquierda
putpixel( 561 - 51 + (ancho - 279), 99 + 4 + (alto - 11), byte);
} else
if( ancho>=/*272*/276 && ancho <=/*318*/313 && alto >= /*32*/35 && alto <= 52 ) {
// Flecha Derecha
putpixel( 558 - 51 + (ancho-272), 126 - 52 + (alto-32), byte);
} else
if( ancho>=251 && ancho <=270 && alto >= 14 && alto <= 54 ) {
// Flecha Arriba
putpixel( 235 - 25 + (ancho-248), 420 + 2 + (alto-8), byte);
putpixel( 385 - 25 + (ancho-248), 360 + 3 + (alto-8), byte);
} else
if( ancho>=/*224*/227 && ancho <= 245 && alto >= /*8*/12 && alto <= /*54*/49 ) {
// Flecha Abajo
putpixel( 235 - 25 + (ancho-224), 470 - 100 + (alto-8), byte);
putpixel( 385 - 25 + 1 + (ancho-224), 415 -2- 100 + (alto-8), byte);
} else
if( ancho>=180 && ancho <= 199 && alto >= 12 && alto <= 31 ) {
// Punteros del Raton...
PR1++;
if ( raton!=0 && PunteroRaton == 100 )
P_Raton1[/*(199-ancho) + 20*(31-alto)*/PR1] = byte;
// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
} else
if( ancho>=201 && ancho <= 220 && alto >= 12 && alto <= 31 ) {
// Punteros del Raton...
PR2++;
if ( raton!=0 && PunteroRaton == 100 )
P_Raton2[/*(220-ancho) + 20*(31-alto)*/PR2] = byte;
// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
} else
if( ancho>=180 && ancho <= 199 && alto >= 33 && alto <= 52 ) {
// Punteros del Raton...
PR3++;
if ( raton!=0 && PunteroRaton == 100 )
P_Raton3[/*(199-ancho) + 20*(52-alto)*/PR3] = byte;
// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
} else
if( ancho>=201 && ancho <= 220 && alto >= 33 && alto <= 52 ) {
// Punteros del Raton...
PR4++;
if ( raton!=0 && PunteroRaton == 100 )
P_Raton4[/*(220-ancho) + 20*(52-alto)*/PR4] = byte;
// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
}
/////////////////
// putpixel( (10+ancho), (10+alto), byte);
/////////////////
ancho--;
}
else
{
contador=byte&0x3F; byte=getc(handle);
for(; contador>0; contador--)
{
// *dir_vga++=byte;
if( ancho>=272 && ancho <=318 && alto >=152 && alto <= 198 ) {
Posicion[0] ++;
Icono[ Posicion[0] ] = byte;
} else
if( ancho>=224 && ancho <=270 && alto >=152 && alto <= 198 ) {
Posicion[1] ++;
Icono[ Posicion[1]+2209*1 ] = byte;
} else
if( ancho>=176 && ancho <=222 && alto >=152 && alto <= 198 ) {
Posicion[2] ++;
Icono[ Posicion[2]+2209*2 ] = byte;
} else
if( ancho>=128 && ancho <=174 && alto >=152 && alto <= 198 ) {
Posicion[3] ++;
Icono[ Posicion[3]+2209*3 ] = byte;
} else
if( ancho>=80 && ancho <=126 && alto >=152 && alto <= 198 ) {
Posicion[4] ++;
Icono[ Posicion[4]+2209*4 ] = byte;
} else
if( ancho>=32 && ancho <=78 && alto >=152 && alto <= 198 ) {
Posicion[5] ++;
Icono[ Posicion[5]+2209*5 ] = byte;
} else
////////////////////////////////////////////////////////////////////////////////////
if( ancho>=272 && ancho <=318 && alto >=104 && alto <= 150 ) {
Posicion[6] ++;
Icono[ Posicion[6]+2209*6 ] = byte;
} else
if( ancho>=224 && ancho <=270 && alto >=104 && alto <= 150 ) {
Posicion[7] ++;
Icono[ Posicion[7]+2209*7 ] = byte;
} else
if( ancho>=176 && ancho <=222 && alto >=104 && alto <= 150 ) {
Posicion[8] ++;
Icono[ Posicion[8]+2209*8 ] = byte;
} else
if( ancho>=128 && ancho <=174 && alto >=104 && alto <= 150 ) {
Posicion[9] ++;
Icono[ Posicion[9]+2209*9 ] = byte;
} else
if( ancho>=80 && ancho <=126 && alto >=104 && alto <= 150 ) {
Posicion[10] ++;
Icono[ Posicion[10]+2209*10 ] = byte;
} else
if( ancho>=32 && ancho <=78 && alto >=104 && alto <= 150 ) {
Posicion[11] ++;
Icono[ Posicion[11]+2209*11] = byte;
} else
////////////////////////////////////////////////////////////////////////////////////
if( ancho>=272 && ancho <=318 && alto >=56 && alto <= 102 ) {
Posicion[12] ++;
Icono[ Posicion[12]+2209*12 ] = byte;
} else
if( ancho>=224 && ancho <=270 && alto >=56 && alto <= 102 ) {
Posicion[13] ++;
Icono[ Posicion[13]+2209*13 ] = byte;
} else
if( ancho>=176 && ancho <=222 && alto >=56 && alto <= 102 ) {
Posicion[14] ++;
Icono[ Posicion[14]+2209*14 ] = byte;
} else
if( ancho>=128 && ancho <=174 && alto >=56 && alto <= 102 ) {
Posicion[15] ++;
Icono[ Posicion[15]+2209*15 ] = byte;
} else
if( ancho>=80 && ancho <=126 && alto >=56 && alto <= 102 ) {
Posicion[16] ++;
Icono[ Posicion[16]+2209*16 ] = byte;
} else
if( ancho>=32 && ancho <=78 && alto >=56 && alto <= 102 ) {
Posicion[17] ++;
Icono[ Posicion[17]+2209*17] = byte;
} else
////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
if( ancho>=/*272*/279 && ancho <=/*318*/316 && alto >= /*8*/11 && alto <= 29 ) {
// Flecha Izquierda
putpixel( 568 - 51 + (ancho - 279), 102 + 4 + (alto - 11), byte);
} else
if( ancho>=/*272*/276 && ancho <=/*318*/313 && alto >= /*32*/35 && alto <= 52 ) {
// Flecha Derecha
putpixel( 565 - 51 + (ancho - 276), 129 - 52 + (alto - 35), byte);
} else
if( ancho>=251 && ancho <=270 && alto >= 14 && alto <= 54 ) {
// Flecha Arriba
putpixel( 235 - 25 + (ancho-248), 420 + 2 + (alto-8), byte);
putpixel( 385 - 25 + (ancho-248), 360 + 3 + (alto-8), byte);
} else
if( ancho>=/*224*/227 && ancho <= 245 && alto >= /*8*/12 && alto <= /*54*/49 ) {
// Flecha Abajo
putpixel( 235 - 25 + 1 + (ancho-224), 470 - 100 + (alto-8), byte);
putpixel( 385 - 25 + 1 + (ancho-224), 415 -2 - 100 + (alto-8), byte);
} else
/*
if( ancho>=180 && ancho <= 220 && alto >= 12 && alto <= 52 ) {
// Punteros del Raton...
// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
}
*/
if( ancho>=180 && ancho <= 199 && alto >= 12 && alto <= 31 ) {
// Punteros del Raton...
PR1++;
if ( raton!=0 && PunteroRaton == 100 )
P_Raton1[/*(199-ancho) + 20*(31-alto)*/PR1] = byte;
// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
} else
if( ancho>=201 && ancho <= 220 && alto >= 12 && alto <= 31 ) {
// Punteros del Raton...
PR2++;
if ( raton!=0 && PunteroRaton == 100 )
P_Raton2[/*(220-ancho) + 20*(31-alto)*/PR2] = byte;
// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
} else
if( ancho>=180 && ancho <= 199 && alto >= 33 && alto <= 52 ) {
// Punteros del Raton...
PR3++;
if ( raton!=0 && PunteroRaton == 100 )
P_Raton3[/*(199-ancho) + 20*(52-alto)*/PR3] = byte;
// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
} else
if( ancho>=201 && ancho <= 220 && alto >= 33 && alto <= 52 ) {
// Punteros del Raton...
PR4++;
if ( raton!=0 && PunteroRaton == 100 )
P_Raton4[/*(220-ancho) + 20*(52-alto)*/PR4] = byte;
// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
}
////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////
/////////////////
// putpixel( (10+ancho), (10+alto), byte);
/////////////////
ancho--;
}
}
}
}
getc(handle);
// for(n=0; n<256*3; n++) dac[n]=getc(handle) >> 2;
for(n=0; n<256*3; n++)
if( n >= (256-16)*3 )
dac[n]=getc(handle) >> 2;
else
getc(handle);
fclose(handle);
}
void Coloca_Iconos_Dos_Windows(void){
int x, y, i;
for( y = 0; y <= (46-1); y++ )
for( x = 1; x <= 46; x++ ) {
// ****** 1
putpixel( /*397*/512 + x, 12+y, Icono[ x + (47*y) + (2209*11) ] );
putpixel( 577 + x, 12+y, Icono[ x + (47*y) + (2209*17) ] );
// C_Icon++;
}
}
void Coloca_Iconos(int Start_Icon){
int x, y, i;
const char Icon_inx[] = { Juegos, Texto, Musica, Dibujo, Util, Base, Hoja,
Red, TC, Scanner, News, Zip, Peli, Varios, CD, Ayuda };
Start_Icon--;
for( y = 0; y <= (46-1); y++ )
for( x = 1; x <= 46; x++ ) {
// ****** 1
// putpixel( 447 + x, 77+y, Icono[ x + (47*y) + (2209*Icon_inx[Start_Icon]) ] );
// putpixel( 512 + x, 77+y, Icono[ x + (47*y) + (2209*Icon_inx[Start_Icon+1]) ] );
putpixel( 577 + x, 77+y, Icono[ x + (47*y) + (2209*Icon_inx[Start_Icon/*+2*/]) ] );
// C_Icon++;
}
}

16
CD_ICONS.H Normal file
View File

@ -0,0 +1,16 @@
#define Juegos 0
#define Musica 1
#define Texto 2
#define Dibujo 3
#define Varios 4
#define Ayuda 5
#define CD 6
#define Scanner 7
#define Util 8
#define TC 9
#define Red 10
#define Base 12
#define Hoja 13
#define News 14
#define Peli 15
#define Zip 16

479
CD_IMG.CPP Normal file
View File

@ -0,0 +1,479 @@
/***************************************************************/
/* */
/* Conversi¢n de fuentes de MAKE BOTON en ASCII a fuentes */
/* para CPP, que pueden ser compilados junto al programa. */
/* */
/***************************************************************/
/* */
/* MAKE BOTON es un programa realizado por Jos David Guilln */
/* MB a CPP es una utilidad complementaria a Make Boton por */
/* Jos David Guilln... */
/* */
/***************************************************************/
/* */
/* GRACIAS POR UTILIZAR MI SOFTWARE... */
/* */
/* JOS<4F> DAVID GUILL<4C>N (c) 1995 */
/* */
/***************************************************************/
// Debe indicar el directorio exacto de la Cabecera de MAKE BOTON
#include "..\libs\make_bot\Make_bot.h"
#include <stdlib.h>
#include <stdio.h>
#include <alloc.h>
#include <graphics.h>
extern int vez, memoria_asignada, Secuencias, *n_Botones_Secuencia;
/*extern*/ struct Make_Boton { int Up, Left, Down, Right;
unsigned char Cdf, Cb1, Cb2;
unsigned char Ab, Pb;
unsigned char Isc, Sc;
};
extern struct Make_Boton far *Botones;
struct Make_Boton Bot_Static;
extern void Libera_Memoria(void);extern void Imprime_Boton(int D_Bord, struct Make_Boton Bot_Imp);
// Esta funci¢n debe ser llamada para la inicializacion de los
// botones en lugar de CARGA_BOTONES(...).
// Para cargar los botones con parametro 0 y para imprimir
// imprimir los estaticos con parametro [ n§ de secuencia ]
int /*far _cdecl*/ Fichero_cd_img(char Dinamicos_Estaticos);
int /*far _cdecl*/ Fichero_cd_img(char Dinamicos_Estaticos) {
static char vez = 0;
long SiZe_BoToN = 0;
switch(Dinamicos_Estaticos) {
case 0:
if( vez == 0 ) {
vez = 1;
memoria_asignada = 0;
atexit( Libera_Memoria );
}
if ( memoria_asignada == 1 ) {
free(n_Botones_Secuencia);
farfree(Botones);
memoria_asignada = 0;
}
/*
long SiZe_BoToN = sizeof( struct Make_Boton );
if ( (Botones = (struct Make_Boton far *)farmalloc( SiZe_BoToN )) == NULL)
return SIN_MEMORIA;
memoria_asignada = 1;
Secuencias = 3;
if (( n_Botones_Secuencia = (int *) malloc( sizeof(int)*(Secuencias+1) ) ) == NULL) {
closegraph();
printf("\nNo Hay suficiente Memoria, ni para un Boton\n\n");
return SIN_MEMORIA;
}
n_Botones_Secuencia[1 - 1] = 24;
SiZe_BoToN += ( sizeof( struct Make_Boton ) * 24);
if ( (Botones = (struct Make_Boton far *)farrealloc(Botones, SiZe_BoToN )) == NULL) {
Secuencias = 1;
return SIN_MEMORIA;
}
memoria_asignada = 1;
*/
Secuencias = 3;
if (( n_Botones_Secuencia = (int *) malloc( sizeof(int)*(Secuencias+1) ) ) == NULL) {
closegraph();
printf("\nNo Hay suficiente Memoria, ni para un Boton\n\n");
return SIN_MEMORIA;
}
n_Botones_Secuencia[0] = 24;
n_Botones_Secuencia[1] = 10;
n_Botones_Secuencia[2] = 2;
n_Botones_Secuencia[3] = 2;
if ( (Botones = (struct Make_Boton far *)farmalloc( sizeof( struct Make_Boton ) * 40 )) == NULL)
return SIN_MEMORIA;
Botones [0].Left = 508; Botones [0].Up = 8;Botones [0]. Right = 562;Botones [0]. Down = 62;
Botones [0]. Cdf = 253; Botones [0]. Cb1 = 255; Botones [0]. Cb2 = 254; Botones [0]. Ab = 3; Botones [0]. Pb = 1; Botones [0]. Isc = 0; Botones [0]. Sc = 32;
Botones [1].Left = 573; Botones [1].Up = 8;Botones [1]. Right = 627;Botones [1]. Down = 62;
Botones [1]. Cdf = 253; Botones [1]. Cb1 = 255; Botones [1]. Cb2 = 254; Botones [1]. Ab = 3; Botones [1]. Pb = 1; Botones [1]. Isc = 0; Botones [1]. Sc = 17;
Botones [2].Left = 573; Botones [2].Up = 73;Botones [2]. Right = 627;Botones [2]. Down = 127;
Botones [2]. Cdf = 253; Botones [2]. Cb1 = 255; Botones [2]. Cb2 = 254; Botones [2]. Ab = 3; Botones [2]. Pb = 1; Botones [2]. Isc = 0; Botones [2]. Sc = 120;
Botones [3].Left = 508; Botones [3].Up = 73;Botones [3]. Right = 562;Botones [3]. Down = 99;
Botones [3]. Cdf = 253; Botones [3]. Cb1 = 255; Botones [3]. Cb2 = 254; Botones [3]. Ab = 2; Botones [3]. Pb = 1; Botones [3]. Isc = 0; Botones [3]. Sc = 75;
Botones [4].Left = 508; Botones [4].Up = 103;Botones [4]. Right = 562;Botones [4]. Down = 127;
Botones [4]. Cdf = 253; Botones [4]. Cb1 = 255; Botones [4]. Cb2 = 254; Botones [4]. Ab = 2; Botones [4]. Pb = 1; Botones [4]. Isc = 0; Botones [4]. Sc = 77;
Botones [5].Left = 13; Botones [5].Up = 235;Botones [5]. Right = 198;Botones [5]. Down = 255;
Botones [5]. Cdf = 253; Botones [5]. Cb1 = 255; Botones [5]. Cb2 = 254; Botones [5]. Ab = 2; Botones [5]. Pb = 1; Botones [5]. Isc = 0; Botones [5]. Sc = 104;
Botones [6].Left = 13; Botones [6].Up = 258;Botones [6]. Right = 198;Botones [6]. Down = 278;
Botones [6]. Cdf = 253; Botones [6]. Cb1 = 255; Botones [6]. Cb2 = 254; Botones [6]. Ab = 2; Botones [6]. Pb = 1; Botones [6]. Isc = 0; Botones [6]. Sc = 105;
Botones [7].Left = 13; Botones [7].Up = 281;Botones [7]. Right = 198;Botones [7]. Down = 301;
Botones [7]. Cdf = 253; Botones [7]. Cb1 = 255; Botones [7]. Cb2 = 254; Botones [7]. Ab = 2; Botones [7]. Pb = 1; Botones [7]. Isc = 0; Botones [7]. Sc = 106;
Botones [8].Left = 13; Botones [8].Up = 304;Botones [8]. Right = 198;Botones [8]. Down = 324;
Botones [8]. Cdf = 253; Botones [8]. Cb1 = 255; Botones [8]. Cb2 = 254; Botones [8]. Ab = 2; Botones [8]. Pb = 1; Botones [8]. Isc = 0; Botones [8]. Sc = 107;
Botones [9].Left = 13; Botones [9].Up = 327;Botones [9]. Right = 198;Botones [9]. Down = 347;
Botones [9]. Cdf = 253; Botones [9]. Cb1 = 255; Botones [9]. Cb2 = 254; Botones [9]. Ab = 2; Botones [9]. Pb = 1; Botones [9]. Isc = 0; Botones [9]. Sc = 108;
Botones [10].Left = 13; Botones [10].Up = 350;Botones [10]. Right = 198;Botones [10]. Down = 370;
Botones [10]. Cdf = 253; Botones [10]. Cb1 = 255; Botones [10]. Cb2 = 254; Botones [10]. Ab = 2; Botones [10]. Pb = 1; Botones [10]. Isc = 0; Botones [10]. Sc = 109;
Botones [11].Left = 13; Botones [11].Up = 373;Botones [11]. Right = 198;Botones [11]. Down = 393;
Botones [11]. Cdf = 253; Botones [11]. Cb1 = 255; Botones [11]. Cb2 = 254; Botones [11]. Ab = 2; Botones [11]. Pb = 1; Botones [11]. Isc = 0; Botones [11]. Sc = 110;
Botones [12].Left = 13; Botones [12].Up = 396;Botones [12]. Right = 198;Botones [12]. Down = 416;
Botones [12]. Cdf = 253; Botones [12]. Cb1 = 255; Botones [12]. Cb2 = 254; Botones [12]. Ab = 2; Botones [12]. Pb = 1; Botones [12]. Isc = 0; Botones [12]. Sc = 111;
Botones [13].Left = 13; Botones [13].Up = 419;Botones [13]. Right = 198;Botones [13]. Down = 439;
Botones [13]. Cdf = 253; Botones [13]. Cb1 = 255; Botones [13]. Cb2 = 254; Botones [13]. Ab = 2; Botones [13]. Pb = 1; Botones [13]. Isc = 0; Botones [13]. Sc = 112;
Botones [14].Left = 13; Botones [14].Up = 442;Botones [14]. Right = 198;Botones [14]. Down = 462;
Botones [14]. Cdf = 253; Botones [14]. Cb1 = 255; Botones [14]. Cb2 = 254; Botones [14]. Ab = 2; Botones [14]. Pb = 1; Botones [14]. Isc = 0; Botones [14]. Sc = 113;
Botones [15].Left = 390; Botones [15].Up = 420;Botones [15]. Right = 505;Botones [15]. Down = 446;
Botones [15]. Cdf = 253; Botones [15]. Cb1 = 255; Botones [15]. Cb2 = 254; Botones [15]. Ab = 2; Botones [15]. Pb = 2; Botones [15]. Isc = 0; Botones [15]. Sc = 23;
Botones [16].Left = 510; Botones [16].Up = 420;Botones [16]. Right = 630;Botones [16]. Down = 446;
Botones [16]. Cdf = 253; Botones [16]. Cb1 = 255; Botones [16]. Cb2 = 254; Botones [16]. Ab = 2; Botones [16]. Pb = 2; Botones [16]. Isc = 0; Botones [16]. Sc = 46;
Botones [17].Left = 390; Botones [17].Up = 449;Botones [17]. Right = 505;Botones [17]. Down = 475;
Botones [17]. Cdf = 253; Botones [17]. Cb1 = 255; Botones [17]. Cb2 = 254; Botones [17]. Ab = 2; Botones [17]. Pb = 2; Botones [17]. Isc = 0; Botones [17]. Sc = 18;
Botones [18].Left = 510; Botones [18].Up = 449;Botones [18]. Right = 630;Botones [18]. Down = 475;
Botones [18]. Cdf = 253; Botones [18]. Cb1 = 255; Botones [18]. Cb2 = 254; Botones [18]. Ab = 2; Botones [18]. Pb = 2; Botones [18]. Isc = 0; Botones [18]. Sc = 31;
Botones [19].Left = 210; Botones [19].Up = 370;Botones [19]. Right = 235;Botones [19]. Down = 420;
Botones [19]. Cdf = 253; Botones [19]. Cb1 = 255; Botones [19]. Cb2 = 254; Botones [19]. Ab = 2; Botones [19]. Pb = 1; Botones [19]. Isc = 0; Botones [19]. Sc = 72;
Botones [20].Left = 210; Botones [20].Up = 425;Botones [20]. Right = 235;Botones [20]. Down = 470;
Botones [20]. Cdf = 253; Botones [20]. Cb1 = 255; Botones [20]. Cb2 = 254; Botones [20]. Ab = 2; Botones [20]. Pb = 1; Botones [20]. Isc = 0; Botones [20]. Sc = 80;
Botones [21].Left = 360; Botones [21].Up = 310;Botones [21]. Right = 385;Botones [21]. Down = 360;
Botones [21]. Cdf = 253; Botones [21]. Cb1 = 255; Botones [21]. Cb2 = 254; Botones [21]. Ab = 2; Botones [21]. Pb = 1; Botones [21]. Isc = 0; Botones [21]. Sc = 73;
Botones [22].Left = 360; Botones [22].Up = 365;Botones [22]. Right = 385;Botones [22]. Down = 415;
Botones [22]. Cdf = 253; Botones [22]. Cb1 = 255; Botones [22]. Cb2 = 254; Botones [22]. Ab = 2; Botones [22]. Pb = 1; Botones [22]. Isc = 0; Botones [22]. Sc = 81;
Botones [23].Left = 360; Botones [23].Up = 210;Botones [23]. Right = 385;Botones [23]. Down = 305;
Botones [23]. Cdf = 253; Botones [23]. Cb1 = 255; Botones [23]. Cb2 = 254; Botones [23]. Ab = 2; Botones [23]. Pb = 1; Botones [23]. Isc = 0; Botones [23]. Sc = 47;
/*
n_Botones_Secuencia[2 - 1] = 10;
SiZe_BoToN += ( sizeof( struct Make_Boton ) * 10);
if ( (Botones = (struct Make_Boton far *)farrealloc(Botones, SiZe_BoToN )) == NULL) {
Secuencias = 2;
return SIN_MEMORIA;
}
memoria_asignada = 1;
*/
Botones [24].Left = 547; Botones [24].Up = 390;Botones [24]. Right = 623;Botones [24]. Down = 410;
Botones [24]. Cdf = 253; Botones [24]. Cb1 = 255; Botones [24]. Cb2 = 254; Botones [24]. Ab = 2; Botones [24]. Pb = 2; Botones [24]. Isc = 0; Botones [24]. Sc = 46;
Botones [25].Left = 471; Botones [25].Up = 390;Botones [25]. Right = 545;Botones [25]. Down = 410;
Botones [25]. Cdf = 253; Botones [25]. Cb1 = 255; Botones [25]. Cb2 = 254; Botones [25]. Ab = 2; Botones [25]. Pb = 2; Botones [25]. Isc = 0; Botones [25]. Sc = 31;
Botones [26].Left = 396; Botones [26].Up = 390;Botones [26]. Right = 469;Botones [26]. Down = 410;
Botones [26]. Cdf = 253; Botones [26]. Cb1 = 255; Botones [26]. Cb2 = 254; Botones [26]. Ab = 2; Botones [26]. Pb = 2; Botones [26]. Isc = 0; Botones [26]. Sc = 30;
Botones [27].Left = 396; Botones [27].Up = 149;Botones [27]. Right = 411;Botones [27]. Down = 165;
Botones [27]. Cdf = 253; Botones [27]. Cb1 = 255; Botones [27]. Cb2 = 254; Botones [27]. Ab = 1; Botones [27]. Pb = 2; Botones [27]. Isc = 0; Botones [27]. Sc = 32;
Botones [28].Left = 396; Botones [28].Up = 170;Botones [28]. Right = 411;Botones [28]. Down = 186;
Botones [28]. Cdf = 253; Botones [28]. Cb1 = 255; Botones [28]. Cb2 = 254; Botones [28]. Ab = 1; Botones [28]. Pb = 2; Botones [28]. Isc = 0; Botones [28]. Sc = 18;
Botones [29].Left = 396; Botones [29].Up = 191;Botones [29]. Right = 411;Botones [29]. Down = 207;
Botones [29]. Cdf = 253; Botones [29]. Cb1 = 255; Botones [29]. Cb2 = 254; Botones [29]. Ab = 1; Botones [29]. Pb = 2; Botones [29]. Isc = 0; Botones [29]. Sc = 23;
Botones [30].Left = 396; Botones [30].Up = 212;Botones [30]. Right = 411;Botones [30]. Down = 228;
Botones [30]. Cdf = 253; Botones [30]. Cb1 = 255; Botones [30]. Cb2 = 254; Botones [30]. Ab = 1; Botones [30]. Pb = 2; Botones [30]. Isc = 0; Botones [30]. Sc = 24;
Botones [31].Left = 396; Botones [31].Up = 233;Botones [31]. Right = 411;Botones [31]. Down = 249;
Botones [31]. Cdf = 253; Botones [31]. Cb1 = 255; Botones [31]. Cb2 = 254; Botones [31]. Ab = 1; Botones [31]. Pb = 2; Botones [31]. Isc = 0; Botones [31]. Sc = 33;
Botones [32].Left = 396; Botones [32].Up = 254;Botones [32]. Right = 411;Botones [32]. Down = 270;
Botones [32]. Cdf = 253; Botones [32]. Cb1 = 255; Botones [32]. Cb2 = 254; Botones [32]. Ab = 1; Botones [32]. Pb = 2; Botones [32]. Isc = 0; Botones [32]. Sc = 49;
Botones [33].Left = 396; Botones [33].Up = 275;Botones [33]. Right = 623;Botones [33]. Down = 310;
Botones [33]. Cdf = 253; Botones [33]. Cb1 = 255; Botones [33]. Cb2 = 254; Botones [33]. Ab = 3; Botones [33]. Pb = 2; Botones [33]. Isc = 0; Botones [33]. Sc = 50;
/*
n_Botones_Secuencia[3 - 1] = 2;
SiZe_BoToN += ( sizeof( struct Make_Boton ) * 2);
if ( (Botones = (struct Make_Boton far *)farrealloc(Botones, SiZe_BoToN )) == NULL) {
Secuencias = 3;
return SIN_MEMORIA;
}
memoria_asignada = 1;
*/
Botones [34].Left = 123; Botones [34].Up = 165;Botones [34]. Right = 516;Botones [34]. Down = 185;
Botones [34]. Cdf = 240; Botones [34]. Cb1 = 255; Botones [34]. Cb2 = 254; Botones [34]. Ab = 2; Botones [34]. Pb = 1; Botones [34]. Isc = 0; Botones [34]. Sc = 18;
Botones [35].Left = 500; Botones [35].Up = 190;Botones [35]. Right = 516;Botones [35]. Down = 330;
Botones [35]. Cdf = 253; Botones [35]. Cb1 = 255; Botones [35]. Cb2 = 254; Botones [35]. Ab = 2; Botones [35]. Pb = 1; Botones [35]. Isc = 0; Botones [35]. Sc = 46;
/*
n_Botones_Secuencia[4 - 1] = 2;
SiZe_BoToN += ( sizeof( struct Make_Boton ) * 2);
if ( (Botones = (struct Make_Boton far *)farrealloc(Botones, SiZe_BoToN )) == NULL) {
Secuencias = 4;
return SIN_MEMORIA;
}
memoria_asignada = 1;
*/
Botones [36].Left = 204; Botones [36].Up = 274;Botones [36]. Right = 276;Botones [36]. Down = 291;
Botones [36]. Cdf = 253; Botones [36]. Cb1 = 254; Botones [36]. Cb2 = 255; Botones [36]. Ab = 2; Botones [36]. Pb = 1; Botones [36]. Isc = 0; Botones [36]. Sc = 30;
Botones [37].Left = 364; Botones [37].Up = 274;Botones [37]. Right = 436;Botones [37]. Down = 291;
Botones [37]. Cdf = 253; Botones [37]. Cb1 = 254; Botones [37]. Cb2 = 255; Botones [37]. Ab = 2; Botones [37]. Pb = 1; Botones [37]. Isc = 0; Botones [37]. Sc = 46;
break;
case 1:
Bot_Static.Left = 6; Bot_Static.Up = 225; Bot_Static.Right = 205; Bot_Static.Down = 470; Bot_Static.Cdf = 0; Bot_Static.Cb1 = 56; Bot_Static.Cb2 = 63; Bot_Static.Ab = 1; Bot_Static.Pb = 2;
Imprime_Boton(0, Bot_Static);
Bot_Static.Left = 9; Bot_Static.Up = 228; Bot_Static.Right = 202; Bot_Static.Down = 467; Bot_Static.Cdf = 0; Bot_Static.Cb1 = 63; Bot_Static.Cb2 = 56; Bot_Static.Ab = 1; Bot_Static.Pb = 2;
Imprime_Boton(0, Bot_Static);
Bot_Static.Left = 390; Bot_Static.Up = 135; Bot_Static.Right = 630; Bot_Static.Down = 415; Bot_Static.Cdf = 0; Bot_Static.Cb1 = 56; Bot_Static.Cb2 = 63; Bot_Static.Ab = 1; Bot_Static.Pb = 2;
Imprime_Boton(0, Bot_Static);
Bot_Static.Left = 393; Bot_Static.Up = 138; Bot_Static.Right = 627; Bot_Static.Down = 412; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 63; Bot_Static.Cb2 = 56; Bot_Static.Ab = 1; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
break;
case 2:
settextstyle( 2, 0, 6);
setcolor(255); outtextxy( 390, 426, " _" );
setcolor(0); outtextxy( 389, 425, " _" );
setcolor(255); outtextxy( 391, 424, " Instalar" );
setcolor(0); outtextxy( 390, 423, " Instalar" );
setcolor(255); outtextxy( 516, 426, " _" );
setcolor(0); outtextxy( 515, 425, " _" );
setcolor(255); outtextxy( 516, 424, " Configurar" );
setcolor(0); outtextxy( 515, 423, " Configurar" );
setcolor(255); outtextxy( 391, 453, " _" );
setcolor(0); outtextxy( 390, 452, " _" );
setcolor(255); outtextxy( 391, 451, " Ejecutar" );
setcolor(0); outtextxy( 390, 450, " Ejecutar" );
setcolor(255); outtextxy( 511, 453, " _" );
setcolor(0); outtextxy( 511, 452, " _" );
setcolor(255); outtextxy( 511, 451, " Salir" );
setcolor(0); outtextxy( 510, 450, " Salir" );
settextstyle( 2, 1, 6);
setcolor(255); outtextxy( 364, 289, "_" );
setcolor(0); outtextxy( 363, 288, "_" );
settextstyle( 2, 1, 5);
setcolor(255); outtextxy( 364, 219, "Ver Imagen" );
setcolor(0); outtextxy( 363, 218, "Ver Imagen" );
break;
case 4:
settextstyle( 2, 0, 5);
setcolor(251); outtextxy( 413, 149, " _" );
setcolor(254); outtextxy( 412, 148, " _" );
setcolor(255); outtextxy( 414, 148, " Salir despues de EJECUTAR." );
setcolor(254); outtextxy( 413, 147, " Salir despues de EJECUTAR." );
setcolor(251); outtextxy( 413, 170, " _" );
setcolor(254); outtextxy( 412, 169, " _" );
setcolor(255); outtextxy( 414, 169, " Desactivar Sonidos." );
setcolor(254); outtextxy( 413, 168, " Desactivar Sonidos." );
setcolor(251); outtextxy( 413, 191, " _" );
setcolor(254); outtextxy( 412, 190, " _" );
setcolor(255); outtextxy( 414, 190, " Instalacion Autom tica" );
setcolor(254); outtextxy( 413, 189, " Instalacion Autom tica" );
setcolor(251); outtextxy( 413, 212, " _" );
setcolor(254); outtextxy( 412, 211, " _" );
setcolor(255); outtextxy( 414, 211, " Comprobar espacio libre" );
setcolor(254); outtextxy( 413, 210, " Comprobar espacio libre" );
setcolor(251); outtextxy( 413, 230, " _" );
setcolor(254); outtextxy( 412, 229, " _" );
setcolor(255); outtextxy( 414, 229, " Formatear al Instalar" );
setcolor(254); outtextxy( 413, 228, " Formatear al Instalar" );
settextstyle( 2, 0, 4);
setcolor(255); outtextxy( 414, 242, " ( solo en unidades A: y B: )" );
setcolor(254); outtextxy( 413, 241, " ( solo en unidades A: y B: )" );
settextstyle( 2, 0, 5);
setcolor(251); outtextxy( 413, 254, " _" );
setcolor(254); outtextxy( 412, 253, " _" );
setcolor(255); outtextxy( 414, 253, " Sin imagen de Fondo" );
setcolor(254); outtextxy( 413, 252, " Sin imagen de Fondo" );
break;
case 5:
settextstyle( 2, 0, 5);
setcolor(251); outtextxy( 547, 392, " _" );
setcolor(0); outtextxy( 547, 391, " _" );
setcolor(255); outtextxy( 547, 391, " Cancelar" );
setcolor(0); outtextxy( 546, 390, " Cancelar" );
setcolor(251); outtextxy( 471, 392, " _" );
setcolor(0); outtextxy( 470, 391, " _" );
setcolor(255); outtextxy( 471, 391, " Salvar" );
setcolor(0); outtextxy( 470, 390, " Salvar" );
setcolor(251); outtextxy( 396, 392, " _" );
setcolor(0); outtextxy( 395, 391, " _" );
setcolor(255); outtextxy( 396, 391, " Anterior" );
setcolor(0); outtextxy( 395, 390, " Anterior" );
setcolor(251); outtextxy( 394, 278, " _" );
setcolor(0); outtextxy( 393, 277, " _" );
setcolor(255); outtextxy( 396, 277, " Imprimir icono actual sin" );
setcolor(0); outtextxy( 395, 276, " Imprimir icono actual sin" );
setcolor(255); outtextxy( 396, 291, " incluir los comentarios." );
setcolor(0); outtextxy( 395, 290, " incluir los comentarios." );
break;
case 10:
Bot_Static.Left = 118; Bot_Static.Up = 160; Bot_Static.Right = 521; Bot_Static.Down = 335; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
break;
case 11:
setcolor(255); settextstyle( 2, 1, 4); outtextxy( 504, 190, " _ " );
setcolor(240); outtextxy( 503, 191, " _ " );
setcolor(255); outtextxy( 501, 190, "<- CANCELAR -> " );
setcolor(240); outtextxy( 502, 191, "<- CANCELAR -> " );
setcolor(252); settextstyle( 2, 0, 6); outtextxy( 123, 165, " Ejecutar desde el CDROM" );
setcolor(240); settextstyle( 2, 0, 4); outtextxy( 123, 190, "NOTA IMPORTANTE:" );
outtextxy( 123, 200, " Hay cuatro circunstancias por las que los programas incluidos" );
outtextxy( 123, 210, " en este CDROM podr¡an NO FUNCIONAR si se ejcutan directamente" );
outtextxy( 123, 220, " usando la opci¢n EJECUTAR:" );
setcolor(251); outtextxy( 121, 220, " EJECUTAR" );
setcolor(240); outtextxy( 123, 230, " Programas con requerimientos de memoria superior al espacio" );
outtextxy( 123, 240, " libre dejado por los drivers de acceso al CDROM." );
outtextxy( 123, 250, " Programas que nesecitan escribir alg£n tipo de configuraci¢n" );
outtextxy( 123, 260, " u otros datos en el propio disco." );
outtextxy( 123, 270, " Programas con animaciones o accesos muy r pidos a disco duro" );
outtextxy( 123, 280, " Programas cuyos nombres incluyan car cteres no aceptados por" );
outtextxy( 123, 290, " el estandar ISO." );
outtextxy( 123, 300, " Si por cualquiera de las causas anteriores no funcionase el" );
outtextxy( 123, 310, " programa elegido: recomendamos proceda a su INSTALACION a HD." );
setcolor(251); outtextxy( 120, 310, " INSTALACION" );
setcolor(240); outtextxy( 123, 320, " usando la opci¢n correspondiente." );
break;
case 20:
Bot_Static.Left = 200; Bot_Static.Up = 212; Bot_Static.Right = 440; Bot_Static.Down = 267; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 205; Bot_Static.Up = 217; Bot_Static.Right = 435; Bot_Static.Down = 262; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, "Iniciar instalaci¢n en:" );
Bot_Static.Left = 210; Bot_Static.Up = 240; Bot_Static.Right = 430; Bot_Static.Down = 257; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 200; Bot_Static.Up = 270; Bot_Static.Right = 280; Bot_Static.Down = 295; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 360; Bot_Static.Up = 270; Bot_Static.Right = 440; Bot_Static.Down = 295; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
break;
case 21:
settextstyle( 2, 0, 5);
setcolor(255);
outtextxy( 200, 274, " Aceptar" );
outtextxy( 340, 274, " Cancelar" );
setcolor(240);
outtextxy( 341, 275, " Cancelar" );
outtextxy( 201, 275, " Aceptar" );
break;
/////////////////////////// Fundido de Case's
// case 100:
// case 101:
// case 102:
// case 103:
// case 104:
// case 105:
// case 106:
// case 107:
case 108:
// case 109:
// case 110:
// case 111:
case 112:
case 113:
case 114:
case 115:
case 116:
Bot_Static.Left = 200; Bot_Static.Up = 212; Bot_Static.Right = 440; Bot_Static.Down = 267; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 205; Bot_Static.Up = 217; Bot_Static.Right = 435; Bot_Static.Down = 262; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
setcolor(240); settextstyle( 2, 0, 5);
switch(Dinamicos_Estaticos) {
// case 100:
// outtextxy( 210, 222, " Error en asignaci¢n" );
// outtextxy( 210, 242, " de memoria CONVENCIONAL" );
// break;
// case 101:
//
// outtextxy( 210, 222, " Error en asignaci¢n" );
// outtextxy( 210, 242, " de memoria XMS" );
// break;
// case 102:
//
// outtextxy( 210, 222, " Error cargando ICONOS" );
// outtextxy( 210, 242, " y punteros de RATON..." );
// break;
// case 103:
//
// outtextxy( 210, 222, " Error cargando PCX" );
// outtextxy( 210, 242, " de Fondo." );
// break;
// case 104:
//
// outtextxy( 210, 222, " Error cargando ficheros" );
// outtextxy( 210, 242, " de sonido WAV" );
// break;
// case 105:
//
// outtextxy( 210, 222, " Error intentando ejecutar" );
// outtextxy( 210, 242, " el programa deseado..." );
// break;
// case 106:
//
// outtextxy( 210, 222, " Error intentando ejecutar" );
// outtextxy( 210, 242, " el programa deseado..." );
// break;
// case 107:
//
// outtextxy( 210, 222, " ERROR D E TIPO" );
// outtextxy( 210, 242, " D E S C O N O C I D O" );
// break;
case 108:
outtextxy( 210, 222, " ERROR ABRIENDO" );
outtextxy( 210, 242, " FICHERO" );
break;
// case 109:
//
// outtextxy( 210, 222, " ERROR de ESCRITURA" );
// outtextxy( 210, 242, " DISCO PROTEGIDO." );
// break;
// case 110:
//
// outtextxy( 210, 222, " ERROR de LECTURA" );
// outtextxy( 210, 242, " POSIBLE DA¥O FÖSICO" );
// break;
// case 111:
//
// outtextxy( 210, 222, " ERROR INTENTANDO" );
// outtextxy( 210, 242, " CERRAR FICHERO" );
// break;
case 112:
outtextxy( 210, 222, " ERROR INTENTANDO" );
outtextxy( 210, 242, " CARGAR BOTONES" );
break;
case 113:
outtextxy( 210, 222, " EL FICHERO O DIRECTORIO A" );
outtextxy( 210, 242, "INSTALAR NO SE HA ENCONTRADO" );
break;
case 114:
outtextxy( 210, 222, " EL FICHERO O DIRECTORIO A" );
outtextxy( 210, 242, "EJECUTAR NO SE HA ENCONTRADO" );
break;
case 115:
outtextxy( 210, 222, " LA IMPRESORA NO ESTA LISTA" );
outtextxy( 210, 242, "< << OPERACION CANCELA >> >" );
break;
case 116:
outtextxy( 210, 222, " IMPRIMIENDO..." );
outtextxy( 210, 242, " -JD-" );
break;
}
break;
default:
break;
}
return 1;
}

55
CD_IN/CD_CFG.CPP Normal file
View File

@ -0,0 +1,55 @@
#include <dos.h>
#include <stdio.h>
#include <stdlib.h>
#include <conio.h> // Para getch();
#include <graphics.h> // Para outtextxy(...); y cleardevice(...);
#include "..\..\..\jd_lib\make_bot.h" // Fuciones de MAKE_BOTON
#include "cd_icons.h"
#define DOS 1
#define WINDOWS 2
void Init_CFG(void);
void Init_CFG(void){
int ok = 0;
setfillstyle(SOLID_FILL, 240);
bar(395, 140, 625, 410);
Imprime_Estaticos( 4, "cd_out.img"); // Imprime botones estaticos 'Seccion 4'
Imprime_Secuencia(2); // Imprime secuencia 1.
Imprime_Estaticos( 5, "cd_out.img"); // Imprime textos estaticos 'Seccion 5'
while(!ok){ // Bucle infinito
switch( Comprueba_Secuencia( 2 ) ) { // Iniciamos comprobacion de 2¦ sec
case 0: // No se pulso ningun BOTON
// Pero el raton fue presionado en
// algun sitio...
break;
case -2: // Hay una tecla normal en BUFFER
getch(); // La eliminamos
break;
case -1: // Hay una tecla especial en BUFFER
getch(); // La eliminamos
break;
// Boton Cancelar
case 1:
ok = 1;
break;
default:
while( kbhit() ) getch(); // Limpiamos posibles teclas en BUFFER
break;
}
}
setfillstyle(SOLID_FILL, 240);
bar(395, 140, 625, 410);
return;
}

BIN
CD_IN/CD_D01.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_D02.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_D03.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_D04.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_D05.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_D06.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_D07.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_D08.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_D09.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_D10.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_D11.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_D12.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_D13.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_D14.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_D15.DAT Normal file

Binary file not shown.

1176
CD_IN/CD_EDIT.CPP Normal file

File diff suppressed because it is too large Load Diff

14
CD_IN/CD_ERROR.H Normal file
View File

@ -0,0 +1,14 @@
#define SIN_CVN 100
#define SIN_XMS 101
#define E_ICONO 102
#define E_PCX 103
#define E_WAV 104
#define E_EXE 105
#define ERROR_ D 107
#define E_O 108
#define E_W 109
#define E_R 110
#define E_C 111

191
CD_IN/CD_EXE.CPP Normal file
View File

@ -0,0 +1,191 @@
#include <dir.h>
#include <dos.h>
#include <alloc.h>
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include <conio.h> // Para getch();
#include <graphics.h> // Para outtextxy(...); y cleardevice(...);
#include "..\..\jd_lib\make_bot.h" // Fuciones de MAKE_BOTON
#include "cd_icons.h"
#include "cd_error.h"
#define DOS 1
#define WINDOWS 2
void Init_EXE(int CurrIcon);
char *current_directory(char *path);
extern void Inicializa_Dibujo(void);
extern void Inicializa_Iconos(void);
extern void Coloca_Iconos_Dos_Windows(void);
extern char far *Icono; // 18
extern unsigned char *P_Raton1, *P_Raton2, *P_Raton3, *P_Raton4;
extern void *Pantalla;
void InicializaSVGA(void);
extern char dac[256*3];
extern "C" void APAGA_PANTALLA(char *);
extern "C" void ENCIENDE_PANTALLA(char *);
extern void Menu_de_Edicion(void);
extern void Coloca_Iconos(int Start_Icon);
void Init_EXE(int CurrIcon){
int ok = 0, exe = 0;
char curdir[80];
/*
void far *Mascara;
if( (Mascara = farmalloc(imagesize(118, 160, 521, 335) ) ) == NULL) {
closegraph();
cprintf("\n\rSALIENDO");
cprintf("\n\rImposible encontrar %dKbytes en el Heap", ok);
exit(SIN_MEMORIA);
}
getimage(118, 159, 521, 335, Mascara);
*/
Imprime_Estaticos(10, "cd_out.img"); // Imprime botones estaticos 'Seccion 4'
Imprime_Secuencia(3); // Imprime secuencia 1.
Imprime_Estaticos(11, "cd_out.img"); // Imprime textos estaticos 'Seccion 5'
while(!ok){ // Bucle infinito
switch( Comprueba_Secuencia( 3 ) ) { // Iniciamos comprobacion de 2¦ sec
case 0: // No se pulso ningun BOTON
// Pero el raton fue presionado en
// algun sitio...
break;
case -2: // Hay una tecla normal en BUFFER
switch( getch() ) { // La utilizamos
// Intro ( ACEPTAR )
case 13:
exe = 1;
ok = 1;
break;
// ESC ( CANCELAR )
case 14:
exe = 0;
ok = 1;
break;
default:
break;
}
break;
case -1: // Hay una tecla especial en BUFFER
getch(); // La eliminamos
break;
// Boton Aceptar
case 1:
exe = 1;
ok = 1;
break;
// Boton Cancelar
case 2:
exe = 0;
ok = 1;
break;
default:
while( kbhit() ) getch(); // Limpiamos posibles teclas en BUFFER
break;
}
}
/*
putimage(118, 160, Mascara, COPY_PUT);
farfree(Mascara);
*/
if ( exe == 1 ) {
/// Liberamos la memoria asignada para al DRIVER gr fico...
current_directory(curdir);
APAGA_PANTALLA(dac);
closegraph();
Libera_Memoria();
free(P_Raton1);
free(P_Raton2);
free(P_Raton3);
free(P_Raton4);
free(Pantalla);
farfree(Icono);
closegraph();
cprintf("ÚÄÄÄÄÄÄÄÄÄÄÄÄÄ¿\n\r");
cprintf("³ JD & CD_OUT ³\n\r");
cprintf("ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÙ\n\r");
cprintf("EJECUTANDO PROGRAMA: []\n\r");
/*
C O M I E N Z A L A E J E C U C I O N D E L P R O G R A M A
*/
if ( system( getenv( "COMSPEC") ) != 0 ) { printf("\n\nImposible salir a MS-DOS\n\n"); sleep(5); }
clrscr();
cprintf("ÚÄÄÄÄÄÄÄÄÄÄÄÄÄ¿\n\r");
cprintf("³ JD & CD_OUT ³\n\r");
cprintf("ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÙ\n\r");
cprintf("Regresando a CD_OUT...\n\r");
//// Recargamos el Programa...
chdir(curdir); // Refresamos a nuestro directorio
// de origen
InicializaSVGA(); // Reinicializamos la SVGA
APAGA_PANTALLA(dac); // Apagamos la Pantalla
Inicializa_Dibujo(); // Inicializamos un nuevo dibujo
if( carga_botones("cd_out.img") // Recarga botones del fichero "CD_out.img"
!= OK ) {
Imprime_Estaticos( 112, "cd_out.img");
Espera_Tecla_o_Raton();
closegraph();
cprintf("\n\rError en la CARGA DE BOTONES");
exit(112);
/*
SALE CON UN MENSAJE GRµFICO
*/
}
Imprime_Estaticos( 1, "cd_out.img"); // Imprime botones estaticos 'Seccion 1'
Imprime_Secuencia(1); // Imprime secuencia 1.
Imprime_Estaticos( 2, "cd_out.img"); // Imprime botones estaticos 'Seccion 2'
// para los textos
Inicializa_Iconos();
Coloca_Iconos_Dos_Windows();
Coloca_Iconos(CurrIcon);
ENCIENDE_PANTALLA(dac);
if ( (Pantalla = malloc( imagesize(0, 0, 20, 20) )) == NULL ) {
Imprime_Estaticos( SIN_CVN, "cd_out.img");
Espera_Tecla_o_Raton();
closegraph();
cprintf("\n\rError en la asignaci¢n de memoria para la mascara del raton");
exit(2);
}
inicializa_raton_grafico( 0, 0, 619, 460);
True_Push = ON; // Activa el TRUE PUSH ( PRESION REAL )
}
}
char *current_directory(char *path)
{
strcpy(path, "X:\\"); /* fill string with form of response: X:\ */
path[0] = 'A' + getdisk(); /* replace X with current drive letter */
getcurdir(0, path+3); /* fill rest of string with current directory */
return(path);
}

61
CD_IN/CD_FILE.H Normal file
View File

@ -0,0 +1,61 @@
struct byte {
int T_Dibujo : 1;
int DOS_WINDOWS : 1;
int Install : 1;
int Ejecutable : 1;
int Tipo_de_Programa : 4;
};
struct Install {
int Usar_VGA_COPY : 1;
int Usar_ARJ : 1;
int Usar_ZIP : 1;
int Usar_LHA : 1;
int Usar_XCopy : 1;
int Usar_Install_P : 1;
int Manual_Automatico : 1;
};
typedef struct {
struct byte Typo; // 1 bit DOS o WINDOWS
// 4 bit Tipo de programa, ( Juegos, Dibujo, ... )
// 1 bit ( Tiene Dibujo SI / NO )
// 1 bit Instalable ( SI / NO )
// 1 bit Ejecutable
char Nombre[26+1]; // Nombre del programa
char Comentario[32][35 + 1]; // Comentario
char N_Img[8+1]; // Nombre de la imagen ( sin extensi¢n )
char Dir_P[50+1];
// Instalacion alternativa...
struct Install Alt_Install;
char N_Install[8+1];
char N_Exe[8+1];
} CD_FILE;
struct Cabecera {
char Nombre_del_Programa[70];
char Comentario_Inicial[70];
// const char R1 = 13, R2 =10;
// const char Comentario_Inicial[] = {"Jos David Guilln Dominguez"};
// const char R3 = 13, R4 =10;
// const char R5 = 7, R6 =26;
char VerHi, VerLow;
char Register;
long Records;
};
struct Cabecera CD_cabecera;

520
CD_IN/CD_ICONS.CPP Normal file
View File

@ -0,0 +1,520 @@
extern int Fichero_cd_in2(char Dinamicos_Estaticos);
///////////////////////////// FICHEROS A INCLUIR /////////////////////////////
#include <alloc.h>
#include <dos.h>
#include <stdio.h>
#include <stdlib.h>
#include <conio.h> // Para getch();
#include <graphics.h> // Para outtextxy(...); y cleardevice(...);
#include "cd_icons.h"
// #include "List_col.h"
#include "cd_error.h"
#include "d:\program\src_dos\libs\make_bot\make_bot.h" // Fuciones de MAKE_BOTON
////////////////////////////////// VARIABLES /////////////////////////////////
void Mete(FILE *P_R, int Color);
FILE *handle;
char dac[256*3];
extern unsigned char *P_Raton1, *P_Raton2, *P_Raton3, *P_Raton4;
unsigned char far *Icono; // 18
void Coloca_Iconos_Dos_Windows(void);
void Coloca_Iconos(int Start_Icon);
//////////////////////// DECLARACIONES DE FUNCIONES //////////////////////////
extern "C" void ENCIENDE_PANTALLA(char *);
///////////////////////////////// PROGRAMA ///////////////////////////////////
void Inicializa_Iconos(void)
{
int ancho;
int Posicion[18] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
int alto;
int esq_x1, esq_y1, esq_x2, esq_y2;
unsigned char byte, contador;
int n = (20*20);
int PR1, PR2, PR3, PR4;
PR1 = PR2 = PR3 = PR4 = -1;
if( (Icono = (unsigned char far *)farcalloc( /*(39762)*/40000L, sizeof(unsigned char) ) ) == NULL ){
Fichero_cd_in2(SIN_CVN);
// Imprime_Estaticos( SIN_CVN, "cd_in.img");
Espera_Tecla_o_Raton();
closegraph();
printf("No se encontr¢ memoria suficiente");
exit(1);
}
/*
if( ((P_Raton1 = (unsigned char *)malloc( n ))==NULL) ||
((P_Raton2 = (unsigned char *)malloc( n ))==NULL) ||
((P_Raton3 = (unsigned char *)malloc( n ))==NULL) ||
((P_Raton4 = (unsigned char *)malloc( n ))==NULL) ) {
Imprime_Estaticos( SIN_CVN, "cd_in.img");
Espera_Tecla_o_Raton();
closegraph();
cprintf("\n\rImposible encontrar memoria para el cursor del Raton");
exit(2);
}
*/
///ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
///ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
/*
FILE *P_R1, *P_R2, *P_R3, *P_R4;
int PR1_C=0, PR2_C=0, PR3_C=0, PR4_C=0;
P_R1 = fopen("P_Raton1.cpp", "w");
P_R2 = fopen("P_Raton2.cpp", "w");
P_R3 = fopen("P_Raton3.cpp", "w");
P_R4 = fopen("P_Raton4.cpp", "w");
*/
///ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
///ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
if((handle=fopen("CD_in2.IMG", "rb"))==NULL)
{
Fichero_cd_in2(E_O);
// Imprime_Estaticos( E_O, "cd_in.img");
Espera_Tecla_o_Raton();
restorecrtmode();
printf("No se encontr¢ el archivo de iconos");
exit(1);
}
if(10!=getc(handle))
{
Fichero_cd_in2(E_PCX);
// Imprime_Estaticos( E_PCX, "cd_in.img");
Espera_Tecla_o_Raton();
restorecrtmode();
printf("El archivo de iconos, esta da¤ado");
exit(1);
}
getw(handle); getc(handle);
esq_x1=getw(handle); esq_y1=getw(handle);
esq_x2=getw(handle); esq_y2=getw(handle);
ancho=esq_x2-esq_x1+1;
alto =esq_y2-esq_y1+1;
fseek(handle, 128, 0);
for(alto=(esq_y2-esq_y1+1); alto>0; alto--)
{
for(ancho=(esq_x2-esq_x1+1); ancho>0; )
{
byte=getc(handle);
if(byte<=0xC0)
{
if( ancho>=272 && ancho <=318 && alto >=152 && alto <= 198 ) {
Posicion[0] ++;
Icono[ Posicion[0] ] = byte;
} else
if( ancho>=224 && ancho <=270 && alto >=152 && alto <= 198 ) {
Posicion[1] ++;
Icono[ Posicion[1]+2209*1 ] = byte;
} else
if( ancho>=176 && ancho <=222 && alto >=152 && alto <= 198 ) {
Posicion[2] ++;
Icono[ Posicion[2]+2209*2 ] = byte;
} else
if( ancho>=128 && ancho <=174 && alto >=152 && alto <= 198 ) {
Posicion[3] ++;
Icono[ Posicion[3]+2209*3 ] = byte;
} else
if( ancho>=80 && ancho <=126 && alto >=152 && alto <= 198 ) {
Posicion[4] ++;
Icono[ Posicion[4]+2209*4 ] = byte;
} else
if( ancho>=32 && ancho <=78 && alto >=152 && alto <= 198 ) {
Posicion[5] ++;
Icono[ Posicion[5]+2209*5 ] = byte;
} else
////////////////////////////////////////////////////////////////////////////////////
if( ancho>=272 && ancho <=318 && alto >=104 && alto <= 150 ) {
Posicion[6] ++;
Icono[ Posicion[6]+2209*6 ] = byte;
} else
if( ancho>=224 && ancho <=270 && alto >=104 && alto <= 150 ) {
Posicion[7] ++;
Icono[ Posicion[7]+2209*7 ] = byte;
} else
if( ancho>=176 && ancho <=222 && alto >=104 && alto <= 150 ) {
Posicion[8] ++;
Icono[ Posicion[8]+2209*8 ] = byte;
} else
if( ancho>=128 && ancho <=174 && alto >=104 && alto <= 150 ) {
Posicion[9] ++;
Icono[ Posicion[9]+2209*9 ] = byte;
} else
if( ancho>=80 && ancho <=126 && alto >=104 && alto <= 150 ) {
Posicion[10] ++;
Icono[ Posicion[10]+2209*10 ] = byte;
} else
if( ancho>=32 && ancho <=78 && alto >=104 && alto <= 150 ) {
Posicion[11] ++;
Icono[ Posicion[11]+2209*11] = byte;
} else
////////////////////////////////////////////////////////////////////////////////////
if( ancho>=272 && ancho <=318 && alto >=56 && alto <= 102 ) {
Posicion[12] ++;
Icono[ Posicion[12]+2209*12 ] = byte;
} else
if( ancho>=224 && ancho <=270 && alto >=56 && alto <= 102 ) {
Posicion[13] ++;
Icono[ Posicion[13]+2209*13 ] = byte;
} else
if( ancho>=176 && ancho <=222 && alto >=56 && alto <= 102 ) {
Posicion[14] ++;
Icono[ Posicion[14]+2209*14 ] = byte;
} else
if( ancho>=128 && ancho <=174 && alto >=56 && alto <= 102 ) {
Posicion[15] ++;
Icono[ Posicion[15]+2209*15 ] = byte;
} else
if( ancho>=80 && ancho <=126 && alto >=56 && alto <= 102 ) {
Posicion[16] ++;
Icono[ Posicion[16]+2209*16 ] = byte;
} else
if( ancho>=32 && ancho <=78 && alto >=56 && alto <= 102 ) {
Posicion[17] ++;
Icono[ Posicion[17]+2209*17] = byte;
} else
////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////
if( ancho>=274/*279*/ && ancho <=/*318*/316 && alto >= /*8*/11 && alto <= 29 ) {
// Flecha Izquierda
// putpixel( 385 +43+ (279-ancho), 30 + 24 + (11-alto), byte);
putpixel( ancho + 120, alto + 24, byte );
} else
if( ancho>=/*272*/276 && ancho <=318/*313*/ && alto >= /*32*/35 && alto <= 52 ) {
// Flecha Derecha
// putpixel( 385 +48+ (276-ancho), 57 + 26 + (35-alto), byte);
putpixel( ancho + 120, alto + 32, byte );
}
//// } else
// if( ancho>=251 && ancho <=270 && alto >= 14 && alto <= 54 ) {
// // Flecha Arriba
// putpixel( 235 + (248-ancho), 420 + (8-alto), byte);
// putpixel( 385 + (248-ancho), 360 + (8-alto), byte);
// } else
// if( ancho>=/*224*/227 && ancho <= 245 && alto >= /*8*/12 && alto <= /*54*/49 ) {
// // Flecha Abajo
// putpixel( 235 - 1 + (224-ancho), 470 + (8-alto), byte);
// putpixel( 385 - 1 + (224-ancho), 415 -2 + (8-alto), byte);
// } else
/*
if( ancho>=180 && ancho <= 220 && alto >= 12 && alto <= 52 ) {
// Punteros del Raton...
putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
}
*/
if( ancho>=180 && ancho <= 199 && alto >= 12 && alto <= 31 ) {
//// // Punteros del Raton...
PR1++;
P_Raton1[/*(199-ancho) + 20*(31-alto)*/PR1] = byte;
////// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
/////*
////Mete(P_R1, byte);
////PR1_C ++ ; if ( PR1_C == 6 ) { PR1_C=0; fprintf(P_R1, "\n"); }
////*/
} else
if( ancho>=201 && ancho <= 220 && alto >= 12 && alto <= 31 ) {
//// // Punteros del Raton...
PR2++;
P_Raton2[/*(220-ancho) + 20*(31-alto)*/PR2] = byte;
///// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
/////*
////Mete(P_R2, byte);
////PR2_C ++ ; if ( PR2_C == 11 ) { PR2_C=0; fprintf(P_R2, "\n"); }
////*/
} else
if( ancho>=180 && ancho <= 199 && alto >= 33 && alto <= 52 ) {
//// // Punteros del Raton...
PR3++;
P_Raton3[/*(199-ancho) + 20*(52-alto)*/PR3] = byte;
////// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
/////*
////Mete(P_R3, byte);
////PR3_C ++ ; if ( PR3_C == 6 ) { PR3_C=0; fprintf(P_R3, "\n"); }
////*/
} else
if( ancho>=201 && ancho <= 220 && alto >= 33 && alto <= 52 ) {
//// // Punteros del Raton...
PR4++;
P_Raton4[/*(220-ancho) + 20*(52-alto)*/PR4] = byte;
////// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
/////*
////Mete(P_R4, byte);
////PR4_C ++ ; if ( PR4_C == 6 ) { PR4_C=0; fprintf(P_R4, "\n"); }
////*/
}
////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////
/////////////////
// putpixel( (10+ancho), (10+alto), byte);
/////////////////
ancho--;
}
else
{
contador=byte&0x3F; byte=getc(handle);
for(; contador>0; contador--)
{
// *dir_vga++=byte;
if( ancho>=272 && ancho <=318 && alto >=152 && alto <= 198 ) {
Posicion[0] ++;
Icono[ Posicion[0] ] = byte;
} else
if( ancho>=224 && ancho <=270 && alto >=152 && alto <= 198 ) {
Posicion[1] ++;
Icono[ Posicion[1]+2209*1 ] = byte;
} else
if( ancho>=176 && ancho <=222 && alto >=152 && alto <= 198 ) {
Posicion[2] ++;
Icono[ Posicion[2]+2209*2 ] = byte;
} else
if( ancho>=128 && ancho <=174 && alto >=152 && alto <= 198 ) {
Posicion[3] ++;
Icono[ Posicion[3]+2209*3 ] = byte;
} else
if( ancho>=80 && ancho <=126 && alto >=152 && alto <= 198 ) {
Posicion[4] ++;
Icono[ Posicion[4]+2209*4 ] = byte;
} else
if( ancho>=32 && ancho <=78 && alto >=152 && alto <= 198 ) {
Posicion[5] ++;
Icono[ Posicion[5]+2209*5 ] = byte;
} else
////////////////////////////////////////////////////////////////////////////////////
if( ancho>=272 && ancho <=318 && alto >=104 && alto <= 150 ) {
Posicion[6] ++;
Icono[ Posicion[6]+2209*6 ] = byte;
} else
if( ancho>=224 && ancho <=270 && alto >=104 && alto <= 150 ) {
Posicion[7] ++;
Icono[ Posicion[7]+2209*7 ] = byte;
} else
if( ancho>=176 && ancho <=222 && alto >=104 && alto <= 150 ) {
Posicion[8] ++;
Icono[ Posicion[8]+2209*8 ] = byte;
} else
if( ancho>=128 && ancho <=174 && alto >=104 && alto <= 150 ) {
Posicion[9] ++;
Icono[ Posicion[9]+2209*9 ] = byte;
} else
if( ancho>=80 && ancho <=126 && alto >=104 && alto <= 150 ) {
Posicion[10] ++;
Icono[ Posicion[10]+2209*10 ] = byte;
} else
if( ancho>=32 && ancho <=78 && alto >=104 && alto <= 150 ) {
Posicion[11] ++;
Icono[ Posicion[11]+2209*11] = byte;
} else
////////////////////////////////////////////////////////////////////////////////////
if( ancho>=272 && ancho <=318 && alto >=56 && alto <= 102 ) {
Posicion[12] ++;
Icono[ Posicion[12]+2209*12 ] = byte;
} else
if( ancho>=224 && ancho <=270 && alto >=56 && alto <= 102 ) {
Posicion[13] ++;
Icono[ Posicion[13]+2209*13 ] = byte;
} else
if( ancho>=176 && ancho <=222 && alto >=56 && alto <= 102 ) {
Posicion[14] ++;
Icono[ Posicion[14]+2209*14 ] = byte;
} else
if( ancho>=128 && ancho <=174 && alto >=56 && alto <= 102 ) {
Posicion[15] ++;
Icono[ Posicion[15]+2209*15 ] = byte;
} else
if( ancho>=80 && ancho <=126 && alto >=56 && alto <= 102 ) {
Posicion[16] ++;
Icono[ Posicion[16]+2209*16 ] = byte;
} else
if( ancho>=32 && ancho <=78 && alto >=56 && alto <= 102 ) {
Posicion[17] ++;
Icono[ Posicion[17]+2209*17] = byte;
} else
////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////
if( ancho>=274/*279*/ && ancho <=/*318*/316 && alto >= /*8*/11 && alto <= 29 ) {
// Flecha Izquierda
// putpixel( 385 + 43 + (279-ancho), 30 + 24 + (11-alto), byte);
putpixel( ancho + 120, alto + 24, byte );
} else
if( ancho>=/*272*/276 && ancho <=318/*313*/ && alto >= /*32*/35 && alto <= 52 ) {
// Flecha Derecha
// putpixel( 385 + 48 + (276-ancho), 57 + 26 + (35-alto), byte);
putpixel( ancho + 120, alto + 32, byte );
} else
// if( ancho>=251 && ancho <=270 && alto >= 14 && alto <= 54 ) {
// // Flecha Arriba
// putpixel( 235 + (248-ancho), 420 + (8-alto), byte);
// putpixel( 385 + (248-ancho), 360 + (8-alto), byte);
// } else
// if( ancho>=/*224*/227 && ancho <= 245 && alto >= /*8*/12 && alto <= /*54*/49 ) {
// // Flecha Abajo
// putpixel( 235 - 1 + (224-ancho), 470 + (8-alto), byte);
// putpixel( 385 - 1 + (224-ancho), 415 -2 + (8-alto), byte);
// } else
/*
if( ancho>=180 && ancho <= 220 && alto >= 12 && alto <= 52 ) {
// Punteros del Raton...
putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
}
*/
if( ancho>=180 && ancho <= 199 && alto >= 12 && alto <= 31 ) {
//// // Punteros del Raton...
PR1++;
P_Raton1[/*(199-ancho) + 20*(31-alto)*/PR1] = byte;
////// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
/////*
////Mete(P_R1, byte);
////PR1_C ++ ; if ( PR1_C == 6 ) { PR1_C=0; fprintf(P_R1, "\n"); }
////*/
} else
if( ancho>=201 && ancho <= 220 && alto >= 12 && alto <= 31 ) {
//// // Punteros del Raton...
PR2++;
P_Raton2[/*(220-ancho) + 20*(31-alto)*/PR2] = byte;
////// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
/////*
////Mete(P_R2, byte);
////PR2_C ++ ; if ( PR2_C == 6 ) { PR2_C=0; fprintf(P_R2, "\n"); }
////*/
} else
if( ancho>=180 && ancho <= 199 && alto >= 33 && alto <= 52 ) {
//// // Punteros del Raton...
PR3++;
P_Raton3[/*(199-ancho) + 20*(52-alto)*/PR3] = byte;
///// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
/////*
////Mete(P_R3, byte);
////PR3_C ++ ; if ( PR3_C == 6 ) { PR3_C=0; fprintf(P_R3, "\n"); }
////*/
} else
if( ancho>=201 && ancho <= 220 && alto >= 33 && alto <= 52 ) {
//// // Punteros del Raton...
PR4++;
P_Raton4[/*(220-ancho) + 20*(52-alto)*/PR4] = byte;
///// putpixel( 400 + 46 + (176-ancho), 150 + (49-alto), byte);
/////*
////Mete(P_R4, byte);
////PR4_C ++ ; if ( PR4_C == 6 ) { PR4_C=0; fprintf(P_R4, "\n"); }
////*/
}
////////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////////
/////////////////
// putpixel( (10+ancho), (10+alto), byte);
/////////////////
ancho--;
}
}
}
}
getc(handle);
// for(n=0; n<256*3; n++) dac[n]=getc(handle) >> 2;
for(n=0; n<256*3; n++)
if( n >= (256-16)*3 )
dac[n]=getc(handle) >> 2;
else
getc(handle);
fclose(handle);
/*
fclose(P_R1);
fclose(P_R2);
fclose(P_R3);
fclose(P_R4);
*/
}
void Coloca_Iconos_Dos_Windows(void){
int x, y, i;
for( y = 0; y <= (46-1); y++ )
for( x = 1; x <= 46; x++ ) {
putpixel( 523 + x, 37+y, Icono[ x + (47*y) + (2209*11) ] );
putpixel( 583 + x, 37+y, Icono[ x + (47*y) + (2209*17) ] );
}
}
void Coloca_Iconos(int Start_Icon){
int x, y, i;
char Icon_inx[] = { Juegos, Texto, Musica, Dibujo, Util, Base, Hoja,
Red, TC, Scanner, News, Zip, Peli, Varios, CD, Ayuda };
Start_Icon--;
for( y = 0; y <= (46-1); y++ )
for( x = 1; x <= 46; x++ ) {
putpixel( 453 + x, 37+y, Icono[ x + (47*y) + (2209*Icon_inx[Start_Icon]) ] );
}
}
void Mete(FILE *P_R, int Color) {
char Buffer[80];
switch( Color ) {
case 255:
sprintf( Buffer, "*P_Ratonx++ = BLANCO");
break;
case 240:
sprintf( Buffer, "*P_Ratonx++ = NEGRO");
break;
case 253:
sprintf( Buffer, "*P_Ratonx++ = GRIS_CLARO");
break;
case 249:
sprintf( Buffer, "*P_Ratonx++ = UNKNOW");
break;
case 250:
sprintf( Buffer, "*P_Ratonx++ = AZUL");
break;
default:
sprintf( Buffer, "*P_Ratonx++ = %d", Color);
}
fprintf( P_R, "%-24s; ", Buffer );
}

16
CD_IN/CD_ICONS.H Normal file
View File

@ -0,0 +1,16 @@
#define Juegos 0
#define Musica 1
#define Texto 2
#define Dibujo 3
#define Varios 4
#define Ayuda 5
#define CD 6
#define Scanner 7
#define Util 8
#define TC 9
#define Red 10
#define Base 12
#define Hoja 13
#define News 14
#define Peli 15
#define Zip 16

BIN
CD_IN/CD_IN.EXE Normal file

Binary file not shown.

213
CD_IN/CD_IN.IMG Normal file
View File

@ -0,0 +1,213 @@
* BLANCO 255
* Gris_C 253
* Gris_F 254
* NEGRO 240
* Amarillo 251
* Rosa 241
* Rojo 242
* Azul 250
* UNKNOW 249
#1
***** Botones para elegir el tipo de ITEM a mirar...
!1, 10
***** Botones para seleccionar DOS / WINDOWS
$ 575, 30, 635, 90, 253, 255, 254, 5, 1, 00, 17
$ 515, 30, 575, 90, 253, 255, 254, 5, 1, 00, 32
**** Retroceder, Avanzar, en los anteriores iconos
$ 385, 30, 445, 58, 253, 255, 254, 3, 1, 00, 115
$ 385, 62, 445, 90, 253, 255, 254, 3, 1, 00, 116
**** Creditos
$ 195, 447, 380, 475, 253, 255, 254, 3, 1, 00, 46
**** Salir
$ 5, 447, 190, 475, 253, 255, 254, 3, 1, 00, 31
**** A¤adir, Borrar, Editar Comentario
$ 5, 30, 125, 58, 253, 255, 254, 3, 1, 00, 30
$ 130, 30, 250, 58, 253, 255, 254, 3, 1, 00, 48
$ 255, 30, 380, 58, 253, 255, 254, 3, 1, 00, 18
**** Boton donde se muestran los iconos disponibles
$ 445, 30, 505, 90, 253, 255, 254, 5, 1, 00, 120
­1
***** Pantalla inicial
& 1, 1, 639, 479, 253, 255, 254, 2, 2
& 5, 5, 635, 25, 240, 254, 255, 2, 2
| 10, 7, 2, 5, 0, 255, Utilidad de introduci¢n de datos para CD_OUT Jos David Guilln 1995 (c),
| 11, 8, 2, 5, 0, 251, Utilidad de introduci¢n de datos para CD_OUT Jos David Guilln 1995 (c),
***** Cuadro para el comentario...
& 385, 95, 635, 475, 250, 255, 254, 2, 1
& 390, 100, 630, 470, 240, 254, 255, 2, 1
­2
| 5, 452, 2, 6, 0, 241, _,
| 6, 453, 2, 6, 0, 0, _,
| 5, 450, 2, 6, 0, 255, S A L I R,
| 6, 451, 2, 6, 0, 0, S A L I R,
| 195, 452, 2, 6, 0, 241, _,
| 196, 453, 2, 6, 0, 240, _,
| 195, 450, 2, 6, 0, 255, C R E D I T O S,
| 196, 451, 2, 6, 0, 240, C R E D I T O S,
| 11, 35, 2, 6, 0, 241, _,
| 12, 36, 2, 6, 0, 0, _,
| 11, 33, 2, 6, 0, 255, A ¥ A D I R,
| 12, 34, 2, 6, 0, 0, A ¥ A D I R,
| 136, 35, 2, 6, 0, 241, _,
| 137, 36, 2, 6, 0, 240, _,
| 136, 33, 2, 6, 0, 255, B O R R A R,
| 137, 34, 2, 6, 0, 240, B O R R A R,
| 257, 39, 2, 4, 0, 241, _,
| 258, 40, 2, 4, 0, 240, _,
| 257, 38, 2, 4, 0, 255, Editar comentario,
| 258, 39, 2, 4, 0, 240, Editar comentario,
***** Pantalla de Edicion
& 5, 62, 172, 90, 240, 255, 254, 2, 2
& 172, 62, 230, 90, 240, 255, 254, 2, 2
& 230, 62, 288, 90, 240, 255, 254, 2, 2
& 288, 62, 318, 90, 240, 255, 254, 2, 2
& 318, 62, 350, 90, 240, 255, 254, 2, 2
& 350, 62, 380, 90, 240, 255, 254, 2, 2
| 11, 71, 2, 4, 0, 242, Nombre N_Install N_Exe Inst EXE Img,
| 10, 70, 2, 4, 0, 255, Nombre N_Install N_Exe Inst EXE Img,
** Nombre
& 5, 95, 172, 330, 240, 255, 254, 2, 2
** Nombre Install
& 172, 95, 230, 330, 240, 255, 254, 2, 2
** Nombre Exe
& 230, 95, 288, 330, 240, 255, 254, 2, 2
** Instalable
& 288, 95, 318, 330, 240, 255, 254, 2, 2
** Ejecutable
& 318, 95, 350, 330, 240, 255, 254, 2, 2
** Imagen
& 350, 95, 380, 330, 240, 255, 254, 2, 2
***
| 11, 335, 2, 5, 0, 255, Directorio,
| 12, 336, 2, 5, 0, 240, Directorio,
& 120, 335, 380, 355, 240, 255, 254, 2, 2
| 11, 355, 2, 5, 0, 255, Nombre Imagen,
| 12, 356, 2, 5, 0, 240, Nombre Imagen,
& 120, 355, 178, 375, 240, 255, 254, 2, 2
**** Tipos de Instalaci¢n
| 200, 390, 2, 4, 1, 255, Tipos de,
| 201, 391, 2, 4, 1, 240, Tipos de,
| 210, 375, 2, 4, 1, 255, instalaci¢n,
| 211, 376, 2, 4, 1, 240, instalaci¢n,
& 226, 360, 380, 442, 250, 255, 254, 2, 2
& 231, 365, 375, 437, 240, 254, 255, 2, 2
| 231, 370, 2, 4, 0, 255, 1 Imagen de VGA_COPY,
| 231, 380, 2, 4, 0, 255, 2 Descompresor ARJ,
| 231, 390, 2, 4, 0, 255, 3 Descompresor ZIP,
| 231, 400, 2, 4, 0, 255, 4 XCopy,
| 231, 410, 2, 4, 0, 255, 5 Programa propio,
| 231, 420, 2, 4, 0, 255, 6 No Instalable,
**** Informaci¢n adicional
& 5, 380, 190, 442, 250, 255, 254, 2, 2
& 10, 385, 185, 437, 240, 254, 255, 2, 2
************************************************************************
* *
* MENSAJES DE ERROR <------>---------<----------->--------<------>- *
* -------<-------->_------<-------->-->----------<--------->_----<- *
************************************************************************
­100
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error en asignaci¢n,
| 210, 242, 2, 5, 0, 240, de memoria CONVENCIONAL,
­101
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error en asignaci¢n,
| 210, 222, 2, 5, 0, 240, de memoria XMS,
­102
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error cargando ICONOS,
| 210, 222, 2, 5, 0, 240, y punteros de RATON...,
­103
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error cargando PCX,
| 210, 222, 2, 5, 0, 240, de Fondo.,
­104
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error cargando ficheros,
| 210, 222, 2, 5, 0, 240, de sonido WAV,
­105
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error intentando ejecutar,
| 210, 222, 2, 5, 0, 240, el programa deseado...,
­106
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error intentando ejecutar,
| 210, 222, 2, 5, 0, 240, el programa deseado...,
­107
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR D E TIPO,
| 210, 222, 2, 5, 0, 240, D E S C O N O C I D O,
­108
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR ABRIENDO,
| 210, 222, 2, 5, 0, 240, FICHERO,
­109
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR de ESCRITURA,
| 210, 222, 2, 5, 0, 240, DISCO PROTEGIDO.,
­110
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR de LECTURA,
| 210, 222, 2, 5, 0, 240, POSIBLE DA¥O FÖSICO,
­111
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR INTENTANDO,
| 210, 222, 2, 5, 0, 240, CERRAR FICHERO,
­112
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR INTENTANDO,
| 210, 222, 2, 5, 0, 240, CARGAR BOTONES,
­113
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Icono ha cambiado.,
| 210, 222, 2, 5, 0, 240, Cargando nuevo archivo...,

BIN
CD_IN/CD_IN.PRJ Normal file

Binary file not shown.

305
CD_IN/CD_IN2.CPP Normal file
View File

@ -0,0 +1,305 @@
/***************************************************************/
/* */
/* Conversi¢n de fuentes de MAKE BOTON en ASCII a fuentes */
/* para CPP, que pueden ser compilados junto al programa. */
/* */
/***************************************************************/
/* */
/* MAKE BOTON es un programa realizado por Jos David Guilln */
/* MB a CPP es una utilidad complementaria a Make Boton por */
/* Jos David Guilln... */
/* */
/***************************************************************/
/* */
/* GRACIAS POR UTILIZAR MI SOFTWARE... */
/* */
/* JOS<4F> DAVID GUILL<4C>N (c) 1995 */
/* */
/***************************************************************/
// Debe indicar el directorio exacto de la Cabecera de MAKE BOTON
#include "d:\program\src_dos\libs\make_bot\make_bot.h" // Fuciones de MAKE_BOTON
#include <stdio.h>
#include <stdlib.h>
#include <alloc.h>
#include <graphics.h>
extern int vez, memoria_asignada, Secuencias, *n_Botones_Secuencia;
struct Make_Boton { int Up, Left, Down, Right; unsigned char Cdf, Cb1, Cb2; unsigned char Ab, Pb; unsigned char Isc, Sc; };
extern struct Make_Boton far *Botones;
struct Make_Boton Bot_Static;
extern void Libera_Memoria(void);extern void Imprime_Boton(int D_Bord, struct Make_Boton Bot_Imp);
// Esta funci¢n debe ser llamada para la inicializacion de los
// botones en lugar de CARGA_BOTONES(...).
// Para cargar los botones con parametro 0 y para imprimir
// imprimir los estaticos con parametro [ n§ de secuencia ]
int Fichero_cd_in2(char Dinamicos_Estaticos);
int Fichero_cd_in2(char Dinamicos_Estaticos) {
static char vez = 0;
switch(Dinamicos_Estaticos) {
case 0:
if( vez == 0 ) {
vez = 1;
atexit( Libera_Memoria );
}
if ( memoria_asignada == 1 ) {
free(n_Botones_Secuencia);
farfree(Botones);
memoria_asignada = 0;
}
int SiZe_BoToN = 0;
if ( (Botones = (struct Make_Boton far *)farcalloc(1, sizeof( struct Make_Boton ) )) == NULL)
return SIN_MEMORIA;
memoria_asignada = 1;
Secuencias = 1;
if (( n_Botones_Secuencia = (int *) malloc( sizeof(int)*Secuencias ) ) == NULL) {
printf("\nNo Hay suficiente Memoria, ni para un Boton\n\n");
return SIN_MEMORIA;
}
n_Botones_Secuencia[1 - 1] = 10;
SiZe_BoToN += ( sizeof( struct Make_Boton ) * 10);
if ( (Botones = (struct Make_Boton far *)farrealloc(Botones, SiZe_BoToN )) == NULL) {
Secuencias = 1;
return SIN_MEMORIA;
}
memoria_asignada = 1;
Botones [0].Left = 575; Botones [0].Up = 30;Botones [0]. Right = 635;Botones [0]. Down = 90;
Botones [0]. Cdf = 253; Botones [0]. Cb1 = 255; Botones [0]. Cb2 = 254; Botones [0]. Ab = 5; Botones [0]. Pb = 1; Botones [0]. Isc = 0; Botones [0]. Sc = 17;
Botones [1].Left = 515; Botones [1].Up = 30;Botones [1]. Right = 575;Botones [1]. Down = 90;
Botones [1]. Cdf = 253; Botones [1]. Cb1 = 255; Botones [1]. Cb2 = 254; Botones [1]. Ab = 5; Botones [1]. Pb = 1; Botones [1]. Isc = 0; Botones [1]. Sc = 32;
Botones [2].Left = 385; Botones [2].Up = 30;Botones [2]. Right = 445;Botones [2]. Down = 58;
Botones [2]. Cdf = 253; Botones [2]. Cb1 = 255; Botones [2]. Cb2 = 254; Botones [2]. Ab = 3; Botones [2]. Pb = 1; Botones [2]. Isc = 0; Botones [2]. Sc = 115;
Botones [3].Left = 385; Botones [3].Up = 62;Botones [3]. Right = 445;Botones [3]. Down = 90;
Botones [3]. Cdf = 253; Botones [3]. Cb1 = 255; Botones [3]. Cb2 = 254; Botones [3]. Ab = 3; Botones [3]. Pb = 1; Botones [3]. Isc = 0; Botones [3]. Sc = 116;
Botones [4].Left = 195; Botones [4].Up = 447;Botones [4]. Right = 380;Botones [4]. Down = 475;
Botones [4]. Cdf = 253; Botones [4]. Cb1 = 255; Botones [4]. Cb2 = 254; Botones [4]. Ab = 3; Botones [4]. Pb = 1; Botones [4]. Isc = 0; Botones [4]. Sc = 46;
Botones [5].Left = 5; Botones [5].Up = 447;Botones [5]. Right = 190;Botones [5]. Down = 475;
Botones [5]. Cdf = 253; Botones [5]. Cb1 = 255; Botones [5]. Cb2 = 254; Botones [5]. Ab = 3; Botones [5]. Pb = 1; Botones [5]. Isc = 0; Botones [5]. Sc = 31;
Botones [6].Left = 5; Botones [6].Up = 30;Botones [6]. Right = 125;Botones [6]. Down = 58;
Botones [6]. Cdf = 253; Botones [6]. Cb1 = 255; Botones [6]. Cb2 = 254; Botones [6]. Ab = 3; Botones [6]. Pb = 1; Botones [6]. Isc = 0; Botones [6]. Sc = 30;
Botones [7].Left = 130; Botones [7].Up = 30;Botones [7]. Right = 250;Botones [7]. Down = 58;
Botones [7]. Cdf = 253; Botones [7]. Cb1 = 255; Botones [7]. Cb2 = 254; Botones [7]. Ab = 3; Botones [7]. Pb = 1; Botones [7]. Isc = 0; Botones [7]. Sc = 48;
Botones [8].Left = 255; Botones [8].Up = 30;Botones [8]. Right = 380;Botones [8]. Down = 58;
Botones [8]. Cdf = 253; Botones [8]. Cb1 = 255; Botones [8]. Cb2 = 254; Botones [8]. Ab = 3; Botones [8]. Pb = 1; Botones [8]. Isc = 0; Botones [8]. Sc = 18;
Botones [9].Left = 445; Botones [9].Up = 30;Botones [9]. Right = 505;Botones [9]. Down = 90;
Botones [9]. Cdf = 253; Botones [9]. Cb1 = 255; Botones [9]. Cb2 = 254; Botones [9]. Ab = 5; Botones [9]. Pb = 1; Botones [9]. Isc = 0; Botones [9]. Sc = 120;
break;
case 1:
Bot_Static.Left = 1; Bot_Static.Up = 1; Bot_Static.Right = 639; Bot_Static.Down = 479; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 5; Bot_Static.Up = 5; Bot_Static.Right = 635; Bot_Static.Down = 25; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
setcolor(255); settextstyle( 2, 0, 5); outtextxy( 10, 7, " Utilidad de introduci¢n de datos para CD_OUT Jos David Guilln 1995 (c)" );
setcolor(251); settextstyle( 2, 0, 5); outtextxy( 11, 8, " Utilidad de introduci¢n de datos para CD_OUT Jos David Guilln 1995 (c)" );
Bot_Static.Left = 385; Bot_Static.Up = 95; Bot_Static.Right = 635; Bot_Static.Down = 475; Bot_Static.Cdf = 250; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 390; Bot_Static.Up = 100; Bot_Static.Right = 630; Bot_Static.Down = 470; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
break;
case 2:
setcolor(241); settextstyle( 2, 0, 6); outtextxy( 5, 452, " _" );
setcolor(0); settextstyle( 2, 0, 6); outtextxy( 6, 453, " _" );
setcolor(255); settextstyle( 2, 0, 6); outtextxy( 5, 450, " S A L I R" );
setcolor(0); settextstyle( 2, 0, 6); outtextxy( 6, 451, " S A L I R" );
setcolor(241); settextstyle( 2, 0, 6); outtextxy( 195, 452, " _" );
setcolor(240); settextstyle( 2, 0, 6); outtextxy( 196, 453, " _" );
setcolor(255); settextstyle( 2, 0, 6); outtextxy( 195, 450, " C R E D I T O S" );
setcolor(240); settextstyle( 2, 0, 6); outtextxy( 196, 451, " C R E D I T O S" );
setcolor(241); settextstyle( 2, 0, 6); outtextxy( 11, 35, "_" );
setcolor(0); settextstyle( 2, 0, 6); outtextxy( 12, 36, "_" );
setcolor(255); settextstyle( 2, 0, 6); outtextxy( 11, 33, "A ¥ A D I R" );
setcolor(0); settextstyle( 2, 0, 6); outtextxy( 12, 34, "A ¥ A D I R" );
setcolor(241); settextstyle( 2, 0, 6); outtextxy( 136, 35, "_" );
setcolor(240); settextstyle( 2, 0, 6); outtextxy( 137, 36, "_" );
setcolor(255); settextstyle( 2, 0, 6); outtextxy( 136, 33, "B O R R A R" );
setcolor(240); settextstyle( 2, 0, 6); outtextxy( 137, 34, "B O R R A R" );
setcolor(241); settextstyle( 2, 0, 4); outtextxy( 257, 39, " _" );
setcolor(240); settextstyle( 2, 0, 4); outtextxy( 258, 40, " _" );
setcolor(255); settextstyle( 2, 0, 4); outtextxy( 257, 38, " Editar comentario" );
setcolor(240); settextstyle( 2, 0, 4); outtextxy( 258, 39, " Editar comentario" );
Bot_Static.Left = 5; Bot_Static.Up = 62; Bot_Static.Right = 172; Bot_Static.Down = 90; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 172; Bot_Static.Up = 62; Bot_Static.Right = 230; Bot_Static.Down = 90; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 230; Bot_Static.Up = 62; Bot_Static.Right = 288; Bot_Static.Down = 90; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 288; Bot_Static.Up = 62; Bot_Static.Right = 318; Bot_Static.Down = 90; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 318; Bot_Static.Up = 62; Bot_Static.Right = 350; Bot_Static.Down = 90; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 350; Bot_Static.Up = 62; Bot_Static.Right = 380; Bot_Static.Down = 90; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
setcolor(242); settextstyle( 2, 0, 4); outtextxy( 11, 71, " Nombre N_Install N_Exe Inst EXE Img" );
setcolor(255); settextstyle( 2, 0, 4); outtextxy( 10, 70, " Nombre N_Install N_Exe Inst EXE Img" );
Bot_Static.Left = 5; Bot_Static.Up = 95; Bot_Static.Right = 172; Bot_Static.Down = 330; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 172; Bot_Static.Up = 95; Bot_Static.Right = 230; Bot_Static.Down = 330; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 230; Bot_Static.Up = 95; Bot_Static.Right = 288; Bot_Static.Down = 330; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 288; Bot_Static.Up = 95; Bot_Static.Right = 318; Bot_Static.Down = 330; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 318; Bot_Static.Up = 95; Bot_Static.Right = 350; Bot_Static.Down = 330; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 350; Bot_Static.Up = 95; Bot_Static.Right = 380; Bot_Static.Down = 330; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
setcolor(255); settextstyle( 2, 0, 5); outtextxy( 11, 335, "Directorio" );
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 12, 336, "Directorio" );
Bot_Static.Left = 120; Bot_Static.Up = 335; Bot_Static.Right = 380; Bot_Static.Down = 355; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
setcolor(255); settextstyle( 2, 0, 5); outtextxy( 11, 355, "Nombre Imagen" );
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 12, 356, "Nombre Imagen" );
Bot_Static.Left = 120; Bot_Static.Up = 355; Bot_Static.Right = 178; Bot_Static.Down = 375; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
setcolor(255); settextstyle( 2, 1, 4); outtextxy( 200, 390, "Tipos de" );
setcolor(240); settextstyle( 2, 1, 4); outtextxy( 201, 391, "Tipos de" );
setcolor(255); settextstyle( 2, 1, 4); outtextxy( 210, 375, "instalaci¢n" );
setcolor(240); settextstyle( 2, 1, 4); outtextxy( 211, 376, "instalaci¢n" );
Bot_Static.Left = 226; Bot_Static.Up = 360; Bot_Static.Right = 380; Bot_Static.Down = 442; Bot_Static.Cdf = 250; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 231; Bot_Static.Up = 365; Bot_Static.Right = 375; Bot_Static.Down = 437; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
setcolor(255); settextstyle( 2, 0, 4); outtextxy( 231, 370, " 1 Imagen de VGA_COPY" );
setcolor(255); settextstyle( 2, 0, 4); outtextxy( 231, 380, " 2 Descompresor ARJ" );
setcolor(255); settextstyle( 2, 0, 4); outtextxy( 231, 390, " 3 Descompresor ZIP" );
setcolor(255); settextstyle( 2, 0, 4); outtextxy( 231, 400, " 4 XCopy" );
setcolor(255); settextstyle( 2, 0, 4); outtextxy( 231, 410, " 5 Programa propio" );
setcolor(255); settextstyle( 2, 0, 4); outtextxy( 231, 420, " 6 No Instalable" );
Bot_Static.Left = 5; Bot_Static.Up = 380; Bot_Static.Right = 190; Bot_Static.Down = 442; Bot_Static.Cdf = 250; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 10; Bot_Static.Up = 385; Bot_Static.Right = 185; Bot_Static.Down = 437; Bot_Static.Cdf = 240; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 2;
Imprime_Boton(1, Bot_Static);
break;
case 100:
Bot_Static.Left = 200; Bot_Static.Up = 212; Bot_Static.Right = 440; Bot_Static.Down = 267; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 205; Bot_Static.Up = 217; Bot_Static.Right = 435; Bot_Static.Down = 262; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " Error en asignaci¢n" );
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 242, " de memoria CONVENCIONAL" );
break;
case 101:
Bot_Static.Left = 200; Bot_Static.Up = 212; Bot_Static.Right = 440; Bot_Static.Down = 267; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 205; Bot_Static.Up = 217; Bot_Static.Right = 435; Bot_Static.Down = 262; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " Error en asignaci¢n" );
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " de memoria XMS" );
break;
case 102:
Bot_Static.Left = 200; Bot_Static.Up = 212; Bot_Static.Right = 440; Bot_Static.Down = 267; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 205; Bot_Static.Up = 217; Bot_Static.Right = 435; Bot_Static.Down = 262; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " Error cargando ICONOS" );
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " y punteros de RATON..." );
break;
case 103:
Bot_Static.Left = 200; Bot_Static.Up = 212; Bot_Static.Right = 440; Bot_Static.Down = 267; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 205; Bot_Static.Up = 217; Bot_Static.Right = 435; Bot_Static.Down = 262; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " Error cargando PCX" );
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " de Fondo." );
break;
case 104:
Bot_Static.Left = 200; Bot_Static.Up = 212; Bot_Static.Right = 440; Bot_Static.Down = 267; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 205; Bot_Static.Up = 217; Bot_Static.Right = 435; Bot_Static.Down = 262; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " Error cargando ficheros" );
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " de sonido WAV" );
break;
case 105:
Bot_Static.Left = 200; Bot_Static.Up = 212; Bot_Static.Right = 440; Bot_Static.Down = 267; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 205; Bot_Static.Up = 217; Bot_Static.Right = 435; Bot_Static.Down = 262; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " Error intentando ejecutar" );
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " el programa deseado..." );
break;
case 106:
Bot_Static.Left = 200; Bot_Static.Up = 212; Bot_Static.Right = 440; Bot_Static.Down = 267; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 205; Bot_Static.Up = 217; Bot_Static.Right = 435; Bot_Static.Down = 262; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " Error intentando ejecutar" );
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " el programa deseado..." );
break;
case 107:
Bot_Static.Left = 200; Bot_Static.Up = 212; Bot_Static.Right = 440; Bot_Static.Down = 267; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 205; Bot_Static.Up = 217; Bot_Static.Right = 435; Bot_Static.Down = 262; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " ERROR D E TIPO" );
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " D E S C O N O C I D O" );
break;
case 108:
Bot_Static.Left = 200; Bot_Static.Up = 212; Bot_Static.Right = 440; Bot_Static.Down = 267; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 205; Bot_Static.Up = 217; Bot_Static.Right = 435; Bot_Static.Down = 262; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " ERROR ABRIENDO" );
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " FICHERO" );
break;
case 109:
Bot_Static.Left = 200; Bot_Static.Up = 212; Bot_Static.Right = 440; Bot_Static.Down = 267; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 205; Bot_Static.Up = 217; Bot_Static.Right = 435; Bot_Static.Down = 262; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " ERROR de ESCRITURA" );
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " DISCO PROTEGIDO." );
break;
case 110:
Bot_Static.Left = 200; Bot_Static.Up = 212; Bot_Static.Right = 440; Bot_Static.Down = 267; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 205; Bot_Static.Up = 217; Bot_Static.Right = 435; Bot_Static.Down = 262; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " ERROR de LECTURA" );
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " POSIBLE DA¥O FÖSICO" );
break;
case 111:
Bot_Static.Left = 200; Bot_Static.Up = 212; Bot_Static.Right = 440; Bot_Static.Down = 267; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 205; Bot_Static.Up = 217; Bot_Static.Right = 435; Bot_Static.Down = 262; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " ERROR INTENTANDO" );
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " CERRAR FICHERO" );
break;
case 112:
Bot_Static.Left = 200; Bot_Static.Up = 212; Bot_Static.Right = 440; Bot_Static.Down = 267; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 205; Bot_Static.Up = 217; Bot_Static.Right = 435; Bot_Static.Down = 262; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " ERROR INTENTANDO" );
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " CARGAR BOTONES" );
break;
case 113:
Bot_Static.Left = 200; Bot_Static.Up = 212; Bot_Static.Right = 440; Bot_Static.Down = 267; Bot_Static.Cdf = 251; Bot_Static.Cb1 = 255; Bot_Static.Cb2 = 254; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
Bot_Static.Left = 205; Bot_Static.Up = 217; Bot_Static.Right = 435; Bot_Static.Down = 262; Bot_Static.Cdf = 253; Bot_Static.Cb1 = 254; Bot_Static.Cb2 = 255; Bot_Static.Ab = 2; Bot_Static.Pb = 1;
Imprime_Boton(1, Bot_Static);
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " Icono ha cambiado." );
setcolor(240); settextstyle( 2, 0, 5); outtextxy( 210, 222, " Cargando nuevo archivo..." );
break;
default:
break;
}
return 1;
}

BIN
CD_IN/CD_IN2.IMG Normal file

Binary file not shown.

128
CD_IN/CD_PCX.CPP Normal file
View File

@ -0,0 +1,128 @@
///////////////////////////// FICHEROS A INCLUIR /////////////////////////////
#include <time.h>
#include <dos.h>
#include <stdio.h>
#include <stdlib.h>
#include <conio.h> // Para getch();
#include <graphics.h> // Para outtextxy(...); y cleardevice(...);
#include "cd_error.h"
#include "..\..\jd_lib\make_bot.h" // Fuciones de MAKE_BOTON
////////////////////////////////// VARIABLES /////////////////////////////////
char far *dir_vga;
int ancho;
int alto;
char bits_pixel;
FILE *handle;
char dibujo[15];
char dac[256*3];
//////////////////////// DECLARACIONES DE FUNCIONES //////////////////////////
void dibujo_640_x_480_256_c(void);
void asigna_modo_video(char);
extern "C"
{
int SET_VESA(int);
void CHANGE_BANK(int);
void ENCIENDE_PANTALLA(char *);
void APAGA_PANTALLA(char *);
}
///////////////////////////////// PROGRAMA ///////////////////////////////////
void Inicializa_Dibujo(void)
{
int esq_x1, esq_y1, esq_x2, esq_y2;
char string[80] = "cd_out0";
randomize();
string[7] = (unsigned char)(random(7)+ '0');
string[8] = '.';
string[9] = 'P';
string[10] = 'C';
string[11] = 'X';
string[12] = '\0';
if((handle=fopen(/*"CD_OUT1.IMG"*/string, "rb"))==NULL)
{
Imprime_Estaticos( E_O, "cd_out.img"); // Imprime botones estaticos 'Seccion 2'
Espera_Tecla_o_Raton();
restorecrtmode();
printf("No se encontr¢ el archivo especificado");
exit(1);
}
if(10!=getc(handle))
{
Imprime_Estaticos( E_PCX, "cd_out.img"); // Imprime botones estaticos 'Seccion 2'
Espera_Tecla_o_Raton();
restorecrtmode();
printf("El archivo especificado no es un fichero PCX");
exit(1);
}
getw(handle); bits_pixel=getc(handle);
esq_x1=getw(handle); esq_y1=getw(handle);
esq_x2=getw(handle); esq_y2=getw(handle);
ancho=esq_x2-esq_x1+1;
alto =esq_y2-esq_y1+1;
if(ancho!=640 || alto!=480 || bits_pixel!=8)
{
Imprime_Estaticos( E_PCX, "cd_out.img"); // Imprime botones estaticos 'Seccion 2'
Espera_Tecla_o_Raton();
restorecrtmode();
printf("El fichero especificado no es un dibujo de 640 x 480 en 256 colores");
exit(1);
}
// APAGA_PANTALLA(dac);
dibujo_640_x_480_256_c();
// ENCIENDE_PANTALLA(dac);
}
void dibujo_640_x_480_256_c(void)
{
unsigned char byte, contador;
int bank, n;
fseek(handle, 128, 0);
bank=0; (long)dir_vga=0xA0000000L;
for(alto=480; alto>0; alto--)
{
for(ancho=640; ancho>0; )
{
byte=getc(handle);
if(byte<=0xC0)
{
*dir_vga++=byte; ancho--;
if((long)dir_vga==0xA0000000L) { bank++; CHANGE_BANK(bank); }
}
else
{
contador=byte&0x3F; byte=getc(handle);
for(; contador>0; contador--)
{
*dir_vga++=byte; ancho--;
if((long)dir_vga==0xA0000000L) { bank++; CHANGE_BANK(bank); }
}
}
}
}
getc(handle);
// for(n=0; n<256*3; n++) dac[n]=getc(handle) >> 2;
for(n=0; n<(256-16)*3; n++) dac[n]=getc(handle) >> 2;
fclose(handle);
}

215
CD_IN/CD_RATON.CPP Normal file
View File

@ -0,0 +1,215 @@
///////////////////////////////////////////////////////////////////////////
///// Nombre: Craton.cpp ///
///// Modulo: Perteneciente a JD_FONTS.CPP ///
//// Descripci¢n: Utilidades para el manejo del raton ///
//// ///
//// Autor: ( Ver Pc-Mania n§ 20 ) ///
//// Autor puntero del raton: Jos David Guilln Dominguez ///
//// Fecha: ( Desconocida ) ///
//// ///
//// Compilador Borland C++ 3.0 ( Creaci¢n original en Turbo C 2.0 ) ///
///////////////////////////////////////////////////////////////////////////
#include <dos.h>
#include <conio.h>
void desactiva_raton(void);
void activa_raton(void);
void inicializa_raton_grafico(int x1, int y1, int x2, int y2, int px, int py);
void Anclar_Raton(void);
int Espera_Tecla_o_Raton(void);
int raton=0;
int x_raton;
int y_raton;
int boton_izq;
int boton_der;
extern int PunteroRaton;
int dir_raton [32+32] = {
// 0x3FFF, /*± ± 1 1 1 1 1 1 1 1 1 1 1 1 1 1*/
// 0x1FFF, /*± Û ± 1 1 1 1 1 1 1 1 1 1 1 1 1*/
// 0x0FFF, /*± Û Û ± 1 1 1 1 1 1 1 1 1 1 1 1*/
// 0x07FF, /*± Û Û Û ± 1 1 1 1 1 1 1 1 1 1 1*/
// 0x03FF, /*± Û Û Û Û ± 1 1 1 1 1 1 1 1 1 1*/
// 0x07FF, /*± ± Û Û ± 1 1 1 1 1 1 1 1 1 1 1*/
// 0xC3FF, /*1 1 ± Û Û ± 1 1 1 1 1 1 1 1 1 1*/
0x007F, /*± ± ± ± ± ± ± ± ± 1 1 1 1 1 1 1*/
0x00FF, /*± Û Û Û Û Û Û ± 1 1 1 1 1 1 1 1*/
0x01FF, /*± Û Û Û Û Û ± 1 1 1 1 1 1 1 1 1*/
0x01FF, /*± Û Û Û Û Û ± 1 1 1 1 1 1 1 1 1*/
0x00FF, /*± Û Û Û Û Û Û ± 1 1 1 1 1 1 1 1*/
0x007F, /*± Û Û ± ± Û Û Û ± 1 1 1 1 1 1 1*/
0x18FF, /*± ± ± 1 1 ± Û ± 1 1 1 1 1 1 1 1*/
// 0xFC7F, /*1 1 1 1 1 1 ± Û ± 1 1 1 1 1 1 1*/
// 0xF83F, /*1 1 1 1 1 ± Û Û Û ± 1 1 1 1 1 1*/
// 0xF01F, /*1 1 1 1 ± Û Û Û Û Û ± 1 1 1 1 1*/
// 0xE00F, /*1 1 1 ± Û Û Û Û Û Û Û ± 1 1 1 1*/
// 0xE00F, /*1 1 1 ± ± ± Û Û Û ± ± ± 1 1 1 1*/
// 0xF83F, /*1 1 1 1 1 ± Û Û Û ± 1 1 1 1 1 1*/
// 0xF83F, /*1 1 1 1 1 ± ± ± ± ± 1 1 1 1 1 1*/
0x800F, /*1 ± ± ± ± ± ± ± ± ± ± ± 1 1 1 1*/
0x8083, /*1 ± Û Û Û Û Û ± ± Û Û Û ± ± 1 1*/
0x8001, /*1 ± ± ± ± ± Û ± ± Û ± ± Û ± ± 1*/
0xF810, /*1 1 1 1 1 ± Û ± ± Û ± 1 ± Û ± 1*/
0x8810, /*1 ± ± ± 1 ± Û ± ± Û ± 1 ± Û ± 1*/
0x8811, /*1 ± Û ± 1 ± Û ± ± Û ± 1 ± Û ± 1*/
0x8003, /*1 ± Û ± ± ± Û ± ± Û ± ± Û ± 1 1*/
0x8007, /*1 ± Û Û Û Û Û ± ± Û Û Û ± 1 1 1*/
0x800F, /*1 ± ± ± ± ± ± ± ± ± ± ± 1 1 1 1*/
// 0x0000, /*0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0*/
// 0x4000, /*0 Û 0 0 0 0 0 0 0 0 0 0 0 0 0 0*/
// 0x6000, /*0 Û Û 0 0 0 0 0 0 0 0 0 0 0 0 0*/
// 0x7000, /*0 Û Û Û 0 0 0 0 0 0 0 0 0 0 0 0*/
// 0x7800, /*0 Û Û Û Û 0 0 0 0 0 0 0 0 0 0 0*/
// 0x3000, /*0 0 Û Û 0 0 0 0 0 0 0 0 0 0 0 0*/
// 0x1800, /*0 0 0 Û Û 0 0 0 0 0 0 0 0 0 0 0*/
0x0000, /*0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0*/
0x7E00, /*0 Û Û Û Û Û Û 0 0 0 0 0 0 0 0 0*/
0x7C00, /*0 Û Û Û Û Û 0 0 0 0 0 0 0 0 0 0*/
0x7C00, /*0 Û Û Û Û Û 0 0 0 0 0 0 0 0 0 0*/
0x7E00, /*0 Û Û Û Û Û Û 0 0 0 0 0 0 0 0 0*/
0x6700, /*0 Û Û 0 0 Û Û Û 0 0 0 0 0 0 0 0*/
0x0200, /*0 0 0 0 0 0 Û 0 0 0 0 0 0 0 0 0*/
// 0x0100, /*0 0 0 0 0 0 0 Û 0 0 0 0 0 0 0 0*/
// 0x0380, /*0 0 0 0 0 0 Û Û Û 0 0 0 0 0 0 0*/
// 0x07C0, /*0 0 0 0 0 Û Û Û Û Û 0 0 0 0 0 0*/
// 0x0FE0, /*0 0 0 0 Û Û Û Û Û Û Û 0 0 0 0 0*/
// 0x0380, /*0 0 0 0 0 0 Û Û Û 0 0 0 0 0 0 0*/
// 0x0380, /*0 0 0 0 0 0 Û Û Û 0 0 0 0 0 0 0*/
// 0x0000, /*0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0*/
0x0000, /*0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0*/
0x3E70, /*0 0 Û Û Û Û Û 0 0 Û Û Û 0 0 0 0*/
0x0248, /*0 0 0 0 0 0 Û 0 0 Û 0 0 Û 0 0 0*/
0x0244, /*0 0 0 0 0 0 Û 0 0 Û 0 0 0 Û 0 0*/
0x0242, /*0 0 0 0 0 0 Û 0 0 Û 0 0 0 Û 0 0*/
0x2244, /*0 0 Û 0 0 0 Û 0 0 Û 0 0 0 Û 0 0*/
0x2248, /*0 0 Û 0 0 0 Û 0 0 Û 0 0 Û 0 0 0*/
0x3E70, /*0 0 Û Û Û Û Û 0 0 Û Û Û 0 0 0 0*/
0x0000 /*0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0*/
};
void inicializa_raton_grafico(int x1, int y1, int x2, int y2, int px, int py)
{
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) {
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;
int86(0x33, &ent, &sal); /* muestra el puntero del rat¢n */
}
}
void activa_raton(void)
{
union REGS ent, sal;
ent.x.ax = 1;
int86(0x33, &ent, &sal);
}
void desactiva_raton(void)
{
union REGS ent, sal;
ent.x.ax = 2;
int86(0x33, &ent, &sal);
}
void Anclar_Raton(void){
union REGS ent, sal;
do {
ent.x.ax = 3;
int86(0x33, &ent, &sal);
boton_izq = sal.x.bx & 1;
boton_der = (sal.x.bx >> 1) & 1;
} while(boton_izq==1 || boton_der==1);
}
int Espera_Tecla_o_Raton(void){
union REGS ent, sal;
ent.x.ax = 3;
do{
int86(0x33, &ent, &sal); // lee posici¢n y estados del bot¢n
boton_izq = sal.x.bx & 1;
boton_der = (sal.x.bx >> 1) & 1;
x_raton = sal.x.cx;
y_raton = sal.x.dx;
}while( boton_izq == 0 && boton_der == 0 && kbhit()==0 );
/////////////////////////////////////////
// RETURN Derecho Izquierdo //
// //
// 0 0 0 //
// 1 1 0 //
// 2 0 1 //
// 3 1 1 //
// //
/////////////////////////////////////////
int Que;
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;
return Que;
}

8
CD_IN/CD_RATON.H Normal file
View File

@ -0,0 +1,8 @@
extern void desactiva_raton(void);
extern void activa_raton(void);
extern void inicializa_raton_grafico(int x1, int y1, int x2, int y2, int px, int py);
extern void Anclar_Raton(void);
extern int Espera_Tecla_o_Raton(void);
extern int raton, x_raton, y_raton, boton_izq, boton_der, PunteroRaton;

883
CD_IN/CD_STOCK.CPP Normal file
View File

@ -0,0 +1,883 @@
#define SV_REF_X
#include<graphics.h>
#include<dos.h>
#include<conio.h>
#include<math.h>
#include<stdio.h>
#include<string.h>
#include<ctype.h>
#include<alloc.h>
#include<stdlib.h>
#include "c:\things\borlandc\jd_lib\jd_graph.h"
#include "sv_util.h"
#include "sv_graph.h"
#include "sv_ref_x.h"
#define Letra_Boton setcolor(1);
#define Azul 1
#define Texto_Normal setcolor(63);
#define Texto_Negrita setcolor(0);
extern int x_raton, y_raton, raton;
extern int boton_izq, boton_der;
extern void desactiva_raton(void);
extern void activa_raton(void);
extern void Anclar_Raton(void);
extern void inicializa_raton_grafico(int x1, int y1, int x2, int y2, int px, int py);
extern int Espera_Tecla_o_Raton(void);
extern void BEEP(void);
extern int InputCadenaG(char *s, int numalp, int lmax, int cc, int cf, struct boton Campo);
extern int InputCadenaG_l(char *s, int numalp, int lmax, int cc, int cf, struct boton Campo, int Row);
extern int InputCadenaG_T4(char *s, int numalp, int lmax, int cc, int cf, struct boton Campo, int RoW);
void PutLineStock(void);
void GetLineStock(void);
void Menu_de_Stock(void);
void AddRecordStock(void);
void PrintLineStock(void);
void Edit_Item_Stock(void);
void Abre_Ficha_Stock(void);
void DeleteRecordStock(void);
void Mueve_Abajo_Stock(void);
void Mueve_Arriba_Stock(void);
void CompruebaLineasStock(void);
void PrintWholeScreenStock(void);
void EditCursorStock(int ShowHide);
void Imprimir_Stock();
void Poner_a_cero_estructura_actual_Stock(void);
void Recalcula_Porcentaje(int Individual_Seleccionado);
// void Llena_con_Stock_basicas(void);
extern void Coloca_Nombres_a_botones(void);
// extern int Confirma(char *f1, char *f2, char *f3);
extern int Comprueba_Impresora(void);
struct Stock_inx { unsigned int Fin; };
struct Stock_actual { int Ref; long Und_0; long Und_1; };
struct Stock_actual Stock1;
struct Stock_actual Stock1_Graficas[10];
struct Stock_inx Stock1_inx;
struct boton *PS;//[5]
extern struct boton Comunes[9];
FILE *Stock; // Fichero de Stock
int CurrRowStock1;
int CurrColStock1;
int CurrTopLineStock;
void Menu_de_Stock(void) {
int finished = 0, key, bpush;
CurrRowStock1 = 1; CurrColStock1 = 1;
CurrTopLineStock = 1;
inicializa_raton_grafico(0, 0, 624, 464, 320, 240);
if(raton!=0) desactiva_raton();
if( ( PS = (struct boton *) malloc( sizeof(struct boton)*5 ) ) == NULL )
{
Confirma("Memoria insuficiente", "para crear tablas de", "posisi¢n PS.");
return ;
}
cleardevice();
Dibuja_Pantalla_Stock(PS);
Fuente(SMALL_FONT, 5);
setcolor(NEGRO);
Coloca_Nombres_a_botones();
setcolor(GRIS_C);
outtextxy(Comunes[3].left, Comunes[3].up, " SWAP" );
outtextxy(Comunes[3].left, Comunes[3].up+18, " F6 " );
Fuente(SMALL_FONT, 4);
Abre_Ficha_Stock();
Abre_Ficha_Referencias();
Carga_Referencias();
PrintWholeScreenStock();
GetLineStock();
int oldCR1=0, oldCC1=0;
do{
if(oldCR1!=CurrRowStock1 || oldCC1!=CurrColStock1 )
EditCursorStock(0);
oldCR1 = CurrRowStock1; oldCC1 = CurrColStock1;
if(raton!=0) activa_raton();
Espera_Tecla_o_Raton();
if(raton!=0) desactiva_raton();
if(kbhit()){
EditCursorStock(1);
key = getch();
if( isprint(key) || isspace(key) ) {
EditCursorStock(0);
if(key!=13) ungetch(key);
Edit_Item_Stock();
Recalcula_Porcentaje(1);
EditCursorStock(0);
} else if( key == 0 ) {
switch( (key=getch()) ){
// Flecha Arriba
case 72:
Mueve_Arriba_Stock();
Recalcula_Porcentaje(1);
break;
// Flecha Izquierda
case 75:
case 15:
CurrColStock1--;
if ( CurrColStock1<1 ) CurrColStock1=5;
break;
// Flecha Derecha
case 77:
case 9:
CurrColStock1++;
if ( CurrColStock1>5 ) CurrColStock1=1;
break;
// Flecha Abajo
case 80:
Mueve_Abajo_Stock();
Recalcula_Porcentaje(1);
break;
// Buscar F2
case 60:
// BuscarStock();
break;
// Imprimir Stock F5
case 63:
Imprimir_Stock();
break;
// F9 --> A¥ADIR
case 67:
// if( Confirma("A¥ADIR NUEVO STOCK", "INICIAL", "") )
// if ( Pide_Codigo(SV_CFG.COD_Stock) )
// AddRecordStock();
break;
// F10 -> BORRAR
case 68:
if( Confirma("ELIMINAR TOTALMENTE", "STOCK ACTUAL", "") )
// if ( Pide_Codigo(SV_CFG.COD_Stock) )
DeleteRecordStock();
Recalcula_Porcentaje(1);
break;
// INICIO
case 71:
CurrColStock1 = 1;
break;
// FIN
case 79:
CurrColStock1 = 5;
break;
// ReP g
case 73:
// CurrRow = 1;
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
if( CurrTopLineStock > /*28*/26 ) { CurrTopLineStock -= /*28*/26; } else { CurrTopLineStock = 1; }
if( CurrTopLineStock < 1 ) { CurrTopLineStock = 1; }
PrintWholeScreenStock();
GetLineStock();
EditCursorStock(0);
Recalcula_Porcentaje(1);
break;
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
// AvP g
case 81:
// CurrRow = 1;
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
CurrTopLineStock += /*28*/26;
if ( (CurrTopLineStock+CurrRowStock1) > Stock1_inx.Fin) { CurrTopLineStock = Stock1_inx.Fin; CurrRowStock1 = 1; }
if (CurrTopLineStock==0) CurrTopLineStock = 1;
PrintWholeScreenStock();
GetLineStock();
EditCursorStock(0);
Recalcula_Porcentaje(1);
//ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
break;
// Salir F1
case 59:
finished = 1;
break;
default:
break;
}
EditCursorStock(0);
}
} else if(raton!=0 && ( boton_izq==1 || boton_der==1 ) )
if( (bpush = CheckButon( 9, Comunes))>0 ) {
EditCursorStock(1);
switch(bpush){
// Flecha Arriba
case 1:
Mueve_Arriba_Stock();
Recalcula_Porcentaje(1);
break;
// Buscar
case 2:
// BuscarVend();
break;
// Flecha Abajo
case 3:
Mueve_Abajo_Stock();
Recalcula_Porcentaje(1);
break;
case 4:
break;
// Imprimir
case 5:
Imprimir_Stock();
break;
// A¤adir
case 6:
// if( Confirma("A¥ADIR NUEVO STOCK", "INICIAL", "") )
// if ( Pide_Codigo(SV_CFG.COD_Stock) )
// AddRecordStock();
break;
// Borrar
case 7:
if( Confirma("ELIMINAR TOTALMENTE", "STOCK ACTUAL", "") )
// if ( Pide_Codigo(SV_CFG.COD_Stock) )
DeleteRecordStock();
Recalcula_Porcentaje(1);
break;
// Salir
case 9:
finished = 1;
break;
default:
break;
}
EditCursorStock(0);
} else CompruebaLineasStock();
}while(!finished);
fclose(Stock); // Fichero Vendedores
fclose(Ref); // Fichero Vendedores
free(PS); // Libera la memoria
if(Memory_ok==1) farfree(Addr); else free(Ref_inx_addr);
}
void Mueve_Abajo_Stock(void){
int CurrRecord = CurrTopLineStock + CurrRowStock1 - 1;
if (CurrRowStock1==/*28*/40) {
if ( (CurrRecord - 1) >= Stock1_inx.Fin) { BEEP(); EditCursorStock(0); }
else { CurrTopLineStock++;
PrintWholeScreenStock();
//ÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜß
//ÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜß
//ÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜß
GetLineStock();
// PrintLineStock();
}
} else {
if( (CurrRecord - 1) >= Stock1_inx.Fin) { BEEP(); EditCursorStock(0); }
else { CurrRowStock1++;
GetLineStock();
// PrintLineStock();
}
}
}
void Mueve_Arriba_Stock(void){
int CurrRecord = CurrTopLineStock + CurrRowStock1 - 1;
if (CurrRowStock1==1) {
if ((CurrRecord - 1) <= 0) { BEEP(); EditCursorStock(0); }
else {
CurrTopLineStock--;
PrintWholeScreenStock();
//ÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜß
//ÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜß
//ÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜßÜß
GetLineStock();
// PrintLineStock();
}
} else {
if( (CurrRecord - 1) <= 0) BEEP();
else { CurrRowStock1--;
GetLineStock();
// PrintLineStock();
}
}
}
void EditCursorStock(int ShowHide) {
char Buffer[80];
setcolor(GRIS_C);
setfillstyle(SOLID_FILL, GRIS_C);
bar(10, 455, 545, 473);
if (!ShowHide) {
setcolor(63);
setfillstyle(SOLID_FILL, 63);
bar((PS[CurrColStock1-1].left+2), PS[CurrColStock1-1].up+(CurrRowStock1-1)*/*15*/12+/*2*/4, PS[CurrColStock1-1].right-2, PS[CurrColStock1-1].up+/*3*/4+((CurrRowStock1)-1)*12+10);
setcolor(0);
} else {
setcolor(0);
setfillstyle(SOLID_FILL, 0);
bar((PS[CurrColStock1-1].left+2), PS[CurrColStock1-1].up+(CurrRowStock1-1)*/*15*/12+/*2*/4, PS[CurrColStock1-1].right-2, PS[CurrColStock1-1].up+/*3*/4+((CurrRowStock1)-1)*12+10);
Texto_Normal
}
if(Ref_no_valid) setcolor(ROJO);
// struct Stock_actual { int Ref; long Und_0; long Und_1; };
switch(CurrColStock1){
// LA REFERENCIA DEBE SER INDEDITABLE...
case 1: //4
sprintf(Buffer, "% 5d", Stock1.Ref );
outtextxy( PS[0].left+2, (PS[0].up+3)+(CurrRowStock1-1)*12, Buffer );
outtextxy( 15, 455, "Referencia de Producto. 4 digitos m ximo.");
break;
case 2:
outtextxy( PS[1].left+2, (PS[1].up+3)+(CurrRowStock1-1)*12, Ref1.Concepto );
outtextxy( 15, 455, "Concepto.");
break;
case 3:
sprintf(Buffer, " % 5d", Stock1.Und_1); // 4
outtextxy( PS[2].left+2, (PS[2].up+3)+(CurrRowStock1-1)*12, Buffer);
outtextxy( 15, 455, "Unidades con Cod. 1");
break;
case 4:
sprintf(Buffer, " % 5d", Stock1.Und_0); // 4
outtextxy( PS[3].left+2, (PS[3].up+3)+(CurrRowStock1-1)*12, Buffer );
outtextxy( 15, 455, "Unidades con Cod. 0");
break;
case 5:
sprintf(Buffer, "% 10d", ( Stock1.Und_0 + Stock1.Und_1 ) ); // 4
outtextxy( PS[4].left+2, (PS[4].up+3)+(CurrRowStock1-1)*12, Buffer );
outtextxy( 15, 455, "Unidades TOTALES.");
break;
}
}
void PrintLineStock(void){
char Buffer[80];
setcolor(0);
setfillstyle(SOLID_FILL, 0);
bar((PS[0].left+2), PS[0].up+(CurrRowStock1-1)*12+/*2*/4, PS[0].right-2, PS[0].up+(CurrRowStock1-1)*12+10);
bar((PS[1].left+2), PS[1].up+(CurrRowStock1-1)*12+/*2*/4, PS[1].right-2, PS[1].up+(CurrRowStock1-1)*12+10);
bar((PS[2].left+2), PS[2].up+(CurrRowStock1-1)*12+/*2*/4, PS[2].right-2, PS[2].up+(CurrRowStock1-1)*12+10);
bar((PS[3].left+2), PS[3].up+(CurrRowStock1-1)*12+/*2*/4, PS[3].right-2, PS[3].up+(CurrRowStock1-1)*12+10);
bar((PS[4].left+2), PS[4].up+(CurrRowStock1-1)*12+/*2*/4, PS[4].right-2, PS[4].up+(CurrRowStock1-1)*12+10);
Texto_Normal
if(Ref_no_valid) setcolor(ROJO);
//
sprintf(Buffer, "% 5d", Stock1.Ref );
outtextxy( PS[0].left+2, (PS[0].up+3)+(CurrRowStock1-1)*12, Buffer );
outtextxy( PS[1].left+2, (PS[1].up+3)+(CurrRowStock1-1)*12, Ref1.Concepto );
sprintf(Buffer, " % 5d", Stock1.Und_1); // 4
outtextxy( PS[2].left+2, (PS[2].up+3)+(CurrRowStock1-1)*12, Buffer);
sprintf(Buffer, " % 5d", Stock1.Und_0); // 4
outtextxy( PS[3].left+2, (PS[3].up+3)+(CurrRowStock1-1)*12, Buffer );
sprintf(Buffer, "% 10d", ( Stock1.Und_0 + Stock1.Und_1 ) ); // 4
outtextxy( PS[4].left+2, (PS[4].up+3)+(CurrRowStock1-1)*12, Buffer );
}
void PrintWholeScreenStock(void){
int tmp = CurrRowStock1;
for(int i=0; i<5; i++)
ImprimeBoton (1, NEGRO, GRIS_O, BLANCO, PS[i]);
for(CurrRowStock1 = 1; CurrRowStock1 < (/*28*/40+1); CurrRowStock1++)
if ( (CurrTopLineStock + CurrRowStock1 - 1) <= (Stock1_inx.Fin + 1) ) {
GetLineStock();
PrintLineStock();
}
CurrRowStock1 = tmp;
}
void Edit_Item_Stock(void){
char buffer[80];
switch (CurrColStock1) {
case 1:/*
if( Stock1.Ref == -1 ) {
sprintf( buffer, "%d", Stock1.Ref);
InputCadenaG_T4( buffer, 1, 4, 63, 57, PS[0], CurrRowStock1-1);
Stock1.Ref = atoi(buffer);
PutLineStock();
}
*/
while( kbhit() ) getch();
break;
case 2:
while( kbhit() ) getch();
break;
case 3: // int Old_Und_0 = Stock1.Und_0;
sprintf( buffer, "%d", Stock1.Und_1);
InputCadenaG_T4( buffer, 1, 4, 63, 57, PS[2], CurrRowStock1-1);
Stock1.Und_1 = atol(buffer);
PutLineStock();
break;
case 4: // int Old_Und_1 = Stock1.Und_1;
sprintf( buffer, "%d", Stock1.Und_0);
InputCadenaG_T4( buffer, 1, 4, 63, 57, PS[3], CurrRowStock1-1);
Stock1.Und_0 = atol(buffer);
PutLineStock();
break;
default:
return;
}
PrintLineStock();
}
void Abre_Ficha_Stock(void){
char ArchivoDatos[]="SV_Stock.DAT";
//ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ//
//Û Stockrueba apertura correcta de Indice, y Datos y creaci¢n... Û//
//ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß//
int LSJ = sizeof(struct JD);
int LSI = sizeof(struct Stock_inx);
int LSC = sizeof(struct Stock_actual);
if ( (Stock = fopen( ArchivoDatos, "r+b"))==NULL) {
FILE *fa;
if ( (fa = fopen( ArchivoDatos, "wb" ) )!=NULL ) {
Poner_a_cero_estructura_actual_Stock();
Stock1_inx.Fin = 0;
rewind(fa);
fwrite(&cabecera, LSJ, 1, fa); fseek(fa, (long)LSJ, SEEK_SET);
fwrite(&Stock1_inx, LSI, 1, fa); fseek(fa, (long)LSJ+LSI, SEEK_SET);
fwrite(&Stock1, LSC, 1, fa);
if (fclose(fa) == EOF ) exit(1);
}
if ( (Stock = fopen( ArchivoDatos, "r+b"))==NULL) {
restorecrtmode();
printf("NO SE PUDO ABRIR EL FICHERO INDICE EN LA 2§ PASADA");
exit(1);
}
}
fseek(Stock, (long)LSJ, SEEK_SET);
if ( fread(&Stock1_inx, LSI, 1, Stock) != 1 ) {
restorecrtmode();
printf("NO SE PUDO LEER EN EL FICHERO: INDICE");
exit(1);
}
fseek(Stock, (long)LSJ+LSI, SEEK_SET);
if ( fread(&Stock1, LSC, 1, Stock) != 1 ) {
restorecrtmode();
printf("NO SE PUDO LEER EN EL FICHERO: DATOS");
exit(1);
}
}
void DeleteRecordStock(void) {
unsigned int CurrRecord;
int LSJ = sizeof(struct JD);
int LSI = sizeof(struct Stock_inx);
int LSC = sizeof(struct Stock_actual);
CurrRecord = CurrTopLineStock + CurrRowStock1 - 1;
if ( (Stock1_inx.Fin == 0) ) { BEEP();
Poner_a_cero_estructura_actual_Stock();
Stock1.Ref=-1;
fseek(Stock, (long)LSJ + LSI + ( LSC * ( 0 ) ), SEEK_SET); // Se coloca
fwrite(&Stock1, LSC, 1, Stock); // Y escribe
/* ßßßÛ */ PrintWholeScreenStock();
/* ß */ GetLineStock();
EditCursorStock(0);
} else {
Stock1_inx.Fin -= 1;
unsigned int p = CurrRecord - 1;
while( p <= Stock1_inx.Fin ) {
fseek(Stock, (long)LSJ + LSI + ( LSC * ( p + 1 ) ), SEEK_SET); // Se coloca
fread(&Stock1, LSC, 1, Stock); // Y lee
fseek(Stock, (long)LSJ + LSI + ( LSC * p ), SEEK_SET); // Se coloca
fwrite(&Stock1, LSC, 1, Stock); // Y escribe
p++;
};
fseek(Stock, (long)LSJ, SEEK_SET);
fwrite(&Stock1_inx, LSI, 1, Stock); // Acualiza n§ de registros
/* Û */ if ((CurrRecord - 1) == Stock1_inx.Fin + 1) CurrRowStock1--;
/* Û */
/* ßßßÛ */ PrintWholeScreenStock();
/* ß */ GetLineStock();
EditCursorStock(0);
// PrintLineStock();
}
}
void AddRecordStock(void){
unsigned int CurrRecord= CurrTopLineStock + CurrRowStock1 - 1;
int LSJ = sizeof(struct JD);
int LSI = sizeof(struct Stock_inx);
int LSC = sizeof(struct Stock_actual);
if(CurrRecord < 10000 ) {
long avance = Stock1_inx.Fin /*+ 1*/;
while( avance >= (CurrRecord-1) ) {
fseek(Stock, (long)LSJ + LSI + ( LSC * avance ), SEEK_SET); // Se coloca
fread(&Stock1, LSC, 1, Stock); // Y lee
fseek(Stock, (long)LSJ + LSI + ( LSC * (avance + 1) ), SEEK_SET); // Se coloca
fwrite(&Stock1, LSC, 1, Stock); // Y escribe
avance--;
};
// Stock1_inx.Fin = Stock1_inx.Fin + 1;
Stock1_inx.Fin++;
fseek(Stock, (long)LSJ, SEEK_SET);
fwrite(&Stock1_inx, LSI, 1, Stock); // Acualiza n§ de registros
Poner_a_cero_estructura_actual_Stock();
Stock1.Ref=-1;
fseek(Stock, (long)LSJ + LSI + ( LSC * ( CurrTopLineStock + CurrRowStock1 - 1) ), SEEK_SET); // Se coloca
fwrite(&Stock1, LSC, 1, Stock); // Y escribe
CurrRowStock1++;
if (CurrRowStock1>/*28*/40) { CurrTopLineStock++; CurrRowStock1--; }
PrintWholeScreenStock();
GetLineStock();
EditCursorStock(0);
// PrintLineStock();
}
}
void PutLineStock(void){
int LSJ = sizeof(struct JD);
int LSI = sizeof(struct Stock_inx);
int LSC = sizeof(struct Stock_actual);
int CurrRecord = CurrTopLineStock + CurrRowStock1 - 1;
fseek(Stock, (long)LSJ + LSI + ( LSC * CurrRecord ) - LSC, SEEK_SET); // Se coloca
fwrite(&Stock1, LSC, 1, Stock); // Y escribe
}
void GetLineStock(void){
int LSJ = sizeof(struct JD);
int LSI = sizeof(struct Stock_inx);
int LSC = sizeof(struct Stock_actual);
int CurrRecord = CurrTopLineStock + CurrRowStock1 - 1;
fseek(Stock, (long)LSJ + LSI + ( LSC * CurrRecord ) - LSC, SEEK_SET); // Se coloca
fread(&Stock1, LSC, 1, Stock); // Y lee
BuscaReferencia(Stock1.Ref);
}
void Poner_a_cero_estructura_actual_Stock(void){
cabecera.esc = 27; strcpy(cabecera.color, "[31;40m");
strcpy(cabecera.prog, "Jos David Guilln Dominguez");
cabecera.nl = 13; cabecera.rt = 10;
strcpy(cabecera.autor, " 6 / Mayo / 1995 ");
cabecera.pt = 7; cabecera.ef = 26;
Stock1.Ref=0; Stock1.Und_1=0; Stock1.Und_0=0;
}
void Imprimir_Stock(void){
int LSJ = sizeof(struct JD);
int LSI = sizeof(struct Stock_inx);
int LSC = sizeof(struct Stock_actual);
int lprint = 3, Curr_Stock = 0;
if ( Comprueba_Impresora() == 0 ) {
Confirma("Error Imprimiendo.", "Impresora Fuera de", "Servicio.");
return;
}
fprintf( stdprn, "\n\r");
fprintf( stdprn, " Ref Concepto Und.C.0 Und.C.1 TOTAL\n\r");
fprintf( stdprn, "ùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùù\n\r");
while( (Curr_Stock <= Stock1_inx.Fin) ){
fseek(Stock, (long)LSJ + LSI + ( LSC * Curr_Stock ), SEEK_SET); // Se coloca
fread(&Stock1, LSC, 1, Stock); // Y lee
BuscaReferencia(Stock1.Ref);
fprintf( stdprn, "% 5d %-20s % 4ld % 4ld % 8ld \n\r", Stock1.Ref, Ref1.Concepto, Stock1.Und_0, Stock1.Und_1, ( Stock1.Und_0 + Stock1.Und_1 ) );
lprint++;
if (lprint==55) { lprint = 3;
fputc(12, stdprn);
fprintf( stdprn, " Ref Concepto Und.C.0 Und.C.1 TOTAL\n\r");
fprintf( stdprn, "ùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùùù\n\r");
}
Curr_Stock++;
}
fputc(12, stdprn);
GetLineStock();
}
void CompruebaLineasStock(void){
// Check una pulsacion sobre un campo, y se situa, si es posible
int ok_p=0, inc=0, md=0;
int oldr, oldc;
// Anclar_Raton();
do{
inc++;
if(x_raton >= (PS[(inc)-1].left+2) && x_raton <= (PS[inc-1].right-2) ) { ok_p=1; md = 1;
oldc=inc; }
if(inc==5) ok_p=1;
}while(!ok_p);
if(md==1){
inc=0; ok_p=0; md = 0;
do{
inc++;
if( (y_raton >= (PS[(oldc)-1].up+4+(inc-1)*15+2)) && (y_raton <= (PS[oldc-1].up+4+(inc-1)*15+16)) ) { ok_p=1; oldr=inc; md = 1;}
if(inc==26) ok_p=1;
}while(!ok_p);
}
int newc;
switch(oldc){
case 1:
case 2: newc = oldc; break;
case 4:
case 5: newc = (oldc - 1); break;
default:
break;
}
if( (md==1) && ((CurrColStock1!=newc) || (CurrRowStock1!=oldr)) )
{
if( (CurrTopLineStock + oldr - 2 )<= Stock1_inx.Fin ){
EditCursorStock(1);
switch(oldc){
case 1:
case 2:
CurrColStock1 = oldc;
CurrRowStock1 = oldr;
break;
case 4:
case 5:
CurrColStock1 = (oldc-1);
CurrRowStock1 = oldr;
break;
default:
EditCursorStock(0);
break;
}
GetLineStock();
}
}
}
void Actualizar_Stock(int Referencia, int Unidades, int Codigo){
int LSJ = sizeof(struct JD);
int LSI = sizeof(struct Stock_inx);
int LSC = sizeof(struct Stock_actual);
int ok = 0;
int Curr_Stock = 0, Encuentro = 0;
while( (Curr_Stock <= Stock1_inx.Fin) && (ok == 0) ){
fseek(Stock, (long)LSJ + LSI + ( LSC * Curr_Stock ), SEEK_SET); // Se coloca
fread(&Stock1, LSC, 1, Stock); // Y lee
if( Stock1.Ref == Referencia ) {
if(Codigo==1) Stock1.Und_1 += Unidades;
else Stock1.Und_0 += Unidades;
fseek(Stock, (long)LSJ + LSI + ( LSC * Curr_Stock ), SEEK_SET); // Se coloca
fwrite(&Stock1, LSC, 1, Stock); // Y escribe
ok = 1;
Encuentro = 1;
}
Curr_Stock++;
}
if (Encuentro==0) {
Stock1.Ref = Referencia;
if(Codigo==1) { Stock1.Und_1 = Unidades; Stock1.Und_0 = 0; }
else { Stock1.Und_0 = Unidades; Stock1.Und_1 = 0; }
fseek(Stock, (long)LSJ + LSI + ( LSC * (Stock1_inx.Fin + 1) ), SEEK_SET); // Se coloca
fwrite(&Stock1, LSC, 1, Stock); // Y escribe
Stock1_inx.Fin ++;
fseek(Stock, (long)LSJ, SEEK_SET);
fwrite(&Stock1_inx, LSI, 1, Stock); // Acualiza n§ de registros
}
}
void Recalcula_Porcentaje(int Individual_Seleccionado){
if( Individual_Seleccionado == 1 ) {
long P_0, P_1;
struct boton Ptmp;
Ptmp.up = 15; Ptmp.down = 213;
Ptmp.left = 349; Ptmp.right = 549;
ImprimeBoton (1, NEGRO, GRIS_O, BLANCO, Ptmp);
// Centro = (449, 114) radio = 80
// si (Stock1.Und_0 + Stock1.Und_1) es 100
// Stock1.Und_0 es PS
// si 360 es 100
// x es PS
if ( (abs(Stock1.Und_0)+abs(Stock1.Und_1) )!= 0 ) {
P_0 = labs( ( 360 * ( (labs(Stock1.Und_0) * 100) / (labs(Stock1.Und_0)+labs(Stock1.Und_1)) ) ) / 100);
P_1 = labs( ( 360 * ( (labs(Stock1.Und_1) * 100) / (labs(Stock1.Und_0)+labs(Stock1.Und_1)) ) ) / 100);
// struct Stock_actual { int Ref; long Und_0; long Und_1; };
if( Stock1.Und_1 < 0 )
{ P_0 += P_1; P_1 = 0; }
if( Stock1.Und_0 < 0 )
{ P_1 += P_0; P_0 = 0; }
if( P_1 != 0 ) {
setcolor(ROJO);
setfillstyle(9, ROJO);
pieslice(449, 114, 0, P_1, 80);
}
if( P_0 != 0 ) {
setcolor(AZUL);
setfillstyle(9, AZUL);
pieslice(449, 114, ( 360 - P_0 ), 360, 80);
}
}
} else {
// struct Stock_actual Stock1_Graficas[10];
// bar3d
}
}

497
CD_IN/CD_UTIL.CPP Normal file
View File

@ -0,0 +1,497 @@
#include<graphics.h>
#include<dos.h>
#include<io.h>
#include<conio.h>
#include<stdio.h>
// #include<string.h>
#include<ctype.h>
#include<alloc.h>
#include<stdlib.h>
#include "sv_util.h"
#include "c:\things\borlandc\jd_lib\jd_graph.h"
#define Letra_Boton setcolor(1);
#define Azul 1
#define Texto_Normal setcolor(63);
#define Texto_Negrita setcolor(0);
extern int x_raton, y_raton, raton;
extern int boton_izq, boton_der;
extern int InputCadenaG(char *s, int numalp, int lmax, int cc, int cf, struct boton Campo);
extern void desactiva_raton(void);
extern void activa_raton(void);
// extern void Anclar_Raton(void);
extern void inicializa_raton_grafico(int x1, int y1, int x2, int y2, int px, int py);
extern int Espera_Tecla_o_Raton(void);
extern void BEEP(void);
extern void textxy(int x, int y, char *text);
#define NEGRO 0
#define AZUL 1
#define ROJO 4
#define VERDE 2
#define BLANCO 63
#define GRIS_O 56
#define GRIS_C 7
#define AMARILLO 62
extern void textxy(int x, int y, char *text);
int Comprueba_Impresora(void);
int Confirma(char *T1, char *T2, char *T3);
int Desde_Hasta(int *Desde, int *Hasta);
int Pide_Fecha_Actual(void);
int file_exists(char *filename);
int Confirma(char *T1, char *T2, char *T3){
void far *ptr;
unsigned size;
struct boton pregunta[2];
int fins_print=0, key_print, bpush, ok = 0;
int TFuente;
struct textsettingstype textinfo;
gettextsettings(&textinfo);
TFuente = textinfo.charsize;
size = imagesize(198, 138, 372, 257);
/* get byte size of image */
Fuente(SMALL_FONT, 5);
if ( (ptr = farmalloc(size)) == NULL) { Fuente(SMALL_FONT, TFuente); return 0; }
getimage(198, 138, 372, 257, ptr);
pregunta[0].up = 140; pregunta[0].down = 255;
pregunta[0].left= 200; pregunta[0].right= 370;
ImprimeBoton (1, GRIS_C, GRIS_O, BLANCO, pregunta[0]);
pregunta[0].up = 235; pregunta[0].down = 250;
pregunta[0].left= 210; pregunta[0].right= 270;
ImprimeBoton (1, GRIS_C, BLANCO, GRIS_O, pregunta[0]);
pregunta[1].up = 235; pregunta[1].down = 250;
pregunta[1].left= 300; pregunta[1].right= 360;
ImprimeBoton (1, GRIS_C, BLANCO, GRIS_O, pregunta[1]);
textxy(212, 237, " Si");
textxy(212, 239, " _");
textxy(302, 237, " No");
textxy(302, 239, " _");
textxy(210+2, 150+2, T1);
textxy(210+2, 165+2, T2);
textxy(210+2, 180+2, T3);
//ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
do{
if(raton!=0) activa_raton();
Espera_Tecla_o_Raton();
if(raton!=0) desactiva_raton();
if(kbhit()){
key_print = getch();
switch( toupper(key_print) ){
// S Si
case 83:
ok = 1;
fins_print = 1;
break;
// N No
case 78:
ok = 0;
fins_print = 1;
break;
default:
break;
}
} else
if(raton!=0 && boton_izq==1 || boton_der==1) {
if( (bpush = CheckButon( 2, pregunta))>0 ) {
switch(bpush){
case 1:
ok = 1;
fins_print = 1;
break;
case 2:
ok = 0;
fins_print = 1;
break;
default:
break;
}
}
}
}while(!fins_print);
putimage(198, 138, ptr, COPY_PUT);
farfree(ptr);
Fuente(SMALL_FONT, TFuente);
return ok;
}
int Pide_Fecha_Actual(void){
int Fecha;
//þþþþþþ void far *ptr;
//þþþþþþ unsigned size;
char mes[][11] = { " Enero", "Febrero", " Marzo",
" Abril", " Mayo", " Junio",
" Julio", " Agosto", "Septiemb",
"Octubre", "Noviemb", "Diciemb"
};
struct boton pregunta[3];
struct boton meses[12];
int key_print, bpush, ok = 0;
int TFuente;
for( Fecha = 0; Fecha < 4; Fecha++ ){
meses[2+3*Fecha].left = 405; meses[2+3*Fecha].right = 455;
meses[1+3*Fecha].left = 350; meses[1+3*Fecha].right = 400;
meses[0+3*Fecha].left = 295; meses[0+3*Fecha].right = 345;
}
for( Fecha = 0; Fecha < 3; Fecha++ ) {
meses[Fecha].up = 80+140; meses[Fecha].down = 80+160;
meses[Fecha+3].up = 80+165; meses[Fecha+3].down = 80+185;
meses[Fecha+6].up = 80+190; meses[Fecha+6].down = 80+210;
meses[Fecha+9].up = 80+215; meses[Fecha+9].down = 80+235;
}
struct textsettingstype textinfo;
gettextsettings(&textinfo);
TFuente = textinfo.charsize;
struct date d;
getdate(&d);
Fecha = d.da_mon;
/* get byte size of image */
//þþþþþþ size = imagesize(198, 138, 372, 257);
//þþþþþþ if ( (ptr = farmalloc(size)) == NULL) {
//þþþþþþ Fuente(SMALL_FONT, TFuente);
//þþþþþþ return Fecha;
//þþþþþþ }
//þþþþþþ getimage(198, 138, 372, 257, ptr);
pregunta[0].up = /*140*/130; pregunta[0].down = /*255*/400;
pregunta[0].left= /*200*/150; pregunta[0].right= /*370*/465;
ImprimeBoton (1, GRIS_C, GRIS_O, BLANCO, pregunta[0]);
pregunta[0].up = /*143*/135; pregunta[0].down = /*252*/395;
pregunta[0].left= /*203*/155; pregunta[0].right= /*367*/460;
ImprimeBoton (0, GRIS_C, BLANCO, GRIS_O, pregunta[0]);
pregunta[0].up = /*235*/370; pregunta[0].down = /*250*/390;
pregunta[0].left= /*210*/160; pregunta[0].right= /*270*/230;
ImprimeBoton (1, GRIS_C, BLANCO, GRIS_O, pregunta[0]);
pregunta[1].up = /*235*/370; pregunta[1].down = /*250*/390;
pregunta[1].left= /*300*/385; pregunta[1].right= /*360*/455;
ImprimeBoton (1, GRIS_C, BLANCO, GRIS_O, pregunta[1]);
pregunta[2].up = /*165*/175; pregunta[2].down = /*185*/195;
pregunta[2].left= 212; pregunta[2].right= /*232*/245;
ImprimeBoton (1, GRIS_C, BLANCO, GRIS_O, pregunta[2]);
Fuente(SMALL_FONT, 4);
for( int i = 0; i < 12; i++ ) {
ImprimeBoton (1, GRIS_C, GRIS_O, BLANCO, meses[i]);
textxy(meses[i].left+4, meses[i].up+3, mes[i]);
}
ImprimeBoton (1, ROJO, GRIS_O, BLANCO, meses[Fecha-1]);
textxy(meses[Fecha-1].left+4, meses[Fecha-1].up+3, mes[Fecha-1]);
Fuente(SMALL_FONT, 5);
textxy(162, 372, " Aceptar");
textxy(162, 373, " _");
textxy(387, 372, " Cancelar");
textxy(387, 373, " _");
textxy(160+2, 145+2, "Introduzca mes a gestionar:");
// textxy(210+2, 165+2, T2);
// textxy(210+2, 180+2, T3);
char buffer[80];
int Mes=Fecha;
sprintf( buffer, "% 2d", Fecha);
textxy(pregunta[2].left + 4, pregunta[2].up + 2, buffer);
//ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
do{
if(raton!=0) activa_raton();
Espera_Tecla_o_Raton();
if(raton!=0) desactiva_raton();
if(kbhit()){
key_print = getch();
if( key_print == 13 ) {Fecha = Mes; ok = 1; } else
if( isdigit(key_print) ) {
// Edita el mes actual
sprintf( buffer, "%d", Fecha);
do{
InputCadenaG( buffer, 1, 4, 63, 57, pregunta[2]);
Fecha = atoi(buffer);
}while(Fecha<1 || Fecha>12);
} else
if(key_print==0)
switch( getch() ){
// Flecha Izquierda
case 75:
case 15:
ImprimeBoton (0, GRIS_C, GRIS_O, BLANCO, meses[Mes-1]);
Mes--;
if ( (Mes + 1)== 1 ) Mes = 3; else
if ( (Mes + 1)== 4 ) Mes = 6; else
if ( (Mes + 1)== 7 ) Mes = 9; else
if ( (Mes + 1)==10 ) Mes = 12;
ImprimeBoton (0, GRIS_C, AZUL, AZUL, meses[Mes-1]);
break;
// Flecha Derecha
case 77:
case 9:
ImprimeBoton (0, GRIS_C, GRIS_O, BLANCO, meses[Mes-1]);
Mes++;
if ( (Mes - 1)== 3 ) Mes = 1; else
if ( (Mes - 1)== 6 ) Mes = 4; else
if ( (Mes - 1)== 9 ) Mes = 7; else
if ( (Mes - 1)==12 ) Mes = 10;
ImprimeBoton (0, GRIS_C, AZUL, AZUL, meses[Mes-1]);
break;
// Flecha Abajo
case 80:
ImprimeBoton (0, GRIS_C, GRIS_O, BLANCO, meses[Mes-1]);
Mes += 3; if ( Mes > 12) Mes = Mes - 12;
ImprimeBoton (0, GRIS_C, AZUL, AZUL, meses[Mes-1]);
break;
// Flecha Arriba
case 72:
ImprimeBoton (0, GRIS_C, GRIS_O, BLANCO, meses[Mes-1]);
Mes -= 3; if ( Mes < 1) Mes = 12 + Mes;
ImprimeBoton (0, GRIS_C, AZUL, AZUL, meses[Mes-1]);
break;
}
else
switch( toupper(key_print) ){
// A Aceptar
case 65:
ok = 1;
break;
// C Cancelar
case 67:
ok = 1;
Fecha = -1;
break;
default:
break;
}
} else
if(raton!=0 && boton_izq==1 || boton_der==1) {
if( (bpush = CheckButon( 2, pregunta))>0 ) {
switch(bpush){
case 1:
ok = 1;
break;
case 2:
ok = 1;
Fecha = -1;
break;
default:
break;
}
}
}
}while(!ok);
//þþþþþþ putimage(198, 138, ptr, COPY_PUT);
//þþþþþþ farfree(ptr);
Fuente(SMALL_FONT, TFuente);
return Fecha;
}
int file_exists(char *filename)
{
return (access(filename, 0) == 0);
}
int Comprueba_Impresora(void){
unsigned int tmp;
union REGS Impresora_in, Impresora_out;
struct byte {
int a : 1;
int b : 1;
int c : 1;
int d : 1;
int e : 1;
int f : 1;
int g : 1;
int h : 1;
};
union bits {
char ch;
struct byte bit;
} Imp_out;
Impresora_in.h.ah = 0x02;
Impresora_in.x.dx = 0x0;
int86(0x17, &Impresora_in, &Impresora_out);
return ( Impresora_out.h.ah ? 1 : 0 );
}
int Desde_Hasta(int *Desde, int *Hasta){
int fins_print= 0, key_print, bpush;
char buffer[80], devuelve = 0;
void far *ptr;
unsigned size;
struct boton pregunta[4];
struct date Fecha;
getdate(&Fecha);
*Desde = *Hasta = Fecha.da_day;
size = imagesize(198, 138, 372, 257);
/* get byte size of image */
if ( (ptr = farmalloc(size)) == NULL) return -1;
getimage(198, 138, 372, 257, ptr);
pregunta[0].up = 140; pregunta[0].down = 255;
pregunta[0].left= 200; pregunta[0].right= 370;
ImprimeBoton (1, ROJO, GRIS_C, BLANCO, pregunta[0]);
pregunta[0].up = 150; pregunta[0].down = /*175*/165;
pregunta[0].left= /*210*/250; pregunta[0].right= 360;
ImprimeBoton (1, NEGRO, GRIS_O, BLANCO, pregunta[0]);
pregunta[1].up = 185; pregunta[1].down = /*210*/200;
pregunta[1].left= /*210*/250; pregunta[1].right= 360;
ImprimeBoton (1, NEGRO, GRIS_O, BLANCO, pregunta[1]);
pregunta[2].up = 220; pregunta[2].down = 245;
pregunta[2].left= 210; pregunta[2].right= 280;
ImprimeBoton (1, GRIS_C, BLANCO, GRIS_O, pregunta[2]);
pregunta[3].up = 220; pregunta[3].down = 245;
pregunta[3].left= 290; pregunta[3].right= 360;
ImprimeBoton (1, GRIS_C, BLANCO, GRIS_O, pregunta[3]);
Fuente(SMALL_FONT, 4);
Letra_Boton
outtextxy(pregunta[0].left+2 - 40, pregunta[0].up+2, "DESDE");
outtextxy(pregunta[1].left+2 - 40, pregunta[1].up+2, "HASTA");
outtextxy(pregunta[2].left+2, pregunta[2].up+2, "CANCELAR");
outtextxy(pregunta[2].left+2, pregunta[2].up+4, "_");
outtextxy(pregunta[3].left+2, pregunta[3].up+2, "ACEPTAR");
outtextxy(pregunta[3].left+2, pregunta[3].up+4, "_");
//ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
do{
if(raton!=0) activa_raton();
Espera_Tecla_o_Raton();
if(raton!=0) desactiva_raton();
if(kbhit()){
key_print = getch();
if(key_print == 27 ) { fins_print = 1; devuelve = -1; } else
if(key_print == 'A' || key_print == 'a') { fins_print = 1; } else
if(key_print == 'C' || key_print == 'c') { fins_print = 1; devuelve = -1; } else
if( isprint(key_print) ) {
sprintf( buffer, "%d", *Desde);
do{
InputCadenaG( buffer, 1, 2, 63, 57, pregunta[0]);
*Desde = atol(buffer);
}while(*Desde<1 || *Desde>12);
sprintf( buffer, "%d", *Hasta);
do{
InputCadenaG( buffer, 1, 2, 63, 57, pregunta[1]);
*Hasta = atol(buffer);
}while(*Hasta<1 || *Hasta>12);
} else
if( key_print == 0 ) {
switch( (key_print=getch()) ){
// F1 Cancelar
case 59:
fins_print = 1;
devuelve = -1;
break;
// F3 Imprimir Ficha
default:
break;
}
}
} else
if(raton!=0 && boton_izq==1 || boton_der==1) {
if( (bpush = CheckButon( 3, pregunta))>0 ) {
/*
pregunta[0].up = 140; pregunta[0].down = 255;
pregunta[0].left= 200; pregunta[0].right= 370;
ImprimeBoton (1, GRIS_O, GRIS_C, BLANCO, pregunta[0]);
*/
switch(bpush){
// Cancelar
case 3:
fins_print=1;
devuelve = -1;
break;
case 4:
fins_print=1;
break;
}
}
}
}while(!fins_print);
//ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß
putimage(198, 138, ptr, COPY_PUT);
farfree(ptr);
Fuente(SMALL_FONT, 5);
return devuelve;
}

BIN
CD_IN/CD_W01.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_W02.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_W03.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_W04.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_W05.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_W06.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_W07.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_W08.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_W09.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_W10.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_W11.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_W12.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_W13.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_W14.DAT Normal file

Binary file not shown.

BIN
CD_IN/CD_W15.DAT Normal file

Binary file not shown.

5
CD_IN/LIST_COL.H Normal file
View File

@ -0,0 +1,5 @@
// Aqui se debe poner cual sera el color negro,
// para la utilizaci¢n por Make_Boton...
#define NEGRO 240

BIN
CD_IN/LITT.CHR Normal file

Binary file not shown.

BIN
CD_IN/MAKE_BOT.OBJ Normal file

Binary file not shown.

161
CD_IN/PRUEBA_B.CPP Normal file
View File

@ -0,0 +1,161 @@
///////////////////////////// FICHEROS A INCLUIR /////////////////////////////
extern int Fichero_cd_in2(char Dinamicos_Estaticos);
#include <dos.h>
#include <mem.h>
#include <alloc.h>
#include <stdio.h>
#include <stdlib.h>
#include <conio.h> // Para getch();
#include <graphics.h> // Para outtextxy(...); y cleardevice(...);
#include "d:\program\src_dos\libs\make_bot\make_bot.h" // Fuciones de MAKE_BOTON
#include "cd_icons.h"
#include "cd_error.h"
// #include "cd_raton.h"
extern int far _Cdecl Svga256_fdriver[];
int huge DetectVGA256()
{
return 2;
}
extern void Inicializa_Dibujo(void);
extern void Inicializa_Iconos(void);
extern void Coloca_Iconos_Dos_Windows(void);
extern char far *Icono; // 18
void InicializaSVGA(void);
extern char dac[256*3];
extern "C" void APAGA_PANTALLA(char *);
extern "C" void ENCIENDE_PANTALLA(char *);
extern void Menu_de_Edicion(void);
extern void Coloca_Iconos(int Start_Icon);
// extern unsigned char *P_Raton1, *P_Raton2, *P_Raton3, *P_Raton4;
// void *Pantalla;
int main(void/*int argc, char *argv[]*/){
InicializaSVGA();
/*Û*/ memset( dac, 0, 256*3 ); /*Û*/
unsigned Segt = FP_SEG(dac), Off = FP_OFF(dac);
/*Û*/ asm mov ax, 0x1012 ; /*Û*/
/*Û*/ asm mov bx, 0 ; /*Û*/
/*Û*/ asm mov cx, 256 ; /*Û*/
/*Û*/ asm mov es, Segt ; /*Û*/
/*Û*/ asm mov dx, Off ; /*Û*/
/*Û*/ asm int 0x10 ; /*Û*/
if( //carga_botones("cd_in.img") // Carga botones del fichero "botones.p1"
Fichero_cd_in2(0)
!= 1 ) {
Fichero_cd_in2(112);
// Imprime_Estaticos( 112, "cd_in.img");
Espera_Tecla_o_Raton();
closegraph();
cprintf("\n\rError en la CARGA DE BOTONES");
exit(112);
}
Fichero_cd_in2(1);
// Imprime_Estaticos( 1, "cd_in.img"); // Imprime botones estaticos 'Seccion 1'
Imprime_Secuencia(1); // Imprime secuencia 1.
Fichero_cd_in2(2);
// Imprime_Estaticos( 2, "cd_in.img"); // Imprime botones estaticos 'Seccion 2'
// para los textos
/*Û*/ PunteroRaton = 100; /*Û*/
/*Û*/ inicializa_raton_grafico( 0, 0, 618, 460); /*Û*/
/*Û*/ if ( PunteroRaton != 100 ) { /*Û*/
/*Û*/ closegraph(); /*Û*/
/*Û*/ cprintf("Memoria_Insuficiente para el RATON\n\r");/*Û*/
/*Û*/ exit(1); /*Û*/
/*Û*/ } /*Û*/
Inicializa_Iconos();
Coloca_Iconos_Dos_Windows();
Coloca_Iconos(1);
ENCIENDE_PANTALLA(dac);
/*
if ( (Pantalla = malloc( JD_imagesize(0, 0, 21, 21) )) == NULL ) {
Imprime_Estaticos( SIN_CVN, "cd_in.img"); // Imprime botones estaticos 'Seccion 2'
Espera_Tecla_o_Raton();
closegraph();
cprintf("\n\rError en la asignaci¢n de memoria para la mascara del raton");
exit(2);
}
*/
True_Push = ON; // Activa el TRUE PUSH ( PRESION REAL )
Menu_de_Edicion();
/*
free(P_Raton1);
free(P_Raton2);
free(P_Raton3);
free(P_Raton4);
*/
APAGA_PANTALLA(dac);
closegraph();
/*
farfree(Icono);
free(Pantalla);
*/
Libera_Raton_Animado();
cprintf("Gracias por utilizar mi Software\n\r");
cprintf(" Jos David Guilln\n\r");
cprintf("\n\r");
return 0;
}
void InicializaSVGA(void) {
int Gd = DETECT, Gm;
int Drv, errorcode;
installuserdriver("Svga256",DetectVGA256);
/* If driver is linked with file, remove comments */
registerfarbgidriver(Svga256_fdriver);
errorcode = registerfarbgifont(small_font_far);
/* report any registration errors */
if (errorcode < 0)
{
printf("Graphics error: %s\n", grapherrormsg(errorcode));
printf("Press any key to halt:");
getch();
exit(1); /* terminate with an error code */
}
initgraph(&Gd,&Gm,"");
/* read result of initialization */
errorcode = graphresult();
if (errorcode != grOk) /* an error occurred */
{
printf("Graphics error: %s\n", grapherrormsg(errorcode));
printf("Presione una tecla para finalizar:");
getch();
exit(1); /* return with error code */
}
}

294
CD_IN/P_RATON1.CPP Normal file
View File

@ -0,0 +1,294 @@
int Carga_Puntero_Animado(void) {
int n = ( 20 * 20 );
if( ((P_Raton1 = (unsigned char *)malloc( n ))==NULL) ||
((P_Raton2 = (unsigned char *)malloc( n ))==NULL) ||
((P_Raton3 = (unsigned char *)malloc( n ))==NULL) ||
((P_Raton4 = (unsigned char *)malloc( n ))==NULL) ) {
return 1;
}
*P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ;
*P_Raton1++ = NEGRO ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ;
*P_Raton1++ = BLANCO ; *P_Raton1++ = NEGRO ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ;
*P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = NEGRO ; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ;
*P_Raton1++ = BLANCO ; *P_Raton1++ = NEGRO ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ;
*P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = NEGRO ; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = BLANCO ; *P_Raton1++ = NEGRO ;
*P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ;
*P_Raton1++ = BLANCO ; *P_Raton1++ = NEGRO ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = BLANCO ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ;
*P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = NEGRO ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = BLANCO ; *P_Raton1++ = NEGRO ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = BLANCO ; *P_Raton1++ = NEGRO ; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = AZUL ;
*P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ;
*P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ;
*P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = UNKNOW ; *P_Raton1++ = UNKNOW ;
*P_Raton1++ = UNKNOW ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ;
*P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = UNKNOW ;
*P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ;
*P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ;
*P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = AZUL ;
*P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ;
*P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = AZUL ;
*P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ;
*P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ;
*P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = UNKNOW ; *P_Raton1++ = AZUL ;
*P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = AZUL ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = UNKNOW ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = UNKNOW ; *P_Raton1++ = UNKNOW ; *P_Raton1++ = GRIS_CLARO;
*P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO; *P_Raton1++ = GRIS_CLARO;
*P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = NEGRO ;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ;
*P_Raton2++ = NEGRO ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ;
*P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = NEGRO ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ;
*P_Raton2++ = NEGRO ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = BLANCO ; *P_Raton2++ = NEGRO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ;
*P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = NEGRO ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = BLANCO ; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = BLANCO ; *P_Raton2++ = NEGRO ; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = BLANCO ; *P_Raton2++ = NEGRO ;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ;
*P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ;
*P_Raton2++ = AZUL ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = AZUL ;
*P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ;
*P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = UNKNOW ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = UNKNOW ;
*P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = AZUL ;
*P_Raton2++ = AZUL ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ;
*P_Raton2++ = UNKNOW ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = AZUL ;
*P_Raton2++ = AZUL ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ;
*P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ;
*P_Raton2++ = UNKNOW ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ;
*P_Raton2++ = UNKNOW ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = UNKNOW ;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = UNKNOW ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ;
*P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = AZUL ; *P_Raton2++ = UNKNOW ;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = UNKNOW ;
*P_Raton2++ = UNKNOW ; *P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = UNKNOW ;
*P_Raton2++ = UNKNOW ; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO; *P_Raton2++ = GRIS_CLARO;
*P_Raton3++ = BLANCO ; *P_Raton3++ = BLANCO ; *P_Raton3++ = BLANCO ; *P_Raton3++ = BLANCO ; *P_Raton3++ = NEGRO ; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = BLANCO ; *P_Raton3++ = BLANCO ; *P_Raton3++ = BLANCO ; *P_Raton3++ = NEGRO ;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = BLANCO ; *P_Raton3++ = BLANCO ;
*P_Raton3++ = BLANCO ; *P_Raton3++ = BLANCO ; *P_Raton3++ = NEGRO ; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = BLANCO ; *P_Raton3++ = NEGRO ; *P_Raton3++ = BLANCO ; *P_Raton3++ = BLANCO ; *P_Raton3++ = BLANCO ; *P_Raton3++ = NEGRO ;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = BLANCO ; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = BLANCO ;
*P_Raton3++ = BLANCO ; *P_Raton3++ = NEGRO ; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ;
*P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = AZUL ;
*P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ;
*P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ;
*P_Raton3++ = UNKNOW ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ;
*P_Raton3++ = UNKNOW ; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ;
*P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = AZUL ;
*P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = AZUL ;
*P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ;
*P_Raton3++ = UNKNOW ; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = AZUL ;
*P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = AZUL ;
*P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ;
*P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ;
*P_Raton3++ = UNKNOW ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ; *P_Raton3++ = AZUL ;
*P_Raton3++ = UNKNOW ; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = UNKNOW ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = UNKNOW ;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton3++ = UNKNOW ; *P_Raton3++ = UNKNOW ; *P_Raton3++ = GRIS_CLARO; *P_Raton3++ = GRIS_CLARO;
*P_Raton4++ = BLANCO ; *P_Raton4++ = BLANCO ; *P_Raton4++ = BLANCO ; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = BLANCO ; *P_Raton4++ = BLANCO ; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = BLANCO ; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = BLANCO ; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = BLANCO ; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = UNKNOW ; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ;
*P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = UNKNOW ; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ;
*P_Raton4++ = UNKNOW ; *P_Raton4++ = UNKNOW ; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = UNKNOW ; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ;
*P_Raton4++ = UNKNOW ; *P_Raton4++ = AZUL ; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ;
*P_Raton4++ = UNKNOW ; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = UNKNOW ; *P_Raton4++ = UNKNOW ; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = UNKNOW ; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = UNKNOW ; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = UNKNOW ; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ;
*P_Raton4++ = UNKNOW ; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = UNKNOW ; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ;
*P_Raton4++ = UNKNOW ; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = UNKNOW ; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ;
*P_Raton4++ = AZUL ; *P_Raton4++ = UNKNOW ; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ;
*P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ; *P_Raton4++ = UNKNOW ; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = AZUL ; *P_Raton4++ = AZUL ;
*P_Raton4++ = AZUL ; *P_Raton4++ = UNKNOW ; *P_Raton4++ = UNKNOW ; *P_Raton4++ = UNKNOW ; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO; *P_Raton4++ = GRIS_CLARO;
*P_Raton4++ = GRIS_CLARO; *P_Raton4++ = UNKNOW ; *P_Raton4++ = UNKNOW ; *P_Raton4++ = GRIS_CLARO;
return 0;
}
void Libera_Raton_Animado(void){
free(P_Raton1);
free(P_Raton2);
free(P_Raton3);
free(P_Raton4);
}

67
CD_IN/P_RATON2.CPP Normal file
View File

@ -0,0 +1,67 @@
*P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = NEGRO ;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ;
*P_Ratonx++ = NEGRO ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ;
*P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = NEGRO ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ;
*P_Ratonx++ = NEGRO ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = NEGRO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ;
*P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = NEGRO ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = NEGRO ; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = NEGRO ;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = UNKNOW ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = UNKNOW ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;

67
CD_IN/P_RATON3.CPP Normal file
View File

@ -0,0 +1,67 @@
*P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = NEGRO ; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = NEGRO ;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ;
*P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = NEGRO ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = BLANCO ; *P_Ratonx++ = NEGRO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = NEGRO ;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = BLANCO ;
*P_Ratonx++ = BLANCO ; *P_Ratonx++ = NEGRO ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;

67
CD_IN/P_RATON4.CPP Normal file
View File

@ -0,0 +1,67 @@
*P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = BLANCO ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = BLANCO ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = AZUL ; *P_Ratonx++ = AZUL ;
*P_Ratonx++ = AZUL ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = GRIS_CLARO;
*P_Ratonx++ = GRIS_CLARO; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = UNKNOW ; *P_Ratonx++ = GRIS_CLARO;

1
CD_IN/R.BAT Normal file
View File

@ -0,0 +1 @@
edit cd_in.img

1000
CD_IN/SORT_CD.CPP Normal file

File diff suppressed because it is too large Load Diff

BIN
CD_IN/SUPERVGA.OBJ Normal file

Binary file not shown.

559
CD_INST.CPP Normal file
View File

@ -0,0 +1,559 @@
#include <ctype.h>
#include <io.h>
#include <dir.h>
#include <DIRECT.H>
#include <dos.h>
#include <alloc.h>
#include <process.h>
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
#include <graphics.h>
#include "..\libs\make_bot\make_bot.h"
//#include "cd_icons.h"
#include "cd_error.h"
#include "cd_file.h"
#include "CD_SND.H"
extern int /*far _cdecl*/ Fichero_cd_img(char Dinamicos_Estaticos);
#define DOS 1
#define WINDOWS 2
int make_dir(char *Target);
extern void Sonido(char Sonido);
extern void BEEP(void);
void Init_Install(int CurrIcon);
extern char *current_directory(char *path);
extern void Inicializa_Dibujo(int L_Imagen, char *N_Imagen2);
extern void Inicializa_Iconos(void);
extern void Coloca_Iconos_Dos_Windows(void);
extern char far *Icono; // 18
// extern unsigned char *P_Raton1, *P_Raton2, *P_Raton3, *P_Raton4;
// extern void *Pantalla;
extern void InicializaSVGA(void);
extern char dac[256*3];
extern "C" void APAGA_PANTALLA(char *);
extern "C" void ENCIENDE_PANTALLA(char *);
extern void Inicializa_Apertura(void);
// extern void Menu_de_Edicion(void);
extern void Coloca_Iconos(int Start_Icon);
int file_exists(char *filename);
int Muestra_Mensaje(int Mensaje, char *file);
typedef struct {
unsigned int Exit_after_EXE : 1;
unsigned int With_Out_Sound : 1;
unsigned int Auto_Install : 1;
unsigned int Check_Free_Size : 1;
unsigned int Format_Always : 1;
unsigned int Without_Backgr : 1;
unsigned int Futura_Ampliac : 4;
} Cd_CFG;
extern Cd_CFG CD_CFG1;
extern FILE *CD_in;
extern CD_FILE CD_in2;
int InputCadenaG_T4(char *s, int numalp, int lmax, int cc, int cf, int X0, int Y0, int X1, int Y1, int RoW);
void Init_Install(int CurrIcon){
int ok = 0, inst = 0, key;
char curdir[80], *Ptr, Origen[80];
char Buffer[200], D_Target[80];
D_Target[0] = '\0';
// ERROR_SALVA = 0;
void *C_Texto, *C_Aceptar, *C_Cancelar;
/// Comprobamos que estamos preparados para proceder con
/// la instalaci¢n pertinente...
strcpy( Buffer, CD_in2.Dir_P ); // Existe el directorio
Buffer[0] = getdisk() + 'A'; // origen...
if ( !file_exists(Buffer) ) { Muestra_Mensaje(113, "cd_out.img");
// Sonido("CD_OUT71.WAV");
Sonido( Error_113 );
return; }
C_Texto = malloc( JD_imagesize(200, 212, 440, 267) );
C_Aceptar = malloc( JD_imagesize(200, 270, 280, 295) );
C_Cancelar = malloc( JD_imagesize(360, 270, 440, 295) );
if( C_Texto == NULL || C_Aceptar == NULL || C_Cancelar == NULL) {
closegraph();
cprintf("\n\rSALIENDO");
cprintf("\n\rImposible encontrar %ldKbytes en el Heap",
( JD_imagesize(118, 160, 521, 335) +
JD_imagesize(118, 160, 521, 335) +
JD_imagesize(118, 160, 521, 335)
)
);
exit(SIN_MEMORIA);
}
getimage(200, 212, 440, 267, C_Texto);
getimage(200, 270, 280, 295, C_Aceptar);
getimage(360, 270, 440, 295, C_Cancelar);
// Imprime_Estaticos(20, "cd_out.img"); // Imprime botones estaticos 'Seccion 20'
Fichero_cd_img(20);
Imprime_Secuencia(4); // Imprime secuencia 4.
// Imprime_Estaticos(21, "cd_out.img"); // Imprime textos estaticos 'Seccion 5'
Fichero_cd_img(21);
settextstyle( SMALL_FONT, HORIZ_DIR, 4);
if ( CD_in2.Alt_Install.Usar_Install_P == 1 ) {
setcolor(241);
outtextxy(215, 243, " - USAR INSTALADOR PROPIO -");
}
while(!ok){ // Bucle infinito
switch( Comprueba_Secuencia( 4 ) ) { // Iniciamos comprobacion de 2¦ sec
case 0: // No se pulso ningun BOTON
// Pero el raton fue presionado en
// algun sitio...
// Sonido("CD_OUT02.WAV");
Sonido( Key_Press );
break;
case -2: // Hay una tecla normal en BUFFER
switch( key = getch() ) { // La utilizamos
// Intro ( ACEPTAR )
// case 13:
// exe = 1;
// ok = 1;
// break;
// ESC ( CANCELAR )
case 14:
// Sonido("CD_OUT0F.WAV");
Sonido( Cancel );
inst = 0;
ok = 1;
break;
default:
if( ( isprint(key) || isspace(key) ) && CD_in2.Alt_Install.Usar_Install_P == 0 ) {
if(key!=13) ungetch(key);
if ( CD_in2.Alt_Install.Usar_VGA_COPY==0 )
InputCadenaG_T4(D_Target, 0, 35, 241, 240, 215, 243, 427, 254, 0);
else
InputCadenaG_T4(D_Target, 0, 1, 241, 240, 215, 243, 427, 254, 0);
}
break;
}
break;
case -1: // Hay una tecla especial en BUFFER
getch(); // La eliminamos
break;
// Boton Aceptar
case 1:
// Sonido("CD_OUT0E.WAV");
Sonido( Ok );
inst = 1;
ok = 1;
break;
// Boton Cancelar
case 2:
// Sonido("CD_OUT0F.WAV");
Sonido( Cancel );
inst = 0;
ok = 1;
break;
default:
// Sonido("CD_OUT01.WAV");
Sonido( Mouse_Press );
while( kbhit() ) getch(); // Limpiamos posibles teclas en BUFFER
break;
}
}
putimage(200, 212, C_Texto, COPY_PUT);
putimage(200, 270, C_Aceptar, COPY_PUT);
putimage(360, 270, C_Cancelar, COPY_PUT);
if ( CD_in2.Alt_Install.Usar_Install_P == 0 && !file_exists(D_Target) )
if ( make_dir(D_Target)!= 1 ) return;
if ( inst == 1 ) {
/// Liberamos la memoria asignada para al DRIVER gr fico...
current_directory(curdir);
APAGA_PANTALLA(dac);
closegraph();
Libera_Memoria();
// Libera_Raton_Animado();
/*
free(P_Raton1);
free(P_Raton2);
free(P_Raton3);
free(P_Raton4);
free(Pantalla);
*/
farfree(Icono);
fclose(CD_in);
/*
C O M I E N Z A L A I N S T A L A C I O N D E L P R O G R A M A
*/
cprintf("ÚÄÄÄÄÄÄÄÄÄÄÄÄÄ¿\n\r");
cprintf("³ JD & CD_OUT ³\n\r");
cprintf("ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÙ\n\r");
cprintf("INSTALANDO PROGRAMA: [%s]\n\r", CD_in2.Nombre);
strcpy( Buffer, CD_in2.Dir_P ); // Existe el directorio
Buffer[0] = getdisk() + 'A'; // origen...
chdir(Buffer); // Refresamos a nuestro directorio
strcpy( Origen, Buffer );
strcat( Origen, "\\*.*");
if ( CD_in2.Alt_Install.Usar_XCopy == 1 ) {
if ( ( Ptr = searchpath("xcopy.exe") ) != NULL ) {
strcpy( Buffer, Ptr );
} else {
strcpy( Buffer, "E:\\cd_out\\compress\\xcopy " );
Buffer[0] = getdisk() + 'A'; // origen...
}
strcat(D_Target, "\\*.*" );
if ( spawnl(P_WAIT, Buffer, "VOID", Origen, D_Target, "/s", "/e", "/y", NULL) == -1 ) {
printf("Imposible instalar %s, XCOPY no acepta parametrizaje", Buffer);
getch();
}
} else
if ( CD_in2.Alt_Install.Usar_Install_P == 1 ) {
strcpy( Origen, Buffer );
strcat( Origen, "\\");
strcat( Origen, CD_in2.N_Install);
if ( spawnl(P_WAIT, /*CD_in2.N_Install*/Origen, NULL) == -1 ) {
printf("Imposible ejecutar %s, el archivo no esta disponible", Buffer);
getch();
}
} else
if ( CD_in2.Alt_Install.Usar_ARJ == 1 ) {
strcpy( Origen, Buffer );
strcat( Origen, "\\*.arj");
if ( ( Ptr = searchpath("ARJ.EXE") ) != NULL ) {
strcpy( Buffer, Ptr );
} else {
strcpy( Buffer, "E:\\cd_out\\compress\\ARJ" );
Buffer[0] = getdisk() + 'A'; // origen...
}
if ( spawnl(P_WAIT, Buffer, "VOID", "x", "-va", /*"*.arj"*/Origen, D_Target, NULL) == -1 ) {
printf("Imposible instalar %s, ARJ no ejecutable.", CD_in2.Nombre);
getch();
}
} else
if ( CD_in2.Alt_Install.Usar_ZIP == 1 ) {
strcpy( Origen, Buffer );
strcat( Origen, "\\*.zip");
if ( ( Ptr = searchpath("PKUNZIP.EXE") ) != NULL ) {
strcpy( Buffer, Ptr );
} else {
strcpy( Buffer, "E:\\cd_out\\compress\\PKUNZIP" );
Buffer[0] = getdisk() + 'A'; // origen...
}
if ( spawnl(P_WAIT, Buffer, "VOID", "-$", "-d", /*"*.zip"*/Origen, D_Target, NULL) == -1 ) {
printf("Imposible instalar %s, ZIP no ejecutable.", CD_in2.Nombre);
getch();
}
}
// unsigned int Usar_VGA_COPY : 1;
clrscr();
cprintf("ÚÄÄÄÄÄÄÄÄÄÄÄÄÄ¿\n\r");
cprintf("³ JD & CD_OUT ³\n\r");
cprintf("ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÙ\n\r");
cprintf("Regresando a CD_OUT...\n\r");
//// Recargamos el Programa...
chdir(curdir); // Refresamos a nuestro directorio
// de origen
InicializaSVGA(); // Reinicializamos la SVGA
APAGA_PANTALLA(dac); // Apagamos la Pantalla
Inicializa_Dibujo( (-1), "NADA"); // Inicializamos un nuevo dibujo
// if( carga_botones("cd_out.img") // Recarga botones del fichero "CD_out.img"
if ( Fichero_cd_img(0)
!= OK ) {
// Imprime_Estaticos( 112, "cd_out.img");
Fichero_cd_img(112);
Espera_Tecla_o_Raton();
closegraph();
cprintf("\n\rError en la CARGA DE BOTONES");
exit(112);
}
// Imprime_Estaticos( 1, "cd_out.img"); // Imprime botones estaticos 'Seccion 1'
Fichero_cd_img(1);
Imprime_Secuencia(1); // Imprime secuencia 1.
// Imprime_Estaticos( 2, "cd_out.img"); // Imprime botones estaticos 'Seccion 2'
// para los textos
Fichero_cd_img(2);
/*Û*/ PunteroRaton = 100; /*Û*/
/*Û*/ inicializa_raton_grafico( 0, 0, 618, 460); /*Û*/
/*Û*/ if ( PunteroRaton != 100 ) { /*Û*/
/*Û*/ closegraph(); /*Û*/
/*Û*/ cprintf("Memoria_Insuficiente para el RATON\n\r");/*Û*/
/*Û*/ exit(1); /*Û*/
/*Û*/ } /*Û*/
Inicializa_Iconos();
Coloca_Iconos_Dos_Windows();
Coloca_Iconos(CurrIcon);
ENCIENDE_PANTALLA(dac);
/*
if ( (Pantalla = malloc( JD_imagesize(0, 0, 21, 21) )) == NULL ) {
Imprime_Estaticos( SIN_CVN, "cd_out.img");
Espera_Tecla_o_Raton();
closegraph();
cprintf("\n\rError en la asignaci¢n de memoria para la mascara del raton");
exit(2);
}
*/
Imprime_Bordes(1, 1, 251);
settextstyle( SMALL_FONT, HORIZ_DIR, 4);
Inicializa_Apertura();
True_Push = ON; // Activa el TRUE PUSH ( PRESION REAL )
}
}
int InputCadenaG_T4(char *s, int numalp, int lmax, int cc, int cf, int X0, int Y0, int X1, int Y1, int RoW)
{
int ls; // longitud cadena
char *s1; // puntero a cadena inicial
int c, ok;
s1 = s; // inicio cadena
setcolor(cf); // pone color a 0 para borrar
setfillstyle(SOLID_FILL, cf);
bar( X0, Y0, X1, Y1 );
setcolor(cc); // devuelve el color a su estado
outtextxy( X0, Y0+RoW*12, s );
ls = strlen ( s ); // Longitud de actual
if ( ls < lmax ) {
setcolor(250);
outtextxy( X0+textwidth( s1 ), Y0+RoW*12, "þ");
}
s += ls; // se coloca en el final
do{
c = getch(); // obtiene tecla
ok = ( c == 13 || c == 0); // 13 = INTRO || Especiales
if ( c == 8 && ls > 0 && !ok ) { // 8 = Back Space
ls--;
s--;
*s = '\0';
setcolor(cf);
setfillstyle(SOLID_FILL, cf);
bar( X0, Y0, X1, Y1 );
setcolor(cc);
outtextxy( X0, Y0+RoW*12, s1 );
setcolor(4);
outtextxy( X0+textwidth( s1 ), Y0+RoW*12, "þ");
setcolor(cc);
} else {
if ( !numalp && c >= 32 && c <= 254 && ls < lmax) {
*s++ = c;
ls++;
*s = '\0';
setcolor(cf);
setfillstyle(SOLID_FILL, cf);
bar( X0, Y0, X1, Y1 );
setcolor(cc);
outtextxy( X0, Y0+RoW*12, s1 );
if ( ls < lmax ) {
setcolor(4);
outtextxy( X0+textwidth( s1 ), Y0+RoW*12, "þ");
setcolor(cc);
}
} else {
if ( numalp && isdigit(c) && ls < lmax) {
*s++ = c;
ls++;
*s = '\0'; // Cero final
setcolor(cf);
setfillstyle(SOLID_FILL, cf);
bar( X0, Y0, X1, Y1 );
setcolor(cc);
outtextxy( X0, Y0+RoW*12, s1 );
if ( ls < lmax ) {
setcolor(4);
outtextxy( X0+textwidth( s1 ), Y0+RoW*12, "þ");
setcolor(cc);
}
}
// ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
else if( c == 27 ) {*s='\0'; ok = 1; }
// ÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛÛ
else BEEP();
}
}
}while(!ok);
ok = 1;
*s = ' ';
while( ok ) {
if(*s==' ') { *s = '\0'; s--;
} else { s++; ok = 0; }
}
*s = '\0';
while(kbhit()) getch(); // Vacia Buffer impidiendo falsas
// pulsaciones...
setcolor(cf);
setfillstyle(SOLID_FILL, cf);
bar( X0, Y0, X1, Y1 );
setcolor(cc);
outtextxy( X0, Y0+RoW*12, s1 );
return ls;
}
int file_exists(char *filename)
{
return (access(filename, 0) == 0);
}
int Muestra_Mensaje(int Mensaje, char *file) {
void *Imagen;
if ( (Imagen = malloc( JD_imagesize(200, 212, 440, 267) ) ) == NULL ) {
Espera_Tecla_o_Raton();
Anclar_Raton();
return -1;
} else {
getimage( 200, 212, 440, 267, Imagen );
// Imprime_Estaticos( Mensaje, file);
Fichero_cd_img(Mensaje);
Espera_Tecla_o_Raton();
Anclar_Raton();
putimage( 200, 212, Imagen, COPY_PUT);
free(Imagen);
return 1;
}
}
int make_dir(char *Target){
char CurrDriver, Buffer[80], Crear_Dir[14], ok = 0, Contador=0, Sub_Cnt;
CurrDriver = getdisk(); // Obtenemos el directorio origen
strcpy( Buffer, Target ); // Realizamos una copia del Destino
strupr( Buffer ); // Lo transformamos a mayusculas
if ( Buffer[strlen(Buffer)] == '\\' ) // Si acaba en '\' ERROR
return 0;
// para que al restarle 65 = 'A'
setdisk( ( Buffer[0] - 'A' ) ); // nos de el n£mero l¢gico de unidad
if ( getdisk() != ( Buffer[0] - 'A' ))
return 0; // Si no podemos cambiar. Return 0;
if ( chdir("\\") ) // Nos vamos al ra¡z
return 0; // Si no podemos, ERROR !!!
Contador = 3;
do {
Sub_Cnt = 0;
while( Buffer[Contador] != '\\' && Buffer[Contador] != '\0' ) {
Crear_Dir[Sub_Cnt] = Buffer[Contador];
Contador++;
Sub_Cnt ++;
}
// Sub_Cnt++;
Contador++;
if ( Buffer[Contador-1] == NULL ) ok = 1;
Crear_Dir[Sub_Cnt] = '\0';
if ( !file_exists(Crear_Dir) ) {
if ( mkdir( Crear_Dir ) != 0 ) ok = 2; else
chdir( Crear_Dir );
} else
chdir( Crear_Dir );
}while(!ok);
if ( ok == 2 ) return 0;
if ( chdir("\\") ) return 0;
setdisk(CurrDriver);
if ( getdisk() != CurrDriver) // Volvemos hasta nuestra unidad
return 0;
return 1;
}

412
CD_OUT.CPP Normal file
View File

@ -0,0 +1,412 @@
///////////////////////////// FICHEROS A INCLUIR /////////////////////////////
#include <dos.h>
#include <conio.h>
#include <alloc.h>
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <graphics.h>
#include "CD_SND.H"
//extern unsigned _stklen = 16000U;
#include "XmsSupp.h"
#include "cd_icons.h"
#include "cd_error.h"
#include "c:\program\src_dos\libs\make_bot\make_bot.h"
#include "c:\program\src_dos\libs\wavplav\wavplay.h"
extern int /*far _cdecl*/ Fichero_cd_img(char Dinamicos_Estaticos);
extern int far _Cdecl Svga256_fdriver[];
int huge DetectVGA256(){ return 2; }
int Load_Snd(void);
extern void Menu_de_Edicion(void);
extern void Inicializa_Iconos(void);
extern Abre_Ficha_CD_CFG(int R_W);
extern void Coloca_Iconos(int Start_Icon);
extern void Coloca_Iconos_Dos_Windows(void);
extern void Inicializa_Dibujo(int L_Imagen, char *N_Imagen2);
extern char far *Icono;
void InicializaSVGA(void);
extern char dac[256*3];
extern "C" void APAGA_PANTALLA(char *);
extern "C" void ENCIENDE_PANTALLA(char *);
extern char far *dir_vga;
extern "C" void CHANGE_BANK(int);
char _XMS = 1;
// int Raton_o_Tecla(void);
void Sonido( char Sonido );
typedef struct {
unsigned int Exit_after_EXE : 1;
unsigned int With_Out_Sound : 1;
unsigned int Auto_Install : 1;
unsigned int Check_Free_Size : 1;
unsigned int Format_Always : 1;
unsigned int Without_Backgr : 1;
unsigned int Futura_Ampliac : 4;
} Cd_CFG;
extern Cd_CFG CD_CFG1;
char _VerImagen = 1;
XmsSupp Xms_Image_Bank1,
Xms_Image_Bank2,
Xms_Image_Bank3,
Xms_Image_Bank4,
Xms_Image_Bank5;
typedef struct
{
char Nombre_del_Programa[70];
char Comentario_Inicial[70];
char VerHi, VerLow;
char Register;
long Records;
} CABECERA;
typedef struct
{
char Wave_Name[13]; // Nombre del Wave
char ID_code; // Codigo ID_ del Wave
unsigned long Pos; // Posici¢n de comienzo dentro del archivo destino
unsigned long Len; // Longitud
} CD_SND;
CD_SND CD_Snd[19];
int main(int argc, char *argv[]){
// /*Û*/ if( Fichero_cd_img(0) /*Û*/
// /*Û*/ == SIN_MEMORIA ) { // "botones.p1" /*Û*/
// /*Û*/ closegraph(); /*Û*/
// /*Û*/ cprintf("\n\rError en la CARGA DE BOTONES"); /*Û*/
// /*Û*/ exit(112); /*Û*/
// /*Û*/ } /*Û*/
// despliega_datos();
// getch();
// return 21;
int L_Imagen = -1;
char *N_Imagen2;
// ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
// Û Carga de los argumentos Û
//ÛßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßÛ//
/*Û*/ /*Û*/
/*Û*/ for(int i=1; i<=argc; i++) /*Û*/
/*Û*/ { /*Û*/
/*Û*/ if( strcmp( argv[i], "-0") == 0 ) L_Imagen=0; else /*Û*/
/*Û*/ if( strcmp( argv[i], "-1") == 0 ) L_Imagen=1; else /*Û*/
/*Û*/ if( strcmp( argv[i], "-2") == 0 ) L_Imagen=2; else /*Û*/
/*Û*/ if( strcmp( argv[i], "-3") == 0 ) L_Imagen=3; else /*Û*/
/*Û*/ if( strcmp( argv[i], "-4") == 0 ) L_Imagen=4; else /*Û*/
/*Û*/ if( strcmp( argv[i], "-5") == 0 ) L_Imagen=5; else /*Û*/
/*Û*/ if( strcmp( argv[i], "-6") == 0 ) L_Imagen=6; else /*Û*/
/*Û*/ if( strcmp( argv[i], "-7") == 0 ) L_Imagen=7; else /*Û*/
/*Û*/ if( strcmp( argv[i], "-8") == 0 ) L_Imagen=8; else /*Û*/
/*Û*/ if( strcmp( argv[i], "-9") == 0 ) L_Imagen=9; else /*Û*/
/*Û*/ if( strncmpi( argv[i], "-N:", 3) == 0 ) { L_Imagen=-2; /*Û*/
/*Û*/ N_Imagen2 = argv[i]; /*Û*/
/*Û*/ N_Imagen2 += 3; /*Û*/
/*Û*/ } else /*Û*/
/*Û*/ if( strcmp( argv[i], "-NO_XMS") == 0 ) _VerImagen = 0; /*Û*/
/*Û*/ if( strcmp( argv[i], "-NO_SND") == 0 ) CD_CFG1.With_Out_Sound=1;/*Û*/
/*Û*/ } /*Û*/
/*Û*/ /*Û*/
//ÛÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÛ//
// ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
// Û Carga la Configuraci¢n Û
//ÛßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßÛ//
/*Û*/ /*Û*/
/*Û*/ clrscr(); /*Û*/
/*Û*/ cprintf("JD & CD_OUT\r\n\r\n"); /*Û*/
/*Û*/ cprintf("Cargando fichero de Configuraci¢n. "); /*Û*/
/*Û*/ Abre_Ficha_CD_CFG(0); /*Û*/
/*Û*/ cprintf(" --> Ok!\n\r"); /*Û*/
/*Û*/ /*Û*/
//ÛÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÛ//
// ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
// Û Inicializaci¢n Sonidos Û
//ÛßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßÛ//
/*Û*/ if ( !CD_CFG1.With_Out_Sound ) /*Û*/
/*Û*/ { /*Û*/
/*Û*/cprintf("Inicializando sonidos. "); /*Û*/
/*Û*/ switch ( InitSB() ) { /*Û*/
/*Û*/ case 0: /*Û*/
/*Û*/ cprintf(" --> Speaker Ok!\n\r"); /*Û*/
/*Û*/ break; /*Û*/
/*Û*/ case 1: /*Û*/
/*Û*/ cprintf(" --> Sound Blaster Ok!\n\r"); /*Û*/
/*Û*/ break; /*Û*/
/*Û*/ case 2: /*Û*/
/*Û*/ cprintf(" --> Dac Casero Ok!\n\r"); /*Û*/
/*Û*/ break; /*Û*/
/*Û*/ } /*Û*/
/*Û*/ } else cprintf(" --> Sin Sonidos Ok!\n\r"); /*Û*/
/*Û*/ /*Û*/
/*Û*/cprintf("Cargando estructura de sonidos. "); /*Û*/
/*Û*/if( !Load_Snd() ) /*Û*/
/*Û*/{ /*Û*/
/*Û*/ CD_CFG1.With_Out_Sound = 0; /*Û*/
/*Û*/ cprintf(" --> ERROR EN LA CARGA DE SONIDOS!\n\r"); /*Û*/
/*Û*/} else { /*Û*/
/*Û*/ cprintf(" --> Ok!\n\r"); /*Û*/
/*Û*/} /*Û*/
/*Û*/ /*Û*/
/*Û*/ /*Û*/
/*Û*/ /*Û*/
//ÛÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÛ//
// ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
// Û Inicializaci¢n de la XMS Û
//ÛßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßÛ//
/*Û*/ /*Û*/
/*Û*/ cprintf("Inicializando XMS... \n\r"); /*Û*/
/*Û*/ /*Û*/
/*Û*/ // Errores en Inicializacion XMS. /*Û*/
/*Û*/ /*Û*/
/*Û*/ Xms_Image_Bank1.lError=0; /*Û*/
/*Û*/ Xms_Image_Bank2.lError=0; /*Û*/
/*Û*/ Xms_Image_Bank3.lError=0; /*Û*/
/*Û*/ Xms_Image_Bank4.lError=0; /*Û*/
/*Û*/ Xms_Image_Bank5.lError=0; /*Û*/
/*Û*/ /*Û*/
/*Û*/ InitXms(&Xms_Image_Bank1); /*Û*/
/*Û*/ InitXms(&Xms_Image_Bank2); /*Û*/
/*Û*/ InitXms(&Xms_Image_Bank3); /*Û*/
/*Û*/ InitXms(&Xms_Image_Bank4); /*Û*/
/*Û*/ InitXms(&Xms_Image_Bank5); /*Û*/
/*Û*/ /*Û*/
/*Û*/ GetInfo(&Xms_Image_Bank1); // Informe de estado. /*Û*/
/*Û*/ if(Xms_Image_Bank1.lError || Xms_Image_Bank2.lError || /*Û*/
/*Û*/ Xms_Image_Bank3.lError || Xms_Image_Bank4.lError || /*Û*/
/*Û*/ Xms_Image_Bank5.lError )/*Û*/
/*Û*/ /*Û*/
/*Û*/ { /*Û*/
/*Û*/ printf("Bank1 %s\n",Xms_Image_Bank1.cError); /*Û*/
/*Û*/ printf("Bank2 %s\n",Xms_Image_Bank2.cError); /*Û*/
/*Û*/ printf("Bank3 %s\n",Xms_Image_Bank3.cError); /*Û*/
/*Û*/ printf("Bank4 %s\n",Xms_Image_Bank4.cError); /*Û*/
/*Û*/ printf("Bank5 %s\n",Xms_Image_Bank5.cError); /*Û*/
/*Û*/ _XMS = 0; /*Û*/
/*Û*/ } /*Û*/
/*Û*/ // Reservamos 64K * 5 bancos. Si hay Error lo Visualizamos. /*Û*/
/*Û*/ AllocXms( 64, &Xms_Image_Bank1); /*Û*/
/*Û*/ AllocXms( 64, &Xms_Image_Bank2); /*Û*/
/*Û*/ AllocXms( 64, &Xms_Image_Bank3); /*Û*/
/*Û*/ AllocXms( 64, &Xms_Image_Bank4); /*Û*/
/*Û*/ AllocXms( 64, &Xms_Image_Bank5); /*Û*/
/*Û*/ if(Xms_Image_Bank1.lError || Xms_Image_Bank2.lError || /*Û*/
/*Û*/ Xms_Image_Bank3.lError || Xms_Image_Bank4.lError || /*Û*/
/*Û*/ Xms_Image_Bank5.lError )/*Û*/
/*Û*/ /*Û*/
/*Û*/ { /*Û*/
/*Û*/ printf("Bank1 %s\n",Xms_Image_Bank1.cError); /*Û*/
/*Û*/ printf("Bank2 %s\n",Xms_Image_Bank2.cError); /*Û*/
/*Û*/ printf("Bank3 %s\n",Xms_Image_Bank3.cError); /*Û*/
/*Û*/ printf("Bank4 %s\n",Xms_Image_Bank4.cError); /*Û*/
/*Û*/ printf("Bank5 %s\n",Xms_Image_Bank5.cError); /*Û*/
/*Û*/ _XMS = 0; /*Û*/
/*Û*/ /*Û*/
/*Û*/ } /*Û*/
//ÛÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÛ//
// ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
// Û Inicializaci¢n Pantalla Û
//ÛßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßÛ//
/*Û*/ /*Û*/
/*Û*/ InicializaSVGA(); /*Û*/
///*Û*/ APAGA_PANTALLA(dac); /*Û*/
/*Û*/ memset( dac, 0, 256*3 ); /*Û*/
unsigned Segt = FP_SEG(dac), Off = FP_OFF(dac);
/*Û*/ asm mov ax, 0x1012 ; /*Û*/
/*Û*/ asm mov bx, 0 ; /*Û*/
/*Û*/ asm mov cx, 256 ; /*Û*/
/*Û*/ asm mov es, Segt ; /*Û*/
/*Û*/ asm mov dx, Off ; /*Û*/
/*Û*/ asm int 0x10 ; /*Û*/
/*Û*/ /*Û*/
/*Û*/ if( CD_CFG1.Without_Backgr != 1 ) /*Û*/
/*Û*/ Inicializa_Dibujo( L_Imagen, N_Imagen2 ); /*Û*/
/*Û*/ /*Û*/
/*Û*///if( carga_botones("cd_out.img") // Carga botones del fichero/*Û*/
/*Û*/ if( Fichero_cd_img(0) /*Û*/
/*Û*/ != 1 ) { // "botones.p1" /*Û*/
/*Û*/ closegraph(); /*Û*/
/*Û*/ cprintf("\n\rError en la CARGA DE BOTONES"); /*Û*/
/*Û*/ exit(112); /*Û*/
/*Û*/ } /*Û*/
/*Û*/ /*Û*/
/*Û*///Imprime_Estaticos( 1, "cd_out.img"); // Imprime botones estaticos/*Û*/
/*Û*/ Fichero_cd_img(1); /*Û*/
/*Û*/ // 'Seccion 1' /*Û*/
/*Û*/ Imprime_Secuencia(1); // Imprime secuencia 1. /*Û*/
/*Û*/ /*Û*/
/*Û*///Imprime_Estaticos( 2, "cd_out.img"); // Imprime botones estaticos/*Û*/
/*Û*/ Fichero_cd_img(2); /*Û*/
/*Û*/ // 'Seccion 2' para los textosÛ*/
/*Û*/ PunteroRaton = 100; /*Û*/
/*Û*/ inicializa_raton_grafico( 0, 0, 618, 460); /*Û*/
/*Û*/ if ( PunteroRaton != 100 ) { /*Û*/
/*Û*/ closegraph(); /*Û*/
/*Û*/ cprintf("Memoria_Insuficiente para el RATON\n\r");/*Û*/
/*Û*/ exit(1); /*Û*/
/*Û*/ } /*Û*/
/*Û*/ /*Û*/
/*Û*/ Inicializa_Iconos(); /*Û*/
/*Û*/ Coloca_Iconos_Dos_Windows(); /*Û*/
/*Û*/ Coloca_Iconos(1); /*Û*/
/*Û*/ /*Û*/
/*Û*/ ENCIENDE_PANTALLA(dac); /*Û*/
/*Û*/ /*Û*/
/*Û*/ True_Push = ON; // Activa el TRUE PUSH ( PRESION REAL )/*Û*/
/*Û*/ /*Û*/
//ÛÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÛ//
// Sonido("CD_OUT00.WAV");
Sonido( Start_Program );
Menu_de_Edicion();
// ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
// ± Liberacion miscelanea ±
//±ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß±//
/*±*/ Libera_Raton_Animado(); /*±*/
/*±*/ /*±*/
/*±*/ APAGA_PANTALLA(dac); /*±*/
/*±*/ closegraph(); /*±*/
/*±*/ farfree(Icono); /*±*/
/*±*/ /*±*/
/*±*/// Sonido("CD_OUTFF.WAV"); /*±*/
/*±*/ Sonido( End_Program ); /*±*/
/*±*/ DeInitSB(); /*±*/
//±ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜܱ//
// ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
// ± Liberacion de la XMS ±
//±ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß±//
/*±*/ // Liberamos XMS si hay ERROR lo Visualizamos. /*±*/
/*±*/ FreeXms(&Xms_Image_Bank1); /*±*/
/*±*/ FreeXms(&Xms_Image_Bank2); /*±*/
/*±*/ FreeXms(&Xms_Image_Bank3); /*±*/
/*±*/ FreeXms(&Xms_Image_Bank4); /*±*/
/*±*/ FreeXms(&Xms_Image_Bank5); /*±*/
/*Û*/ if(Xms_Image_Bank1.lError || Xms_Image_Bank2.lError ||
Xms_Image_Bank3.lError || Xms_Image_Bank4.lError ||
Xms_Image_Bank5.lError )/*Û*/
/*Û*/ /*Û*/
/*Û*/ { /*Û*/
/*Û*/ printf("Bank1 %s\n",Xms_Image_Bank1.cError); /*Û*/
/*Û*/ printf("Bank2 %s\n",Xms_Image_Bank2.cError); /*Û*/
/*Û*/ printf("Bank3 %s\n",Xms_Image_Bank3.cError); /*Û*/
/*Û*/ printf("Bank4 %s\n",Xms_Image_Bank4.cError); /*Û*/
/*Û*/ printf("Bank5 %s\n",Xms_Image_Bank5.cError); /*Û*/
/*Û*/ _XMS = 0; /*Û*/
/*Û*/ } /*Û*/
/*±*/ /*±*/
//±ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜܱ//
cprintf("Programa registrado a: [ SEGUEL ], n§ reg. 034-002\n\r");
cprintf("\n\r");
cprintf("Gracias por utilizar mi Software\n\r");
cprintf(" Jos David Guilln\n\r");
cprintf(" (versi¢n gratuita en: http:\\\\www.arrakis.es\\~infomundo\\JD\n\r");
cprintf("\n\r");
cprintf("­­­ El autor de este programa no se hace responsable de la utilizaci¢n\n\r");
cprintf(" del mismo, para la catalogaci¢n de CD's con contenido pirata. !!!\n\r");
cprintf("\n\r");
return 0;
}
void InicializaSVGA(void) {
int Gd = DETECT, Gm;
int Drv, errorcode;
installuserdriver("Svga256",DetectVGA256);
/* If driver is linked with file, remove comments */
registerfarbgidriver(Svga256_fdriver);
errorcode = registerfarbgifont(small_font_far);
/* report any registration errors */
if (errorcode < 0)
{
printf("Graphics error: %s\n", grapherrormsg(errorcode));
printf("Press any key to halt:");
getch();
exit(1); /* terminate with an error code */
}
initgraph(&Gd,&Gm,"");
/* read result of initialization */
errorcode = graphresult();
if (errorcode != grOk) /* an error occurred */
{
printf("Graphics error: %s\n", grapherrormsg(errorcode));
printf("Presione una tecla para finalizar:");
getch();
exit(1); /* return with error code */
}
}
void Sonido(char Sonido){
if ( !CD_CFG1.With_Out_Sound && Sonido != -1 && Sonido < 19 )
{
while( kbhit() ) getch();
if ( PlayWav((char far *)"CD_OUT.SND", CD_Snd[Sonido].Pos, CD_Snd[Sonido].Len ) == -1 )
PlayLongWav((char far *)"CD_OUT.SND", CD_Snd[Sonido].Pos, CD_Snd[Sonido].Len );
while( kbhit() ) getch();
}
}
int Load_Snd(void)
{
CABECERA Cabecera;
FILE *DESTINO;
if ( ( DESTINO = fopen( "CD_OUT.SND", "rb") ) == NULL )
{
return 0;
}
fread( &Cabecera, sizeof( Cabecera ), 1, DESTINO );
fread( CD_Snd, sizeof( CD_SND ), 19, DESTINO );
fclose(DESTINO);
return 1;
}

BIN
CD_OUT.DSK Normal file

Binary file not shown.

375
CD_OUT.IMG Normal file
View File

@ -0,0 +1,375 @@
#3
***** Botones para elegir el tipo de ITEM a mirar...
!1, 24
***** Botones para seleccionar DOS / WINDOWS
$ 508, 8, 562, 62, 253, 255, 254, 3, 1, 00, 32
$ 573, 8, 627, 62, 253, 255, 254, 3, 1, 00, 17
**** Boton donde se muestran los iconos disponibles
$ 573, 73, 627, 127, 253, 255, 254, 3, 1, 00, 120
**** Retroceder, Avanzar, en los anteriores iconos
$ 508, 73, 562, 99, 253, 255, 254, 2, 1, 00, 75
$ 508, 103, 562, 127, 253, 255, 254, 2, 1, 00, 77
***** Cuadro para la visualizaci¢n de programas...
­1
* LEFT UP RIGHT DOWN
& 6, 225, 205, 470, 0, 56, 63, -1, 2
& 9, 228, 202, 467, 0, 63, 56, -1, 2
***** Casillas individuales
**** Retrocedo Izq. 4 1
$ 13, 235, 198, 255, 253, 255, 254, 2, 1, 00, 104
$ 13, 258, 198, 278, 253, 255, 254, 2, 1, 00, 105
$ 13, 281, 198, 301, 253, 255, 254, 2, 1, 00, 106
$ 13, 304, 198, 324, 253, 255, 254, 2, 1, 00, 107
$ 13, 327, 198, 347, 253, 255, 254, 2, 1, 00, 108
$ 13, 350, 198, 370, 253, 255, 254, 2, 1, 00, 109
$ 13, 373, 198, 393, 253, 255, 254, 2, 1, 00, 110
$ 13, 396, 198, 416, 253, 255, 254, 2, 1, 00, 111
$ 13, 419, 198, 439, 253, 255, 254, 2, 1, 00, 112
$ 13, 442, 198, 462, 253, 255, 254, 2, 1, 00, 113
* BLANCO 255
* Gris_C 253
* Gris_F 254
* NEGRO 240
­1
***** Cuadro para el comentario...
& 390, 135, 630, 415, 0, 56, 63, -1, 2
& 393, 138, 627, 412, 240, 63, 56, 1, 2
$ 390, 420, 505, 446, 253, 255, 254, 2, 2, 00, 23
$ 510, 420, 630, 446, 253, 255, 254, 2, 2, 00, 46
$ 390, 449, 505, 475, 253, 255, 254, 2, 2, 00, 18
$ 510, 449, 630, 475, 253, 255, 254, 2, 2, 00, 31
************** BOTONES UP / DOWN -> Para programas
$ 210, 370, 235, 420, 253, 255, 254, 2, 1, 00, 72
$ 210, 425, 235, 470, 253, 255, 254, 2, 1, 00, 80
************** BOTONES UP / DOWN -> Para comentario
$ 360, 310, 385, 360, 253, 255, 254, 2, 1, 00, 73
$ 360, 365, 385, 415, 253, 255, 254, 2, 1, 00, 81
$ 360, 210, 385, 305, 253, 255, 254, 2, 1, 00, 47
­2
| 390, 426, 2, 6, 0, 255, _,
| 389, 425, 2, 6, 0, 0, _,
| 391, 424, 2, 6, 0, 255, Instalar,
| 390, 423, 2, 6, 0, 0, Instalar,
| 516, 426, 2, 6, 0, 255, _,
| 515, 425, 2, 6, 0, 0, _,
| 516, 424, 2, 6, 0, 255, Configurar,
| 515, 423, 2, 6, 0, 0, Configurar,
| 391, 453, 2, 6, 0, 255, _,
| 390, 452, 2, 6, 0, 0, _,
| 391, 451, 2, 6, 0, 255, Ejecutar,
| 390, 450, 2, 6, 0, 0, Ejecutar,
| 511, 453, 2, 6, 0, 255, _,
| 511, 452, 2, 6, 0, 0, _,
| 511, 451, 2, 6, 0, 255, Salir,
| 510, 450, 2, 6, 0, 0, Salir,
| 364, 289, 2, 6, 1, 255, _,
| 363, 288, 2, 6, 1, 0, _,
| 364, 219, 2, 5, 1, 255, Ver Imagen,
| 363, 218, 2, 5, 1, 0, Ver Imagen,
* Estaticos 4
*****************************************************************************
* *
* Botones Para el Men£ de Configuraci¢n. *
* *
*****************************************************************************
­4
| 413, 149, 2, 5, 0, 251, _,
| 412, 148, 2, 5, 0, 254, _,
| 414, 148, 2, 5, 0, 255, Salir despues de EJECUTAR.,
| 413, 147, 2, 5, 0, 254, Salir despues de EJECUTAR.,
| 413, 170, 2, 5, 0, 251, _,
| 412, 169, 2, 5, 0, 254, _,
| 414, 169, 2, 5, 0, 255, Desactivar Sonidos.,
| 413, 168, 2, 5, 0, 254, Desactivar Sonidos.,
| 413, 191, 2, 5, 0, 251, _,
| 412, 190, 2, 5, 0, 254, _,
| 414, 190, 2, 5, 0, 255, Instalacion Autom tica,
| 413, 189, 2, 5, 0, 254, Instalacion Autom tica,
| 413, 212, 2, 5, 0, 251, _,
| 412, 211, 2, 5, 0, 254, _,
| 414, 211, 2, 5, 0, 255, Comprobar espacio libre,
| 413, 210, 2, 5, 0, 254, Comprobar espacio libre,
| 413, 230, 2, 5, 0, 251, _,
| 412, 229, 2, 5, 0, 254, _,
| 414, 229, 2, 5, 0, 255, Formatear al Instalar,
| 413, 228, 2, 5, 0, 254, Formatear al Instalar,
| 414, 242, 2, 4, 0, 255, ( solo en unidades A: y B: ),
| 413, 241, 2, 4, 0, 254, ( solo en unidades A: y B: ),
| 413, 254, 2, 5, 0, 251, _,
| 412, 253, 2, 5, 0, 254, _,
| 414, 253, 2, 5, 0, 255, Sin imagen de Fondo,
| 413, 252, 2, 5, 0, 254, Sin imagen de Fondo,
­5
* Textos
| 547, 392, 2, 5, 0, 251, _,
| 547, 391, 2, 5, 0, 0, _,
| 547, 391, 2, 5, 0, 255, Cancelar,
| 546, 390, 2, 5, 0, 0, Cancelar,
| 471, 392, 2, 5, 0, 251, _,
| 470, 391, 2, 5, 0, 0, _,
| 471, 391, 2, 5, 0, 255, Salvar,
| 470, 390, 2, 5, 0, 0, Salvar,
| 396, 392, 2, 5, 0, 251, _,
| 395, 391, 2, 5, 0, 0, _,
| 396, 391, 2, 5, 0, 255, Anterior,
| 395, 390, 2, 5, 0, 0, Anterior,
| 394, 278, 2, 5, 0, 251, _,
| 393, 277, 2, 5, 0, 0, _,
| 396, 277, 2, 5, 0, 255, Imprimir icono actual sin,
| 395, 276, 2, 5, 0, 0, Imprimir icono actual sin,
| 396, 291, 2, 5, 0, 255, incluir los comentarios.,
| 395, 290, 2, 5, 0, 0, incluir los comentarios.,
*| 394, 315, 2, 5, 0, 251, _,
*| 393, 314, 2, 5, 0, 0, _,
*| 396, 314, 2, 5, 0, 255, Imprimir icono actual con,
*| 395, 313, 2, 5, 0, 0, Imprimir icono actual con,
*| 396, 328, 2, 5, 0, 255, los comentarios y atributos.,
*| 395, 327, 2, 5, 0, 0, los comentarios y atributos.,
* 2¦ Secuencia de Dinamicos
!2, 10
* B. Cancelar
$ 547, 390, 623, 410, 253, 255, 254, 2, 2, 00, 46
* B. Salvar
$ 471, 390, 545, 410, 253, 255, 254, 2, 2, 00, 31
* B. Retroceder
$ 396, 390, 469, 410, 253, 255, 254, 2, 2, 00, 30
***** Check 1 -- Salir Despues de Ejecutar
$ 396, 149, 411, 165, 253, 255, 254, 1, 2, 00, 32
***** Check 2 -- Desactivar Sonidos
$ 396, 170, 411, 186, 253, 255, 254, 1, 2, 00, 18
**** Check 3 -- Auto-Install
$ 396, 191, 411, 207, 253, 255, 254, 1, 2, 00, 23
***** Check 4 -- Comprobar espacio disponible...
$ 396, 212, 411, 228, 253, 255, 254, 1, 2, 00, 24
***** Check 5 -- Format Siempre ( solo A: y B: )
$ 396, 233, 411, 249, 253, 255, 254, 1, 2, 00, 33
***** Check 6 -- Sin imagen de fondo
$ 396, 254, 411, 270, 253, 255, 254, 1, 2, 00, 49
***** Imprimir item actual sin comentario [ MIRAR LETRA ]
$ 396, 275, 623, 310, 253, 255, 254, 3, 2, 00, 50
***** Imprimir item actual con comentario [ MIRAR LETRA ]
*$ 396, 312, 623, 346, 253, 255, 254, 3, 2, 00, 46
*& 396, 348, 623, 385, 253, 255, 254, 3, 2, 00, 46
*****************************************************************************
* *
* Botones Para el Men£ de Ejecutar. *
* *
*****************************************************************************
­10
& 118, 160, 521, 335, 253, 255, 254, 2, 2
!3,2
$ 123, 165, 516, 185, 240, 255, 254, 2, 1, 00, 18
$ 500, 190, 516, 330, 253, 255, 254, 2, 1, 00, 46
­11
| 504, 190, 2, 4, 1, 255, _ ,
| 503, 191, 2, 4, 1, 240, _ ,
| 501, 190, 2, 4, 1, 255, <- CANCELAR -> ,
| 502, 191, 2, 4, 1, 240, <- CANCELAR -> ,
| 123, 165, 2, 6, 0, 252, Ejecutar desde el CDROM,
| 123, 190, 2, 4, 0, 240, NOTA IMPORTANTE:,
| 123, 200, 2, 4, 0, 240, Hay cuatro circunstancias por las que los programas incluidos,
| 123, 210, 2, 4, 0, 240, en este CDROM podr¡an NO FUNCIONAR si se ejcutan directamente,
| 123, 220, 2, 4, 0, 240, usando la opci¢n EJECUTAR:,
| 121, 220, 2, 4, 0, 251, EJECUTAR,
| 123, 230, 2, 4, 0, 240, Programas con requerimientos de memoria superior al espacio,
| 123, 240, 2, 4, 0, 240, libre dejado por los drivers de acceso al CDROM.,
| 123, 250, 2, 4, 0, 240, Programas que nesecitan escribir alg£n tipo de configuraci¢n,
| 123, 260, 2, 4, 0, 240, u otros datos en el propio disco.,
| 123, 270, 2, 4, 0, 240, Programas con animaciones o accesos muy r pidos a disco duro,
| 123, 280, 2, 4, 0, 240, Programas cuyos nombres incluyan car cteres no aceptados por,
| 123, 290, 2, 4, 0, 240, el estandar ISO.,
| 123, 300, 2, 4, 0, 240, Si por cualquiera de las causas anteriores no funcionase el,
| 123, 310, 2, 4, 0, 240, programa elegido: recomendamos proceda a su INSTALACION a HD.,
| 120, 310, 2, 4, 0, 251, INSTALACION,
| 123, 320, 2, 4, 0, 240, usando la opci¢n correspondiente.,
************************************************************************
* *
* Pantalla para la instalaci¢n y elegir el tipo de instalaci¢n... *
************************************************************************
­20
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Iniciar instalaci¢n en:,
& 210, 240, 430, 257, 240, 255, 254, 2, 1
** 35 digitos...
*| 210, 245, 2, 4, 0, 241, 123456789-123456789-123456789-123456789-,
*| 210, 243, 2, 4, 0, 241, MMMMMMMMM-MMMMMMMMM-MMMMMMMMM-MMMMM,
* Boton Aceptar
& 200, 270, 280, 295, 251, 255, 254, 2, 1
* Boton Cancelar
& 360, 270, 440, 295, 251, 255, 254, 2, 1
­21
| 200, 274, 2, 5, 0, 255, Aceptar,
| 201, 275, 2, 5, 0, 240, Aceptar,
| 340, 274, 2, 5, 0, 255, Cancelar,
| 341, 275, 2, 5, 0, 240, Cancelar,
!4,2
* Boton Aceptar
$ 204, 274, 276, 291, 253, 254, 255, 2, 1, 00, 30
* Boton Cancelar
$ 364, 274, 436, 291, 253, 254, 255, 2, 1, 00, 46
************************************************************************
* *
* MENSAJES DE ERROR <------>---------<----------->--------<------>- *
* -------<-------->_------<-------->-->----------<--------->_----<- *
* 5ú"$%!"$%" %"$ &/(I/)(=P)^POù_¥_:;J¥LKO) (/)%&/($&/($&()(/=)&( *
************************************************************************
­100
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error en asignaci¢n,
| 210, 242, 2, 5, 0, 240, de memoria CONVENCIONAL,
­101
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error en asignaci¢n,
| 210, 242, 2, 5, 0, 240, de memoria XMS,
­102
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error cargando ICONOS,
| 210, 242, 2, 5, 0, 240, y punteros de RATON...,
­103
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error cargando PCX,
| 210, 242, 2, 5, 0, 240, de Fondo.,
­104
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error cargando ficheros,
| 210, 242, 2, 5, 0, 240, de sonido WAV,
­105
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error intentando ejecutar,
| 210, 242, 2, 5, 0, 240, el programa deseado...,
­106
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error intentando ejecutar,
| 210, 242, 2, 5, 0, 240, el programa deseado...,
­107
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR D E TIPO,
| 210, 242, 2, 5, 0, 240, D E S C O N O C I D O,
­108
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR ABRIENDO,
| 210, 242, 2, 5, 0, 240, FICHERO,
­109
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR de ESCRITURA,
| 210, 242, 2, 5, 0, 240, DISCO PROTEGIDO.,
­110
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR de LECTURA,
| 210, 242, 2, 5, 0, 240, POSIBLE DA¥O FÖSICO,
­111
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR INTENTANDO,
| 210, 242, 2, 5, 0, 240, CERRAR FICHERO,
­112
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR INTENTANDO,
| 210, 242, 2, 5, 0, 240, CARGAR BOTONES,
­113
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, EL FICHERO O DIRECTORIO A,
| 210, 242, 2, 5, 0, 240, INSTALAR NO SE HA ENCONTRADO,
­114
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, EL FICHERO O DIRECTORIO A,
| 210, 242, 2, 5, 0, 240, EJECUTAR NO SE HA ENCONTRADO,
­115
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, LA IMPRESORA NO ESTA LISTA,
| 210, 242, 2, 5, 0, 240, < << OPERACION CANCELA >> >,
­116
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, IMPRIMIENDO...,
| 210, 242, 2, 5, 0, 240, -JD-,

375
CD_OUT.JD Normal file
View File

@ -0,0 +1,375 @@
#3
***** Botones para elegir el tipo de ITEM a mirar...
!1, 24
***** Botones para seleccionar DOS / WINDOWS
$ 508, 8, 562, 62, 253, 255, 254, 3, 1, 00, 32
$ 573, 8, 627, 62, 253, 255, 254, 3, 1, 00, 17
**** Boton donde se muestran los iconos disponibles
$ 573, 73, 627, 127, 253, 255, 254, 3, 1, 00, 120
**** Retroceder, Avanzar, en los anteriores iconos
$ 508, 73, 562, 99, 253, 255, 254, 2, 1, 00, 75
$ 508, 103, 562, 127, 253, 255, 254, 2, 1, 00, 77
***** Cuadro para la visualizaci¢n de programas...
­1
* LEFT UP RIGHT DOWN
& 6, 225, 205, 470, 0, 56, 63, -1, 2
& 9, 228, 202, 467, 0, 63, 56, -1, 2
***** Casillas individuales
**** Retrocedo Izq. 4 1
$ 13, 235, 198, 255, 253, 255, 254, 2, 1, 00, 104
$ 13, 258, 198, 278, 253, 255, 254, 2, 1, 00, 105
$ 13, 281, 198, 301, 253, 255, 254, 2, 1, 00, 106
$ 13, 304, 198, 324, 253, 255, 254, 2, 1, 00, 107
$ 13, 327, 198, 347, 253, 255, 254, 2, 1, 00, 108
$ 13, 350, 198, 370, 253, 255, 254, 2, 1, 00, 109
$ 13, 373, 198, 393, 253, 255, 254, 2, 1, 00, 110
$ 13, 396, 198, 416, 253, 255, 254, 2, 1, 00, 111
$ 13, 419, 198, 439, 253, 255, 254, 2, 1, 00, 112
$ 13, 442, 198, 462, 253, 255, 254, 2, 1, 00, 113
* BLANCO 255
* Gris_C 253
* Gris_F 254
* NEGRO 240
­1
***** Cuadro para el comentario...
& 390, 135, 630, 415, 0, 56, 63, -1, 2
& 393, 138, 627, 412, 240, 63, 56, 1, 2
$ 390, 420, 505, 446, 253, 255, 254, 2, 2, 00, 23
$ 510, 420, 630, 446, 253, 255, 254, 2, 2, 00, 46
$ 390, 449, 505, 475, 253, 255, 254, 2, 2, 00, 18
$ 510, 449, 630, 475, 253, 255, 254, 2, 2, 00, 31
************** BOTONES UP / DOWN -> Para programas
$ 210, 370, 235, 420, 253, 255, 254, 2, 1, 00, 72
$ 210, 425, 235, 470, 253, 255, 254, 2, 1, 00, 80
************** BOTONES UP / DOWN -> Para comentario
$ 360, 310, 385, 360, 253, 255, 254, 2, 1, 00, 73
$ 360, 365, 385, 415, 253, 255, 254, 2, 1, 00, 81
$ 360, 210, 385, 305, 253, 255, 254, 2, 1, 00, 47
­2
| 390, 426, 2, 6, 0, 255, _,
| 389, 425, 2, 6, 0, 0, _,
| 391, 424, 2, 6, 0, 255, Instalar,
| 390, 423, 2, 6, 0, 0, Instalar,
| 516, 426, 2, 6, 0, 255, _,
| 515, 425, 2, 6, 0, 0, _,
| 516, 424, 2, 6, 0, 255, Configurar,
| 515, 423, 2, 6, 0, 0, Configurar,
| 391, 453, 2, 6, 0, 255, _,
| 390, 452, 2, 6, 0, 0, _,
| 391, 451, 2, 6, 0, 255, Ejecutar,
| 390, 450, 2, 6, 0, 0, Ejecutar,
| 511, 453, 2, 6, 0, 255, _,
| 511, 452, 2, 6, 0, 0, _,
| 511, 451, 2, 6, 0, 255, Salir,
| 510, 450, 2, 6, 0, 0, Salir,
| 364, 289, 2, 6, 1, 255, _,
| 363, 288, 2, 6, 1, 0, _,
| 364, 219, 2, 5, 1, 255, Ver Imagen,
| 363, 218, 2, 5, 1, 0, Ver Imagen,
* Estaticos 4
*****************************************************************************
* *
* Botones Para el Men£ de Configuraci¢n. *
* *
*****************************************************************************
­4
| 413, 149, 2, 5, 0, 251, _,
| 412, 148, 2, 5, 0, 254, _,
| 414, 148, 2, 5, 0, 255, Salir despues de EJECUTAR.,
| 413, 147, 2, 5, 0, 254, Salir despues de EJECUTAR.,
| 413, 170, 2, 5, 0, 251, _,
| 412, 169, 2, 5, 0, 254, _,
| 414, 169, 2, 5, 0, 255, Desactivar Sonidos.,
| 413, 168, 2, 5, 0, 254, Desactivar Sonidos.,
| 413, 191, 2, 5, 0, 251, _,
| 412, 190, 2, 5, 0, 254, _,
| 414, 190, 2, 5, 0, 255, Instalacion Autom tica,
| 413, 189, 2, 5, 0, 254, Instalacion Autom tica,
| 413, 212, 2, 5, 0, 251, _,
| 412, 211, 2, 5, 0, 254, _,
| 414, 211, 2, 5, 0, 255, Comprobar espacio libre,
| 413, 210, 2, 5, 0, 254, Comprobar espacio libre,
| 413, 230, 2, 5, 0, 251, _,
| 412, 229, 2, 5, 0, 254, _,
| 414, 229, 2, 5, 0, 255, Formatear al Instalar,
| 413, 228, 2, 5, 0, 254, Formatear al Instalar,
| 414, 242, 2, 4, 0, 255, ( solo en unidades A: y B: ),
| 413, 241, 2, 4, 0, 254, ( solo en unidades A: y B: ),
| 413, 254, 2, 5, 0, 251, _,
| 412, 253, 2, 5, 0, 254, _,
| 414, 253, 2, 5, 0, 255, Sin imagen de Fondo,
| 413, 252, 2, 5, 0, 254, Sin imagen de Fondo,
­5
* Textos
| 547, 392, 2, 5, 0, 251, _,
| 547, 391, 2, 5, 0, 0, _,
| 547, 391, 2, 5, 0, 255, Cancelar,
| 546, 390, 2, 5, 0, 0, Cancelar,
| 471, 392, 2, 5, 0, 251, _,
| 470, 391, 2, 5, 0, 0, _,
| 471, 391, 2, 5, 0, 255, Salvar,
| 470, 390, 2, 5, 0, 0, Salvar,
| 396, 392, 2, 5, 0, 251, _,
| 395, 391, 2, 5, 0, 0, _,
| 396, 391, 2, 5, 0, 255, Anterior,
| 395, 390, 2, 5, 0, 0, Anterior,
| 394, 278, 2, 5, 0, 251, _,
| 393, 277, 2, 5, 0, 0, _,
| 396, 277, 2, 5, 0, 255, Imprimir icono actual sin,
| 395, 276, 2, 5, 0, 0, Imprimir icono actual sin,
| 396, 291, 2, 5, 0, 255, incluir los comentarios.,
| 395, 290, 2, 5, 0, 0, incluir los comentarios.,
*| 394, 315, 2, 5, 0, 251, _,
*| 393, 314, 2, 5, 0, 0, _,
*| 396, 314, 2, 5, 0, 255, Imprimir icono actual con,
*| 395, 313, 2, 5, 0, 0, Imprimir icono actual con,
*| 396, 328, 2, 5, 0, 255, los comentarios y atributos.,
*| 395, 327, 2, 5, 0, 0, los comentarios y atributos.,
* 2¦ Secuencia de Dinamicos
!2, 10
* B. Cancelar
$ 547, 390, 623, 410, 253, 255, 254, 2, 2, 00, 46
* B. Salvar
$ 471, 390, 545, 410, 253, 255, 254, 2, 2, 00, 31
* B. Retroceder
$ 396, 390, 469, 410, 253, 255, 254, 2, 2, 00, 30
***** Check 1 -- Salir Despues de Ejecutar
$ 396, 149, 411, 165, 253, 255, 254, 1, 2, 00, 32
***** Check 2 -- Desactivar Sonidos
$ 396, 170, 411, 186, 253, 255, 254, 1, 2, 00, 18
**** Check 3 -- Auto-Install
$ 396, 191, 411, 207, 253, 255, 254, 1, 2, 00, 23
***** Check 4 -- Comprobar espacio disponible...
$ 396, 212, 411, 228, 253, 255, 254, 1, 2, 00, 24
***** Check 5 -- Format Siempre ( solo A: y B: )
$ 396, 233, 411, 249, 253, 255, 254, 1, 2, 00, 33
***** Check 6 -- Sin imagen de fondo
$ 396, 254, 411, 270, 253, 255, 254, 1, 2, 00, 49
***** Imprimir item actual sin comentario [ MIRAR LETRA ]
$ 396, 275, 623, 310, 253, 255, 254, 3, 2, 00, 50
***** Imprimir item actual con comentario [ MIRAR LETRA ]
*$ 396, 312, 623, 346, 253, 255, 254, 3, 2, 00, 46
*& 396, 348, 623, 385, 253, 255, 254, 3, 2, 00, 46
*****************************************************************************
* *
* Botones Para el Men£ de Ejecutar. *
* *
*****************************************************************************
­10
& 118, 160, 521, 335, 253, 255, 254, 2, 2
!3,2
$ 123, 165, 516, 185, 240, 255, 254, 2, 1, 00, 18
$ 500, 190, 516, 330, 253, 255, 254, 2, 1, 00, 46
­11
| 504, 190, 2, 4, 1, 255, _ ,
| 503, 191, 2, 4, 1, 240, _ ,
| 501, 190, 2, 4, 1, 255, <- CANCELAR -> ,
| 502, 191, 2, 4, 1, 240, <- CANCELAR -> ,
| 123, 165, 2, 6, 0, 252, Ejecutar desde el CDROM,
| 123, 190, 2, 4, 0, 240, NOTA IMPORTANTE:,
| 123, 200, 2, 4, 0, 240, Hay cuatro circunstancias por las que los programas incluidos,
| 123, 210, 2, 4, 0, 240, en este CDROM podr¡an NO FUNCIONAR si se ejcutan directamente,
| 123, 220, 2, 4, 0, 240, usando la opci¢n EJECUTAR:,
| 121, 220, 2, 4, 0, 251, EJECUTAR,
| 123, 230, 2, 4, 0, 240, Programas con requerimientos de memoria superior al espacio,
| 123, 240, 2, 4, 0, 240, libre dejado por los drivers de acceso al CDROM.,
| 123, 250, 2, 4, 0, 240, Programas que nesecitan escribir alg£n tipo de configuraci¢n,
| 123, 260, 2, 4, 0, 240, u otros datos en el propio disco.,
| 123, 270, 2, 4, 0, 240, Programas con animaciones o accesos muy r pidos a disco duro,
| 123, 280, 2, 4, 0, 240, Programas cuyos nombres incluyan car cteres no aceptados por,
| 123, 290, 2, 4, 0, 240, el estandar ISO.,
| 123, 300, 2, 4, 0, 240, Si por cualquiera de las causas anteriores no funcionase el,
| 123, 310, 2, 4, 0, 240, programa elegido: recomendamos proceda a su INSTALACION a HD.,
| 120, 310, 2, 4, 0, 251, INSTALACION,
| 123, 320, 2, 4, 0, 240, usando la opci¢n correspondiente.,
************************************************************************
* *
* Pantalla para la instalaci¢n y elegir el tipo de instalaci¢n... *
************************************************************************
­20
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Iniciar instalaci¢n en:,
& 210, 240, 430, 257, 240, 255, 254, 2, 1
** 35 digitos...
*| 210, 245, 2, 4, 0, 241, 123456789-123456789-123456789-123456789-,
*| 210, 243, 2, 4, 0, 241, MMMMMMMMM-MMMMMMMMM-MMMMMMMMM-MMMMM,
* Boton Aceptar
& 200, 270, 280, 295, 251, 255, 254, 2, 1
* Boton Cancelar
& 360, 270, 440, 295, 251, 255, 254, 2, 1
­21
| 200, 274, 2, 5, 0, 255, Aceptar,
| 201, 275, 2, 5, 0, 240, Aceptar,
| 340, 274, 2, 5, 0, 255, Cancelar,
| 341, 275, 2, 5, 0, 240, Cancelar,
!4,2
* Boton Aceptar
$ 204, 274, 276, 291, 253, 254, 255, 2, 1, 00, 30
* Boton Cancelar
$ 364, 274, 436, 291, 253, 254, 255, 2, 1, 00, 46
************************************************************************
* *
* MENSAJES DE ERROR <------>---------<----------->--------<------>- *
* -------<-------->_------<-------->-->----------<--------->_----<- *
* 5ú"$%!"$%" %"$ &/(I/)(=P)^POù_¥_:;J¥LKO) (/)%&/($&/($&()(/=)&( *
************************************************************************
­100
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error en asignaci¢n,
| 210, 242, 2, 5, 0, 240, de memoria CONVENCIONAL,
­101
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error en asignaci¢n,
| 210, 242, 2, 5, 0, 240, de memoria XMS,
­102
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error cargando ICONOS,
| 210, 242, 2, 5, 0, 240, y punteros de RATON...,
­103
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error cargando PCX,
| 210, 242, 2, 5, 0, 240, de Fondo.,
­104
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error cargando ficheros,
| 210, 242, 2, 5, 0, 240, de sonido WAV,
­105
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error intentando ejecutar,
| 210, 242, 2, 5, 0, 240, el programa deseado...,
­106
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, Error intentando ejecutar,
| 210, 242, 2, 5, 0, 240, el programa deseado...,
­107
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR D E TIPO,
| 210, 242, 2, 5, 0, 240, D E S C O N O C I D O,
­108
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR ABRIENDO,
| 210, 242, 2, 5, 0, 240, FICHERO,
­109
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR de ESCRITURA,
| 210, 242, 2, 5, 0, 240, DISCO PROTEGIDO.,
­110
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR de LECTURA,
| 210, 242, 2, 5, 0, 240, POSIBLE DA¥O FÖSICO,
­111
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR INTENTANDO,
| 210, 242, 2, 5, 0, 240, CERRAR FICHERO,
­112
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, ERROR INTENTANDO,
| 210, 242, 2, 5, 0, 240, CARGAR BOTONES,
­113
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, EL FICHERO O DIRECTORIO A,
| 210, 242, 2, 5, 0, 240, INSTALAR NO SE HA ENCONTRADO,
­114
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, EL FICHERO O DIRECTORIO A,
| 210, 242, 2, 5, 0, 240, EJECUTAR NO SE HA ENCONTRADO,
­115
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, LA IMPRESORA NO ESTA LISTA,
| 210, 242, 2, 5, 0, 240, < << OPERACION CANCELA >> >,
­116
& 200, 212, 440, 267, 251, 255, 254, 2, 1
& 205, 217, 435, 262, 253, 254, 255, 2, 1
| 210, 222, 2, 5, 0, 240, IMPRIMIENDO...,
| 210, 242, 2, 5, 0, 240, -JD-,

BIN
CD_OUT.PRJ Normal file

Binary file not shown.

BIN
CD_OUT2.IMG Normal file

Binary file not shown.

151
CD_PCX.CPP Normal file
View File

@ -0,0 +1,151 @@
///////////////////////////// FICHEROS A INCLUIR /////////////////////////////
//#include <time.h>
//#include <dos.h>
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
//#include <conio.h> // Para getch();
#include <graphics.h> // Para outtextxy(...); y cleardevice(...);
#include "cd_error.h"
// #include "..\..\jd_lib\f_lib\make_bot.h" // Fuciones de MAKE_BOTON
////////////////////////////////// VARIABLES /////////////////////////////////
char far *dir_vga;
int ancho;
int alto;
char bits_pixel;
char dac[256*3];
extern char newdac[256*3];
//////////////////////// DECLARACIONES DE FUNCIONES //////////////////////////
void dibujo_640_x_480_256_c(FILE *handle);
void asigna_modo_video(char);
extern "C"
{
int SET_VESA(int);
void CHANGE_BANK(int);
void ENCIENDE_PANTALLA(char *);
void APAGA_PANTALLA(char *);
}
///////////////////////////////// PROGRAMA ///////////////////////////////////
void Inicializa_Dibujo(int L_Imagen, char *N_Imagen2)
{
FILE *handle;
int esq_x1, esq_y1, esq_x2, esq_y2;
char string[80] = "cd_out0";
randomize();
if(L_Imagen==-1){
string[7] = (unsigned char)(random(9)+ '0');
string[8] = '.';
string[9] = 'P';
string[10] = 'C';
string[11] = 'X';
string[12] = '\0';
}
else if(L_Imagen==-2) strcpy( string, N_Imagen2 );
else
{
string[7] = (unsigned char)(L_Imagen + '0');
string[8] = '.';
string[9] = 'P';
string[10] = 'C';
string[11] = 'X';
string[12] = '\0';
}
if((handle=fopen(/*"CD_OUT1.IMG"*/string, "rb"))==NULL)
{
/*
Imprime_Estaticos( E_O, "cd_out.img"); // Imprime botones estaticos 'Seccion 2'
Espera_Tecla_o_Raton();
*/
restorecrtmode();
printf("No se encontr¢ el archivo especificado: Imagen Background");
exit(1);
}
if(10!=getc(handle))
{
/*
Imprime_Estaticos( E_PCX, "cd_out.img"); // Imprime botones estaticos 'Seccion 2'
Espera_Tecla_o_Raton();
*/
restorecrtmode();
printf("El archivo especificado no es un fichero PCX");
exit(1);
}
getw(handle); bits_pixel=getc(handle);
esq_x1=getw(handle); esq_y1=getw(handle);
esq_x2=getw(handle); esq_y2=getw(handle);
ancho=esq_x2-esq_x1+1;
alto =esq_y2-esq_y1+1;
if(ancho!=640 || alto!=480 || bits_pixel!=8)
{
/*
Imprime_Estaticos( E_PCX, "cd_out.img"); // Imprime botones estaticos 'Seccion 2'
Espera_Tecla_o_Raton();
*/
restorecrtmode();
printf("El fichero especificado no es un dibujo de 640 x 480 en 256 colores");
exit(1);
}
// APAGA_PANTALLA(dac);
dibujo_640_x_480_256_c(handle);
// ENCIENDE_PANTALLA(dac);
}
void dibujo_640_x_480_256_c(FILE *handle)
{
unsigned char byte, contador;
int bank, n;
fseek(handle, 128, 0);
bank=0; (long)dir_vga=0xA0000000L;
CHANGE_BANK(bank);
for(alto=480; alto>0; alto--)
{
for(ancho=640; ancho>0; )
{
byte=getc(handle);
if(byte<=0xC0)
{
*dir_vga++=byte; ancho--;
if((long)dir_vga==0xA0000000L) { bank++; CHANGE_BANK(bank); }
}
else
{
contador=byte&0x3F; byte=getc(handle);
for(; contador>0; contador--)
{
*dir_vga++=byte; ancho--;
if((long)dir_vga==0xA0000000L) { bank++; CHANGE_BANK(bank); }
}
}
}
}
getc(handle);
// for(n=0; n<256*3; n++) dac[n]=getc(handle) >> 2;
for(n=0; n<(256-16)*3; n++) dac[n]=getc(handle) >> 2;
for(n=(256-16)*3; n<(256*3); n++) newdac[n]=getc(handle) >> 2;
fclose(handle);
}

215
CD_RATON.CPP Normal file
View File

@ -0,0 +1,215 @@
///////////////////////////////////////////////////////////////////////////
///// Nombre: Craton.cpp ///
///// Modulo: Perteneciente a JD_FONTS.CPP ///
//// Descripci¢n: Utilidades para el manejo del raton ///
//// ///
//// Autor: ( Ver Pc-Mania n§ 20 ) ///
//// Autor puntero del raton: Jos David Guilln Dominguez ///
//// Fecha: ( Desconocida ) ///
//// ///
//// Compilador Borland C++ 3.0 ( Creaci¢n original en Turbo C 2.0 ) ///
///////////////////////////////////////////////////////////////////////////
#include <dos.h>
#include <conio.h>
void desactiva_raton(void);
void activa_raton(void);
void inicializa_raton_grafico(int x1, int y1, int x2, int y2, int px, int py);
void Anclar_Raton(void);
int Espera_Tecla_o_Raton(void);
int raton=0;
int x_raton;
int y_raton;
int boton_izq;
int boton_der;
extern int PunteroRaton;
int dir_raton [32+32] = {
// 0x3FFF, /*± ± 1 1 1 1 1 1 1 1 1 1 1 1 1 1*/
// 0x1FFF, /*± Û ± 1 1 1 1 1 1 1 1 1 1 1 1 1*/
// 0x0FFF, /*± Û Û ± 1 1 1 1 1 1 1 1 1 1 1 1*/
// 0x07FF, /*± Û Û Û ± 1 1 1 1 1 1 1 1 1 1 1*/
// 0x03FF, /*± Û Û Û Û ± 1 1 1 1 1 1 1 1 1 1*/
// 0x07FF, /*± ± Û Û ± 1 1 1 1 1 1 1 1 1 1 1*/
// 0xC3FF, /*1 1 ± Û Û ± 1 1 1 1 1 1 1 1 1 1*/
0x007F, /*± ± ± ± ± ± ± ± ± 1 1 1 1 1 1 1*/
0x00FF, /*± Û Û Û Û Û Û ± 1 1 1 1 1 1 1 1*/
0x01FF, /*± Û Û Û Û Û ± 1 1 1 1 1 1 1 1 1*/
0x01FF, /*± Û Û Û Û Û ± 1 1 1 1 1 1 1 1 1*/
0x00FF, /*± Û Û Û Û Û Û ± 1 1 1 1 1 1 1 1*/
0x007F, /*± Û Û ± ± Û Û Û ± 1 1 1 1 1 1 1*/
0x18FF, /*± ± ± 1 1 ± Û ± 1 1 1 1 1 1 1 1*/
// 0xFC7F, /*1 1 1 1 1 1 ± Û ± 1 1 1 1 1 1 1*/
// 0xF83F, /*1 1 1 1 1 ± Û Û Û ± 1 1 1 1 1 1*/
// 0xF01F, /*1 1 1 1 ± Û Û Û Û Û ± 1 1 1 1 1*/
// 0xE00F, /*1 1 1 ± Û Û Û Û Û Û Û ± 1 1 1 1*/
// 0xE00F, /*1 1 1 ± ± ± Û Û Û ± ± ± 1 1 1 1*/
// 0xF83F, /*1 1 1 1 1 ± Û Û Û ± 1 1 1 1 1 1*/
// 0xF83F, /*1 1 1 1 1 ± ± ± ± ± 1 1 1 1 1 1*/
0x800F, /*1 ± ± ± ± ± ± ± ± ± ± ± 1 1 1 1*/
0x8083, /*1 ± Û Û Û Û Û ± ± Û Û Û ± ± 1 1*/
0x8001, /*1 ± ± ± ± ± Û ± ± Û ± ± Û ± ± 1*/
0xF810, /*1 1 1 1 1 ± Û ± ± Û ± 1 ± Û ± 1*/
0x8810, /*1 ± ± ± 1 ± Û ± ± Û ± 1 ± Û ± 1*/
0x8811, /*1 ± Û ± 1 ± Û ± ± Û ± 1 ± Û ± 1*/
0x8003, /*1 ± Û ± ± ± Û ± ± Û ± ± Û ± 1 1*/
0x8007, /*1 ± Û Û Û Û Û ± ± Û Û Û ± 1 1 1*/
0x800F, /*1 ± ± ± ± ± ± ± ± ± ± ± 1 1 1 1*/
// 0x0000, /*0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0*/
// 0x4000, /*0 Û 0 0 0 0 0 0 0 0 0 0 0 0 0 0*/
// 0x6000, /*0 Û Û 0 0 0 0 0 0 0 0 0 0 0 0 0*/
// 0x7000, /*0 Û Û Û 0 0 0 0 0 0 0 0 0 0 0 0*/
// 0x7800, /*0 Û Û Û Û 0 0 0 0 0 0 0 0 0 0 0*/
// 0x3000, /*0 0 Û Û 0 0 0 0 0 0 0 0 0 0 0 0*/
// 0x1800, /*0 0 0 Û Û 0 0 0 0 0 0 0 0 0 0 0*/
0x0000, /*0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0*/
0x7E00, /*0 Û Û Û Û Û Û 0 0 0 0 0 0 0 0 0*/
0x7C00, /*0 Û Û Û Û Û 0 0 0 0 0 0 0 0 0 0*/
0x7C00, /*0 Û Û Û Û Û 0 0 0 0 0 0 0 0 0 0*/
0x7E00, /*0 Û Û Û Û Û Û 0 0 0 0 0 0 0 0 0*/
0x6700, /*0 Û Û 0 0 Û Û Û 0 0 0 0 0 0 0 0*/
0x0200, /*0 0 0 0 0 0 Û 0 0 0 0 0 0 0 0 0*/
// 0x0100, /*0 0 0 0 0 0 0 Û 0 0 0 0 0 0 0 0*/
// 0x0380, /*0 0 0 0 0 0 Û Û Û 0 0 0 0 0 0 0*/
// 0x07C0, /*0 0 0 0 0 Û Û Û Û Û 0 0 0 0 0 0*/
// 0x0FE0, /*0 0 0 0 Û Û Û Û Û Û Û 0 0 0 0 0*/
// 0x0380, /*0 0 0 0 0 0 Û Û Û 0 0 0 0 0 0 0*/
// 0x0380, /*0 0 0 0 0 0 Û Û Û 0 0 0 0 0 0 0*/
// 0x0000, /*0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0*/
0x0000, /*0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0*/
0x3E70, /*0 0 Û Û Û Û Û 0 0 Û Û Û 0 0 0 0*/
0x0248, /*0 0 0 0 0 0 Û 0 0 Û 0 0 Û 0 0 0*/
0x0244, /*0 0 0 0 0 0 Û 0 0 Û 0 0 0 Û 0 0*/
0x0242, /*0 0 0 0 0 0 Û 0 0 Û 0 0 0 Û 0 0*/
0x2244, /*0 0 Û 0 0 0 Û 0 0 Û 0 0 0 Û 0 0*/
0x2248, /*0 0 Û 0 0 0 Û 0 0 Û 0 0 Û 0 0 0*/
0x3E70, /*0 0 Û Û Û Û Û 0 0 Û Û Û 0 0 0 0*/
0x0000 /*0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0*/
};
void inicializa_raton_grafico(int x1, int y1, int x2, int y2, int px, int py)
{
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) {
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;
int86(0x33, &ent, &sal); /* muestra el puntero del rat¢n */
}
}
void activa_raton(void)
{
union REGS ent, sal;
ent.x.ax = 1;
int86(0x33, &ent, &sal);
}
void desactiva_raton(void)
{
union REGS ent, sal;
ent.x.ax = 2;
int86(0x33, &ent, &sal);
}
void Anclar_Raton(void){
union REGS ent, sal;
do {
ent.x.ax = 3;
int86(0x33, &ent, &sal);
boton_izq = sal.x.bx & 1;
boton_der = (sal.x.bx >> 1) & 1;
} while(boton_izq==1 || boton_der==1);
}
int Espera_Tecla_o_Raton(void){
union REGS ent, sal;
ent.x.ax = 3;
do{
int86(0x33, &ent, &sal); // lee posici¢n y estados del bot¢n
boton_izq = sal.x.bx & 1;
boton_der = (sal.x.bx >> 1) & 1;
x_raton = sal.x.cx;
y_raton = sal.x.dx;
}while( boton_izq == 0 && boton_der == 0 && kbhit()==0 );
/////////////////////////////////////////
// RETURN Derecho Izquierdo //
// //
// 0 0 0 //
// 1 1 0 //
// 2 0 1 //
// 3 1 1 //
// //
/////////////////////////////////////////
int Que;
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;
return Que;
}

8
CD_RATON.H Normal file
View File

@ -0,0 +1,8 @@
extern void desactiva_raton(void);
extern void activa_raton(void);
extern void inicializa_raton_grafico(int x1, int y1, int x2, int y2, int px, int py);
extern void Anclar_Raton(void);
extern int Espera_Tecla_o_Raton(void);
extern int raton, x_raton, y_raton, boton_izq, boton_der, PunteroRaton;

27
CD_SND.H Normal file
View File

@ -0,0 +1,27 @@
// CD_OUTxx . WAV
// ID_Code xx
#define Start_Program 0 // 0 00 Inicio del Programa
#define Mouse_Press 1 // 1 01 Raton pulsado en algun sitio
#define Key_Press 2 // 2 02 Tecla pulsada para nada
#define Mouse_Key_Tick 3 // 3 03 Tick Generico
#define Play_DOS 4 // 4 04 Boton DOS
#define Play_WINDOWS 5 // 5 05 Boton Windows
#define Select_Icono 6 // 6 06 Select Icono
#define Install 7 // 7 07 Instalar
#define Setup 8 // 8 08 Configurar
#define Run 9 // 9 09 Ejecutar
#define Show_Image 10 // 10 0A Ver Dibujo
#define Yes 11 // 11 0B Si
#define No 12 // 12 0C No
#define Printing 13 // 13 0D Imprimiendo
#define Ok 14 // 14 0E Aceptar
#define Cancel 15 // 15 0F Cancelar
#define Save_until_exit 16 // 16 10 Salvar al Salir
#define Unknow_error 17 // 17 11 ERROR DESCONOCIDO
#define End_Program 18 // 18 FF Fin del Programa
#define Error_108 -1 // 19 ver 108 de Make_Boton (Error Abriendo Fichero)
#define Error_113 -1 // 20 ver 113 de Make_Boton (No fichero a instalarar)
#define Error_114 -1 // 21 ver 114 de Make_Boton (Ejecutar imposible)
#define Error_116 -1 // 22 ver 116 de Make_Boton (Imprimiendo)

328
CD_SND/CD_SND.CPP Normal file
View File

@ -0,0 +1,328 @@
/////////////////////////////////////////////////////////////////////////////
//
// CD_SND
//
// Utilidad para CD_Out
//
// Se encarga de reunir todos los Waves en un solo archivo para que
// CD_Out pueda utilizarlos.
//
// Parametros de entrada:
//
// CD_SND [Command] [Output File] [ ID_Code ]
//
// -u:NAME.EXT Uncompress Wave with name: NAME.EXT
// -ua Uncompress ALL WAVES
//
// -c:NAME.EXT Compress Wave with name: NAME.EXT ( Name will be a name valid
// for CD_Out:
// CD_OUTXX.WAV )
// -ca Compress ALL WAVES
// -e:NAME.EXT Extract Wave File with NAME.EXT
//
// Si el fichero no es reconocido por CD_Out necesitara un ID_Code
// distinto para su utilizaci¢n ( en un futuro ), para futuras vesiones
// de CD_Out
/////////////////////////////////////////////////////////////////////////////
#include<io.h>
#include<stdio.h>
#include<string.h>
#include<stdlib.h>
#include<conio.h>
#define Extraer_Uno 1
#define Extraer_Todos 2
#define Insertar_Uno 3
#define Insertar_Todos 4
#define Borra_Uno 5
long Longitud( const char *File );
void Procesa( int Accion, const char *Fich_Origen, char *Fich_Destino );
void Ayuda(void) ;
void Indica_progreso(int RESET);
typedef struct
{
char Nombre_del_Programa[70];
char Comentario_Inicial[70];
char VerHi, VerLow;
char Register;
long Records;
} CABECERA;
typedef struct
{
char Wave_Name[13]; // Nombre del Wave
char ID_code; // Codigo ID_ del Wave
unsigned long Pos; // Posici¢n de comienzo dentro del archivo destino
unsigned long Len; // Longitud
} CD_SND;
long la;
char *Fich_Origen;
char *Fich_Destino;
char Accion = 0;
char ID_Code = -1;
const char File[][13] = {
"CD_OUT00.WAV",
"CD_OUT01.WAV",
"CD_OUT02.WAV",
"CD_OUT03.WAV",
"CD_OUT04.WAV",
"CD_OUT05.WAV",
"CD_OUT06.WAV",
"CD_OUT07.WAV",
"CD_OUT08.WAV",
"CD_OUT09.WAV",
"CD_OUT0A.WAV",
"CD_OUT0B.WAV",
"CD_OUT0C.WAV",
"CD_OUT0D.WAV",
"CD_OUT0E.WAV",
"CD_OUT0F.WAV",
"CD_OUT10.WAV",
"CD_OUT11.WAV",
"CD_OUTFF.WAV"
};
void main( int argc, char *argv[] )
{
int i;
clrscr();
gotoxy(1,1); textcolor(WHITE); textbackground(BLUE);
cprintf("Copyright (c) J.D. System 1995. Jos David Guilln Dominguez... CD_Snd vú1.0");
// Analizamos parametros
if ( argc != 3 )
{
textbackground(BLACK);
gotoxy(1,3);
cprintf("Sintaxis: CD_Snd [Comando] [Archivo_Destino] [ID_Code] ");
Ayuda();
return;
} else {
gotoxy(1,2);
cprintf(" Procesando Argumentos ");
Indica_progreso(1);
la = argc;
if ( !strncmpi(argv[1], "-U:", 3) )
{
Fich_Origen = argv[1];
Fich_Origen += 3;
Accion = Extraer_Uno;
Indica_progreso(0);
} else
if ( !strcmpi(argv[1], "-UA") )
{
Accion = Extraer_Todos;
Indica_progreso(0);
} else
if ( !strncmpi(argv[1], "-C:", 3) )
{
Fich_Origen = argv[1];
Fich_Origen += 3;
Accion = Insertar_Uno;
Indica_progreso(0);
} else
if ( !strcmpi(argv[1], "-CA") )
{
Accion = Insertar_Todos;
Indica_progreso(0);
} else
if ( !strncmpi(argv[1], "-E:", 3) )
{
Fich_Origen = argv[1];
Fich_Origen += 3;
Accion = Borra_Uno;
Indica_progreso(0);
} else Ayuda();
Fich_Destino = argv[2];
Indica_progreso(0);
ID_Code = atoi( argv[3] );
Indica_progreso(0);
}
Procesa( Accion, File[i], Fich_Destino );
/*
swicth ( Accion )
{
case Insertar_Todos:
case Extraer_Todos:
for ( i=0; i< 19; i++ )
{
ID_Code = i;
Procesa( Accion, &File[i], Fich_Destino );
}
break;
default:
Procesa( Accion, Fich_Origen, Fich_Destino );
break;
}
*/
}
void Indica_progreso(int RESET){
static int posx=31; // Posici¢n de giro //
static int giro=0; // Carater para rotar //
static long contador = 0;
if ( RESET ) { contador = 0; gotoxy(1,2); cprintf(" 0%"); return; }
contador++;
gotoxy(1,2); cprintf("%3d%%", ( (contador*100)/la ) );
gotoxy(posx-1,2); posx++;
switch(giro){
case 0: cprintf(" /"); break;
case 1: cprintf(" Ä"); break;
case 2: cprintf(" \\"); break;
case 3: cprintf(" ³"); break;
}
if(posx==79) posx=30;
giro++; if(giro==4) giro=0;
}
/*CD_OUTxx . WAV
00 Inicio del Programa
FF Fin del Programa
01 Raton pulsado en algun sitio
02 Tecla pulsada para nada
03 Tick Generico
04 Boton DOS
05 Boton Windows
06 Select Icono
07 Instalar
08 Configurar
09 Ejecutar
0A Ver Dibujo
0B Si
0C No
0D Imprimiendo
0E Aceptar
0F Cancelar
10 Salvar al Salir
11 ERROR DESCONOCIDO
*/
void Ayuda(void)
{
gotoxy(1,5);
cprintf("[Comando]\r\n");
cprintf(" * -u: Nombre.EXT Saca una copia del fichero compactado\r\n");
cprintf(" * -ua Saca una copia de todos los ficheros\r\n") ;
cprintf(" * -c: Nombre.EXT Introduce el Archivo Nombre.Ext en Destino\r\n");
cprintf(" -ca Introduce todos los Archivos en Destino\r\n") ;
cprintf(" * -e: Nombre.EXT Borra el Archivo Nombre.Ext de Destino\r\n\r\n");
cprintf(" * Comandos desctivados el la versi¢n SHAREWARE\r\n\r\n") ;
}
void Procesa( int Accion, const char *Fich_Origen, char *Fich_Destino )
{
FILE *ORIGEN;
FILE *DESTINO;
CABECERA Cabecera;
CD_SND CD_Snd[19];
long Pos; int i;
/*
if ( ( ORIGEN = fopen( Fich_Origen, "rb") ) == NULL )
{
cprintf("\r\nERROR ABRIENDO ORIGEN: %s\r\n", Fich_Origen);
exit(1);
}
*/
if ( ( DESTINO = fopen( Fich_Destino, "wb") ) == NULL )
{
cprintf("\r\nERROR ABRIENDO DESTINO: %s\r\n", Fich_Destino);
exit(1);
}
sprintf( Cabecera.Nombre_del_Programa, "CD_Snd\nCompactador de Ficheros para CD_Out\n" );
sprintf( Cabecera.Comentario_Inicial, "\n\nCD_Out es un programa de Jos David\nCD_Snd idem%d%d", 7, 26);
Cabecera.VerHi = 1;
Cabecera.VerLow = 0;
Cabecera.Register = 0;
Cabecera.Records =19;
fwrite( &Cabecera, sizeof( Cabecera ), 1, DESTINO );
Pos = sizeof( Cabecera ) + sizeof( CD_SND) * 19;
Indica_progreso(1); la = 19;
gotoxy(1,2);
cprintf(" Creando Esturcturas ");
for ( i=0; i< 19; i++ )
{
strcpy(CD_Snd[i].Wave_Name, File[i]); // Nombre del Wave
CD_Snd[i].ID_code = i; // Codigo ID_ del Wave
CD_Snd[i].Len = Longitud(File[i]);
CD_Snd[i].Pos = Pos;
Pos += CD_Snd[i].Len;
Indica_progreso(0);
}
fwrite( CD_Snd, sizeof( CD_SND ), 19, DESTINO );
for ( i=0; i< 19; i++ )
{
// gotoxy(1,4);
// cprintf(" Pulse una Tecla para siguiente Archivo -- Version SHAREWARE -- ");
// getch();
// gotoxy(1,4);
// cprintf(" ");
gotoxy(1,2);
cprintf(" Uniendo %13s ", File[i]);
Indica_progreso(1); la = CD_Snd[i].Len;
gotoxy(1,3);
cprintf(" Longitud a procesar %ld ", CD_Snd[i].Len);
if ( ( ORIGEN = fopen( File[i], "rb") ) != NULL )
{
Pos = CD_Snd[i].Len;
while ( Pos > 0 ) { fputc(fgetc(ORIGEN), DESTINO); Indica_progreso(0); Pos--; }
fclose(ORIGEN);
}
}
fclose(DESTINO);
}
long Longitud(const char *File )
{
FILE *file;
long devolver;
if ( (file = fopen( File, "rb")) == NULL )
{
return 0;
}
devolver = filelength(fileno(file));
fclose(file);
return devolver;
}

BIN
CD_SND/CD_SND.EXE Normal file

Binary file not shown.

82
CD_SND/CD_TEST.CPP Normal file
View File

@ -0,0 +1,82 @@
#include <conio.h>
#include <stdio.h>
#include "..\CD_SND.H"
#include "c:\things\borlandc\jd_lib\wav_lib\wavplay.h"
int Load_Snd(void);
void Sonido( char Sonido );
typedef struct
{
char Nombre_del_Programa[70];
char Comentario_Inicial[70];
char VerHi, VerLow;
char Register;
long Records;
} CABECERA;
typedef struct
{
char Wave_Name[13]; // Nombre del Wave
char ID_code; // Codigo ID_ del Wave
unsigned long Pos; // Posici¢n de comienzo dentro del archivo destino
unsigned long Len; // Longitud
} CD_SND;
CD_SND CD_Snd[19];
int Load_Snd(void)
{
CABECERA Cabecera;
FILE *DESTINO;
if ( ( DESTINO = fopen( "CD_OUT.SND", "rb") ) == NULL )
{
return 0;
}
fread( &Cabecera, sizeof( Cabecera ), 1, DESTINO );
fread( CD_Snd, sizeof( CD_SND ), 19, DESTINO );
fclose(DESTINO);
return 1;
}
void main(void)
{
/*Û*/cprintf("Inicializando sonidos. "); /*Û*/
/*Û*/ switch ( InitSB() ) { /*Û*/
/*Û*/ case 0: /*Û*/
/*Û*/ cprintf(" --> Speaker Ok!\n\r"); /*Û*/
/*Û*/ break; /*Û*/
/*Û*/ case 1: /*Û*/
/*Û*/ cprintf(" --> Sound Blaster Ok!\n\r"); /*Û*/
/*Û*/ break; /*Û*/
/*Û*/ case 2: /*Û*/
/*Û*/ cprintf(" --> Dac Casero Ok!\n\r"); /*Û*/
/*Û*/ break; /*Û*/
/*Û*/ } /*Û*/
Load_Snd();
cprintf("\n\rFichero Posici¢n Longitud ID_Code\n\r");
for( int Sonido=0; Sonido < 19; Sonido++ )
{
while( kbhit() ) getch();
cprintf("%s %8ld %8ld %d\n\r", CD_Snd[Sonido].Wave_Name, CD_Snd[Sonido].Pos,
CD_Snd[Sonido].Len, (int)CD_Snd[Sonido].ID_code);
if ( PlayWav((char far *)"CD_OUT.SND", CD_Snd[Sonido].Pos, CD_Snd[Sonido].Len ) == -1 )
PlayLongWav((char far *)"CD_OUT.SND", CD_Snd[Sonido].Pos, CD_Snd[Sonido].Len );
while( kbhit() ) getch();
}
}

BIN
CD_SND/CD_TEST.EXE Normal file

Binary file not shown.

BIN
CD_SND/CD_TEST.PRJ Normal file

Binary file not shown.

BIN
CD_SND/WAV/CD_OUT00.WAV Normal file

Binary file not shown.

BIN
CD_SND/WAV/CD_OUT01.WAV Normal file

Binary file not shown.

BIN
CD_SND/WAV/CD_OUT02.WAV Normal file

Binary file not shown.

BIN
CD_SND/WAV/CD_OUT03.WAV Normal file

Binary file not shown.

BIN
CD_SND/WAV/CD_OUT04.WAV Normal file

Binary file not shown.

BIN
CD_SND/WAV/CD_OUT07.WAV Normal file

Binary file not shown.

BIN
CD_SND/WAV/CD_OUT08.WAV Normal file

Binary file not shown.

BIN
CD_SND/WAV/CD_OUT09.WAV Normal file

Binary file not shown.

BIN
CD_SND/WAV/CD_OUT0A.WAV Normal file

Binary file not shown.

BIN
CD_SND/WAV/CD_OUT0B.WAV Normal file

Binary file not shown.

BIN
CD_SND/WAV/CD_OUT0C.WAV Normal file

Binary file not shown.

BIN
CD_SND/WAV/CD_OUT0D.WAV Normal file

Binary file not shown.

Some files were not shown because too many files have changed in this diff Show More