mirror of
https://github.com/isometimes/rpi4-osdev
synced 2024-11-08 19:30:39 +00:00
280 lines
7.3 KiB
C
280 lines
7.3 KiB
C
#include "include/wgtspr.h"
|
|
#include "include/mem.h"
|
|
#include "include/multicore.h"
|
|
|
|
// ######## REQUIRED FUNCTIONS ########
|
|
|
|
unsigned long state0 = 1000;
|
|
unsigned long state1 = 2000;
|
|
|
|
unsigned long rand(void)
|
|
{
|
|
unsigned long s1 = state0;
|
|
unsigned long s0 = state1;
|
|
|
|
state0 = s0;
|
|
s1 ^= s1 << 23;
|
|
s1 ^= s1 >> 17;
|
|
s1 ^= s0;
|
|
s1 ^= s0 >> 26;
|
|
state1 = s1;
|
|
|
|
return state0 + state1;
|
|
}
|
|
|
|
// ######## STUB FUNCTIONS ########
|
|
|
|
unsigned int kb = 0;
|
|
|
|
unsigned int kbhit(void) {
|
|
kb++;
|
|
return kb / 500;
|
|
}
|
|
|
|
void getch(void) {
|
|
wait_msec(0x500000);
|
|
kb = 0;
|
|
}
|
|
|
|
// ######## WGT EXAMPLES ########
|
|
|
|
color palette[256]; /* Our palette */
|
|
block sprites[31]; /* Sprites to be loaded */
|
|
short x, y, i; /* Counters and position variables */
|
|
short chk1, chk2, chk3, chk4; /* Result of pixel checks */
|
|
short blk[10][28] = { /* Our wall of bricks is defined here */
|
|
{ 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 },
|
|
{ 0,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3 },
|
|
{ 0,3,4,3,3,3,4,3,3,3,3,3,4,4,4,4,4,3,3,3,3,3,4,4,4,4,4,3 },
|
|
{ 0,3,4,3,3,3,4,3,3,3,3,3,4,3,3,3,3,3,3,3,3,3,3,3,4,3,3,3 },
|
|
{ 0,3,4,3,3,3,4,3,3,3,3,3,4,3,3,3,3,3,3,3,3,3,3,3,4,3,3,3 },
|
|
{ 0,3,4,3,4,3,4,3,3,3,3,3,4,3,4,4,4,3,3,3,3,3,3,3,4,3,3,3 },
|
|
{ 0,3,4,3,4,3,4,3,3,3,3,3,4,3,3,3,4,3,3,3,3,3,3,3,4,3,3,3 },
|
|
{ 0,3,4,3,4,3,4,3,3,3,3,3,4,3,3,3,4,3,3,3,3,3,3,3,4,3,3,3 },
|
|
{ 0,3,4,4,4,4,4,3,3,3,3,3,4,4,4,4,4,3,3,3,3,3,3,3,4,3,3,3 },
|
|
{ 0,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3,3 }
|
|
};
|
|
|
|
void dobounce (void); /* Makes a sound when the ball bounces */
|
|
|
|
float sbx, sby, sp, lx, ly; /* Speed of ball and position of ball */
|
|
float xsp, ysp; /* More motion variables */
|
|
|
|
void looper (); /* Main program loop is in this routine */
|
|
void hit(short, short); /* Performs update when ball hits brick */
|
|
|
|
short hits; /* Number of bricks hit */
|
|
|
|
void wgt60()
|
|
{
|
|
set_clock_rate(get_max_clock());
|
|
mem_init();
|
|
vga256 (); /* Initializes WGT system */
|
|
|
|
start_core2(minit); // Start the comms engine (core 2)
|
|
while (!comms_up); // Wait for comms up
|
|
|
|
wtexttransparent (TEXTFGBG); /* Turn foreground and background on */
|
|
|
|
extern unsigned char _binary_bin_break_spr_start[];
|
|
wloadsprites (palette, &_binary_bin_break_spr_start[0], sprites, 0, 30);
|
|
wsetpalette (0, 255, palette);
|
|
|
|
/* Initialize the sprite system and tell it we've got 2 sprites to use */
|
|
initialize_sprites (sprites);
|
|
maxsprite = 2;
|
|
|
|
wsetscreen (spritescreen); /* Draw our game screen on the sprite screen */
|
|
|
|
for (y = 0; y < 200; y++) /* Background is a series of gray lines */
|
|
{
|
|
wsetcolor (vgapal[(y / 8) + 1]);
|
|
wline (0, y, 319, y);
|
|
}
|
|
|
|
wsetcolor (vgapal[0]); /* Make black playing area */
|
|
wbar (50, 10, 270, 189);
|
|
|
|
wsetcolor (vgapal[16]); /* Outline it */
|
|
wrectangle (49, 9, 271, 190);
|
|
|
|
for (x = 1; x < 28; x++) /* Now draw the bricks */
|
|
for (y = 1; y < 10; y++)
|
|
{
|
|
wputblock (x * 7 + 57, y * 5 + 20, sprites[blk[y][x]], 0);
|
|
}
|
|
|
|
/* After it has been drawn, show it on the visual screen too */
|
|
wcopyscreen (0, 0, 319, 199, spritescreen, 0, 0, NULL);
|
|
wcopyscreen (0, 0, 319, 199, spritescreen, 0, 0, backgroundscreen);
|
|
wnormscreen ();
|
|
|
|
getch();
|
|
|
|
spriteon (0, 160, 150, 1); /* Turn on our sprites */
|
|
spriteon (1, 160, 100, 2);
|
|
|
|
msetbounds (50, 129, 245, 179); /* Limit mouse movement */
|
|
|
|
xsp = 1.1; /* Set initial ball speeds */
|
|
ysp = 1.3;
|
|
|
|
sbx = xsp;
|
|
sby = ysp;
|
|
lx = 160; /* And the initial position */
|
|
ly = 100;
|
|
|
|
do { /* Now play the game */
|
|
looper ();
|
|
} while (but != 2); /* Until the right mouse button is clicked */
|
|
|
|
mdeinit();
|
|
deinitialize_sprites (); /* Deinit the sprite system */
|
|
}
|
|
|
|
void looper(void)
|
|
{
|
|
wait_msec(0x411B);
|
|
erase_sprites (); /* Clear sprites from sprite screen */
|
|
|
|
s[0].x = mx; /* Set paddle position to mouse position */
|
|
s[0].y = my;
|
|
|
|
if (lx > 267) /* Is ball bouncing off right wall? */
|
|
{
|
|
dobounce ();
|
|
lx = 267;
|
|
sbx = -sbx; /* Change direction */
|
|
}
|
|
if (lx < 49) /* Is ball bouncing off left wall? */
|
|
{
|
|
dobounce ();
|
|
lx = 49;
|
|
sbx = -sbx; /* Change direction */
|
|
}
|
|
if (ly < 9) /* Is ball bouncing off top wall? */
|
|
{
|
|
dobounce ();
|
|
ly = 9;
|
|
sby = -sby; /* Change direction */
|
|
}
|
|
|
|
lx += sbx; /* Update ball positions */
|
|
ly += sby;
|
|
|
|
s[1].x = (float)lx;
|
|
s[1].y = (float)ly;
|
|
|
|
if (s[1].y > 186) /* Did it get by the user and go off the bottom? */
|
|
{
|
|
/*
|
|
for (i = 2000; i >= 200; i--)
|
|
sound (i);
|
|
nosound ();
|
|
*/
|
|
lx = 160; // Reset it to the starting position
|
|
ly = 100;
|
|
}
|
|
|
|
if (overlap (0, 1)) /* Hit the ball with paddle? */
|
|
{
|
|
// sound (900);
|
|
sby = -ysp; /* Change speed and direction based on
|
|
part of paddle hit */
|
|
if (s[1].x > s[0].x + 21)
|
|
sbx = xsp * 4;
|
|
else if (s[1].x > s[0].x + 18)
|
|
sbx = xsp * 2;
|
|
else if (s[1].x > s[0].x + 12)
|
|
sbx = xsp;
|
|
else if (s[1].x > s[0].x + 6)
|
|
sbx = -xsp;
|
|
else if (s[1].x > s[0].x + 3)
|
|
sbx = -xsp * 2;
|
|
else
|
|
sbx = -xsp * 4;
|
|
}
|
|
|
|
/* Now check edges of ball for brick contact */
|
|
chk1 = wgetpixel (s[1].x + 3, s[1].y - 1) >> 24; /* Upper edge */
|
|
chk2 = wgetpixel (s[1].x + 3, s[1].y + 6) >> 24; /* Lower edge */
|
|
chk3 = wgetpixel (s[1].x - 1, s[1].y + 3) >> 24; /* Left edge */
|
|
chk4 = wgetpixel (s[1].x + 6, s[1].y + 3) >> 24; /* Right edge */
|
|
|
|
if (chk1 > 28)
|
|
{
|
|
hit (3, -1);
|
|
sby = ysp;
|
|
}
|
|
else if (chk2 > 28)
|
|
{
|
|
hit (3, 6);
|
|
sby = -ysp;
|
|
}
|
|
if (chk3 > 28)
|
|
{
|
|
hit (-1, 3);
|
|
sbx = -sbx;
|
|
lx += 2;
|
|
}
|
|
else if (chk4 > 28)
|
|
{
|
|
hit (6, 3);
|
|
sbx = -sbx;
|
|
lx -= 2;
|
|
}
|
|
// nosound (); /* Turn off all sound */
|
|
draw_sprites (1); /* Draw the sprites again */
|
|
}
|
|
|
|
void hit (short ix, short iy)
|
|
{
|
|
short x1, x2;
|
|
short y1, y2;
|
|
|
|
// sound (600); /* Beep because we hit something */
|
|
wsetcolor (vgapal[0]);
|
|
/* Loop through all the bricks to see what we hit */
|
|
for (x = 1; x < 28; x++)
|
|
{
|
|
x1 = x * 7 + 57;
|
|
x2 = x1 + 6;
|
|
for (y = 1; y < 10; y++)
|
|
{
|
|
y1 = y * 5 + 20;
|
|
y2 = y1 + 4;
|
|
if ((s[1].x + ix >= x1) && (s[1].x + ix <= x2)
|
|
&& (s[1].y + iy >= y1) && (s[1].y + iy <= y2) && (blk[y][x] != 0))
|
|
{
|
|
wsetscreen (spritescreen);
|
|
wbar (x1, y1, x2, y2); /* Erase brick */
|
|
wsetscreen (backgroundscreen);
|
|
wbar (x1, y1, x2, y2); /* Erase brick */
|
|
wnormscreen ();
|
|
/* And update visual screen */
|
|
wcopyscreen (x1, y1, x2, y2, spritescreen, x1, y1, NULL);
|
|
blk[y][x] = 0; /* Disable brick in array */
|
|
hits++;
|
|
if ((hits % 15) == 0) /* Increase speed after every 15 hits */
|
|
{
|
|
xsp += .1;
|
|
ysp += .1;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
void dobounce (void)
|
|
{
|
|
/*
|
|
sound (200);
|
|
nosound ();
|
|
*/
|
|
}
|
|
|
|
void main()
|
|
{
|
|
wgt60();
|
|
while (1);
|
|
}
|