263 lines
7.6 KiB
C
263 lines
7.6 KiB
C
|
|
// from https://github.com/cpcitor/cpcrslib/tree/master/examples
|
|
|
|
#include "cpcrslib.h"
|
|
|
|
extern unsigned char sp_1[]; //masked sprite data
|
|
extern unsigned char sp_2[]; //masked sprite data
|
|
extern unsigned char tintas[]; //inks
|
|
extern unsigned char buffer[]; //inks
|
|
|
|
struct sprite // minimun sprite structure
|
|
{
|
|
char *sp0; //2 bytes 01
|
|
char *sp1; //2 bytes 23
|
|
int coord0; //2 bytes 45 current superbuffer address
|
|
int coord1; //2 bytes 67 old superbuffer address
|
|
unsigned char cx, cy; //2 bytes 89 current coordinates
|
|
unsigned char ox, oy; //2 bytes 1011 old coordinates
|
|
unsigned char move1; // los bits 4,3,2 definen el tipo de dibujo!!
|
|
unsigned char move; // in this example, to know the movement direction of the sprite
|
|
};
|
|
|
|
struct sprite sprite00,sprite01,sprite02;
|
|
|
|
void data(void)
|
|
{
|
|
__asm
|
|
_buffer:
|
|
.db #30
|
|
_sp_1:
|
|
.db #4,#15 //sprite dimensions in bytes withd, height
|
|
.db #0xFF,#0x00,#0x00,#0xCF,#0x00,#0xCF,#0xFF,#0x00 //data: mask, sprite, mask, sprite...
|
|
.db #0xAA,#0x45,#0x00,#0x3C,#0x00,#0x3C,#0x55,#0x8A
|
|
.db #0x00,#0x8A,#0x00,#0x55,#0x00,#0xAA,#0x00,#0x45
|
|
.db #0x00,#0x8A,#0x00,#0x20,#0x00,#0x00,#0x00,#0x65
|
|
.db #0x00,#0x28,#0x00,#0x55,#0x00,#0xAA,#0x00,#0x14
|
|
.db #0x00,#0x7D,#0x00,#0xBE,#0x00,#0xFF,#0x00,#0xBE
|
|
.db #0xAA,#0x14,#0x00,#0xFF,#0x00,#0xBE,#0x55,#0x28
|
|
.db #0xAA,#0x00,#0x00,#0x3C,#0x00,#0x79,#0x55,#0x00
|
|
.db #0x00,#0x51,#0x00,#0x51,#0x00,#0xA2,#0x55,#0xA2
|
|
.db #0x00,#0xF3,#0x00,#0x10,#0x00,#0x20,#0x00,#0xF3
|
|
.db #0x00,#0xF3,#0x00,#0x51,#0x00,#0xA2,#0x00,#0xF3
|
|
.db #0x55,#0x28,#0x00,#0x0F,#0x00,#0x0F,#0xAA,#0x14
|
|
.db #0xFF,#0x00,#0x55,#0x0A,#0xAA,#0x05,#0xFF,#0x00
|
|
.db #0x55,#0x02,#0x55,#0x28,#0xAA,#0x14,#0xAA,#0x01
|
|
.db #0x00,#0x03,#0x55,#0x02,#0xAA,#0x01,#0x00,#0x03
|
|
|
|
_sp_2:
|
|
.db #4,#21
|
|
.db #0xFF,#0x00,#0x00,#0xCC,#0x00,#0xCC,#0xFF,#0x00
|
|
.db #0xFF,#0x00,#0xAA,#0x44,#0x55,#0x88,#0xFF,#0x00
|
|
.db #0xFF,#0x00,#0xAA,#0x44,#0x55,#0x88,#0xFF,#0x00
|
|
.db #0xFF,#0x00,#0xAA,#0x44,#0x55,#0x88,#0xFF,#0x00
|
|
.db #0xFF,#0x00,#0x00,#0xCF,#0x00,#0xCF,#0xFF,#0x00
|
|
.db #0xAA,#0x45,#0x00,#0xCF,#0x00,#0xCF,#0x55,#0x8A
|
|
.db #0xAA,#0x45,#0x00,#0xE5,#0x00,#0xDA,#0x55,#0x8A
|
|
.db #0xAA,#0x45,#0x00,#0xCF,#0x00,#0xCF,#0x55,#0x8A
|
|
.db #0xAA,#0x45,#0x00,#0xCF,#0x00,#0xCF,#0x55,#0x8A
|
|
.db #0xAA,#0x45,#0x00,#0xCF,#0x00,#0xCF,#0x55,#0x8A
|
|
.db #0xAA,#0x45,#0x00,#0xCF,#0x00,#0xCF,#0x55,#0x8A
|
|
.db #0xFF,#0x00,#0x00,#0xCF,#0x00,#0xCF,#0xFF,#0x00
|
|
.db #0xAA,#0x01,#0x00,#0x03,#0x00,#0x03,#0x55,#0x02
|
|
.db #0x00,#0xA9,#0x00,#0x03,#0x00,#0x03,#0x00,#0x56
|
|
.db #0x00,#0xA9,#0x00,#0x03,#0x00,#0x03,#0x00,#0x56
|
|
.db #0xAA,#0x01,#0x00,#0x03,#0x00,#0x03,#0x55,#0x02
|
|
.db #0xAA,#0x01,#0x00,#0x03,#0x00,#0x03,#0x55,#0x02
|
|
.db #0xAA,#0x01,#0x00,#0x06,#0x00,#0x09,#0x55,#0x02
|
|
.db #0xFF,#0x00,#0x00,#0x0C,#0x00,#0x0C,#0xFF,#0x00
|
|
.db #0xFF,#0x00,#0x00,#0x0C,#0x00,#0x0C,#0xFF,#0x00
|
|
.db #0xFF,#0x00,#0x00,#0x0C,#0x00,#0x0C,#0xFF,#0x00
|
|
|
|
// There is a tool called Sprot that allows to generate masked sprites for z88dk.
|
|
// ask for it: www.amstrad.es/forum/
|
|
|
|
_tintas: //firmware inks
|
|
.db #0,#13,#1,#6,#26,#24,#15,#8,#10,#22,#14,#3,#18,#4,#11,#25
|
|
__endasm;
|
|
}
|
|
|
|
|
|
void *p_sprites[7];
|
|
|
|
void initPointers()
|
|
{
|
|
|
|
p_sprites[0] = &sprite00;
|
|
p_sprites[1] = &sprite01;
|
|
p_sprites[2] = &sprite02;
|
|
|
|
}
|
|
|
|
void set_colours(void)
|
|
{
|
|
unsigned char x;
|
|
for (x=0; x<16; x++)
|
|
{
|
|
cpc_SetInk(x,tintas[x]);
|
|
}
|
|
cpc_SetBorder(0);
|
|
}
|
|
void pause(void)
|
|
{
|
|
__asm
|
|
ld b,#80
|
|
pause_loop:
|
|
halt
|
|
djnz pause_loop
|
|
__endasm;
|
|
}
|
|
void collide(void)
|
|
{
|
|
cpc_SetColour(16,1);
|
|
pause();
|
|
cpc_SetColour(16,9);
|
|
}
|
|
|
|
void draw_tilemap(void)
|
|
{
|
|
unsigned char x,y;
|
|
//set the tiles of the map. In this example, the tile map is 32x16 tile
|
|
//Tile Map configuration file: TileMapConf.asm
|
|
|
|
y=0;
|
|
for(x=0; x<32; x++)
|
|
{
|
|
cpc_SetTile(x,y,1);
|
|
}
|
|
for(y=1; y<15; y++)
|
|
{
|
|
for (x=0; x<32; x++)
|
|
{
|
|
cpc_SetTile(x,y,0);
|
|
}
|
|
}
|
|
y=15;
|
|
for (x=0; x<32; x++)
|
|
{
|
|
cpc_SetTile(x,y,2);
|
|
}
|
|
}
|
|
|
|
void print_credits(void)
|
|
{
|
|
cpc_PrintGphStrXY("SMALL;SPRITE;DEMO",9*2+3,20*8);
|
|
cpc_PrintGphStrXY("SDCC;;;CPCRSLIB",10*2+3,21*8);
|
|
cpc_PrintGphStrXY("BY;ARTABURU;2015",10*2+2,22*8);
|
|
cpc_PrintGphStrXY("ESPSOFT<AMSTRAD<ES",10*2+3-3,24*8);
|
|
}
|
|
|
|
main()
|
|
{
|
|
initPointers();
|
|
|
|
set_colours();
|
|
cpc_SetInkGphStr(0,0);
|
|
cpc_SetModo(0);
|
|
|
|
cpc_DisableFirmware();
|
|
// All the sprite values are initilized
|
|
sprite00.sp1=sp_1;
|
|
sprite00.sp0=sp_1;
|
|
sprite00.ox=50;
|
|
sprite00.oy=70;
|
|
sprite00.cx=50;
|
|
sprite00.cy=70;
|
|
sprite00.move1=3;
|
|
cpc_SuperbufferAddress(p_sprites[0]); //first time it's important to do this
|
|
|
|
sprite01.sp1=sp_2;
|
|
sprite01.sp0=sp_2;
|
|
sprite01.ox=50;
|
|
sprite01.oy=106;
|
|
sprite01.cx=50;
|
|
sprite01.cy=106;
|
|
sprite01.move=1;
|
|
sprite01.move1=3;
|
|
cpc_SuperbufferAddress(p_sprites[1]);
|
|
|
|
sprite02.sp1=sp_2;
|
|
sprite02.sp0=sp_2;
|
|
sprite02.ox=20;
|
|
sprite02.oy=100;
|
|
sprite02.cx=20;
|
|
sprite02.cy=100;
|
|
sprite02.move=2;
|
|
sprite02.move1=3;
|
|
cpc_SuperbufferAddress(p_sprites[2]);
|
|
|
|
|
|
//Drawing the tile map
|
|
draw_tilemap();
|
|
cpc_ShowTileMap(); //Show entire tile map in the screen
|
|
print_credits();
|
|
cpc_SetTile(0,1,2);
|
|
/*cpc_GetTiles(0,0,2,3, buffer);
|
|
|
|
cpc_PutTiles(0,13,2,3, buffer);
|
|
cpc_GetTiles(0,13,2,3, buffer);
|
|
cpc_PutTiles(8,9,2,3, buffer); */
|
|
|
|
cpc_ShowTileMap(); //Show entire tile map in the screen
|
|
while(1)
|
|
{
|
|
//cpc_PutTile2x8(sp_1,3,5);
|
|
//cpc_PutTile2x8(sp_1,10,170);
|
|
//Default number keys for moving one of the sprites:
|
|
// 0: cursor right
|
|
// 1: cursor left
|
|
// 2: cursor up
|
|
// 3: cursor down
|
|
|
|
//for example., if key 0 is pressed, and the sprite is inside tilemap, then
|
|
//the sprite is moved one byte to the right:
|
|
if (cpc_TestKey(0)==1 && sprite00.cx<60) sprite00.cx++;
|
|
if (cpc_TestKey(1)==1 && sprite00.cx>0) sprite00.cx--;
|
|
if (cpc_TestKey(2)==1 && sprite00.cy>0) sprite00.cy-=2;
|
|
if (cpc_TestKey(3)==1 && sprite00.cy<112) sprite00.cy+=2;
|
|
|
|
// The other sprites are automatically moved
|
|
if (sprite01.move==0) //0 = left, 1 = right
|
|
{
|
|
if (sprite01.cx>0) sprite01.cx--;
|
|
else sprite01.move=1;
|
|
}
|
|
if (sprite01.move==1) //0 = left, 1 = right
|
|
{
|
|
if (sprite01.cx<60) sprite01.cx++;
|
|
else sprite01.move=0;
|
|
}
|
|
|
|
if (sprite02.move==2) //2 = up, 3 = down
|
|
{
|
|
if (sprite02.cy>0) sprite02.cy-=2;
|
|
else sprite02.move=3;
|
|
}
|
|
if (sprite02.move==3) //2 = up, 3 = down
|
|
{
|
|
if (sprite02.cy<106) sprite02.cy+=2;
|
|
else sprite02.move=2;
|
|
}
|
|
|
|
cpc_ResetTouchedTiles(); //clear touched tile table
|
|
|
|
//Sprite phase 1
|
|
cpc_PutSpTileMap(p_sprites[0]); //search the tiles where is and was the sprite
|
|
cpc_PutSpTileMap(p_sprites[1]);
|
|
cpc_PutSpTileMap(p_sprites[2]);
|
|
|
|
cpc_UpdScr(); //Update the screen to new situatio (show the touched tiles)
|
|
|
|
//Sprite phase 2
|
|
cpc_PutMaskSpTileMap2b(p_sprites[0]); //Requires to move sprite with cpc_SpUpdX or cpc_SpUpdY
|
|
cpc_PutMaskSpTileMap2b(p_sprites[1]);
|
|
cpc_PutMaskSpTileMap2b(p_sprites[2]);
|
|
|
|
cpc_ShowTileMap2(); //Show the touched tiles-> show the new sprite situatuion
|
|
|
|
if (cpc_CollSp(p_sprites[0],p_sprites[1])) collide(); //test if there is collision between sprite00 and sprite01
|
|
if (cpc_CollSp(p_sprites[0],p_sprites[2])) collide();
|
|
|
|
}
|
|
}
|