vince Le 29/10/2016 à 17:21 #include <lynx.h>
#include <tgi.h>
#include <6502.h>
#include <joystick.h>
#include <stdlib.h>
extern char lynxtgi[];
extern char lynxjoy[];
unsigned char paddle[] = {
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
0
};
unsigned char ball[] = {
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
0
};
unsigned char wall[] = {
2, 0x7E,
2, 0x7E,
2, 0x7E,
2, 0x7E,
0
};
typedef struct {
char collindex;
SCB_REHV sprite;
PENPAL_1;
signed char hvel;
signed char vvel;
} sprite_t;
sprite_t LeftPaddle = {
0,
{
BPP_1 | TYPE_NORMAL,
LITERAL | REHV,
1,
0,
paddle,
10, 73, 256, 256
},
{COLOR_GREY},
0, 0
};
sprite_t RightPaddle = {
0,
{
BPP_1 | TYPE_NORMAL,
LITERAL | REHV,
2,
0,
paddle,
159-10-6, 70, 256, 256
},
{COLOR_GREY},
0, 0
};
sprite_t TopWall = {
0,
{
BPP_1 | TYPE_NORMAL,
LITERAL | REHV,
3,
0,
wall,
-24, 1, 160 / 6 * 256, 256
},
{COLOR_GREEN},
0, 0
};
sprite_t BottomWall = {
0,
{
BPP_1 | TYPE_NORMAL,
LITERAL | REHV,
4,
0,
wall,
-24, 101-4, 160 / 6 * 256, 256
},
{COLOR_GREEN},
0, 0
};
sprite_t Ball = {
0,
{
BPP_1 | TYPE_NORMAL,
LITERAL | REHV,
5,
0,
ball,
10, 10, 256, 256
},
{COLOR_GREY},
2, 1
};
#define STEREO_REG (*(char *)0xfd50)
#define VOLUME_REG(chan) (*(char *)(0xfd20 + 0 + (chan & 3) * 8))
#define FEED_REG(chan) (*(char *)(0xfd20 + 1 + (chan & 3) * 8))
#define OUT_REG(chan) (*(char *)(0xfd20 + 2 + (chan & 3) * 8))
#define SHIFT_REG(chan) (*(char *)(0xfd20 + 3 + (chan & 3) * 8))
#define BKUP_REG(chan) (*(char *)(0xfd20 + 4 + (chan & 3) * 8))
#define CTLA_REG(chan) (*(char *)(0xfd20 + 5 + (chan & 3) * 8))
#define CNT_REG(chan) (*(char *)(0xfd20 + 6 + (chan & 3) * 8))
#define CTLB_REG(chan) (*(char *)(0xfd20 + 7 + (chan & 3) * 8))
void startSound() {
unsigned int taps = 0x0019;
unsigned backup = 0x00B1;
unsigned octave = 2;
unsigned integrate = 1;
unsigned char pitch = 66;
unsigned char chan = 0;
VOLUME_REG(chan) = 0;
STEREO_REG = 0;
// Disable count
CTLA_REG(chan) = 0x10;
// Setup new sound engine
FEED_REG(chan) = (taps & 0x003f) + ((taps >> 4) & 0xc0);
SHIFT_REG(chan) = backup & 0xff;
CTLB_REG(chan) = (backup >> 4) & 0xf0;
CTLA_REG(chan) = (taps & 0x0080) + 0x18 + octave + (integrate << 5);
BKUP_REG(chan) = pitch;
}
void main()
{
unsigned char joy;
char buffer[16];
signed RightScore = 0;
signed LeftScore = 0;
signed char vol = 120;
unsigned char chan = 0;
joy_install(&lynxjoy);
tgi_install(&lynxtgi);
tgi_init();
tgi_setframerate(60);
tgi_setcollisiondetection(1);
CLI();
startSound();
while (1) {
while (tgi_busy())
;
/* Erase collision buffer */
tgi_clear();
LeftPaddle.penpal[0] = COLOR_GREY;
RightPaddle.penpal[0] = COLOR_GREY;
/* Move paddles */
joy = joy_read(JOY_1);
if (JOY_BTN_UP(joy)) {
LeftPaddle.sprite.vpos -= 1;
}
if (JOY_BTN_DOWN(joy)) {
LeftPaddle.sprite.vpos += 1;
}
if (JOY_BTN_FIRE(joy)) {
RightPaddle.sprite.vpos -= 1;
}
if (JOY_BTN_FIRE2(joy)) {
RightPaddle.sprite.vpos += 1;
}
/* Stop sound */
VOLUME_REG(chan) = 0;
Ball.sprite.hpos += Ball.hvel;
if (Ball.sprite.hpos < 3) {
/* Start sound */
VOLUME_REG(chan) = vol;
RightScore++;
Ball.sprite.hpos = RightPaddle.sprite.hpos;
Ball.sprite.vpos = RightPaddle.sprite.vpos + 10;
}
if (Ball.sprite.hpos > 160 -3) {
/* Start sound */
VOLUME_REG(chan) = vol;
LeftScore++;
Ball.sprite.hpos = LeftPaddle.sprite.hpos;
Ball.sprite.vpos = LeftPaddle.sprite.vpos + 10;
}
Ball.sprite.vpos += Ball.vvel;
/* Paint stationary sprites */
tgi_sprite(&TopWall.sprite);
tgi_sprite(&BottomWall.sprite);
tgi_sprite(&LeftPaddle.sprite);
tgi_sprite(&RightPaddle.sprite);
/* Draw last collidable sprite */
tgi_sprite(&Ball.sprite);
/* Examine collisions */
switch (Ball.collindex) {
case 0:
break;
case 1:
Ball.hvel = 2;
LeftPaddle.penpal[0] = COLOR_RED;
tgi_sprite(&LeftPaddle.sprite);
/* Start sound */
VOLUME_REG(chan) = vol;
break;
case 2:
Ball.hvel = -2;
RightPaddle.penpal[0] = COLOR_RED;
tgi_sprite(&RightPaddle.sprite);
/* Start sound */
VOLUME_REG(chan) = vol;
break;
case 3:
case 4:
Ball.vvel = -Ball.vvel;
/* Start sound */
VOLUME_REG(chan) = vol;
break;
default:
break;
}
tgi_setcolor(COLOR_WHITE);
itoa(LeftScore, &buffer[0], 10);
tgi_outtextxy(40, 10, buffer);
itoa(RightScore, &buffer[0], 10);
tgi_outtextxy(120, 10, buffer);
tgi_updatedisplay();
}
}
Fichier joint : SAMPLE.M65
Fichier joint : 
