extern uint16_t rtg_offset_x, rtg_offset_y;
static pthread_t thread_id;
+static uint8_t mouse_cursor_enabled = 0, cursor_image_updated = 0, updating_screen = 0;
+static uint8_t mouse_cursor_w = 16, mouse_cursor_h = 16;
+static int16_t mouse_cursor_x = 0, mouse_cursor_y = 0;
struct rtg_shared_data {
uint16_t *width, *height;
static uint32_t palette[256];
static uint32_t cursor_palette[256];
-extern uint8_t cursor_data[256 * 256];
+uint32_t cursor_data[256 * 256];
void rtg_update_screen() {}
uint16_t pitch = rtg_pitch;
Texture raylib_texture, raylib_cursor_texture;
- Texture raylib_clut_texture, raylib_cursor_clut_texture;
- Image raylib_fb, raylib_cursor, raylib_clut, raylib_cursor_clut;
+ Texture raylib_clut_texture;
+ Image raylib_fb, raylib_cursor, raylib_clut;
InitWindow(GetScreenWidth(), GetScreenHeight(), "Pistorm RTG");
HideCursor();
SetTargetFPS(60);
Color bef = { 0, 64, 128, 255 };
+ float scale_x = 1.0f, scale_y = 1.0f;
Shader clut_shader = LoadShader(NULL, "platforms/amiga/rtg/clut.shader");
Shader swizzle_shader = LoadShader(NULL, "platforms/amiga/rtg/argbswizzle.shader");
raylib_clut.mipmaps = 1;
raylib_clut.data = palette;
- raylib_cursor_clut.format = PIXELFORMAT_UNCOMPRESSED_R8G8B8A8;
- raylib_cursor_clut.width = 256;
- raylib_cursor_clut.height = 1;
- raylib_cursor_clut.mipmaps = 1;
- raylib_cursor_clut.data = cursor_palette;
-
raylib_clut_texture = LoadTextureFromImage(raylib_clut);
- raylib_cursor_clut_texture = LoadTextureFromImage(raylib_cursor_clut);
- raylib_cursor.format = PIXELFORMAT_UNCOMPRESSED_GRAYSCALE;
+ raylib_cursor.format = PIXELFORMAT_UNCOMPRESSED_R8G8B8A8;
raylib_cursor.width = 256;
raylib_cursor.height = 256;
raylib_cursor.mipmaps = 1;
raylib_cursor.data = cursor_data;
raylib_cursor_texture = LoadTextureFromImage(raylib_cursor);
- Rectangle srchax, dsthax;
- Vector2 originhax;
+ Rectangle srcrect, dstscale;
+ Vector2 origin;
reinit_raylib:;
if (reinit) {
raylib_texture = LoadTextureFromImage(raylib_fb);
- srchax.x = srchax.y = 0;
- srchax.width = width;
- srchax.height = height;
- dsthax.x = dsthax.y = 0;
- if (GetScreenHeight() == 720) {
- dsthax.width = 960;
- dsthax.height = 720;
- } else if (GetScreenHeight() == 1080) {
- dsthax.width = 1440;
- dsthax.height = 1080;
+ srcrect.x = srcrect.y = 0;
+ srcrect.width = width;
+ srcrect.height = height;
+ dstscale.x = dstscale.y = 0;
+ dstscale.width = width;
+ dstscale.height = height;
+ scale_x = 1.0f;
+ scale_y = 1.0f;
+ origin.x = 0.0f;
+ origin.y = 0.0f;
+
+ if (dstscale.height * 2 < GetScreenHeight()) {
+ if (width == 320) {
+ if (GetScreenHeight() == 720) {
+ dstscale.width = 960;
+ dstscale.height = 720;
+ } else if (GetScreenHeight() == 1080) {
+ dstscale.width = 1440;
+ dstscale.height = 1080;
+ }
+ } else {
+ while (dstscale.height < GetScreenHeight()) {
+ dstscale.height += height;
+ dstscale.width += width;
+ }
+ }
+ scale_x = dstscale.width / (float)width;
+ scale_y = dstscale.height / (float)height;
}
- originhax.x = 0.0f;
- originhax.y = 0.0f;
while (1) {
if (rtg_on) {
BeginDrawing();
+ updating_screen = 1;
switch (format) {
case RTGFMT_8BIT:
break;
}
- if (width == 320) {
- DrawTexturePro(raylib_texture, srchax, dsthax, originhax, 0.0f, RAYWHITE);
- }
- else {
- Rectangle srcrect = { 0, 0, width, height };
- DrawTexturePro(raylib_texture, srcrect, srcrect, originhax, 0.0f, RAYWHITE);
- //DrawTexture(raylib_texture, 0, 0, RAYWHITE);
- }
+ DrawTexturePro(raylib_texture, srcrect, dstscale, origin, 0.0f, RAYWHITE);
switch (format) {
case RTGFMT_8BIT:
EndShaderMode();
break;
}
+
+ if (mouse_cursor_enabled) {
+ float mc_x = mouse_cursor_x - rtg_offset_x;
+ float mc_y = mouse_cursor_y - rtg_offset_y;
+ Rectangle cursor_srcrect = { 0, 0, mouse_cursor_w, mouse_cursor_h };
+ Rectangle dstrect = { mc_x * scale_x, mc_y * scale_y, (float)mouse_cursor_w * scale_x, (float)mouse_cursor_h * scale_y };
+ DrawTexturePro(raylib_cursor_texture, cursor_srcrect, dstrect, origin, 0.0f, RAYWHITE);
+ }
+
#ifdef DEBUG_RAYLIB_RTG
if (format == RTGFMT_8BIT) {
Rectangle srcrect = { 0, 0, 256, 1 };
Rectangle dstrect = { 0, 0, 1024, 8 };
//DrawTexture(raylib_clut_texture, 0, 0, RAYWHITE);
- DrawTexturePro(raylib_clut_texture, srcrect, dstrect, originhax, 0.0f, RAYWHITE);
+ DrawTexturePro(raylib_clut_texture, srcrect, dstrect, origin, 0.0f, RAYWHITE);
+ dstrect.y += 8;
+ DrawTexturePro(raylib_cursor_clut_texture, srcrect, dstrect, origin, 0.0f, RAYWHITE);
}
#endif
else {
UpdateTexture(raylib_texture, &data->memory[*data->addr]);
}
+ if (cursor_image_updated) {
+ UpdateTexture(raylib_cursor_texture, cursor_data);
+ cursor_image_updated = 0;
+ }
+ updating_screen = 0;
} else {
BeginDrawing();
ClearBackground(bef);
printf("RTG display disabled.\n");
rtg_on = 0;
}
+
+void rtg_enable_mouse_cursor() {
+ mouse_cursor_enabled = 1;
+}
+
+void rtg_set_mouse_cursor_pos(int16_t x, int16_t y) {
+ mouse_cursor_x = x;
+ mouse_cursor_y = y;
+ //printf("Set mouse cursor pos to %d, %d.\n", x, y);
+}
+
+static uint8_t clut_cursor_data[256*256];
+
+void update_mouse_cursor(uint8_t *src) {
+ if (src != NULL) {
+ memset(clut_cursor_data, 0x00, 256*256);
+ uint8_t cur_bit = 0x80;
+ uint8_t line_pitch = (mouse_cursor_w / 8) * 2;
+
+ for (uint8_t y = 0; y < mouse_cursor_h; y++) {
+ for (uint8_t x = 0; x < mouse_cursor_w; x++) {
+ if (src[(x / 8) + (line_pitch * y)] & cur_bit)
+ clut_cursor_data[x + (y * 256)] |= 0x01;
+ if (src[(x / 8) + (line_pitch * y) + (mouse_cursor_w / 8)] & cur_bit)
+ clut_cursor_data[x + (y * 256)] |= 0x02;
+ cur_bit >>= 1;
+ if (cur_bit == 0x00)
+ cur_bit = 0x80;
+ }
+ cur_bit = 0x80;
+ }
+ }
+
+ for (int y = 0; y < mouse_cursor_h; y++) {
+ for (int x = 0; x < mouse_cursor_w; x++) {
+ cursor_data[x + (y * 256)] = cursor_palette[clut_cursor_data[x + (y * 256)]];
+ }
+ }
+
+ printf ("Updated mouse cursor data.\n");
+
+ while (rtg_on && !updating_screen)
+ usleep(0);
+ cursor_image_updated = 1;
+}
+
+void rtg_set_cursor_clut_entry(uint8_t r, uint8_t g, uint8_t b, uint8_t idx) {
+ uint32_t color = 0;
+ unsigned char *dst = (unsigned char *)&color;
+
+ dst[0] = r;
+ dst[1] = g;
+ dst[2] = b;
+ dst[3] = 0xFF;
+ if (cursor_palette[idx + 1] != color) {
+ cursor_palette[0] = 0;
+ cursor_palette[idx + 1] = color;
+ update_mouse_cursor(NULL);
+ }
+}
+
+static uint8_t old_mouse_w, old_mouse_h;
+static uint8_t old_mouse_data[256];
+
+void rtg_set_mouse_cursor_image(uint8_t *src, uint8_t w, uint8_t h) {
+ uint8_t new_cursor_data = 0;
+
+ mouse_cursor_w = w;
+ mouse_cursor_h = h;
+
+ if (memcmp(src, old_mouse_data, (w / 8 * h)) != 0) {
+ printf("New cursor data.\n");
+ new_cursor_data = 1;
+ } else {
+ printf("No new cursor data.\n");
+ }
+
+ if (old_mouse_w != w || old_mouse_h != h || new_cursor_data) {
+ printf("Set new %dx%d mouse cursor image.\n", mouse_cursor_w, mouse_cursor_h);
+ old_mouse_w = w;
+ old_mouse_h = h;
+ update_mouse_cursor(src);
+ }
+}
return 0;
}
- m68k_add_ram_range(PIGFX_RTG_BASE + PIGFX_REG_SIZE, PIGFX_RTG_SIZE - PIGFX_REG_SIZE, rtg_mem);
- add_mapping(cfg_, MAPTYPE_RAM_NOALLOC, PIGFX_RTG_BASE + PIGFX_REG_SIZE, PIGFX_RTG_SIZE - PIGFX_REG_SIZE, -1, (char *)rtg_mem, "rtg_mem");
+ m68k_add_ram_range(PIGFX_RTG_BASE + PIGFX_REG_SIZE, 40 * SIZE_MEGA - PIGFX_REG_SIZE, rtg_mem);
+ add_mapping(cfg_, MAPTYPE_RAM_NOALLOC, PIGFX_RTG_BASE + PIGFX_REG_SIZE, 40 * SIZE_MEGA - PIGFX_REG_SIZE, -1, (char *)rtg_mem, "rtg_mem");
return 1;
}
rtg_p2d(rtg_x[0], rtg_y[0], rtg_x[1], rtg_y[1], rtg_x[2], rtg_y[2], rtg_u8[1], rtg_u8[2], rtg_u8[0], (rtg_user[0] >> 0x8), rtg_x[4], (uint8_t *)&rtg_mem[rtg_address_adj[1]]);
gdebug("Planar2Direct\n");
break;
+ case RTGCMD_SETSPRITE:
+ rtg_enable_mouse_cursor();
+ gdebug("SetSprite\n");
+ printf("SetSprite.\n");
+ break;
+ case RTGCMD_SETSPRITECOLOR:
+ rtg_set_cursor_clut_entry(rtg_u8[0], rtg_u8[1], rtg_u8[2], rtg_u8[3]);
+ gdebug("SetSpriteColor\n");
+ printf("SetSpriteColor.\n");
+ break;
+ case RTGCMD_SETSPRITEPOS:
+ rtg_set_mouse_cursor_pos((int16_t)rtg_x[0], (int16_t)rtg_y[0]);
+ gdebug("SetSpritePos\n");
+ break;
+ case RTGCMD_SETSPRITEIMAGE:
+ rtg_set_mouse_cursor_image(&rtg_mem[rtg_address_adj[1]], rtg_u8[0], rtg_u8[1]);
+ gdebug("SetSpriteImage\n");
+ printf("SetSpriteImage.\n");
+ break;
+ case RTGCMD_DEBUGME:
+ printf ("[RTG] DebugMe!\n");
+ break;
+ default:
+ printf("[!!!RTG] Unknown/unhandled RTG command %d ($%.4X)\n", cmd, cmd);
+ break;
}
}
void BlitPlanar2Chunky (__REGA0(struct BoardInfo *b), __REGA1(struct BitMap *bm), __REGA2(struct RenderInfo *r), __REGD0(SHORT x), __REGD1(SHORT y), __REGD2(SHORT dx), __REGD3(SHORT dy), __REGD4(SHORT w), __REGD5(SHORT h), __REGD6(UBYTE minterm), __REGD7(UBYTE mask));
void BlitPlanar2Direct (__REGA0(struct BoardInfo *b), __REGA1(struct BitMap *bmp), __REGA2(struct RenderInfo *r), __REGA3(struct ColorIndexMapping *clut), __REGD0(SHORT x), __REGD1(SHORT y), __REGD2(SHORT dx), __REGD3(SHORT dy), __REGD4(SHORT w), __REGD5(SHORT h), __REGD6(UBYTE minterm), __REGD7(UBYTE mask));
+void SetSprite (__REGA0(struct BoardInfo *b), __REGD0(BOOL what), __REGD7(RGBFTYPE format));
+void SetSpritePosition (__REGA0(struct BoardInfo *b), __REGD0(WORD x), __REGD1(WORD y), __REGD7(RGBFTYPE format));
+void SetSpriteImage (__REGA0(struct BoardInfo *b), __REGD7(RGBFTYPE format));
+void SetSpriteColor (__REGA0(struct BoardInfo *b), __REGD0(UBYTE idx), __REGD1(UBYTE R), __REGD2(UBYTE G), __REGD3(UBYTE B), __REGD7(RGBFTYPE format));
+
+
static ULONG LibStart(void) {
return(-1);
}
b->PaletteChipType = PCT_MNT_ZZ9000;
b->GraphicsControllerType = GCT_MNT_ZZ9000;
- b->Flags = BIF_INDISPLAYCHAIN | BIF_GRANTDIRECTACCESS;// | BIF_HARDWARESPRITE;
+ b->Flags = BIF_INDISPLAYCHAIN | BIF_GRANTDIRECTACCESS | BIF_HARDWARESPRITE;
b->RGBFormats = 1 | 2 | 512 | 1024 | 2048;
b->SoftSpriteFlags = 0;
b->BitsPerCannon = 8;
//b->FreeBitMap = (void *)NULL;
//b->GetBitMapAttr = (void *)NULL;
- //b->SetSprite = (void *)NULL;
- //b->SetSpritePosition = (void *)NULL;
- //b->SetSpriteImage = (void *)NULL;
- //b->SetSpriteColor = (void *)NULL;
+ b->SetSprite = (void *)SetSprite;
+ b->SetSpritePosition = (void *)SetSpritePosition;
+ b->SetSpriteImage = (void *)SetSpriteImage;
+ b->SetSpriteColor = (void *)SetSpriteColor;
//b->CreateFeature = (void *)NULL;
//b->SetFeatureAttrs = (void *)NULL;
WRITESHORT(RTG_COMMAND, RTGCMD_P2D);
}
+
+void SetSprite (__REGA0(struct BoardInfo *b), __REGD0(BOOL what), __REGD7(RGBFTYPE format)) {
+ WRITESHORT(RTG_COMMAND, RTGCMD_SETSPRITE);
+}
+
+void SetSpritePosition (__REGA0(struct BoardInfo *b), __REGD0(WORD x), __REGD1(WORD y), __REGD7(RGBFTYPE format)) {
+ WRITESHORT(RTG_X1, x);
+ WRITESHORT(RTG_Y1, y);
+
+ WRITESHORT(RTG_COMMAND, RTGCMD_SETSPRITEPOS);
+}
+
+void SetSpriteImage (__REGA0(struct BoardInfo *b), __REGD7(RGBFTYPE format)) {
+ WRITESHORT(RTG_X1, b->XOffset);
+ WRITESHORT(RTG_Y1, b->YOffset);
+ WRITEBYTE(RTG_U81, b->MouseWidth);
+ WRITEBYTE(RTG_U82, b->MouseHeight);
+
+ uint8_t* dest = (uint8_t*)((uint32_t)CARD_SCRATCH);
+ uint8_t* src = (uint8_t *)b->MouseImage;
+ uint16_t data_size = ((b->MouseWidth >> 3) * 2) * (b->MouseHeight);
+
+ if (b->MouseWidth > 16) src += 8;
+ else src += 4;
+
+ memcpy(dest, src, data_size);
+
+ WRITELONG(RTG_ADDR2, CARD_SCRATCH);
+
+ WRITESHORT(RTG_COMMAND, RTGCMD_SETSPRITEIMAGE);
+}
+
+void SetSpriteColor (__REGA0(struct BoardInfo *b), __REGD0(UBYTE idx), __REGD1(UBYTE R), __REGD2(UBYTE G), __REGD3(UBYTE B), __REGD7(RGBFTYPE format)) {
+ WRITEBYTE(RTG_U81, R);
+ WRITEBYTE(RTG_U82, G);
+ WRITEBYTE(RTG_U83, B);
+ WRITEBYTE(RTG_U84, idx);
+
+ WRITESHORT(RTG_COMMAND, RTGCMD_SETSPRITECOLOR);
+}