First commit 16/12/1996
This commit is contained in:
BIN
D.EXE
Normal file
BIN
D.EXE
Normal file
Binary file not shown.
BIN
DYNA2.EXE
Normal file
BIN
DYNA2.EXE
Normal file
Binary file not shown.
BIN
DYNA2.PRJ
Normal file
BIN
DYNA2.PRJ
Normal file
Binary file not shown.
BIN
DYNA2.TFA
Normal file
BIN
DYNA2.TFA
Normal file
Binary file not shown.
991
DYNA_JGD.CPP
Normal file
991
DYNA_JGD.CPP
Normal file
@ -0,0 +1,991 @@
|
||||
#include <dos.h>
|
||||
#include <time.h>
|
||||
#include <conio.h>
|
||||
#include <stdio.h>
|
||||
#include <alloc.h>
|
||||
#include "Dyna_tbl.h"
|
||||
#include "..\libs\int_key\int_key.h"
|
||||
#include "..\modex\modex.h"
|
||||
#include "..\modex\c_utils.h"
|
||||
|
||||
#define BORRAR 0
|
||||
#define REescribe 1
|
||||
|
||||
#define CTE_SALTO 80
|
||||
|
||||
|
||||
|
||||
extern char prt_tbl[13+1][21+1];
|
||||
extern char prt_tbl2[13+1][21+1];
|
||||
|
||||
extern "C" void SET_VECTORES(volatile char *);
|
||||
extern "C" void UNSET_VECTORES(void);
|
||||
void limpia_teclado(void);
|
||||
int RellanaConcursantes(void);
|
||||
void ProcesaMovimientos(int Page);
|
||||
void EscribeObjetos( int Accion, int Page );
|
||||
void LiberaConcursantes(void);
|
||||
|
||||
// Establece preferencias por defecto
|
||||
PREFERENCIAS Pref = { POS_BOSQUE, 4,
|
||||
{
|
||||
{ t_d, t_g, t_r, t_f, t_tab },
|
||||
{ t_4n, t_6n, t_8n, t_2n, t_0n },
|
||||
{ t_d, t_g, t_r, t_f , t_tab },
|
||||
{ t_izquierda, t_derecha, t_arriba, t_abajo , t_0n }
|
||||
/*
|
||||
{ t_d, t_g, t_r, t_f },
|
||||
{ t_d, t_g, t_r, t_f },
|
||||
{ t_d, t_g, t_r, t_f },
|
||||
{ t_d, t_g, t_r, t_f },
|
||||
*/
|
||||
}
|
||||
};
|
||||
|
||||
volatile char mapa_teclado[512];
|
||||
int RellanaConcursantes(void);
|
||||
|
||||
|
||||
struct byte
|
||||
{
|
||||
int PuedeMatar : 1 ; // Informa sobre si puede matar por contacto
|
||||
int PuedeMorir : 1 ; // Informa sobre si puede morir por contacto
|
||||
int PuedeVolar : 1 ; // Informa sobre si puede atravezar los cuadros
|
||||
int Dispara : 1 ; // Informa si el concursante puede disparar
|
||||
|
||||
int CaputDelTo : 1 ; // Informa si el concursante puede disparar
|
||||
|
||||
int Vidas : 4 ; // Vidas del concursante <= 4
|
||||
};
|
||||
|
||||
// Esta estructura contendra todo lo que hay que procesar:
|
||||
// (todo lo que se mueva) jugadores, enemigos, bombas, teleports
|
||||
//
|
||||
// NOTA: Las primeras estructuras deben corresponder a los HUMANOS
|
||||
// tantas como participantes hubiesen...
|
||||
typedef struct concursantes
|
||||
{
|
||||
char Tipo_de_concursante; // Quien Juega
|
||||
char InfoConcursante;
|
||||
int PosX, PosY; // Posicion del concursante
|
||||
int old_PosX[2], old_PosY[2]; // Posiciones del concursante en cada pagina
|
||||
char Direccion; // Direccion que toma el concursante
|
||||
char Velocidad; // Como de rapido se mueve
|
||||
char delay_time; // Tiempo de retraso por el que va
|
||||
int secuencia_animada; // Secuencia de animaci<63>n por la que va
|
||||
char Disparos; // # de disparos que puede poner al mismo tiempo
|
||||
long DisparosP; // # de disparos ya puestos
|
||||
char Longitud; // Longitud del disparo en cuadros;
|
||||
|
||||
struct byte Varios;
|
||||
struct concursantes *poseed; // Due<75>o f<>sico de este objeto...
|
||||
struct concursantes *sig; // Puntero al siguientes concursante
|
||||
|
||||
} CONCURSANTES;
|
||||
|
||||
CONCURSANTES *Concursantes;
|
||||
CONCURSANTES *NuevoConcursante(struct concursantes *Concur);
|
||||
//struct concursante *NuevoConcursante(struct concursantes *Concur);
|
||||
void GeneraFuego( CONCURSANTES *aux );
|
||||
void GeneraXYaleatorio( int *X, int *Y );
|
||||
void ColocaBomba( CONCURSANTES *concursante );
|
||||
CONCURSANTES *EliminaConcursante(struct concursantes *Concur);
|
||||
void CompruebaCoordenadas(char incX, char incY, CONCURSANTES *objeto, char *Objeto_Caput );
|
||||
void MovimientoAutomatico( CONCURSANTES *aux, char *incY, char *incX, int Page );
|
||||
void ColocaFuego( int PosX, int PosY, CONCURSANTES *aux );
|
||||
|
||||
int jklop = 0;
|
||||
extern CallBIOSHandler;
|
||||
|
||||
clock_t TiempoDeJuego, InicioDeJuego;
|
||||
|
||||
void ComienzaJuego(void)
|
||||
{
|
||||
int Current_Page = 0, cifraTMP;
|
||||
long DTiempo;
|
||||
|
||||
limpia_teclado();
|
||||
|
||||
if ( RellanaConcursantes() == ERROR ) Error(0x30);
|
||||
|
||||
set_display_page( 1 );
|
||||
|
||||
CallBIOSHandler = 0;
|
||||
|
||||
InicioDeJuego = clock();
|
||||
|
||||
while( mapa_teclado[t_esc] == 0 )
|
||||
{
|
||||
|
||||
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// mostramos el reloj...
|
||||
TiempoDeJuego = clock();
|
||||
|
||||
DTiempo = ( TiempoDeJuego - InicioDeJuego ) / CLK_TCK;
|
||||
|
||||
// minutos
|
||||
cifraTMP = ( DTiempo / 60 );
|
||||
tdraw_bitmap ((char far *)( (Sprite[POS_NUMEROS].Sprite[0])+(long)16*18*( cifraTMP / 10 ) )
|
||||
, 28 + 16*0, 3, 16, 11);
|
||||
cifraTMP = ( cifraTMP - ( cifraTMP / 10 ) * 10 );
|
||||
tdraw_bitmap ((char far *)( (Sprite[POS_NUMEROS].Sprite[0])+(long)16*18*cifraTMP )
|
||||
, 28 + 16*1, 3, 16, 11);
|
||||
// minutos
|
||||
cifraTMP = ( DTiempo % 60 );
|
||||
tdraw_bitmap ((char far *)( (Sprite[POS_NUMEROS].Sprite[0])+(long)16*18*( cifraTMP / 10 ) )
|
||||
, 28 + 4 + 16*2, 3, 16, 11);
|
||||
cifraTMP = ( cifraTMP - ( cifraTMP / 10 ) * 10 );
|
||||
tdraw_bitmap ((char far *)( (Sprite[POS_NUMEROS].Sprite[0])+(long)16*18*( cifraTMP ) )
|
||||
, 28 + 4 + 16*3, 3, 16, 11);
|
||||
|
||||
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
//<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
|
||||
if ( mapa_teclado[t_2] )
|
||||
{
|
||||
mapa_teclado[t_2] = 0;
|
||||
set_display_page (2);
|
||||
sleep(5);
|
||||
}
|
||||
|
||||
if ( mapa_teclado[t_9] )
|
||||
{
|
||||
Pref.Entorno+=9; mapa_teclado[t_9] = 0;
|
||||
if ( Pref.Entorno >= POS_BOSQUE + 3*9 )
|
||||
Pref.Entorno = POS_BOSQUE;
|
||||
}
|
||||
if ( mapa_teclado[t_0] )
|
||||
{
|
||||
InicializaJuego(); mapa_teclado[t_0] = 0;
|
||||
copy_page( 2, 1 );
|
||||
copy_page( 2, 0 );
|
||||
}
|
||||
|
||||
set_active_page (Current_Page);
|
||||
|
||||
EscribeObjetos( BORRAR, Current_Page );
|
||||
// copy_page( 2, Current_Page );
|
||||
|
||||
ProcesaMovimientos( Current_Page );
|
||||
EscribeObjetos( REescribe, Current_Page );
|
||||
|
||||
|
||||
set_display_page (Current_Page);
|
||||
|
||||
Current_Page = Current_Page ^ 0x01;
|
||||
|
||||
};
|
||||
|
||||
LiberaConcursantes();
|
||||
}
|
||||
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* EscribeObjetos *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Se encarga de escribir todos los objetos a la patalla: *|
|
||||
|* a> se eliminan todos los objetos animados de la pantalla *|
|
||||
|* b> se dibujan en las nuevas posiciones *|
|
||||
|* *|
|
||||
|* Entradas: BORRA ------> a *|
|
||||
|* REescribe --> b *|
|
||||
|* Salidas: (ninguna) *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
void EscribeObjetos( int Accion, int Page )
|
||||
{
|
||||
CONCURSANTES *aux;
|
||||
int Ancho, Alto;
|
||||
|
||||
// Empiezo por el principio
|
||||
aux = Concursantes;
|
||||
// Y mientras quede algo que procesar
|
||||
while( aux != NULL )
|
||||
{
|
||||
// Obtengo las dimensiones
|
||||
Ancho = InfoSprites[ aux -> InfoConcursante ].Ancho;
|
||||
Alto = InfoSprites[ aux -> InfoConcursante ].Alto;
|
||||
|
||||
if ( Accion == BORRAR )
|
||||
|
||||
copy_bitmap (2, aux -> old_PosX[Page] + 12+InfoSprites[aux -> InfoConcursante].CorrX, aux -> old_PosY[Page] + 20+InfoSprites[aux -> InfoConcursante].CorrY, aux -> old_PosX[Page]+12+Ancho+InfoSprites[aux -> InfoConcursante].CorrX, aux -> old_PosY[Page]+20+Alto+InfoSprites[aux -> InfoConcursante].CorrY,
|
||||
Page, aux -> old_PosX[Page] + 12+InfoSprites[aux -> InfoConcursante].CorrX, aux -> old_PosY[Page] + 20+InfoSprites[aux -> InfoConcursante].CorrY);
|
||||
|
||||
// copy_bitmap (2, aux -> old_PosX[Page] + 12, aux -> old_PosY[Page] + 20, aux -> old_PosX[Page]+12+Ancho, aux -> old_PosY[Page]+20+Alto,
|
||||
// Page, aux -> old_PosX[Page] + 12, aux -> old_PosY[Page] + 20);
|
||||
|
||||
else
|
||||
{
|
||||
// Amplio la secuencia animada
|
||||
// 0 Izq, 1 Der, 2 Arr, 3 Abj, Muerte
|
||||
tdraw_bitmap ((char far *)( (Sprite[aux -> Tipo_de_concursante].Sprite[ aux -> InfoConcursante == SPR_BAQUERO ? 0 : aux->Direccion ])+(long)Ancho*Alto* (long)( aux->secuencia_animada ) ), aux -> PosX+12+InfoSprites[aux -> InfoConcursante].CorrX, aux -> PosY+20+InfoSprites[aux -> InfoConcursante].CorrY, Ancho, Alto);
|
||||
// tdraw_bitmap ((char far *)( (Sprite[aux -> Tipo_de_concursante].Sprite[aux->Direccion])+(long)Ancho*Alto* (long)( aux->secuencia_animada ) ), aux -> PosX+12, aux -> PosY+20, Ancho, Alto);
|
||||
}
|
||||
|
||||
|
||||
aux = aux -> sig;
|
||||
};
|
||||
|
||||
|
||||
}
|
||||
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* ProcesaMovimientos *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Genera los movimientos del HUMANO y maquina, despues *|
|
||||
|* llama a la funci<63>n que los corrige... *|
|
||||
|* *|
|
||||
|* Entradas: Pagina de los movimientos *|
|
||||
|* Salidas: (ninguna) *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
void ProcesaMovimientos(int Page)
|
||||
{
|
||||
CONCURSANTES *aux;
|
||||
char old_dir, enc;
|
||||
char incX, incY, objeto_caput;
|
||||
|
||||
// Empiezo por el principio
|
||||
aux = Concursantes;
|
||||
// Y mientras quede algo que procesar
|
||||
while( aux != NULL )
|
||||
{
|
||||
incX = incY = enc = objeto_caput = 0;
|
||||
old_dir = aux -> Direccion;
|
||||
// SOLO SE PROCESA SI ESTA VIVO
|
||||
if ( aux -> Direccion != 4 )
|
||||
{
|
||||
switch( aux -> Tipo_de_concursante )
|
||||
{
|
||||
// Los jugadores procesan sus movimientos segun el usuario
|
||||
// izq, der, arr, abj
|
||||
case POS_JUGADORa:
|
||||
case POS_JUGADORb:
|
||||
// Izquierda
|
||||
if ( mapa_teclado[Pref.Teclas[(aux -> Tipo_de_concursante)-POS_JUGADORa][0]] )
|
||||
{
|
||||
incX = - (aux -> Velocidad);
|
||||
aux -> Direccion = 0;
|
||||
enc = 1;
|
||||
} else
|
||||
// Derecha
|
||||
if ( mapa_teclado[Pref.Teclas[(aux -> Tipo_de_concursante)-POS_JUGADORa][1]] )
|
||||
{
|
||||
incX = (aux -> Velocidad);
|
||||
aux -> Direccion = 1;
|
||||
enc = 1;
|
||||
} else
|
||||
// Arriba
|
||||
if ( mapa_teclado[Pref.Teclas[(aux -> Tipo_de_concursante)-POS_JUGADORa][2]] )
|
||||
{
|
||||
incY = - (aux -> Velocidad);
|
||||
aux -> Direccion = 2;
|
||||
enc = 1;
|
||||
} else
|
||||
// Abajo
|
||||
if ( mapa_teclado[Pref.Teclas[(aux -> Tipo_de_concursante)-POS_JUGADORa][3]] )
|
||||
{
|
||||
incY = (aux -> Velocidad);
|
||||
aux -> Direccion = 3;
|
||||
enc = 1;
|
||||
} //else
|
||||
// Bomba
|
||||
if ( mapa_teclado[Pref.Teclas[(aux -> Tipo_de_concursante)-POS_JUGADORa][4]] )
|
||||
{
|
||||
// Si puede disparar y el n<> de disparos puestos es menor al que tiene
|
||||
if ( aux -> Varios.Dispara && aux -> DisparosP < aux -> Disparos )
|
||||
{
|
||||
mapa_teclado[Pref.Teclas[(aux -> Tipo_de_concursante)-POS_JUGADORa][4]] = 0;
|
||||
ColocaBomba( aux );
|
||||
}
|
||||
}
|
||||
break;
|
||||
case POS_JUGADORd:
|
||||
case POS_JUGADORc:
|
||||
MovimientoAutomatico( aux, &incY, &incX, Page );
|
||||
enc = 1;
|
||||
break;
|
||||
// La bomba no se mueve ( A menos que se encuentre en una zona deslizante
|
||||
case POS_BOMBA:
|
||||
// Eliminamos la bomba
|
||||
if ( (clock() - (aux -> DisparosP))/CLK_TCK >= aux -> Varios.Vidas )
|
||||
objeto_caput = 1;
|
||||
enc = 1;
|
||||
break;
|
||||
case POS_BAQUERO:
|
||||
MovimientoAutomatico( aux, &incY, &incX, Page );
|
||||
enc = 1;
|
||||
break;
|
||||
// El resto sigue un algoritmo de movimiento ( actualmente ninguno );
|
||||
default:
|
||||
MovimientoAutomatico( aux, &incY, &incX, Page );
|
||||
enc = 1;
|
||||
break;
|
||||
}
|
||||
|
||||
// Procesa las coordenadas si no esta caput ( Direccion 4 )
|
||||
CompruebaCoordenadas( incX, incY, aux, &objeto_caput );
|
||||
|
||||
// Cambia de secuencia animada si corresponde
|
||||
if ( enc )
|
||||
{
|
||||
// Empieza el nuevo movimiento por por 0 si es distinto
|
||||
if ( aux -> Direccion != old_dir )
|
||||
{
|
||||
aux -> secuencia_animada = 0;
|
||||
aux -> delay_time = 0;
|
||||
} else
|
||||
if ( (aux -> delay_time = aux -> delay_time + aux -> Velocidad) >= InfoSprites[ aux -> InfoConcursante ].PixelCambio )
|
||||
{
|
||||
aux -> delay_time = 0;
|
||||
if ( (int)( aux -> secuencia_animada ) >= InfoSprites[ aux -> InfoConcursante ].Movimientos[ aux -> InfoConcursante == SPR_BAQUERO ? 0 : aux->Direccion] - 1 )
|
||||
aux -> secuencia_animada = 0;
|
||||
else
|
||||
aux -> secuencia_animada = aux -> secuencia_animada + 1;
|
||||
|
||||
}
|
||||
}
|
||||
|
||||
}else{
|
||||
if ( aux -> secuencia_animada >= (InfoSprites[ aux -> InfoConcursante ].Movimientos[4] - 1) )
|
||||
aux -> Varios.CaputDelTo = 1;
|
||||
else
|
||||
if ( (TiempoDeJuego/*clock()*/ - aux -> DisparosP)>>1 >= 1 )
|
||||
{
|
||||
aux -> DisparosP = TiempoDeJuego;//clock();
|
||||
aux -> secuencia_animada = aux -> secuencia_animada + 1;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
// Copia los movimientos a la pagina adecuada
|
||||
aux -> old_PosX[Page] = aux -> PosX;
|
||||
aux -> old_PosY[Page] = aux -> PosY;
|
||||
|
||||
if ( objeto_caput )
|
||||
{
|
||||
if ( aux -> Tipo_de_concursante == POS_BOMBA )
|
||||
{
|
||||
aux -> Varios.Vidas = 0;
|
||||
aux -> Varios.CaputDelTo = 1;
|
||||
GeneraFuego( aux );
|
||||
} else {
|
||||
aux -> Varios.Vidas = aux -> Varios.Vidas - 1;
|
||||
aux -> Direccion = 4; // Activamos la muerte
|
||||
aux -> secuencia_animada = 0;
|
||||
aux -> DisparosP = TiempoDeJuego;
|
||||
}
|
||||
}
|
||||
|
||||
if ( aux -> Varios.CaputDelTo )
|
||||
{
|
||||
// Borramos al objeto de la pantalla
|
||||
incX = InfoSprites[ aux -> InfoConcursante ].Ancho;
|
||||
incY = InfoSprites[ aux -> InfoConcursante ].Alto;
|
||||
if ( aux -> InfoConcursante == SPR_FUEGO )
|
||||
{
|
||||
set_active_page (2);
|
||||
aux -> DisparosP = (Pref.Entorno+4);
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + /*incX * incY **/((aux -> DisparosP)<<8) ), aux -> PosX + 12 , aux -> PosY + 20, incX, incY );
|
||||
set_active_page (Page);
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + /*incX * incY **/((aux -> DisparosP)<<8) ), aux -> PosX + 12 , aux -> PosY + 20, incX, incY );
|
||||
}
|
||||
|
||||
copy_bitmap (2, aux -> old_PosX[!Page] + 12+InfoSprites[aux -> InfoConcursante].CorrX, aux -> old_PosY[!Page] + 20+InfoSprites[aux -> InfoConcursante].CorrY, aux -> old_PosX[!Page]+12+incY+InfoSprites[aux -> InfoConcursante].CorrX, aux -> old_PosY[!Page]+20+incY+InfoSprites[aux -> InfoConcursante].CorrY,
|
||||
!Page, aux -> old_PosX[!Page] + 12+InfoSprites[aux -> InfoConcursante].CorrX, aux -> old_PosY[!Page] + 20+InfoSprites[aux -> InfoConcursante].CorrY);
|
||||
prt_tbl[(aux -> PosY)/16][(aux -> PosX)/16] = 0;
|
||||
|
||||
if ( ( aux -> poseed ) != NULL )
|
||||
( ( aux -> poseed ) -> DisparosP ) --;
|
||||
|
||||
aux = EliminaConcursante( aux );
|
||||
}
|
||||
else
|
||||
aux = aux -> sig;
|
||||
};
|
||||
|
||||
|
||||
}
|
||||
|
||||
void GeneraFuego( CONCURSANTES *concursante )
|
||||
{
|
||||
int x, y, inc;
|
||||
CONCURSANTES *aux;
|
||||
|
||||
x = concursante -> PosX / 16;
|
||||
y = concursante -> PosY / 16;
|
||||
|
||||
// Scaneamos posibiliades hacia la izquierda
|
||||
for ( inc = 1; ( x - inc ) >= 0 && inc <= concursante -> Longitud; inc++ )
|
||||
if ( prt_tbl[y][x-inc] != 1 && prt_tbl[y][x-inc] != 2 )
|
||||
{
|
||||
if ( (aux = NuevoConcursante(concursante)) == NULL ) Error(-1);
|
||||
aux -> Tipo_de_concursante = POS_FUEGOh;
|
||||
|
||||
ColocaFuego( (x-inc)*16, y*16, aux );
|
||||
prt_tbl[y][x-inc] = 4;
|
||||
} else {
|
||||
// Si es una bomba <20><><EFBFBD> BOOM !!! ( la otra )
|
||||
if ( prt_tbl2[y][x-inc] == 0 )
|
||||
{
|
||||
if ( (aux = NuevoConcursante(concursante)) == NULL ) Error(-1);
|
||||
aux -> Tipo_de_concursante = POS_FUEGOh;
|
||||
ColocaFuego( (x-inc)*16, y*16, aux );
|
||||
prt_tbl[y][x-inc] = 4;
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
// Scaneamos posibiliades hacia la Derecha
|
||||
for ( inc = 1; ( x + inc ) < 21 && inc <= concursante -> Longitud; inc++ )
|
||||
if ( prt_tbl[y][x+inc] != 1 && prt_tbl[y][x+inc] != 2 )
|
||||
{
|
||||
if ( (aux = NuevoConcursante(concursante)) == NULL ) Error(-1);
|
||||
aux -> Tipo_de_concursante = POS_FUEGOh;
|
||||
ColocaFuego( (x+inc)*16, y*16, aux );
|
||||
prt_tbl[y][x+inc] = 4;
|
||||
} else {
|
||||
// Si es una bomba <20><><EFBFBD> BOOM !!! ( la otra )
|
||||
if ( prt_tbl2[y][x+inc] == 0 )
|
||||
{
|
||||
if ( (aux = NuevoConcursante(concursante)) == NULL ) Error(-1);
|
||||
aux -> Tipo_de_concursante = POS_FUEGOh;
|
||||
ColocaFuego( (x+inc)*16, y*16, aux );
|
||||
prt_tbl[y][x+inc] = 4;
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
// Scaneamos posibiliades hacia la arriba
|
||||
for ( inc = 1; ( y - inc ) >= 0 && inc <= concursante -> Longitud; inc++ )
|
||||
if ( prt_tbl[y-inc][x] != 1 && prt_tbl[y-inc][x] != 2 )
|
||||
{
|
||||
if ( (aux = NuevoConcursante(concursante)) == NULL ) Error(-1);
|
||||
aux -> Tipo_de_concursante = POS_FUEGOv;
|
||||
ColocaFuego( x*16, (y-inc)*16, aux );
|
||||
prt_tbl[y-inc][x] = 4;
|
||||
} else {
|
||||
// Si es una bomba <20><><EFBFBD> BOOM !!! ( la otra )
|
||||
if ( prt_tbl2[y-inc][x] == 0 )
|
||||
{
|
||||
if ( (aux = NuevoConcursante(concursante)) == NULL ) Error(-1);
|
||||
aux -> Tipo_de_concursante = POS_FUEGOv;
|
||||
ColocaFuego( x*16, (y-inc)*16, aux );
|
||||
prt_tbl[y-inc][x] = 4;
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
// Scaneamos posibiliades hacia la abajo
|
||||
for ( inc = 1; ( y + inc ) < 13 && inc <= concursante -> Longitud; inc++ )
|
||||
if ( prt_tbl[y+inc][x] != 1 && prt_tbl[y+inc][x] != 2 )
|
||||
{
|
||||
if ( (aux = NuevoConcursante(concursante)) == NULL ) Error(-1);
|
||||
aux -> Tipo_de_concursante = POS_FUEGOv;
|
||||
ColocaFuego( x*16, (y+inc)*16, aux );
|
||||
prt_tbl[y+inc][x] = 4;
|
||||
} else {
|
||||
// Si es una bomba <20><><EFBFBD> BOOM !!! ( la otra )
|
||||
if ( prt_tbl2[y+inc][x] == 0 )
|
||||
{
|
||||
if ( (aux = NuevoConcursante(concursante)) == NULL ) Error(-1);
|
||||
aux -> Tipo_de_concursante = POS_FUEGOv;
|
||||
ColocaFuego( x*16, (y+inc)*16, aux );
|
||||
prt_tbl[y+inc][x] = 4;
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
|
||||
}
|
||||
|
||||
void ColocaFuego( int PosX, int PosY, CONCURSANTES *aux )
|
||||
{
|
||||
aux -> InfoConcursante = SPR_FUEGO;
|
||||
|
||||
aux -> PosX = PosX; aux -> PosY = PosY;
|
||||
|
||||
aux -> old_PosX[0] = aux -> old_PosX[1] = PosX;
|
||||
aux -> old_PosY[0] = aux -> old_PosY[1] = PosY;
|
||||
aux -> Direccion = 4;
|
||||
aux -> Velocidad = 1;
|
||||
aux -> delay_time = 40; aux -> secuencia_animada = 0;
|
||||
|
||||
aux -> poseed = NULL;
|
||||
aux -> DisparosP = TiempoDeJuego;
|
||||
|
||||
aux -> Varios.CaputDelTo = 0;
|
||||
}
|
||||
|
||||
void MovimientoAutomatico( CONCURSANTES *aux, char *incY, char *incX, int Page )
|
||||
{
|
||||
|
||||
// Cambiamos de direccion
|
||||
if ( aux -> old_PosX[Page] == aux -> PosX && aux -> old_PosY[Page] == aux -> PosY )
|
||||
{
|
||||
aux -> Direccion = (char)random_int( 4 );
|
||||
}
|
||||
|
||||
switch( aux -> Direccion )
|
||||
{
|
||||
// izq, der, arr, abj
|
||||
case 0:
|
||||
*incX = -(aux -> Velocidad);
|
||||
break;
|
||||
case 1:
|
||||
*incX = (aux -> Velocidad);
|
||||
break;
|
||||
case 2:
|
||||
*incY = -(aux -> Velocidad);
|
||||
break;
|
||||
case 3:
|
||||
*incY = (aux -> Velocidad);
|
||||
break;
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* CompruebaCoordenadas *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Comprueba que las coordenadas son correctas, en caso *|
|
||||
|* contrario las corrige. Tambien procesa el caso de *|
|
||||
|* encontrarse en una zona especial: teleport, flecha... *|
|
||||
|* *|
|
||||
|* Entradas: Punteros a las Coordenadas X , Y *|
|
||||
|* Salidas: (ninguna) *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
void CompruebaCoordenadas( char incX, char incY, CONCURSANTES *objeto, char *Objeto_Caput )
|
||||
{
|
||||
int xV, yV, xS, yS, Tmp;
|
||||
// Este es el puntero donde estan los cuadros:
|
||||
// prt_tbl[13][21];
|
||||
//
|
||||
// 1 ---> Cuadro indestructible / BOMBA
|
||||
// 2 ---> Cuadro destructible ( Se puede sobrevolar )
|
||||
// 3 ---> Objeto que puede matar al contacto
|
||||
// ( Solo los jugadores pueden morir al contacto )
|
||||
|
||||
// Compruebo que no este fuera de los bordes
|
||||
while ( (objeto->PosX) < 0 ) (objeto->PosX)++;
|
||||
while ( (objeto->PosX) > 16*20 ) (objeto->PosX)--;
|
||||
|
||||
while ( (objeto->PosY) < 0 ) (objeto->PosY)++;
|
||||
while ( (objeto->PosY) > 16*12 ) (objeto->PosY)--;
|
||||
|
||||
// xV = (*x + incX)/16; yV = (*y + incY)/16;
|
||||
|
||||
|
||||
// Es un movimiento en el eje X
|
||||
if ( incX != 0 )
|
||||
{
|
||||
xV = ((objeto->PosX) + (incX < 0 ? 2 : 11 ) )/16;
|
||||
yV = ((objeto->PosY)+2)/16;
|
||||
Tmp = ((objeto->PosY)+11)/16;
|
||||
|
||||
// Si no es un jugador ni una bomba ( Controlamos su c<>digo 3 )
|
||||
xS = xV; yS = yV;
|
||||
|
||||
if ( prt_tbl[yS][xS] == 4 )
|
||||
*Objeto_Caput = 1;
|
||||
|
||||
if ( objeto -> Varios.PuedeMatar )
|
||||
{
|
||||
prt_tbl[yV][xV] = 0;
|
||||
}
|
||||
|
||||
// Si estoy pisando un cuadro ocupado seguimos una estructura distinta
|
||||
if ( prt_tbl[yV][xV] == 1 ) //!= 0 )
|
||||
if ( incX < 0 ) xV --; else xV ++;
|
||||
else
|
||||
xV = ((objeto->PosX) + (incX < 0 ? 2 : 11 ) + incX )/16;
|
||||
|
||||
// Cuidadin que puede morir
|
||||
// if ( ( objeto -> InfoConcursante) == SPR_JUGADOR && ( objeto -> Varios.PuedeMorir ) && ( prt_tbl[yV][xV] == 3 || prt_tbl[Tmp][xV] == 3 ) )
|
||||
/*
|
||||
if ( prt_tbl[yS][xS] == 4 )
|
||||
*Objeto_Caput = 1;
|
||||
else
|
||||
*/
|
||||
if ( ( objeto -> InfoConcursante) == SPR_JUGADOR && ( objeto -> Varios.PuedeMorir ) && prt_tbl[yS][xS] == 3 )
|
||||
*Objeto_Caput = 1;
|
||||
else
|
||||
if ( prt_tbl[yV][xV] == 0 && prt_tbl[Tmp][xV] == 0 || ( objeto -> Varios.PuedeVolar && prt_tbl[yV][xV] == 2 && prt_tbl[Tmp][xV] == 2 ) )
|
||||
{
|
||||
(objeto->PosX) = (objeto->PosX) + incX;
|
||||
// Si no es un jugador ni una bomba ( Controlamos su c<>digo 3 )
|
||||
if ( objeto -> Varios.PuedeMatar )
|
||||
prt_tbl[yV][xV] = 3;
|
||||
} else {
|
||||
// Si no es un jugador ni una bomba ( Controlamos su c<>digo 3 )
|
||||
|
||||
if ( objeto -> Varios.PuedeMatar )
|
||||
prt_tbl[yS][xS] = 3;
|
||||
}
|
||||
|
||||
} else
|
||||
// Es un movimiento en el eje Y
|
||||
if ( incY != 0 )
|
||||
{
|
||||
yV = ((objeto->PosY) + (incY < 0 ? 2 : 11 ) )/16;
|
||||
|
||||
xV = ((objeto->PosX)+2)/16;
|
||||
Tmp = ((objeto->PosX)+11)/16;
|
||||
|
||||
// Si no es un jugador ni una bomba ( Controlamos su c<>digo 3 )
|
||||
xS = xV; yS = yV;
|
||||
|
||||
if ( prt_tbl[yS][xS] == 4 )
|
||||
*Objeto_Caput = 1;
|
||||
|
||||
if ( objeto -> Varios.PuedeMatar )
|
||||
{
|
||||
prt_tbl[yV][xV] = 0;
|
||||
}
|
||||
|
||||
|
||||
// Si estoy pisando un cuadro ocupado seguimos una estructura distinta
|
||||
if ( prt_tbl[yV][xV] == 1 )//!= 0 )
|
||||
if ( incY < 0 ) yV --; else yV ++;
|
||||
else
|
||||
yV = ((objeto->PosY) + (incY < 0 ? 2 : 11 ) + incY )/16;
|
||||
|
||||
// Cuidadin que puede morir
|
||||
// if ( ( objeto -> InfoConcursante) == SPR_JUGADOR && ( objeto -> Varios.PuedeMorir ) && ( prt_tbl[yV][xV] == 3 || prt_tbl[yV][Tmp] == 3 ) )
|
||||
/*
|
||||
if ( prt_tbl[yS][xS] == 4 )
|
||||
*Objeto_Caput = 1;
|
||||
else
|
||||
*/
|
||||
if ( ( objeto -> InfoConcursante) == SPR_JUGADOR && ( objeto -> Varios.PuedeMorir ) && prt_tbl[yS][xS] == 3 )
|
||||
*Objeto_Caput = 1;
|
||||
else
|
||||
if ( prt_tbl[yV][xV] == 0 && prt_tbl[yV][Tmp] == 0 || ( objeto -> Varios.PuedeVolar && prt_tbl[yV][xV] == 2 && prt_tbl[yV][Tmp] == 2 ) )
|
||||
{
|
||||
(objeto->PosY) = (objeto->PosY) + incY;
|
||||
// Si no es un jugador ni una bomba ( Controlamos su c<>digo 3 )
|
||||
if ( objeto -> Varios.PuedeMatar )
|
||||
prt_tbl[yV][xV] = 3;
|
||||
} else {
|
||||
// Si no es un jugador ni una bomba ( Controlamos su c<>digo 3 )
|
||||
if ( objeto -> Varios.PuedeMatar )
|
||||
prt_tbl[yS][xS] = 3;
|
||||
}
|
||||
|
||||
} else {
|
||||
// No se mueve, pero puede estar tocandole algo que le mate
|
||||
xS = ((objeto->PosX)+2)/16;
|
||||
yS = ((objeto->PosY)+2)/16;
|
||||
if ( prt_tbl[yS][xS] == 4 )
|
||||
*Objeto_Caput = 1;
|
||||
else
|
||||
if ( ( objeto -> InfoConcursante) == SPR_JUGADOR && ( objeto -> Varios.PuedeMorir ) && prt_tbl[yS][xS] == 3 )
|
||||
*Objeto_Caput = 1;
|
||||
|
||||
}
|
||||
|
||||
|
||||
// Por que lado del que pisa esta ocupado <20>
|
||||
// | <20>
|
||||
// <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ŀ
|
||||
// <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <<3C> <20> _ <20>
|
||||
// <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20><><EFBFBD>ij |<7C> <20>
|
||||
// <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20> <20>
|
||||
// <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD>
|
||||
// <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ
|
||||
// <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD>
|
||||
// <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ
|
||||
// <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD>
|
||||
// <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ <20>Ŀ
|
||||
// <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD>
|
||||
//
|
||||
|
||||
|
||||
|
||||
};
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* limpia_teclado *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Limpia el buffer propio de teclado *|
|
||||
|* *|
|
||||
|* Entradas: (ninguna) *|
|
||||
|* Salidas: (ninguna) *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
void limpia_teclado(void)
|
||||
{
|
||||
int n;
|
||||
for(n=0; n<256; n++)
|
||||
mapa_teclado[n]=0;
|
||||
}
|
||||
|
||||
void ColocaBomba( CONCURSANTES *concursante )
|
||||
{
|
||||
CONCURSANTES *aux;
|
||||
int xV, yV;
|
||||
|
||||
xV = (concursante -> PosX + 8)/16;
|
||||
yV = (concursante -> PosY + 8)/16;
|
||||
|
||||
|
||||
if ( (aux = NuevoConcursante(concursante)) == NULL ) Error(-1);
|
||||
aux -> Varios.PuedeMatar = 1; aux -> Varios.PuedeMorir = 1;
|
||||
aux -> Varios.PuedeVolar = 1; aux -> Varios.Dispara = 1;
|
||||
aux -> Varios.Vidas = 5; // Vida de la bomba == 5sg.
|
||||
|
||||
aux -> Tipo_de_concursante = POS_BOMBA;
|
||||
aux -> InfoConcursante = SPR_BOMBA;
|
||||
|
||||
aux -> PosX = xV*16; aux -> PosY = yV*16;
|
||||
prt_tbl[yV][xV] = 1; // Tipo 1 == indestructible
|
||||
|
||||
aux -> old_PosX[0] = aux -> old_PosX[1] = xV;
|
||||
aux -> old_PosY[0] = aux -> old_PosY[1] = yV;
|
||||
aux -> Direccion = 0;
|
||||
aux -> Velocidad = 1;
|
||||
aux -> delay_time = 40; aux -> secuencia_animada = 0;
|
||||
|
||||
aux -> poseed = concursante;
|
||||
|
||||
aux -> DisparosP = clock();
|
||||
aux -> Longitud = concursante -> Longitud;
|
||||
concursante -> DisparosP = concursante -> DisparosP + 1;
|
||||
|
||||
aux -> Varios.CaputDelTo = 0;
|
||||
|
||||
}
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* RellenaConcursantes *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Se encarga de colocar y definir a los concursantes *|
|
||||
|* *|
|
||||
|* Entradas: (ninguna) *|
|
||||
|* Salidas: OK todo va bien *|
|
||||
|* ERROR algo va mal *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
int RellanaConcursantes(void)
|
||||
{
|
||||
CONCURSANTES *aux;
|
||||
|
||||
// Jugador 1
|
||||
if ( (Concursantes = aux = NuevoConcursante(Concursantes)) == NULL ) return ERROR;
|
||||
aux -> Varios.PuedeMatar = 0; aux -> Varios.PuedeMorir = 1;
|
||||
aux -> Varios.PuedeVolar = 0; aux -> Varios.Dispara = 1;
|
||||
aux -> Varios.Vidas = 1;
|
||||
aux -> Tipo_de_concursante = POS_JUGADORa;
|
||||
aux -> InfoConcursante = SPR_JUGADOR ;
|
||||
aux -> PosX = 0; aux -> PosY = 0;
|
||||
aux -> old_PosX[0] = aux -> old_PosX[1] = 0;
|
||||
aux -> old_PosY[0] = aux -> old_PosY[1] = 0;
|
||||
aux -> Direccion = 2; aux -> Velocidad = 1;
|
||||
aux -> delay_time = 40; aux -> secuencia_animada = 0;
|
||||
aux -> Disparos = 5; aux -> Longitud = 3;
|
||||
aux -> DisparosP = 0;
|
||||
aux -> poseed = NULL;
|
||||
aux -> Varios.CaputDelTo = 0;
|
||||
|
||||
// Jugador 2
|
||||
if ( (aux = NuevoConcursante(Concursantes)) == NULL ) return ERROR;
|
||||
aux -> Varios.PuedeMatar = 0; aux -> Varios.PuedeMorir = 1;
|
||||
aux -> Varios.PuedeVolar = 0; aux -> Varios.Dispara = 1;
|
||||
aux -> Varios.Vidas = 1;
|
||||
aux -> Tipo_de_concursante = POS_JUGADORb;
|
||||
aux -> InfoConcursante = SPR_JUGADOR ;
|
||||
aux -> PosX = 320; aux -> PosY = 192;
|
||||
aux -> old_PosX[0] = aux -> old_PosX[1] = 320;
|
||||
aux -> old_PosY[0] = aux -> old_PosY[1] = 192;
|
||||
aux -> Direccion = 2; aux -> Velocidad = 1;
|
||||
aux -> delay_time = 40; aux -> secuencia_animada = 0;
|
||||
aux -> Disparos = 3; aux -> Longitud = 3;
|
||||
aux -> DisparosP = 0;
|
||||
aux -> poseed = NULL;
|
||||
aux -> Varios.CaputDelTo = 0;
|
||||
|
||||
// Jugador 3
|
||||
if ( Pref.Jugadores >= 3 )
|
||||
{
|
||||
if ( (aux = NuevoConcursante(Concursantes)) == NULL ) return ERROR;
|
||||
aux -> Varios.PuedeMatar = 0; aux -> Varios.PuedeMorir = 1;
|
||||
aux -> Varios.PuedeVolar = 0; aux -> Varios.Dispara = 1;
|
||||
aux -> Varios.Vidas = 1;
|
||||
aux -> Tipo_de_concursante = POS_JUGADORc;
|
||||
aux -> InfoConcursante = SPR_JUGADOR ;
|
||||
aux -> PosX = 320; aux -> PosY = 0;
|
||||
aux -> old_PosX[0] = aux -> old_PosX[1] = 320;
|
||||
aux -> old_PosY[0] = aux -> old_PosY[1] = 0;
|
||||
aux -> Direccion = 2; aux -> Velocidad = 1;
|
||||
aux -> delay_time = 40; aux -> secuencia_animada = 0;
|
||||
aux -> Disparos = 1; aux -> Longitud = 1;
|
||||
aux -> poseed = NULL;
|
||||
aux -> Varios.CaputDelTo = 0;
|
||||
}
|
||||
|
||||
// Jugador 4
|
||||
if ( Pref.Jugadores >= 4 )
|
||||
{
|
||||
if ( (aux = NuevoConcursante(Concursantes)) == NULL ) return ERROR;
|
||||
aux -> Varios.PuedeMatar = 0; aux -> Varios.PuedeMorir = 1;
|
||||
aux -> Varios.PuedeVolar = 0; aux -> Varios.Dispara = 1;
|
||||
aux -> Varios.Vidas = 1;
|
||||
aux -> Tipo_de_concursante = POS_JUGADORd;
|
||||
aux -> InfoConcursante = SPR_JUGADOR ;
|
||||
aux -> PosX = 0; aux -> PosY = 192;
|
||||
aux -> old_PosX[0] = aux -> old_PosX[1] = 0;
|
||||
aux -> old_PosY[0] = aux -> old_PosY[1] = 192;
|
||||
aux -> Direccion = 2; aux -> Velocidad = 1;
|
||||
aux -> delay_time = 40; aux -> secuencia_animada = 0;
|
||||
aux -> Disparos = 1; aux -> Longitud = 1;
|
||||
aux -> DisparosP = 0;
|
||||
aux -> poseed = NULL;
|
||||
aux -> Varios.CaputDelTo = 0;
|
||||
}
|
||||
|
||||
// Vaquero
|
||||
if ( (aux = NuevoConcursante(Concursantes)) == NULL ) return ERROR;
|
||||
aux -> Varios.PuedeMatar = 1; aux -> Varios.PuedeMorir = 1;
|
||||
aux -> Varios.PuedeVolar = 0; aux -> Varios.Dispara = 0;
|
||||
aux -> Varios.Vidas = 1;
|
||||
aux -> Tipo_de_concursante = POS_BAQUERO;
|
||||
aux -> InfoConcursante = SPR_BAQUERO;
|
||||
GeneraXYaleatorio( &(aux -> PosX), &(aux -> PosY) );
|
||||
aux -> old_PosX[0] = aux -> old_PosX[1] = 0;
|
||||
aux -> old_PosY[0] = aux -> old_PosY[1] = 192;
|
||||
aux -> Direccion = 2; aux -> Velocidad = 1;
|
||||
aux -> delay_time = 40; aux -> secuencia_animada = 0;
|
||||
aux -> Disparos = 1; aux -> Longitud = 1;
|
||||
aux -> DisparosP = 0;
|
||||
aux -> poseed = NULL;
|
||||
aux -> Varios.CaputDelTo = 0;
|
||||
|
||||
return OK;
|
||||
}
|
||||
|
||||
void GeneraXYaleatorio( int *X, int *Y )
|
||||
{
|
||||
do {
|
||||
*X = random_int( 17 ) + 2;
|
||||
*Y = random_int( 9 ) + 2;
|
||||
}while( prt_tbl[*Y][*X] == 1 );
|
||||
prt_tbl[*Y][*X] = 0;
|
||||
|
||||
*X = *X * 16; *Y = *Y * 16;
|
||||
}
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* LiberaConcursantes *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Elimina a todos los concursantes liberando la memoria *|
|
||||
|* *|
|
||||
|* Entradas: (ninguna) *|
|
||||
|* Salidas: (ninguna) *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
void LiberaConcursantes(void)
|
||||
{
|
||||
CONCURSANTES *aux;
|
||||
aux = Concursantes;
|
||||
|
||||
if ( Concursantes -> sig != NULL )
|
||||
{
|
||||
Concursantes = Concursantes -> sig;
|
||||
LiberaConcursantes();
|
||||
}
|
||||
free( aux );
|
||||
|
||||
|
||||
|
||||
}
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* EliminaConcursante *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Elimina al concursante que se le pasa como par<61>metro *|
|
||||
|* *|
|
||||
|* Entradas: El puntero al elemento a eliminar *|
|
||||
|* Salidas: Elemento siguiente en la lista *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
CONCURSANTES *EliminaConcursante(CONCURSANTES *Concur)
|
||||
{
|
||||
CONCURSANTES *ant;
|
||||
CONCURSANTES *aux;
|
||||
|
||||
ant = aux = Concursantes;
|
||||
// Quizas haya que eliminar al primer elemento
|
||||
if ( aux == Concur )
|
||||
{
|
||||
Concursantes = aux -> sig;
|
||||
free ( Concur );
|
||||
return Concursantes;
|
||||
} else {
|
||||
while ( aux != Concur && aux != NULL)
|
||||
{
|
||||
ant = aux;
|
||||
aux = aux -> sig;
|
||||
};
|
||||
if ( aux == NULL )
|
||||
return NULL;
|
||||
ant -> sig = Concur -> sig;
|
||||
free( Concur );
|
||||
return (ant -> sig);
|
||||
}
|
||||
}
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* NuevoConcursante *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* A<>ade un nuevo concursante al final *|
|
||||
|* *|
|
||||
|* Entradas: El puntero base donde insertar (Busca solo el final) *|
|
||||
|* *|
|
||||
|* Salidas: direccion del concursante a<>adido *|
|
||||
|* NULL algo va mal *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
CONCURSANTES *NuevoConcursante(CONCURSANTES *Concur)
|
||||
{
|
||||
CONCURSANTES *aux, *Concursante;
|
||||
|
||||
if ( (aux = (CONCURSANTES *)malloc( sizeof(CONCURSANTES) ) ) == NULL )
|
||||
return NULL;
|
||||
Concursante = Concur;
|
||||
aux -> sig = NULL;
|
||||
// Todavia no hay concursantes
|
||||
if ( Concursante == NULL )
|
||||
{
|
||||
Concursante = aux;
|
||||
} else {
|
||||
while( Concursante -> sig != NULL )
|
||||
Concursante = Concursante -> sig;
|
||||
Concursante -> sig = aux;
|
||||
|
||||
}
|
||||
|
||||
return aux;
|
||||
}
|
||||
|
||||
|
||||
962
DYNA_TBL.CPP
Normal file
962
DYNA_TBL.CPP
Normal file
@ -0,0 +1,962 @@
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* DYNA_TBL *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* M<>dulo encargado de cargar los elementos del tablero y *|
|
||||
|* enemigos del juegos. Tambi<62>n se encarga de generar el *|
|
||||
|* tablero seg<65>n preferencias de usuario... *|
|
||||
|* *|
|
||||
|* Fecha: 17-07-96 00.08 / 01.34 *|
|
||||
|* 18-07-96 12.51 / 14.24 *|
|
||||
|* 15.10 / *|
|
||||
|* 19-07-96 *|
|
||||
\**************************************************************************/
|
||||
#include "..\libs\int_key\int_key.h"
|
||||
|
||||
#include <dos.h>
|
||||
#include <alloc.h>
|
||||
#include <stdio.h>
|
||||
#include "Dyna_tbl.h"
|
||||
#include "..\modex\modex.h"
|
||||
#include "..\modex\c_utils.h"
|
||||
|
||||
#include <conio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>
|
||||
///<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>
|
||||
//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>
|
||||
#define KEYBOARDINTR 9
|
||||
#define KEYBOARDPORT 0x60
|
||||
|
||||
#ifdef __cplusplus
|
||||
#define __CPPARGS ...
|
||||
#else
|
||||
#define __CPPARGS
|
||||
#endif
|
||||
void interrupt (*BIOSKeyboardHandler)(__CPPARGS);
|
||||
char CallBIOSHandler = 0;
|
||||
|
||||
//( int Flags, int CS, int IP, int AX, int BX, int CX, int DX, int SI, int DI, int DS, int ES, int BP );
|
||||
void interrupt KeyboardHandler(__CPPARGS);
|
||||
//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>
|
||||
///<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>/<2F><>
|
||||
//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>//<2F>
|
||||
|
||||
|
||||
int NObjetos=0; // # de objetos ya contenidos en Sprite
|
||||
|
||||
SPRITE *Sprite;
|
||||
|
||||
// Esta informaci<63>n es constante y sirve para saber como tratar a los Sprite's
|
||||
const DatosTipo InfoSprites[] = {
|
||||
// 00 > Cuadros est<73>ticos 16x16 ( Power UPs )
|
||||
0x02,
|
||||
{ 0x00, 0x00, 0x00, 0x00, 0x00 },
|
||||
{ 0x12, 0x00, 0x00, 0x00, 0x00 },
|
||||
|
||||
0x10, 0x10, 0x00, 0x00, 0x02,
|
||||
|
||||
// 01 > Cuadros est<73>ticos 16x16 ( Unidades )
|
||||
0x02,
|
||||
{ 0x00, 0x00, 0x00, 0x00, 0x00 },
|
||||
{ 0x01, 0x00, 0x00, 0x00, 0x00 },
|
||||
|
||||
0x10, 0x10, 0x00, 0x00, 0x02,
|
||||
|
||||
// 02 > Cuadros est<73>ticos 16x16 ( Mapas )
|
||||
0x02,
|
||||
{ 0x00, 0x00, 0x00, 0x00, 0x00 },
|
||||
{ 0x2D, 0x00, 0x00, 0x00, 0x00 },
|
||||
|
||||
0x10, 0x10, 0x00, 0x00, 0x02,
|
||||
|
||||
// 03 > Cuadros est<73>ticos 16x18 ( Numeros )
|
||||
0x02,
|
||||
{ 0x00, 0x00, 0x00, 0x00, 0x00 },
|
||||
{ 0x0A, 0x00, 0x00, 0x00, 0x00 },
|
||||
|
||||
0x10, 0x12, 0x00, 0x00, 0x02,
|
||||
|
||||
// 04 > Anim. como Bomba, TelePort... 16x18
|
||||
0x02,
|
||||
{ 0x00, 0x00, 0x00, 0x00, 0x00 },
|
||||
{ 0x03, 0x00, 0x00, 0x00, 0x00 },
|
||||
|
||||
0x10, 0x12, 0x00, 0x00, 0x05,
|
||||
|
||||
// 05 > Monstruos como Globo y Fantasma 16x18
|
||||
0x02,
|
||||
{ 0x00, 0x00, 0x00, 0x00, 0x03 },
|
||||
{ 0x03, 0x00, 0x00, 0x00, 0x06 },
|
||||
|
||||
0x10, 0x12, 0x00, -4, 0x04,
|
||||
|
||||
// 06 > Monstruos 4dir. Estrella... 16x18
|
||||
0x05,
|
||||
{ 0x00, 0x03, 0x06, 0x09, 0x0C },
|
||||
{ 0x03, 0x03, 0x03, 0x03, 0x06 },
|
||||
|
||||
0x10, 0x12, 0x00, 0x00, 0x02,
|
||||
|
||||
// 07 > Perfil de los Jugadores 23x23
|
||||
0x05,
|
||||
{ 0x00, 0x03, 0x06, 0x09, 0x0C },
|
||||
{ 0x03, 0x03, 0x03, 0x03, 0x08 },
|
||||
|
||||
0x17, 0x17, -3, -5, 0x03,
|
||||
|
||||
// 08 > animaciones fuego vertical
|
||||
0x05,
|
||||
{ 0x00, 0x00, 0x00, 0x00, 0x00 },
|
||||
{ 0x00, 0x00, 0x00, 0x00, 0x06 },
|
||||
|
||||
0x10, 0x10, 0, 0, 0x03
|
||||
};
|
||||
|
||||
char prt_tbl[13+1][21+1] =
|
||||
{
|
||||
{ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 00 },
|
||||
{ 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 00 },
|
||||
{ 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 00 },
|
||||
{ 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1, 0, 00 },
|
||||
{ 0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 1, 1, 1, 0, 1, 0, 00 },
|
||||
{ 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1, 0, 00 },
|
||||
{ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 1, 0, 00 },
|
||||
{ 0, 1, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 00 },
|
||||
{ 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 00 },
|
||||
{ 0, 1, 0, 1, 0, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 00 },
|
||||
{ 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 00 },
|
||||
{ 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 00 },
|
||||
{ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 00 },
|
||||
{ 00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00,00, 00 },
|
||||
};
|
||||
|
||||
char prt_tbl2[13+1][21+1];
|
||||
|
||||
char far *TmpBuffer;
|
||||
void GetBitmap( char far *BitMapSRC, char far *TRG, int X, int Y, int Xw1, int Yw1, int Xw2 );
|
||||
|
||||
int TECLAr;
|
||||
|
||||
int main( void )
|
||||
{
|
||||
printf( "\n> Inicializando ModoX" );
|
||||
printf( "\n> Jos<6F> David Guillen" );
|
||||
|
||||
init_random ();
|
||||
|
||||
if ( ( TmpBuffer = (char far *)farmalloc( sizeof( char ) * 320 * 200 ) ) == NULL )
|
||||
return -1;
|
||||
|
||||
// Pido memoria para los elementos b<>sicos
|
||||
if ( InicializaElementosBasicos() != OK ) return ERROR;
|
||||
printf( "\nPreparado para comenzar...");
|
||||
getch();
|
||||
|
||||
if (set_vga_modex( Mode_360x240, 360, 240, 3) == 0) Error(0x00);
|
||||
|
||||
if ( MuestraMensajeCargando() != OK ) Error(0x10);
|
||||
|
||||
InicializaJuego();
|
||||
set_display_page( 0 );
|
||||
if ( CargaPaleta("images\\dyna_tbl.pcx") !=OK ) Error(0x11);
|
||||
|
||||
copy_page( 2, 1 );
|
||||
copy_page( 2, 0 );
|
||||
|
||||
BIOSKeyboardHandler = getvect(KEYBOARDINTR);
|
||||
setvect(KEYBOARDINTR, KeyboardHandler);
|
||||
|
||||
ComienzaJuego();
|
||||
setvect(KEYBOARDINTR, BIOSKeyboardHandler);
|
||||
|
||||
|
||||
farfree( TmpBuffer );
|
||||
set_video_mode (3);
|
||||
LiberaMemoriaObjetos();
|
||||
printf( "\n>XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX" );
|
||||
printf( "\n> Gracias a todos los que han echo posible este juego. " );
|
||||
printf( "\n> En especial a mi hermano Antonio. " );
|
||||
printf( "\n> Jos<6F> David Guillen || _-<2D> FuTuRe ViSiOn <20>-_ || InfoMundo" );
|
||||
printf( "\n>_ " );
|
||||
|
||||
fflush( stdin );
|
||||
return OK;
|
||||
}
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* CargaObjetosBasicos *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Carga los objetos Basicos del fichero Dyna_tbl.PCX *|
|
||||
|* *|
|
||||
|* *|
|
||||
|* Entradas: (ninguna) *|
|
||||
|* *|
|
||||
|* Salidas: OK Todo ha ido bien *|
|
||||
|* ERROR Algo va mal *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
int CargaObjetosBasicos( void )
|
||||
{
|
||||
FILE *fp;
|
||||
int ancho, alto;
|
||||
int contador;
|
||||
unsigned char byte;
|
||||
|
||||
// Abrimos el fichero
|
||||
|
||||
if ( (fp = fopen("images\\dyna_tbl.pcx","rb")) == NULL ) return ERROR;
|
||||
|
||||
// Saltamos la cabecera
|
||||
fseek( fp, 128, SEEK_SET );
|
||||
|
||||
for(alto=0; alto<200; alto++)
|
||||
{
|
||||
for(ancho=0; ancho<320; )
|
||||
{
|
||||
byte=getc(fp);
|
||||
if(byte<=0xC0)
|
||||
{
|
||||
byte = byte == 254 ? 0 : byte;
|
||||
ProcesaPuntoBasico( ancho, alto, byte );
|
||||
ancho++;
|
||||
}
|
||||
else
|
||||
{
|
||||
contador=byte&0x3F; byte=getc(fp);
|
||||
byte = byte == 254 ? 0 : byte;
|
||||
for(; contador>0; contador--)
|
||||
{
|
||||
ProcesaPuntoBasico( ancho, alto, byte );
|
||||
ancho++;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
fclose( fp );
|
||||
// Abrimos el fichero
|
||||
|
||||
if ( (fp = fopen("images\\dyna_jgd.pcx","rb")) == NULL ) return ERROR;
|
||||
|
||||
// Saltamos la cabecera
|
||||
fseek( fp, 128, SEEK_SET );
|
||||
|
||||
for(alto=0; alto<200; alto++)
|
||||
{
|
||||
for(ancho=0; ancho<320; )
|
||||
{
|
||||
byte=getc(fp);
|
||||
if(byte<=0xC0)
|
||||
{
|
||||
byte = byte == 254 ? 0 : byte;
|
||||
TmpBuffer[ancho + 320*alto] = byte;
|
||||
// ProcesaPuntoJugador( ancho, alto, byte );
|
||||
ancho++;
|
||||
}
|
||||
else
|
||||
{
|
||||
contador=byte&0x3F; byte=getc(fp);
|
||||
byte = byte == 254 ? 0 : byte;
|
||||
for(; contador>0; contador--)
|
||||
{
|
||||
TmpBuffer[ancho + 320*alto] = byte;
|
||||
// ProcesaPuntoJugador( ancho, alto, byte );
|
||||
ancho++;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
fclose(fp);
|
||||
|
||||
ProcesaPuntoJugador( ancho, alto, byte );
|
||||
return OK;
|
||||
}
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* ProcesaPuntoBasico *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* inserta la imagen en su lugar correspondiente *|
|
||||
|* *|
|
||||
|* Entradas: x,y coordenadas actuales del punto *|
|
||||
|* byte color *|
|
||||
|* Salidas: (ninguna) *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
void ProcesaPuntoBasico( int x, int y, char color )
|
||||
{
|
||||
int i, j, Xw, Yw;
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda al Globo 16x18
|
||||
Xw = InfoSprites[ SPR_GLOBO ].Ancho;
|
||||
Yw = InfoSprites[ SPR_GLOBO ].Alto;
|
||||
for ( i=0; i<3; i++ )
|
||||
if ( x >= (0 + (Xw+1)*i) && x < (Xw + (Xw+1)*i) && y >= 0 && y < 18 )
|
||||
{
|
||||
Sprite[POS_GLOBO].Sprite[0][( ( x - (Xw+1)*i ) + (Xw*y) ) + (Xw*Yw*i)] = color;
|
||||
return;
|
||||
}
|
||||
|
||||
for ( i=3; i<9; i++ )
|
||||
if ( x >= (0 + (Xw+1)*i) && x < (Xw + (Xw+1)*i) && y >= 0 && y < 18 )
|
||||
{
|
||||
Sprite[POS_GLOBO].Sprite[4][( ( x - (Xw+1)*i ) + (Xw*y) ) + (Xw*Yw*(i-3))] = color;
|
||||
return;
|
||||
}
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda al Baquero 16x18
|
||||
Xw = InfoSprites[ SPR_BAQUERO ].Ancho;
|
||||
Yw = InfoSprites[ SPR_BAQUERO ].Alto;
|
||||
for ( i=0; i<3; i++ )
|
||||
if ( x >= (0 + (Xw+1)*(i+9)) && x < (Xw + (Xw+1)*(i+9)) && y >= 0 && y < 18 )
|
||||
{
|
||||
Sprite[POS_BAQUERO].Sprite[0][( ( x - (Xw+1)*(i+9) ) + (Xw*y) ) + (Xw*Yw*i)] = color;
|
||||
return;
|
||||
}
|
||||
|
||||
for ( i=3; i<9; i++ )
|
||||
if ( x >= (0 + (Xw+1)*(i+9)) && x < (Xw + (Xw+1)*(i+9)) && y >= 0 && y < 18 )
|
||||
{
|
||||
Sprite[POS_BAQUERO].Sprite[4][( ( x - (Xw+1)*(i+9) ) + (Xw*y) ) + (Xw*Yw*(i-3))] = color;
|
||||
return;
|
||||
}
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda al Fantasma 16x18
|
||||
Xw = InfoSprites[ SPR_GOSTH ].Ancho;
|
||||
Yw = InfoSprites[ SPR_GOSTH ].Alto;
|
||||
for ( i=0; i<3; i++ )
|
||||
if ( x >= (0 + (Xw+1)*i) && x < (Xw + (Xw+1)*i) && y >= 19 && y < 37 )
|
||||
{
|
||||
Sprite[POS_GOSTH].Sprite[0][( ( x - (Xw+1)*i ) + (Xw*(y-19)) ) + (Xw*Yw*i)] = color;
|
||||
return;
|
||||
}
|
||||
|
||||
for ( i=3; i<9; i++ )
|
||||
if ( x >= (0 + (Xw+1)*i) && x < (Xw + (Xw+1)*i) && y >= 19 && y < 37 )
|
||||
{
|
||||
Sprite[POS_GOSTH].Sprite[4][( ( x - (Xw+1)*i ) + (Xw*(y-19)) ) + (Xw*Yw*(i-3))] = color;
|
||||
return;
|
||||
}
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda al Platano 16x18
|
||||
Xw = InfoSprites[ SPR_PLATANO ].Ancho;
|
||||
Yw = InfoSprites[ SPR_PLATANO ].Alto;
|
||||
for ( i=0; i<3; i++ )
|
||||
if ( x >= (0 + (Xw+1)*(i+9)) && x < (Xw + (Xw+1)*(i+9)) && y >= 19 && y < 37 )
|
||||
{
|
||||
Sprite[POS_PLATANO].Sprite[0][( ( x - (Xw+1)*(i+9) ) + (Xw*(y-19)) ) + (Xw*Yw*i)] = color;
|
||||
return;
|
||||
}
|
||||
|
||||
for ( i=3; i<9; i++ )
|
||||
if ( x >= (0 + (Xw+1)*(i+9)) && x < (Xw + (Xw+1)*(i+9)) && y >= 19 && y < 37 )
|
||||
{
|
||||
Sprite[POS_PLATANO].Sprite[4][( ( x - (Xw+1)*(i+9) ) + (Xw*(y-19)) ) + (Xw*Yw*(i-3))] = color;
|
||||
return;
|
||||
}
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda la Bomba 16x18
|
||||
Xw = InfoSprites[ SPR_BOMBA ].Ancho;
|
||||
Yw = InfoSprites[ SPR_BOMBA ].Alto;
|
||||
for ( i=0; i<3; i++ )
|
||||
if ( x >= (0 + (Xw+1)*i) && x < (Xw + (Xw+1)*i) && y >= 38 && y < 56 )
|
||||
{
|
||||
Sprite[POS_BOMBA].Sprite[0][( ( x - (Xw+1)*i) + (Xw*(y-38)) ) + (Xw*Yw*i)] = color;
|
||||
return;
|
||||
}
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda el TelePort 16x18
|
||||
Xw = InfoSprites[ SPR_TELEPORT ].Ancho;
|
||||
Yw = InfoSprites[ SPR_TELEPORT ].Alto;
|
||||
for ( i=0; i<3; i++ )
|
||||
if ( x >= (0 + (Xw+1)*(i+3)) && x < (Xw + (Xw+1)*(i+3)) && y >= 38 && y < 56 )
|
||||
{
|
||||
Sprite[POS_TELEPORT].Sprite[0][( ( x - (Xw+1)*(i+3)) + (Xw*(y-38)) ) + (Xw*Yw*i)] = color;
|
||||
return;
|
||||
}
|
||||
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda los Numeros 16x18
|
||||
Xw = InfoSprites[ SPR_NUMEROS ].Ancho;
|
||||
Yw = InfoSprites[ SPR_NUMEROS ].Alto;
|
||||
for ( i=0; i<10; i++ )
|
||||
if ( x >= (0 + (Xw+1)*i) && x < (Xw + (Xw+1)*i) && y >= 76+19 && y < 94+19 )
|
||||
{
|
||||
Sprite[POS_NUMEROS].Sprite[0][( ( x - (Xw+1)*i) + (Xw*(y-(76+19))) ) + (Xw*Yw*i)] = color;
|
||||
// set_point( x, y, color );
|
||||
return;
|
||||
}
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda los PowerUps
|
||||
Xw = InfoSprites[ SPR_POWERUP ].Ancho;
|
||||
Yw = InfoSprites[ SPR_POWERUP ].Alto;
|
||||
for ( j=0; j<2; j++ )
|
||||
for ( i=0; i<9; i++ )
|
||||
if ( x >= (0 + (Xw+1)*i) && x < (Xw + (Xw+1)*i) && y >= 114+17*j && y < 130+17*j )
|
||||
{ // -\/---< 16
|
||||
Sprite[POS_POWERUP].Sprite[0][( ( x - (Xw+1)*i) + (Xw*(y-(114+17*j))) ) + (Xw*Yw*(i+j*9))] = color;
|
||||
return;
|
||||
}
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda los Mapas
|
||||
Xw = InfoSprites[ SPR_ELEM_MAPA ].Ancho;
|
||||
Yw = InfoSprites[ SPR_ELEM_MAPA ].Alto;
|
||||
for ( j=0; j<5; j++ )
|
||||
for ( i=0; i<9; i++ )
|
||||
if ( x >= (0 + (Xw+1)*(i+9)) && x < (Xw + (Xw+1)*(i+9)) && y >= 114+17*j && y < 130+17*j )
|
||||
{
|
||||
Sprite[POS_ELEM_MAPA].Sprite[0][( ( x - (Xw+1)*(i+9)) + (Xw*(y-(114+17*j))) ) + (Xw*Yw*(i+9*j))] = color;
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda el fuego ( vertical y horizontal)
|
||||
if ( i == 5 && j >= 2 )
|
||||
{
|
||||
Sprite[POS_FUEGOv].Sprite[4][( ( x - (Xw+1)*(i+9)) + (Xw*(y-(114+17*j))) ) + (Xw*Yw*(j-2))] = color;
|
||||
Sprite[POS_FUEGOv].Sprite[4][( ( x - (Xw+1)*(i+9)) + (Xw*(y-(114+17*j))) ) + (Xw*Yw*( 5- (j-2) ))] = color;
|
||||
|
||||
Sprite[POS_FUEGOh].Sprite[4][( Xw*( x - (Xw+1)*(i+9)) + (/*Xw**/(y-(114+17*j))) ) + (Xw*Yw*(j-2))] = color;
|
||||
Sprite[POS_FUEGOh].Sprite[4][( Xw*( x - (Xw+1)*(i+9)) + (/*Xw**/(y-(114+17*j))) ) + (Xw*Yw*( 5- (j-2) ))] = color;
|
||||
|
||||
}
|
||||
|
||||
return;
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* ProcesaPuntoJugador *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* inserta la imagen en su lugar correspondiente *|
|
||||
|* *|
|
||||
|* Entradas: x,y coordenadas actuales del punto *|
|
||||
|* byte color *|
|
||||
|* Salidas: (ninguna) *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
void ProcesaPuntoJugador( int x, int y, char color )
|
||||
{
|
||||
int i, j, Xw, Yw;
|
||||
|
||||
Xw = InfoSprites[ SPR_JUGADOR ].Ancho;
|
||||
Yw = InfoSprites[ SPR_JUGADOR ].Alto;
|
||||
|
||||
for ( j = 0; j < 4; j++ )
|
||||
{
|
||||
for ( i = 0; i < 3; i++ )
|
||||
GetBitmap( TmpBuffer, (Sprite[POS_JUGADORa+j].Sprite[3] + Xw*Yw*i ), (Xw+1)*i, (Yw+1)*2*j, Xw, Yw, 320 );
|
||||
for ( i = 3; i < 6; i++ )
|
||||
GetBitmap( TmpBuffer, (Sprite[POS_JUGADORa+j].Sprite[1] + Xw*Yw*(i-3)), (Xw+1)*i, (Yw+1)*2*j, Xw, Yw, 320 );
|
||||
for ( i = 6; i < 9; i++ )
|
||||
GetBitmap( TmpBuffer, (Sprite[POS_JUGADORa+j].Sprite[0] + Xw*Yw*(i-6)), (Xw+1)*i, (Yw+1)*2*j, Xw, Yw, 320 );
|
||||
i = 9;
|
||||
GetBitmap( TmpBuffer, (Sprite[POS_JUGADORa+j].Sprite[2] + Xw*Yw*(i-i)), (Xw+1)*i, (Yw+1)*2*j, Xw, Yw, 320 );
|
||||
for ( i = 0; i < 2; i++ )
|
||||
GetBitmap( TmpBuffer, (Sprite[POS_JUGADORa+j].Sprite[2] + Xw*Yw*(i+1)), (Xw+1)*i, (Yw+1)*(j*2+1), Xw, Yw, 320 );
|
||||
for ( i = 2; i < 10; i++ )
|
||||
GetBitmap( TmpBuffer, (Sprite[POS_JUGADORa+j].Sprite[4] + Xw*Yw*(i-2)), (Xw+1)*i, (Yw+1)*(j*2+1), Xw, Yw, 320 );
|
||||
}
|
||||
|
||||
return;
|
||||
}
|
||||
|
||||
|
||||
void GetBitmap( char far *BitMapSRC, char far *TRG, int X, int Y, int Xw1, int Yw1, int Xw2 )
|
||||
{
|
||||
int x, y;
|
||||
|
||||
for ( x = 0; x < Xw1; x++ )
|
||||
for ( y = 0; y < Yw1; y++ )
|
||||
*( TRG + x + y*Xw1 ) = *( BitMapSRC + X+x + (Y+y)*Xw2 );
|
||||
}
|
||||
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* InicializaElementosBasicos *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Pide memoria para los 9 elementos b<>sicos... *|
|
||||
|* *|
|
||||
|* Entradas: (ninguna) *|
|
||||
|* *|
|
||||
|* Salidas: OK Todo ha ido bien *|
|
||||
|* ERROR Algo va mal *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
int InicializaElementosBasicos( void )
|
||||
{
|
||||
// Pedimos memoria base para 16 objetos
|
||||
if ( InsertaObjetosBase( 16 ) != OK ) return ERROR;
|
||||
|
||||
// Pide espacio para el BitMap del objeto, incluida animaci<63>n:
|
||||
if (
|
||||
// Jugador A
|
||||
MemoriaBitmap( POS_JUGADORa, SPR_JUGADOR ) != OK ||
|
||||
// Jugador B
|
||||
MemoriaBitmap( POS_JUGADORb, SPR_JUGADOR ) != OK ||
|
||||
// Jugador C
|
||||
MemoriaBitmap( POS_JUGADORc, SPR_JUGADOR ) != OK ||
|
||||
// Jugador D
|
||||
MemoriaBitmap( POS_JUGADORd, SPR_JUGADOR ) != OK ||
|
||||
// Numeros
|
||||
MemoriaBitmap( POS_NUMEROS, SPR_NUMEROS ) != OK ||
|
||||
// Elementos del Mapa
|
||||
MemoriaBitmap( POS_ELEM_MAPA, SPR_ELEM_MAPA ) != OK ||
|
||||
// Power Ups ( peque<75>os )
|
||||
MemoriaBitmap( POS_POWERUP, SPR_POWERUP ) != OK ||
|
||||
// Bomba
|
||||
MemoriaBitmap( POS_BOMBA, SPR_BOMBA ) != OK ||
|
||||
// TelePort
|
||||
MemoriaBitmap( POS_TELEPORT, SPR_TELEPORT ) != OK ||
|
||||
// Globo
|
||||
MemoriaBitmap( POS_GLOBO, SPR_GLOBO ) != OK ||
|
||||
// Fantasma
|
||||
MemoriaBitmap( POS_GOSTH, SPR_GOSTH ) != OK ||
|
||||
// Estrella
|
||||
MemoriaBitmap( POS_ESTRELLA, SPR_ESTRELLA ) != OK ||
|
||||
// Baquero
|
||||
MemoriaBitmap( POS_BAQUERO, SPR_BAQUERO ) != OK ||
|
||||
// Platano
|
||||
MemoriaBitmap( POS_PLATANO, SPR_PLATANO ) != OK ||
|
||||
|
||||
// Fuego Vertical
|
||||
MemoriaBitmap( POS_FUEGOv, SPR_FUEGO ) != OK ||
|
||||
|
||||
// Fuego Horizontal
|
||||
MemoriaBitmap( POS_FUEGOh, SPR_FUEGO ) != OK
|
||||
) return ERROR;
|
||||
|
||||
return OK;
|
||||
}
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* InsertaObjetosBase *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Pide memoria para las estructuras de soporte de SPRITE *|
|
||||
|* *|
|
||||
|* Entradas: Estructuras de SPRITE a insertar *|
|
||||
|* *|
|
||||
|* Salidas: OK Todo ha ido bien *|
|
||||
|* ERROR Algo va mal *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
int InsertaObjetosBase( int Objetos )
|
||||
{
|
||||
// Si no hay ningun elemento, solo pido los reclamados
|
||||
if ( Sprite == NULL )
|
||||
{
|
||||
if ( (Sprite = (SPRITE *)calloc( Objetos, sizeof(SPRITE) )) == NULL )
|
||||
return ERROR;
|
||||
NObjetos = Objetos;
|
||||
} else {
|
||||
|
||||
NObjetos += Objetos;
|
||||
if ( (Sprite = (SPRITE *)realloc( Sprite, sizeof(SPRITE)*NObjetos ) ) == NULL )
|
||||
return NULL;
|
||||
}
|
||||
|
||||
return OK;
|
||||
}
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* MemoriaBitmap *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Libera la memoria asignada para los objetos *|
|
||||
|* *|
|
||||
|* Entradas: ( ninguna ) *|
|
||||
|* Salidas: ( ninguna ) *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
int MemoriaBitmap( int Pos, int TipoSprite )
|
||||
{
|
||||
int i;
|
||||
|
||||
// Rango no valido
|
||||
if ( Pos >= NObjetos )
|
||||
return ERROR;
|
||||
printf("\n%2d %2d >>", Pos, TipoSprite);
|
||||
// El sprite que ocupa esa posici<63>n esta ocupado
|
||||
if ( Sprite[Pos].Sprite[0] == NULL )
|
||||
{
|
||||
// Por cada direccion, miro cuantos sprites le corresponden.
|
||||
for ( i = 0; i < InfoSprites[TipoSprite].NDirecciones - 1 && i < 4; i++)
|
||||
if ( InfoSprites[TipoSprite].Movimientos[i] != 0 )
|
||||
{
|
||||
printf( "%ld --" , (long)(sizeof(char)*InfoSprites[TipoSprite].Movimientos[i]*InfoSprites[TipoSprite].Ancho*InfoSprites[TipoSprite].Alto));
|
||||
if ( ( Sprite[Pos].Sprite[i] = (char far *)farmalloc( sizeof(char)*InfoSprites[TipoSprite].Movimientos[i]*InfoSprites[TipoSprite].Ancho*InfoSprites[TipoSprite].Alto ) ) == NULL )
|
||||
return ERROR;
|
||||
}
|
||||
// La muerte siempre esta en el punto 5
|
||||
if ( InfoSprites[TipoSprite].Movimientos[4] != 0 )
|
||||
{
|
||||
printf( " * %ld *" , (long)(sizeof(char)*InfoSprites[TipoSprite].Movimientos[4]*InfoSprites[TipoSprite].Ancho*InfoSprites[TipoSprite].Alto));
|
||||
if ( ( Sprite[Pos].Sprite[4] = (char far*)farmalloc( sizeof(char)*InfoSprites[TipoSprite].Movimientos[4]*InfoSprites[TipoSprite].Ancho*InfoSprites[TipoSprite].Alto ) ) == NULL )
|
||||
return ERROR;
|
||||
}
|
||||
|
||||
} else return ERROR;
|
||||
return OK;
|
||||
}
|
||||
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* LiberaMemoriaObjetos *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Libera la memoria asignada para los objetos *|
|
||||
|* *|
|
||||
|* Entradas: ( ninguna ) *|
|
||||
|* Salidas: ( ninguna ) *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
void LiberaMemoriaObjetos(void)
|
||||
{
|
||||
int Objeto, DirObjeto;
|
||||
|
||||
// Este proceso empieza desde los mas enraizados punteros hacia afuera
|
||||
|
||||
// Recorre cada objeto de la estructura para eliminar su doble puntero
|
||||
for ( Objeto=0; Objeto < NObjetos; Objeto++ )
|
||||
{
|
||||
// Recorro cada direcci<63>n del objeto
|
||||
for ( DirObjeto=0; DirObjeto < InfoSprites[Sprite[Objeto].Tipo].NDirecciones; DirObjeto++ )
|
||||
farfree( Sprite[Objeto].Sprite[DirObjeto] );
|
||||
}
|
||||
|
||||
// Ya podemos eliminar la estructura.
|
||||
free ( Sprite );
|
||||
}
|
||||
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* CargaPaleta *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Carga la paleta con los colores por defecto *|
|
||||
|* *|
|
||||
|* *|
|
||||
|* Entradas: achivo PCX de donde cargar la paleta *|
|
||||
|* *|
|
||||
|* Salidas: OK Todo ha ido bien *|
|
||||
|* ERROR Algo va mal *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
int CargaPaleta(char *file )
|
||||
{
|
||||
int index;
|
||||
FILE *fp;
|
||||
|
||||
if ( (fp=fopen( file, "rb" ) ) == NULL )
|
||||
return ERROR;
|
||||
|
||||
|
||||
if ( fseek( fp, -768L, SEEK_END ) == 0 )
|
||||
{
|
||||
for (index=0; index<256; index++)
|
||||
{
|
||||
// get the red component
|
||||
// get the green component
|
||||
// get the blue component
|
||||
// set components
|
||||
set_dac_register ( index, (getc(fp) >> 2), (getc(fp) >> 2), (getc(fp) >> 2) );
|
||||
} // end for index
|
||||
|
||||
}
|
||||
|
||||
fclose( fp );
|
||||
return OK;
|
||||
}
|
||||
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* InicializaJuego *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Inicializa el tablero de juego segun se especifique en *|
|
||||
|* puntero de tablero. *|
|
||||
|* *|
|
||||
|* Entradas: (ninguna) *|
|
||||
|* *|
|
||||
|* Salidas: OK Todo ha ido bien *|
|
||||
|* ERROR Algo va mal *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
void InicializaJuego(void)
|
||||
{
|
||||
int j, i;
|
||||
int Xw, Yw;
|
||||
int Elecc = 0;
|
||||
static char vex = 0;
|
||||
|
||||
set_active_page(2);
|
||||
|
||||
// Copiamos el tablero ( solo los cuadros indestructibles )
|
||||
for ( j = 0; j<13; j++)
|
||||
for ( i = 0; i<21; i++)
|
||||
prt_tbl2[j][i] = prt_tbl[j][i];
|
||||
|
||||
|
||||
// 1<> Relleno el suelo
|
||||
Xw = InfoSprites[SPR_ELEM_MAPA].Ancho;
|
||||
Yw = InfoSprites[SPR_ELEM_MAPA].Alto;
|
||||
for( j = 0; j < 350; j+=16 )
|
||||
for ( i = 0; i < 230; i+=16 )
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), j, i, Xw, Yw );
|
||||
|
||||
// 2<> Pongo el marco al tablero
|
||||
MuestraImagen( "images\\dyna_fnd.pcx", 2, 255 );
|
||||
|
||||
// 3<> Coloco los cuadros indestructibles
|
||||
for ( i = 0; i < 21; i++ )
|
||||
for ( j = 0; j < 13; j++ )
|
||||
{
|
||||
if ( prt_tbl[j][i] == 1 )
|
||||
{
|
||||
tdraw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+Elecc) ), 12+i*16, 20+j*16, Xw, Yw );
|
||||
Elecc = random_int(2);
|
||||
} else
|
||||
prt_tbl[j][i] = 0;
|
||||
}
|
||||
|
||||
|
||||
// 4<> Coloco los cuadros destructibles
|
||||
// Uno los dos intentos, para reforzar el n<> de arboles que aparecen
|
||||
// >>>>>>>> 1<> intento del algoritmo que soporta 4
|
||||
if ( vex != 0 )
|
||||
{
|
||||
for ( i = 0; i<21*13; i++)
|
||||
{
|
||||
Elecc = random_int(2);
|
||||
j = random_int(21*13);
|
||||
if ( prt_tbl[j/21][j%21] == 0 )
|
||||
{
|
||||
tdraw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+2+Elecc) ), 12+(j%21)*16, 20+(j/21)*16, Xw, Yw );
|
||||
prt_tbl[j/21][j%21] = 2;
|
||||
}
|
||||
}
|
||||
// >>>>>>>> 2<> intento del algoritmo que soporta 4
|
||||
for ( i = 0; i < 21; i++ )
|
||||
for ( j = 0; j < 13; j++ )
|
||||
{
|
||||
Elecc = random_int(2);
|
||||
|
||||
if ( prt_tbl[j][i] == 0 && random_int(5)%2 )
|
||||
{
|
||||
tdraw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+2+Elecc) ), 12+i*16, 20+j*16, Xw, Yw );
|
||||
prt_tbl[j][i] = 2;
|
||||
}
|
||||
}
|
||||
vex++; if ( vex == 5 ) vex = 0;
|
||||
} else vex++;
|
||||
// Dejo respirar a los jugadores
|
||||
prt_tbl[ 0][ 0] = 0; prt_tbl[ 0][ 1] = 0; prt_tbl[ 1][ 0] = 0;
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 0, 20+16* 0, Xw, Yw );
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 0, 20+16* 1, Xw, Yw );
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 1, 20+16* 0, Xw, Yw );
|
||||
prt_tbl[ 0][12] = 0; prt_tbl[ 1][12] = 0; prt_tbl[ 0][11] = 0;
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 0, 20+16* 12, Xw, Yw );
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 1, 20+16* 12, Xw, Yw );
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 0, 20+16* 11, Xw, Yw );
|
||||
prt_tbl[0][20] = 0; prt_tbl[0][19] = 0; prt_tbl[1][20] = 0;
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 20, 20+16* 0, Xw, Yw );
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 19, 20+16* 0, Xw, Yw );
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 20, 20+16* 1, Xw, Yw );
|
||||
prt_tbl[12][20] = 0; prt_tbl[11][20] = 0; prt_tbl[12][19] = 0;
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 20, 20+16* 12, Xw, Yw );
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 20, 20+16* 11, Xw, Yw );
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 19, 20+16* 12, Xw, Yw );
|
||||
|
||||
// 1 cuadro indestructible
|
||||
// 2 cuadro destructible
|
||||
// A jugador A 1
|
||||
// B jugador B 2
|
||||
// C jugador C 3
|
||||
// D jugador D 4
|
||||
/*
|
||||
for ( j = 0; j<13; j++)
|
||||
for ( i = 0; i<21; i++)
|
||||
prt_tbl[j][i] = prt_tbl2[j][i];
|
||||
*/
|
||||
|
||||
|
||||
|
||||
};
|
||||
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* MuestraImagen *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Descomprime y copia a la pagina indicada un PCX *|
|
||||
|* *|
|
||||
|* Entradas: nombre de la imagen *|
|
||||
|* pagina *|
|
||||
|* color_invisible ( -1 si ninguno ) *|
|
||||
|* *|
|
||||
|* *|
|
||||
|* Salidas: OK Todo ha ido bien *|
|
||||
|* ERROR Algo va mal *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
int MuestraImagen( char *file, int page, int col_Inv )
|
||||
{
|
||||
int curr_page;
|
||||
FILE *fp;
|
||||
int alto, ancho, contador;
|
||||
unsigned char byte;
|
||||
|
||||
|
||||
if ( (fp = fopen( file,"rb")) != NULL )
|
||||
{
|
||||
|
||||
curr_page = get_active_page();
|
||||
set_active_page(page);
|
||||
|
||||
// Saltamos la cabecera
|
||||
fseek( fp, 128, SEEK_SET );
|
||||
|
||||
for(alto=0; alto<240; alto++)
|
||||
{
|
||||
for(ancho=0; ancho<360; )
|
||||
{
|
||||
byte=getc(fp);
|
||||
if(byte<=0xC0)
|
||||
{
|
||||
if ( col_Inv < 0 || byte != col_Inv ) set_point (ancho, alto, byte);
|
||||
ancho++;
|
||||
}
|
||||
else
|
||||
{
|
||||
contador=byte&0x3F; byte=getc(fp);
|
||||
for(; contador>0; contador--)
|
||||
{
|
||||
if ( col_Inv < 0 || byte != col_Inv ) set_point (ancho, alto, byte);
|
||||
ancho++;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
fclose(fp);
|
||||
} else return ERROR;
|
||||
|
||||
set_active_page(curr_page);
|
||||
|
||||
return OK;
|
||||
}
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* MuestraMensajeCargando *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Muestra el mensaje de cargando y lo que esta, cargando *|
|
||||
|* *|
|
||||
|* Entradas: (ninguna) *|
|
||||
|* *|
|
||||
|* Salidas: OK Todo ha ido bien *|
|
||||
|* ERROR Algo va mal *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
int MuestraMensajeCargando(void)
|
||||
{
|
||||
if ( MuestraImagen( "images\\dyna_car.pcx", 1, -1 ) == ERROR ) Error(0x12);
|
||||
copy_page(1, 2);
|
||||
copy_bitmap ( 2, 81, 85, 108, 112, 1, 81, 175 );
|
||||
if ( CargaPaleta( "images\\dyna_car.pcx" ) !=OK ) Error(0x11);
|
||||
copy_page(1, 0);
|
||||
// if ( InicializaSonidos() != OK ) Error(0x20);
|
||||
copy_bitmap ( 2, 81, 175, 108, 202, 0, 81, 85 );
|
||||
if ( CargaObjetosBasicos() != OK ) Error(0x12);
|
||||
copy_bitmap ( 2, 81, 175, 108, 202, 0, 81, 128 );
|
||||
// Inicializa mapa
|
||||
copy_bitmap ( 2, 81, 175, 108, 202, 0, 81, 175 );
|
||||
|
||||
return OK;
|
||||
};
|
||||
|
||||
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* Error *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Aborta anormalmente el programa, mostrando un mensaje de *|
|
||||
|* de error. *|
|
||||
|* *|
|
||||
|* Entradas: Codigo del mensaje de error a mostrar *|
|
||||
|* Salidas: (ninguna) *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
void Error(int code)
|
||||
{
|
||||
set_video_mode (3);
|
||||
LiberaMemoriaObjetos();
|
||||
// UNSET_VECTORES();
|
||||
setvect(KEYBOARDINTR, BIOSKeyboardHandler);
|
||||
exit(code);
|
||||
};
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
//( int Flags, int CS, int IP, int AX, int BX, int CX, int DX, int SI, int DI, int DS, int ES, int BP )
|
||||
|
||||
void interrupt KeyboardHandler(__CPPARGS)
|
||||
{
|
||||
static char ekey = 0;
|
||||
unsigned char key;
|
||||
|
||||
key = inportb(KEYBOARDPORT);
|
||||
|
||||
|
||||
// { PROCESS THE KEYSTROKE HERE }
|
||||
if ( key != 224 ) // No teclas extendidas
|
||||
mapa_teclado[ (key & 0x7F) ] = !(key & 0x80);
|
||||
|
||||
// TECLAr = key;
|
||||
// 7 bit == 1 tecla OFF E F
|
||||
// 7 bit == 0 tecla ON 0111 1111
|
||||
|
||||
if ( CallBIOSHandler )
|
||||
{
|
||||
// { Call the BIOS keyboard handler if the calling program wants us to }
|
||||
|
||||
// asm pushf end;
|
||||
BIOSKeyboardHandler;
|
||||
|
||||
// { Otherwise just acknowledge the interrupt }
|
||||
} else outportb( 0x20, 0x20 );
|
||||
|
||||
}
|
||||
|
||||
|
||||
BIN
DYNA_TBL.EXE
Normal file
BIN
DYNA_TBL.EXE
Normal file
Binary file not shown.
107
DYNA_TBL.H
Normal file
107
DYNA_TBL.H
Normal file
@ -0,0 +1,107 @@
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* DYNA_TBL *|
|
||||
|* *|
|
||||
|* Descripci<63>n: (fichero de apoyo) *|
|
||||
|* M<>dulo encargado de cargar los elementos del tablero y *|
|
||||
|* enemigos del juegos. Tambi<62>n se encarga de generar el *|
|
||||
|* tablero seg<65>n preferencias de usuario... *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
|
||||
#define ERROR 0
|
||||
#define OK 1
|
||||
|
||||
// Defino las posiciones dentro de Sprite que ocupan los distintos elementos
|
||||
// y el tipo de Sprite del que se trata
|
||||
#define POS_NUMEROS 0
|
||||
#define POS_ELEM_MAPA 1
|
||||
#define POS_POWERUP 2
|
||||
#define POS_BOMBA 3
|
||||
#define POS_TELEPORT 4
|
||||
#define POS_GLOBO 5
|
||||
#define POS_GOSTH 6
|
||||
#define POS_ESTRELLA 7
|
||||
#define POS_BAQUERO 8
|
||||
#define POS_PLATANO 9
|
||||
|
||||
#define POS_JUGADORa 10
|
||||
#define POS_JUGADORb 11
|
||||
#define POS_JUGADORc 12
|
||||
#define POS_JUGADORd 13
|
||||
|
||||
#define POS_FUEGOv 14
|
||||
#define POS_FUEGOh 15
|
||||
|
||||
|
||||
#define POS_BOSQUE 18
|
||||
|
||||
|
||||
#define SPR_NUMEROS 3
|
||||
#define SPR_ELEM_MAPA 2
|
||||
#define SPR_POWERUP 0
|
||||
#define SPR_BOMBA 4
|
||||
#define SPR_TELEPORT 4
|
||||
#define SPR_GLOBO 5
|
||||
#define SPR_GOSTH 5
|
||||
#define SPR_ESTRELLA 6
|
||||
#define SPR_BAQUERO 5
|
||||
#define SPR_PLATANO 5
|
||||
#define SPR_JUGADOR 7
|
||||
|
||||
#define SPR_FUEGO 8
|
||||
|
||||
void Error(int code);
|
||||
void ComienzaJuego(void);
|
||||
void InicializaJuego(void);
|
||||
int CargaPaleta(char *file);
|
||||
void LiberaMemoriaObjetos(void);
|
||||
int CargaObjetosBasicos( void );
|
||||
int MuestraMensajeCargando(void);
|
||||
int InsertaObjetosBase( int Objetos );
|
||||
int InicializaElementosBasicos( void );
|
||||
int MemoriaBitmap( int Pos, int TipoSprite );
|
||||
void ProcesaPuntoBasico( int x, int y, char color );
|
||||
void ProcesaPuntoJugador( int x, int y, char color );
|
||||
int MuestraImagen( char *file, int page, int col_Inv );
|
||||
|
||||
// Estructura donde se guardaran las preferencias del usuario
|
||||
typedef struct
|
||||
{
|
||||
char Entorno; // Bosque / Hielo / ....
|
||||
char Jugadores; // M<>x. 4
|
||||
char Teclas[5][6]; // Teclas de los Jugadores
|
||||
|
||||
} PREFERENCIAS;
|
||||
|
||||
// Informe sobre los bitmap's
|
||||
typedef struct
|
||||
{
|
||||
char NDirecciones; // # de direcciones
|
||||
// Inicio del Despl a...
|
||||
char Inicios[5]; // Izq, Der, Arr, Abj, Muerte
|
||||
char Movimientos[5]; // Movimientos por cada direcci<63>n
|
||||
|
||||
unsigned char Ancho, Alto; // Dimensiones del objeto
|
||||
char CorrX, CorrY;
|
||||
char PixelCambio;
|
||||
} DatosTipo;
|
||||
|
||||
// Estructura para guardar los Bitmap
|
||||
typedef struct EnemigO
|
||||
{
|
||||
char Tipo; // Cada tipo de enemigo tiene un codigo
|
||||
// de ajuste...
|
||||
char far *Sprite[5]; // 5 puteros por direccion + muerte
|
||||
} SPRITE;
|
||||
|
||||
extern SPRITE *Sprite;
|
||||
extern PREFERENCIAS Pref;
|
||||
|
||||
extern const DatosTipo InfoSprites[];
|
||||
|
||||
extern char prt_tbl[13+1][21+1];
|
||||
|
||||
extern "C" void SET_VECTORES(volatile char *);
|
||||
extern "C" void UNSET_VECTORES(void);
|
||||
extern volatile char mapa_teclado[512];
|
||||
757
DYNA_TBL.JD
Normal file
757
DYNA_TBL.JD
Normal file
@ -0,0 +1,757 @@
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* DYNA_TBL *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* M<>dulo encargado de cargar los elementos del tablero y *|
|
||||
|* enemigos del juegos. Tambi<62>n se encarga de generar el *|
|
||||
|* tablero seg<65>n preferencias de usuario... *|
|
||||
|* *|
|
||||
|* Fecha: 17-07-96 00.08 / 01.34 *|
|
||||
|* 18-07-96 12.51 / 14.24 *|
|
||||
|* 15.10 / *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
|
||||
#include <alloc.h>
|
||||
#include <stdio.h>
|
||||
#include "..\modex\modex.h"
|
||||
#include "..\modex\c_utils.h"
|
||||
|
||||
#include <conio.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#define ERROR 0
|
||||
#define OK 1
|
||||
|
||||
// Defino las posiciones dentro de Sprite que ocupan los distintos elementos
|
||||
// y el tipo de Sprite del que se trata
|
||||
#define POS_NUMEROS 0
|
||||
#define POS_ELEM_MAPA 1
|
||||
#define POS_POWERUP 2
|
||||
#define POS_BOMBA 3
|
||||
#define POS_TELEPORT 4
|
||||
#define POS_GLOBO 5
|
||||
#define POS_GOSTH 6
|
||||
#define POS_ESTRELLA 7
|
||||
#define POS_BAQUERO 8
|
||||
#define POS_PLATANO 9
|
||||
#define POS_BOSQUE 18
|
||||
|
||||
|
||||
#define SPR_NUMEROS 3
|
||||
#define SPR_ELEM_MAPA 2
|
||||
#define SPR_POWERUP 0
|
||||
#define SPR_BOMBA 4
|
||||
#define SPR_TELEPORT 4
|
||||
#define SPR_GLOBO 5
|
||||
#define SPR_GOSTH 5
|
||||
#define SPR_ESTRELLA 6
|
||||
#define SPR_BAQUERO 5
|
||||
#define SPR_PLATANO 5
|
||||
|
||||
int CargaPaleta(char *file);
|
||||
void ProcesaPuntoBasico( int x, int y, char color );
|
||||
int MuestraImagen( char *file, int page, int col_Inv );
|
||||
int CargaObjetosBasicos( void );
|
||||
int InsertaObjetosBase( int Objetos );
|
||||
int InicializaElementosBasicos( void );
|
||||
int MemoriaBitmap( int Pos, int TipoSprite );
|
||||
void LiberaMemoriaObjetos(void);
|
||||
void InicializaJuego(void);
|
||||
|
||||
typedef struct
|
||||
{
|
||||
char Entorno;
|
||||
|
||||
} PREFERENCIAS;
|
||||
|
||||
typedef struct
|
||||
{
|
||||
char NDirecciones; // # de direcciones
|
||||
// Inicio del Despl a...
|
||||
char Inicios[5]; // Izq, Der, Arr, Abj, Muerte
|
||||
char Movimientos[5]; // Movimientos por cada direcci<63>n
|
||||
|
||||
unsigned char Ancho, Alto; // Dimensiones del objeto
|
||||
} DatosTipo;
|
||||
|
||||
typedef struct EnemigO
|
||||
{
|
||||
char Tipo; // Cada tipo de enemigo tiene un codigo
|
||||
// de ajuste...
|
||||
char *Sprite[5]; // 5 puteros por direccion + muerte
|
||||
} SPRITE;
|
||||
|
||||
SPRITE *Sprite;
|
||||
int NObjetos=0; // # de objetos ya contenidos en Sprite
|
||||
|
||||
// Establece preferencias
|
||||
PREFERENCIAS Pref = { POS_BOSQUE };
|
||||
|
||||
|
||||
// Esta informaci<63>n es constante y sirve para saber como tratar a los Sprite's
|
||||
const DatosTipo InfoSprites[] = {
|
||||
// 00 > Cuadros est<73>ticos 16x16 ( Power UPs )
|
||||
0x02,
|
||||
{ 0x00, 0x00, 0x00, 0x00, 0x00 },
|
||||
{ 0x12, 0x00, 0x00, 0x00, 0x00 },
|
||||
|
||||
0x10, 0x10,
|
||||
|
||||
// 01 > Cuadros est<73>ticos 16x16 ( Unidades )
|
||||
0x02,
|
||||
{ 0x00, 0x00, 0x00, 0x00, 0x00 },
|
||||
{ 0x01, 0x00, 0x00, 0x00, 0x00 },
|
||||
|
||||
0x10, 0x10,
|
||||
|
||||
// 02 > Cuadros est<73>ticos 16x16 ( Mapas )
|
||||
0x02,
|
||||
{ 0x00, 0x00, 0x00, 0x00, 0x00 },
|
||||
{ 0x2D, 0x00, 0x00, 0x00, 0x00 },
|
||||
|
||||
0x10, 0x10,
|
||||
|
||||
// 03 > Cuadros est<73>ticos 16x18 ( Numeros )
|
||||
0x02,
|
||||
{ 0x00, 0x00, 0x00, 0x00, 0x00 },
|
||||
{ 0x0A, 0x00, 0x00, 0x00, 0x00 },
|
||||
|
||||
0x10, 0x12,
|
||||
|
||||
// 04 > Anim. como Bomba, TelePort... 16x18
|
||||
0x02,
|
||||
{ 0x00, 0x00, 0x00, 0x00, 0x00 },
|
||||
{ 0x03, 0x03, 0x03, 0x03, 0x03 },
|
||||
|
||||
0x10, 0x12,
|
||||
|
||||
// 05 > Monstruos como Globo y Fantasma 16x18
|
||||
0x02,
|
||||
{ 0x00, 0x00, 0x00, 0x00, 0x03 },
|
||||
{ 0x03, 0x03, 0x03, 0x03, 0x06 },
|
||||
|
||||
0x10, 0x12,
|
||||
|
||||
// 06 > Monstruos 4dir. Estrella... 16x18
|
||||
0x05,
|
||||
{ 0x00, 0x03, 0x06, 0x09, 0x0C },
|
||||
{ 0x03, 0x03, 0x03, 0x03, 0x06 },
|
||||
|
||||
0x10, 0x12,
|
||||
|
||||
};
|
||||
|
||||
char prt_tbl[13][21] =
|
||||
{
|
||||
{ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
|
||||
{ 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0 },
|
||||
{ 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0 },
|
||||
{ 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1, 0 },
|
||||
{ 0, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 1, 1, 1, 0, 1, 0 },
|
||||
{ 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 1, 0 },
|
||||
{ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 1, 0 },
|
||||
{ 0, 1, 0, 1, 0, 0, 0, 1, 1, 1, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0 },
|
||||
{ 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
|
||||
{ 0, 1, 0, 1, 0, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0 },
|
||||
{ 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
|
||||
{ 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0 },
|
||||
{ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 }
|
||||
};
|
||||
|
||||
void Error(int code)
|
||||
{
|
||||
set_video_mode (3);
|
||||
LiberaMemoriaObjetos();
|
||||
exit(code);
|
||||
};
|
||||
|
||||
int MuestraMenu(void)
|
||||
{
|
||||
return ERROR;
|
||||
};
|
||||
|
||||
void ComienzaJuego(void)
|
||||
{};
|
||||
|
||||
int MuestraMensajeCargando(void)
|
||||
{
|
||||
if ( MuestraImagen( "images\\dyna_car.pcx", 1, -1 ) == ERROR ) Error(0x12);
|
||||
copy_page(1, 2);
|
||||
copy_bitmap ( 2, 81, 85, 108, 112, 1, 81, 175 );
|
||||
if ( CargaPaleta( "images\\dyna_car.pcx" ) !=OK ) Error(0x11);
|
||||
copy_page(1, 0);
|
||||
// if ( InicializaSonidos() != OK ) Error(0x20);
|
||||
copy_bitmap ( 2, 81, 175, 108, 202, 0, 81, 85 );
|
||||
if ( CargaObjetosBasicos() != OK ) Error(0x12);
|
||||
copy_bitmap ( 2, 81, 175, 108, 202, 0, 81, 128 );
|
||||
// Inicializa mapa
|
||||
copy_bitmap ( 2, 81, 175, 108, 202, 0, 81, 175 );
|
||||
|
||||
|
||||
return OK;
|
||||
};
|
||||
|
||||
int main( void )
|
||||
{
|
||||
printf( "\n> Inicializando ModoX" );
|
||||
printf( "\n> Jos<6F> David Guillen" );
|
||||
|
||||
init_random ();
|
||||
|
||||
if (set_vga_modex( Mode_360x240, 360, 240, 3) == 0) Error(0x00);
|
||||
|
||||
if ( MuestraMensajeCargando() != OK ) Error(0x10);
|
||||
/*
|
||||
while ( MuestraMenu() == OK )
|
||||
{
|
||||
*/
|
||||
InicializaJuego();
|
||||
set_display_page( 2 );
|
||||
if ( CargaPaleta("images\\dyna_tbl.pcx") !=OK ) Error(0x11);
|
||||
|
||||
while( getch()!=27 )
|
||||
{
|
||||
InicializaJuego();
|
||||
};
|
||||
/*
|
||||
copy_page( 2, 1 );
|
||||
copy_page( 2, 0 );
|
||||
ComienzaJuego();
|
||||
};
|
||||
*/
|
||||
|
||||
set_video_mode (3);
|
||||
LiberaMemoriaObjetos();
|
||||
printf( "\n> Gracias a todos los que han echo posible este juego. " );
|
||||
printf( "\n> En especial a mi hermano Antonio. " );
|
||||
printf( "\n> Jos<6F> David Guillen || _-<2D> FuTuRe ViSiOn <20>-_ || InfoMundo" );
|
||||
printf( "\n>_ " );
|
||||
|
||||
fflush( stdin );
|
||||
return OK;
|
||||
}
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* CargaObjetosBasicos *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Carga los objetos Basicos del fichero Dyna_tbl.PCX *|
|
||||
|* *|
|
||||
|* *|
|
||||
|* Entradas: (ninguna) *|
|
||||
|* *|
|
||||
|* Salidas: OK Todo ha ido bien *|
|
||||
|* ERROR Algo va mal *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
int CargaObjetosBasicos( void )
|
||||
{
|
||||
FILE *fp;
|
||||
int ancho, alto;
|
||||
int contador;
|
||||
unsigned char byte;
|
||||
|
||||
// Pido memoria para los elementos b<>sicos
|
||||
if ( InicializaElementosBasicos() != OK ) return ERROR;
|
||||
|
||||
|
||||
// Abrimos el fichero
|
||||
|
||||
if ( (fp = fopen("images\\dyna_tbl.pcx","rb")) == NULL ) return ERROR;
|
||||
|
||||
// Saltamos la cabecera
|
||||
fseek( fp, 128, SEEK_SET );
|
||||
|
||||
for(alto=0; alto<200; alto++)
|
||||
{
|
||||
for(ancho=0; ancho<320; )
|
||||
{
|
||||
byte=getc(fp);
|
||||
if(byte<=0xC0)
|
||||
{
|
||||
byte = byte == 254 ? 0 : byte;
|
||||
ProcesaPuntoBasico( ancho, alto, byte );
|
||||
ancho++;
|
||||
}
|
||||
else
|
||||
{
|
||||
contador=byte&0x3F; byte=getc(fp);
|
||||
byte = byte == 254 ? 0 : byte;
|
||||
for(; contador>0; contador--)
|
||||
{
|
||||
ProcesaPuntoBasico( ancho, alto, byte );
|
||||
ancho++;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
return OK;
|
||||
}
|
||||
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* ProcesaPuntoBasico *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* inserta la imagen en su lugar correspondiente *|
|
||||
|* *|
|
||||
|* Entradas: x,y coordenadas actuales del punto *|
|
||||
|* byte color *|
|
||||
|* Salidas: (ninguna) *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
void ProcesaPuntoBasico( int x, int y, char color )
|
||||
{
|
||||
int i, j, Xw, Yw;
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda al Globo 16x18
|
||||
Xw = InfoSprites[ SPR_GLOBO ].Ancho;
|
||||
Yw = InfoSprites[ SPR_GLOBO ].Alto;
|
||||
for ( i=0; i<3; i++ )
|
||||
if ( x >= (0 + (Xw+1)*i) && x < (Xw + (Xw+1)*i) && y >= 0 && y < 18 )
|
||||
Sprite[POS_GLOBO].Sprite[0][( ( x - (Xw+1)*i ) + (Xw*y) ) + (Xw*Yw*i)] = color;
|
||||
|
||||
for ( i=3; i<9; i++ )
|
||||
if ( x >= (0 + (Xw+1)*i) && x < (Xw + (Xw+1)*i) && y >= 0 && y < 18 )
|
||||
Sprite[POS_GLOBO].Sprite[4][( ( x - (Xw+1)*i ) + (Xw*y) ) + (Xw*Yw*(i-3))] = color;
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda al Fantasma 16x18
|
||||
Xw = InfoSprites[ SPR_GOSTH ].Ancho;
|
||||
Yw = InfoSprites[ SPR_GOSTH ].Alto;
|
||||
for ( i=0; i<3; i++ )
|
||||
if ( x >= (0 + (Xw+1)*i) && x < (Xw + (Xw+1)*i) && y >= 19 && y < 37 )
|
||||
Sprite[POS_GOSTH].Sprite[0][( ( x - (Xw+1)*i ) + (Xw*(y-19)) ) + (Xw*Yw*i)] = color;
|
||||
|
||||
for ( i=3; i<9; i++ )
|
||||
if ( x >= (0 + (Xw+1)*i) && x < (Xw + (Xw+1)*i) && y >= 19 && y < 37 )
|
||||
Sprite[POS_GOSTH].Sprite[4][( ( x - (Xw+1)*i ) + (Xw*(y-19)) ) + (Xw*Yw*(i-3))] = color;
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda al Baquero 16x18
|
||||
Xw = InfoSprites[ SPR_BAQUERO ].Ancho;
|
||||
Yw = InfoSprites[ SPR_BAQUERO ].Alto;
|
||||
for ( i=0; i<3; i++ )
|
||||
if ( x >= (0 + (Xw+1)*(i+9)) && x < (Xw + (Xw+1)*(i+9)) && y >= 0 && y < 18 )
|
||||
Sprite[POS_BAQUERO].Sprite[0][( ( x - (Xw+1)*(i+9) ) + (Xw*y) ) + (Xw*Yw*i)] = color;
|
||||
|
||||
for ( i=3; i<9; i++ )
|
||||
if ( x >= (0 + (Xw+1)*(i+9)) && x < (Xw + (Xw+1)*(i+9)) && y >= 0 && y < 18 )
|
||||
Sprite[POS_BAQUERO].Sprite[4][( ( x - (Xw+1)*(i+9) ) + (Xw*y) ) + (Xw*Yw*(i-3))] = color;
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda al Platano 16x18
|
||||
Xw = InfoSprites[ SPR_PLATANO ].Ancho;
|
||||
Yw = InfoSprites[ SPR_PLATANO ].Alto;
|
||||
for ( i=0; i<3; i++ )
|
||||
if ( x >= (0 + (Xw+1)*(i+9)) && x < (Xw + (Xw+1)*(i+9)) && y >= 19 && y < 37 )
|
||||
Sprite[POS_PLATANO].Sprite[0][( ( x - (Xw+1)*(i+9) ) + (Xw*(y-19)) ) + (Xw*Yw*i)] = color;
|
||||
|
||||
for ( i=3; i<9; i++ )
|
||||
if ( x >= (0 + (Xw+1)*(i+9)) && x < (Xw + (Xw+1)*(i+9)) && y >= 19 && y < 37 )
|
||||
Sprite[POS_PLATANO].Sprite[4][( ( x - (Xw+1)*(i+9) ) + (Xw*(y-19)) ) + (Xw*Yw*(i-3))] = color;
|
||||
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda la Bomba 16x18
|
||||
Xw = InfoSprites[ SPR_BOMBA ].Ancho;
|
||||
Yw = InfoSprites[ SPR_BOMBA ].Alto;
|
||||
for ( i=0; i<3; i++ )
|
||||
if ( x >= (0 + (Xw+1)*i) && x < (Xw + (Xw+1)*i) && y >= 38 && y < 56 )
|
||||
Sprite[POS_BOMBA].Sprite[0][( ( x - (Xw+1)*i) + (Xw*(y-38)) ) + (Xw*Yw*i)] = color;
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda el TelePort 16x18
|
||||
Xw = InfoSprites[ SPR_TELEPORT ].Ancho;
|
||||
Yw = InfoSprites[ SPR_TELEPORT ].Alto;
|
||||
for ( i=0; i<3; i++ )
|
||||
if ( x >= (0 + (Xw+1)*(i+3)) && x < (Xw + (Xw+1)*(i+3)) && y >= 38 && y < 56 )
|
||||
Sprite[POS_TELEPORT].Sprite[0][( ( x - (Xw+1)*(i+3)) + (Xw*(y-38)) ) + (Xw*Yw*i)] = color;
|
||||
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda los Numeros 16x18
|
||||
Xw = InfoSprites[ SPR_NUMEROS ].Ancho;
|
||||
Yw = InfoSprites[ SPR_NUMEROS ].Alto;
|
||||
for ( i=0; i<10; i++ )
|
||||
if ( x >= (0 + (Xw+1)*i) && x < (Xw + (Xw+1)*i) && y >= 76 && y < 94 )
|
||||
Sprite[POS_NUMEROS].Sprite[0][( ( x - (Xw+1)*i) + (Xw*(y-76)) ) + (Xw*Yw*i)] = color;
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda los PowerUps
|
||||
Xw = InfoSprites[ SPR_POWERUP ].Ancho;
|
||||
Yw = InfoSprites[ SPR_POWERUP ].Alto;
|
||||
for ( j=0; j<2; j++ )
|
||||
for ( i=0; i<9; i++ )
|
||||
if ( x >= (0 + (Xw+1)*i) && x < (Xw + (Xw+1)*i) && y >= 114+17*j && y < 130+17*j )
|
||||
Sprite[POS_POWERUP].Sprite[0][( ( x - (Xw+1)*i) + (Xw*(y-(114+16*j))) ) + (Xw*Yw*(i+j*9))] = color;
|
||||
|
||||
// <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
// Guarda los Mapas
|
||||
Xw = InfoSprites[ SPR_ELEM_MAPA ].Ancho;
|
||||
Yw = InfoSprites[ SPR_ELEM_MAPA ].Alto;
|
||||
for ( j=0; j<5; j++ )
|
||||
for ( i=0; i<9; i++ )
|
||||
if ( x >= (0 + (Xw+1)*(i+9)) && x < (Xw + (Xw+1)*(i+9)) && y >= 114+17*j && y < 130+17*j )
|
||||
Sprite[POS_ELEM_MAPA].Sprite[0][( ( x - (Xw+1)*(i+9)) + (Xw*(y-(114+17*j))) ) + (Xw*Yw*(i+9*j))] = color;
|
||||
|
||||
}
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* InicializaElementosBasicos *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Pide memoria para los 9 elementos b<>sicos... *|
|
||||
|* *|
|
||||
|* Entradas: (ninguna) *|
|
||||
|* *|
|
||||
|* Salidas: OK Todo ha ido bien *|
|
||||
|* ERROR Algo va mal *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
int InicializaElementosBasicos( void )
|
||||
{
|
||||
// Pedimos memoria base para
|
||||
if ( InsertaObjetosBase( 10) != OK ) return ERROR;
|
||||
|
||||
// Pide espacio para el BitMap del objeto, incluida animaci<63>n:
|
||||
if (
|
||||
// Numeros
|
||||
MemoriaBitmap( POS_NUMEROS, SPR_NUMEROS ) != OK ||
|
||||
// Elementos del Mapa
|
||||
MemoriaBitmap( POS_ELEM_MAPA, SPR_ELEM_MAPA ) != OK ||
|
||||
// Power Ups ( peque<75>os )
|
||||
MemoriaBitmap( POS_POWERUP, SPR_POWERUP ) != OK ||
|
||||
// Bomba
|
||||
MemoriaBitmap( POS_BOMBA, SPR_BOMBA ) != OK ||
|
||||
// TelePort
|
||||
MemoriaBitmap( POS_TELEPORT, SPR_TELEPORT ) != OK ||
|
||||
// Globo
|
||||
MemoriaBitmap( POS_GLOBO, SPR_GLOBO ) != OK ||
|
||||
// Fantasma
|
||||
MemoriaBitmap( POS_GOSTH, SPR_GOSTH ) != OK ||
|
||||
// Estrella
|
||||
MemoriaBitmap( POS_ESTRELLA, SPR_ESTRELLA ) != OK ||
|
||||
// Baquero
|
||||
MemoriaBitmap( POS_BAQUERO, SPR_BAQUERO ) != OK ||
|
||||
// Platano
|
||||
MemoriaBitmap( POS_PLATANO, SPR_PLATANO ) != OK
|
||||
) return ERROR;
|
||||
|
||||
return OK;
|
||||
}
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* InsertaObjetosBase *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Pide memoria para las estructuras de soporte de SPRITE *|
|
||||
|* *|
|
||||
|* Entradas: Estructuras de SPRITE a insertar *|
|
||||
|* *|
|
||||
|* Salidas: OK Todo ha ido bien *|
|
||||
|* ERROR Algo va mal *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
int InsertaObjetosBase( int Objetos )
|
||||
{
|
||||
// Si no hay ningun elemento, solo pido los reclamados
|
||||
if ( Sprite == NULL )
|
||||
{
|
||||
if ( (Sprite = (SPRITE *)calloc( Objetos, sizeof(SPRITE) )) == NULL )
|
||||
return ERROR;
|
||||
NObjetos = Objetos;
|
||||
} else {
|
||||
|
||||
NObjetos += Objetos;
|
||||
if ( (Sprite = (SPRITE *)realloc( Sprite, sizeof(SPRITE)*NObjetos ) ) == NULL )
|
||||
return NULL;
|
||||
}
|
||||
|
||||
return OK;
|
||||
}
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* MemoriaBitmap *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Libera la memoria asignada para los objetos *|
|
||||
|* *|
|
||||
|* Entradas: ( ninguna ) *|
|
||||
|* Salidas: ( ninguna ) *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
int MemoriaBitmap( int Pos, int TipoSprite )
|
||||
{
|
||||
int i;
|
||||
|
||||
// Rango no valido
|
||||
if ( Pos >= NObjetos )
|
||||
return ERROR;
|
||||
|
||||
// El sprite que ocupa esa posici<63>n esta ocupado
|
||||
if ( Sprite[Pos].Sprite[0] == NULL )
|
||||
{
|
||||
// Por cada direccion, miro cuantos sprites le corresponden.
|
||||
for ( i = 0; i < InfoSprites[TipoSprite].NDirecciones - 1 && i < 4; i++)
|
||||
if ( InfoSprites[TipoSprite].Movimientos[i] != 0 )
|
||||
if ( ( Sprite[Pos].Sprite[i] = (char *)malloc( sizeof(char)*InfoSprites[TipoSprite].Movimientos[i]*InfoSprites[TipoSprite].Ancho*InfoSprites[TipoSprite].Alto ) ) == NULL )
|
||||
return ERROR;
|
||||
// La muerte siempre esta en el punto 5
|
||||
if ( InfoSprites[TipoSprite].Movimientos[4] != 0 )
|
||||
if ( ( Sprite[Pos].Sprite[4] = (char *)malloc( sizeof(char)*InfoSprites[TipoSprite].Movimientos[4]*InfoSprites[TipoSprite].Ancho*InfoSprites[TipoSprite].Alto ) ) == NULL )
|
||||
return ERROR;
|
||||
} else return ERROR;
|
||||
return OK;
|
||||
}
|
||||
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* LiberaMemoriaObjetos *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Libera la memoria asignada para los objetos *|
|
||||
|* *|
|
||||
|* Entradas: ( ninguna ) *|
|
||||
|* Salidas: ( ninguna ) *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
void LiberaMemoriaObjetos(void)
|
||||
{
|
||||
int Objeto, DirObjeto;
|
||||
|
||||
// Este proceso empieza desde los mas enraizados punteros hacia afuera
|
||||
|
||||
// Recorre cada objeto de la estructura para eliminar su doble puntero
|
||||
for ( Objeto=0; Objeto < NObjetos; Objeto++ )
|
||||
{
|
||||
// Recorro cada direcci<63>n del objeto
|
||||
for ( DirObjeto=0; DirObjeto < InfoSprites[Sprite[Objeto].Tipo].NDirecciones; DirObjeto++ )
|
||||
free( Sprite[Objeto].Sprite[DirObjeto] );
|
||||
}
|
||||
|
||||
// Ya podemos eliminar la estructura.
|
||||
free ( Sprite );
|
||||
}
|
||||
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* CargaPaleta *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Carga la paleta con los colores por defecto *|
|
||||
|* *|
|
||||
|* *|
|
||||
|* Entradas: achivo PCX de donde cargar la paleta *|
|
||||
|* *|
|
||||
|* Salidas: OK Todo ha ido bien *|
|
||||
|* ERROR Algo va mal *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
int CargaPaleta(char *file )
|
||||
{
|
||||
int index;
|
||||
FILE *fp;
|
||||
|
||||
if ( (fp=fopen( file, "rb" ) ) == NULL )
|
||||
return ERROR;
|
||||
|
||||
|
||||
if ( fseek( fp, -768L, SEEK_END ) == 0 )
|
||||
{
|
||||
for (index=0; index<256; index++)
|
||||
{
|
||||
// get the red component
|
||||
// get the green component
|
||||
// get the blue component
|
||||
// set components
|
||||
set_dac_register ( index, (getc(fp) >> 2), (getc(fp) >> 2), (getc(fp) >> 2) );
|
||||
} // end for index
|
||||
|
||||
}
|
||||
|
||||
fclose( fp );
|
||||
return OK;
|
||||
}
|
||||
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* InicializaJuego *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Inicializa el tablero de juego segun se especifique en *|
|
||||
|* puntero de tablero. *|
|
||||
|* *|
|
||||
|* Entradas: (ninguna) *|
|
||||
|* *|
|
||||
|* Salidas: OK Todo ha ido bien *|
|
||||
|* ERROR Algo va mal *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
void InicializaJuego(void)
|
||||
{
|
||||
int j, i;
|
||||
int Xw, Yw;
|
||||
int Elecc = 0;
|
||||
|
||||
set_active_page(2);
|
||||
|
||||
// 1<> Relleno el suelo
|
||||
Xw = InfoSprites[SPR_ELEM_MAPA].Ancho;
|
||||
Yw = InfoSprites[SPR_ELEM_MAPA].Alto;
|
||||
for( j = 0; j < 350; j+=16 )
|
||||
for ( i = 0; i < 230; i+=16 )
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), j, i, Xw, Yw );
|
||||
|
||||
// 2<> Pongo el marco al tablero
|
||||
MuestraImagen( "images\\dyna_fnd.pcx", 2, 255 );
|
||||
|
||||
// 3<> Coloco los cuadros indestructibles
|
||||
for ( i = 0; i < 21; i++ )
|
||||
for ( j = 0; j < 13; j++ )
|
||||
{
|
||||
if ( prt_tbl[j][i] == 1 )
|
||||
{
|
||||
tdraw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+Elecc) ), 12+i*16, 20+j*16, Xw, Yw );
|
||||
Elecc = random_int(2);
|
||||
}
|
||||
}
|
||||
char prt_tbl2[13][21];
|
||||
for ( j = 0; j<13; j++)
|
||||
for ( i = 0; i<21; i++)
|
||||
prt_tbl2[j][i] = prt_tbl[j][i];
|
||||
|
||||
// 4<> Coloco los cuadros destructibles
|
||||
// Uno los dos intentos, para reforzar el n<> de arboles que aparecen
|
||||
// >>>>>>>> 1<> intento del algoritmo que soporta 4
|
||||
for ( i = 0; i<21*13; i++)
|
||||
{
|
||||
Elecc = random_int(2);
|
||||
j = random_int(21*13);
|
||||
if ( prt_tbl[j/21][j%21] == 0 )
|
||||
{
|
||||
tdraw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+2+Elecc) ), 12+(j%21)*16, 20+(j/21)*16, Xw, Yw );
|
||||
prt_tbl[j/21][j%21] = 2;
|
||||
}
|
||||
}
|
||||
// >>>>>>>> 2<> intento del algoritmo que soporta 4
|
||||
for ( i = 0; i < 21; i++ )
|
||||
for ( j = 0; j < 13; j++ )
|
||||
{
|
||||
Elecc = random_int(2);
|
||||
|
||||
if ( prt_tbl[j][i] == 0 && random_int(5)%2 )
|
||||
{
|
||||
tdraw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+2+Elecc) ), 12+i*16, 20+j*16, Xw, Yw );
|
||||
prt_tbl[j][i] = 2;
|
||||
}
|
||||
}
|
||||
|
||||
// Dejo respirar a los jugadores
|
||||
prt_tbl[ 0][ 0] = 0; prt_tbl[ 0][ 1] = 0; prt_tbl[ 1][ 0] = 0;
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 0, 20+16* 0, Xw, Yw );
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 0, 20+16* 1, Xw, Yw );
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 1, 20+16* 0, Xw, Yw );
|
||||
prt_tbl[ 0][12] = 0; prt_tbl[ 1][12] = 0; prt_tbl[ 0][11] = 0;
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 0, 20+16* 12, Xw, Yw );
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 1, 20+16* 12, Xw, Yw );
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 0, 20+16* 11, Xw, Yw );
|
||||
prt_tbl[20][ 0] = 0; prt_tbl[19][ 0] = 0; prt_tbl[20][ 1] = 0;
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 20, 20+16* 0, Xw, Yw );
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 19, 20+16* 0, Xw, Yw );
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 20, 20+16* 1, Xw, Yw );
|
||||
prt_tbl[20][12] = 0; prt_tbl[20][11] = 0; prt_tbl[19][12] = 0;
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 20, 20+16* 12, Xw, Yw );
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 20, 20+16* 11, Xw, Yw );
|
||||
draw_bitmap ((char far*)( Sprite[POS_ELEM_MAPA].Sprite[0] + Xw * Yw * (Pref.Entorno+4) ), 12+16* 19, 20+16* 12, Xw, Yw );
|
||||
|
||||
// 1 cuadro indestructible
|
||||
// 2 cuadro destructible
|
||||
// A jugador A 1
|
||||
// B jugador B 2
|
||||
// C jugador C 3
|
||||
// D jugador D 4
|
||||
for ( j = 0; j<13; j++)
|
||||
for ( i = 0; i<21; i++)
|
||||
prt_tbl[j][i] = prt_tbl2[j][i];
|
||||
|
||||
|
||||
|
||||
|
||||
};
|
||||
|
||||
|
||||
/**************************************************************************\
|
||||
|* *|
|
||||
|* MuestraImagen *|
|
||||
|* *|
|
||||
|* Descripci<63>n: *|
|
||||
|* Descomprime y copia a la pagina indicada un PCX *|
|
||||
|* *|
|
||||
|* Entradas: nombre de la imagen *|
|
||||
|* pagina *|
|
||||
|* color_invisible ( -1 si ninguno ) *|
|
||||
|* *|
|
||||
|* *|
|
||||
|* Salidas: OK Todo ha ido bien *|
|
||||
|* ERROR Algo va mal *|
|
||||
|* *|
|
||||
\**************************************************************************/
|
||||
int MuestraImagen( char *file, int page, int col_Inv )
|
||||
{
|
||||
int curr_page;
|
||||
FILE *fp;
|
||||
int alto, ancho, contador;
|
||||
unsigned char byte;
|
||||
|
||||
|
||||
if ( (fp = fopen( file,"rb")) != NULL )
|
||||
{
|
||||
|
||||
curr_page = get_active_page();
|
||||
set_active_page(page);
|
||||
|
||||
// Saltamos la cabecera
|
||||
fseek( fp, 128, SEEK_SET );
|
||||
|
||||
for(alto=0; alto<240; alto++)
|
||||
{
|
||||
for(ancho=0; ancho<360; )
|
||||
{
|
||||
byte=getc(fp);
|
||||
if(byte<=0xC0)
|
||||
{
|
||||
if ( col_Inv < 0 || byte != col_Inv ) set_point (ancho, alto, byte);
|
||||
ancho++;
|
||||
}
|
||||
else
|
||||
{
|
||||
contador=byte&0x3F; byte=getc(fp);
|
||||
for(; contador>0; contador--)
|
||||
{
|
||||
if ( col_Inv < 0 || byte != col_Inv ) set_point (ancho, alto, byte);
|
||||
ancho++;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
fclose(fp);
|
||||
} else return ERROR;
|
||||
|
||||
set_active_page(curr_page);
|
||||
|
||||
return OK;
|
||||
}
|
||||
BIN
IMAGES/DYNA_CAR.PCX
Normal file
BIN
IMAGES/DYNA_CAR.PCX
Normal file
Binary file not shown.
BIN
IMAGES/DYNA_FND.PCX
Normal file
BIN
IMAGES/DYNA_FND.PCX
Normal file
Binary file not shown.
BIN
IMAGES/DYNA_JGD.PCX
Normal file
BIN
IMAGES/DYNA_JGD.PCX
Normal file
Binary file not shown.
BIN
IMAGES/DYNA_TBL.PCX
Normal file
BIN
IMAGES/DYNA_TBL.PCX
Normal file
Binary file not shown.
BIN
IMAGES/PREW/01.BMP
Normal file
BIN
IMAGES/PREW/01.BMP
Normal file
Binary file not shown.
|
After 
(image error) Size: 64 KiB |
BIN
IMAGES/PREW/02.BMP
Normal file
BIN
IMAGES/PREW/02.BMP
Normal file
Binary file not shown.
|
After 
(image error) Size: 64 KiB |
BIN
IMAGES/PREW/DYNA_CAR.PCX
Normal file
BIN
IMAGES/PREW/DYNA_CAR.PCX
Normal file
Binary file not shown.
BIN
IMAGES/PREW/DYNA_FND.PCX
Normal file
BIN
IMAGES/PREW/DYNA_FND.PCX
Normal file
Binary file not shown.
BIN
IMAGES/PREW/DYNA_JGD.PCX
Normal file
BIN
IMAGES/PREW/DYNA_JGD.PCX
Normal file
Binary file not shown.
BIN
IMAGES/PREW/DYNA_TBL.PCX
Normal file
BIN
IMAGES/PREW/DYNA_TBL.PCX
Normal file
Binary file not shown.
BIN
IMAGES/PREW/LET.PAL
Normal file
BIN
IMAGES/PREW/LET.PAL
Normal file
Binary file not shown.
BIN
IMAGES/PREW/MDYNA.PAL
Normal file
BIN
IMAGES/PREW/MDYNA.PAL
Normal file
Binary file not shown.
BIN
IMAGES/PREW/NEW-1.PCX
Normal file
BIN
IMAGES/PREW/NEW-1.PCX
Normal file
Binary file not shown.
BIN
IMAGES/PREW/YO.PAL
Normal file
BIN
IMAGES/PREW/YO.PAL
Normal file
Binary file not shown.
5
README.md
Normal file
5
README.md
Normal file
@ -0,0 +1,5 @@
|
||||
#DYNA
|
||||
*16/12/1996*
|
||||
ToDo: wwtcf?
|
||||
|
||||
|
||||
Reference in New Issue
Block a user