2021-02-08 18:46:52 -05:00
|
|
|
#include <SDL2/SDL.h>
|
2021-02-08 17:18:01 -05:00
|
|
|
#include <stdio.h>
|
|
|
|
|
|
|
|
/*
|
|
|
|
Copyright (c) 2021 Devine Lu Linvega
|
|
|
|
|
|
|
|
Permission to use, copy, modify, and distribute this software for any
|
|
|
|
purpose with or without fee is hereby granted, provided that the above
|
|
|
|
copyright notice and this permission notice appear in all copies.
|
|
|
|
|
|
|
|
THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
|
|
|
WITH REGARD TO THIS SOFTWARE.
|
|
|
|
*/
|
|
|
|
|
2021-02-08 18:46:52 -05:00
|
|
|
#include "uxn.h"
|
|
|
|
|
2021-03-11 23:41:35 -05:00
|
|
|
#define HOR 48
|
2021-03-03 14:49:26 -05:00
|
|
|
#define VER 32
|
2021-02-08 18:46:52 -05:00
|
|
|
#define PAD 2
|
2021-02-18 18:11:02 -05:00
|
|
|
#define RES (HOR * VER * 16)
|
2021-02-08 18:46:52 -05:00
|
|
|
|
2021-02-25 19:03:45 -05:00
|
|
|
typedef struct {
|
2021-03-22 23:04:04 -04:00
|
|
|
Uint8 reqdraw, bg[RES], fg[RES];
|
2021-02-25 19:03:45 -05:00
|
|
|
Uint16 x1, y1, x2, y2;
|
2021-02-18 18:11:02 -05:00
|
|
|
} Screen;
|
2021-02-08 18:46:52 -05:00
|
|
|
|
|
|
|
int WIDTH = 8 * HOR + 8 * PAD * 2;
|
2021-02-18 18:11:02 -05:00
|
|
|
int HEIGHT = 8 * VER + 8 * PAD * 2;
|
2021-03-03 14:49:26 -05:00
|
|
|
int FPS = 30, GUIDES = 0, ZOOM = 2;
|
2021-02-08 18:46:52 -05:00
|
|
|
|
2021-03-22 23:04:04 -04:00
|
|
|
Uint32 *pixels, theme[4];
|
2021-02-08 18:46:52 -05:00
|
|
|
|
2021-03-22 23:04:04 -04:00
|
|
|
Uint8 font[][8] = {
|
2021-02-15 13:12:44 -05:00
|
|
|
{0x00, 0x3c, 0x46, 0x4a, 0x52, 0x62, 0x3c, 0x00},
|
|
|
|
{0x00, 0x18, 0x28, 0x08, 0x08, 0x08, 0x3e, 0x00},
|
|
|
|
{0x00, 0x3c, 0x42, 0x02, 0x3c, 0x40, 0x7e, 0x00},
|
|
|
|
{0x00, 0x3c, 0x42, 0x1c, 0x02, 0x42, 0x3c, 0x00},
|
|
|
|
{0x00, 0x08, 0x18, 0x28, 0x48, 0x7e, 0x08, 0x00},
|
|
|
|
{0x00, 0x7e, 0x40, 0x7c, 0x02, 0x42, 0x3c, 0x00},
|
|
|
|
{0x00, 0x3c, 0x40, 0x7c, 0x42, 0x42, 0x3c, 0x00},
|
|
|
|
{0x00, 0x7e, 0x02, 0x04, 0x08, 0x10, 0x10, 0x00},
|
|
|
|
{0x00, 0x3c, 0x42, 0x3c, 0x42, 0x42, 0x3c, 0x00},
|
|
|
|
{0x00, 0x3c, 0x42, 0x42, 0x3e, 0x02, 0x3c, 0x00},
|
|
|
|
{0x00, 0x3c, 0x42, 0x42, 0x7e, 0x42, 0x42, 0x00},
|
|
|
|
{0x00, 0x7c, 0x42, 0x7c, 0x42, 0x42, 0x7c, 0x00},
|
|
|
|
{0x00, 0x3c, 0x42, 0x40, 0x40, 0x42, 0x3c, 0x00},
|
|
|
|
{0x00, 0x78, 0x44, 0x42, 0x42, 0x44, 0x78, 0x00},
|
|
|
|
{0x00, 0x7e, 0x40, 0x7c, 0x40, 0x40, 0x7e, 0x00},
|
|
|
|
{0x00, 0x7e, 0x40, 0x40, 0x7c, 0x40, 0x40, 0x00}};
|
|
|
|
|
2021-03-16 12:01:47 -04:00
|
|
|
static SDL_Window *gWindow;
|
|
|
|
static SDL_Renderer *gRenderer;
|
|
|
|
static SDL_Texture *gTexture;
|
|
|
|
static Screen screen;
|
|
|
|
static Device *devscreen, *devmouse, *devkey, *devctrl;
|
2021-02-18 21:16:39 -05:00
|
|
|
|
|
|
|
#pragma mark - Helpers
|
|
|
|
|
|
|
|
int
|
|
|
|
clamp(int val, int min, int max)
|
|
|
|
{
|
|
|
|
return (val >= min) ? (val <= max) ? val : max : min;
|
|
|
|
}
|
2021-02-18 18:11:02 -05:00
|
|
|
|
|
|
|
#pragma mark - Paint
|
|
|
|
|
|
|
|
void
|
|
|
|
paintpixel(Uint8 *dst, Uint16 x, Uint16 y, Uint8 color)
|
|
|
|
{
|
2021-02-25 19:03:45 -05:00
|
|
|
Uint16 row = (y % 8) + ((x / 8 + y / 8 * HOR) * 16), col = 7 - (x % 8);
|
2021-02-18 18:11:02 -05:00
|
|
|
if(x >= HOR * 8 || y >= VER * 8 || row > RES - 8)
|
|
|
|
return;
|
|
|
|
if(color == 0 || color == 2)
|
2021-02-25 19:03:45 -05:00
|
|
|
dst[row] &= ~(1UL << col);
|
2021-02-18 18:11:02 -05:00
|
|
|
else
|
2021-02-25 19:03:45 -05:00
|
|
|
dst[row] |= 1UL << col;
|
2021-02-18 18:11:02 -05:00
|
|
|
if(color == 0 || color == 1)
|
2021-02-25 19:03:45 -05:00
|
|
|
dst[row + 8] &= ~(1UL << col);
|
2021-02-18 18:11:02 -05:00
|
|
|
else
|
2021-02-25 19:03:45 -05:00
|
|
|
dst[row + 8] |= 1UL << col;
|
2021-02-18 18:11:02 -05:00
|
|
|
}
|
|
|
|
|
2021-02-18 21:16:39 -05:00
|
|
|
void
|
2021-02-21 19:52:51 -05:00
|
|
|
painticn(Uint8 *dst, Uint16 x, Uint16 y, Uint8 *sprite, Uint8 blend)
|
2021-02-18 18:11:02 -05:00
|
|
|
{
|
|
|
|
Uint16 v, h;
|
|
|
|
for(v = 0; v < 8; v++)
|
2021-02-18 21:16:39 -05:00
|
|
|
for(h = 0; h < 8; h++) {
|
|
|
|
Uint8 ch1 = ((sprite[v] >> (7 - h)) & 0x1);
|
2021-02-23 19:27:20 -05:00
|
|
|
if(ch1 == 0 && (blend == 0x05 || blend == 0x0a || blend == 0x0f))
|
|
|
|
continue;
|
2021-02-21 19:52:51 -05:00
|
|
|
paintpixel(dst, x + h, y + v, ch1 ? blend % 4 : blend / 4);
|
2021-02-18 21:16:39 -05:00
|
|
|
}
|
2021-02-18 18:11:02 -05:00
|
|
|
}
|
2021-02-09 20:22:52 -05:00
|
|
|
|
2021-02-14 13:22:42 -05:00
|
|
|
#pragma mark - Helpers
|
2021-02-08 18:46:52 -05:00
|
|
|
|
|
|
|
void
|
|
|
|
clear(Uint32 *dst)
|
|
|
|
{
|
|
|
|
int v, h;
|
|
|
|
for(v = 0; v < HEIGHT; v++)
|
|
|
|
for(h = 0; h < WIDTH; h++)
|
|
|
|
dst[v * WIDTH + h] = theme[0];
|
|
|
|
}
|
|
|
|
|
2021-02-09 13:58:06 -05:00
|
|
|
void
|
2021-02-25 19:03:45 -05:00
|
|
|
drawpixel(Uint32 *dst, Uint16 x, Uint16 y, Uint8 color)
|
2021-02-09 13:58:06 -05:00
|
|
|
{
|
2021-03-22 23:04:04 -04:00
|
|
|
if(x >= screen.x1 && x <= screen.x2 && y >= screen.x1 && y <= screen.y2)
|
2021-02-14 20:00:17 -05:00
|
|
|
dst[y * WIDTH + x] = theme[color];
|
2021-02-14 13:22:42 -05:00
|
|
|
}
|
|
|
|
|
|
|
|
void
|
2021-02-25 19:03:45 -05:00
|
|
|
drawchr(Uint32 *dst, Uint16 x, Uint16 y, Uint8 *sprite, Uint8 alpha)
|
2021-02-14 13:22:42 -05:00
|
|
|
{
|
2021-02-25 19:03:45 -05:00
|
|
|
Uint8 v, h;
|
2021-02-14 13:22:42 -05:00
|
|
|
for(v = 0; v < 8; v++)
|
|
|
|
for(h = 0; h < 8; h++) {
|
2021-02-18 18:11:02 -05:00
|
|
|
Uint8 ch1 = ((sprite[v] >> h) & 0x1);
|
|
|
|
Uint8 ch2 = (((sprite[v + 8] >> h) & 0x1) << 1);
|
|
|
|
if(!alpha || (alpha && ch1 + ch2 != 0))
|
2021-02-25 19:03:45 -05:00
|
|
|
drawpixel(dst, x + 7 - h, y + v, ch1 + ch2);
|
2021-02-14 13:22:42 -05:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
2021-02-25 19:03:45 -05:00
|
|
|
drawicn(Uint32 *dst, Uint16 x, Uint16 y, Uint8 *sprite, Uint8 fg, Uint8 bg)
|
2021-02-14 13:22:42 -05:00
|
|
|
{
|
2021-02-25 19:03:45 -05:00
|
|
|
Uint8 v, h;
|
2021-02-14 13:22:42 -05:00
|
|
|
for(v = 0; v < 8; v++)
|
|
|
|
for(h = 0; h < 8; h++) {
|
2021-02-25 19:03:45 -05:00
|
|
|
Uint8 ch1 = (sprite[v] >> (7 - h)) & 0x1;
|
|
|
|
drawpixel(dst, x + h, y + v, ch1 ? fg : bg);
|
2021-02-14 13:22:42 -05:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
#pragma mark - Core
|
|
|
|
|
|
|
|
int
|
|
|
|
error(char *msg, const char *err)
|
|
|
|
{
|
|
|
|
printf("Error %s: %s\n", msg, err);
|
|
|
|
return 0;
|
2021-02-09 13:58:06 -05:00
|
|
|
}
|
|
|
|
|
2021-02-19 14:48:40 -05:00
|
|
|
void
|
|
|
|
loadtheme(Uint8 *addr)
|
|
|
|
{
|
|
|
|
Uint8 r, g, b;
|
|
|
|
r = *(addr + 0) >> 4 & 0xf, g = *(addr + 2) >> 4 & 0xf, b = *(addr + 4) >> 4 & 0xf;
|
|
|
|
theme[0] = ((r + (r << 4)) << 16) + ((g + (g << 4)) << 8) + (b + (b << 4));
|
|
|
|
r = *(addr + 0) & 0xf, g = *(addr + 2) & 0xf, b = *(addr + 4) & 0xf;
|
|
|
|
theme[1] = ((r + (r << 4)) << 16) + ((g + (g << 4)) << 8) + (b + (b << 4));
|
|
|
|
r = *(addr + 1) >> 4 & 0xf, g = *(addr + 3) >> 4 & 0xf, b = *(addr + 5) >> 4 & 0xf;
|
|
|
|
theme[2] = ((r + (r << 4)) << 16) + ((g + (g << 4)) << 8) + (b + (b << 4));
|
|
|
|
r = *(addr + 1) & 0xf, g = *(addr + 3) & 0xf, b = *(addr + 5) & 0xf;
|
|
|
|
theme[3] = ((r + (r << 4)) << 16) + ((g + (g << 4)) << 8) + (b + (b << 4));
|
2021-02-28 14:41:28 -05:00
|
|
|
screen.reqdraw = 1;
|
2021-02-19 14:48:40 -05:00
|
|
|
}
|
|
|
|
|
2021-02-08 18:46:52 -05:00
|
|
|
void
|
2021-02-15 13:12:44 -05:00
|
|
|
drawdebugger(Uint32 *dst, Uxn *u)
|
|
|
|
{
|
2021-02-25 19:03:45 -05:00
|
|
|
Uint8 i, x, y, b;
|
2021-02-18 18:11:02 -05:00
|
|
|
for(i = 0; i < 0x10; ++i) { /* memory */
|
2021-03-22 23:04:04 -04:00
|
|
|
x = ((i % 8) * 3 + 3) * 8, y = screen.x1 + 8 + i / 8 * 8, b = u->wst.dat[i];
|
|
|
|
drawicn(dst, x, y, font[(b >> 4) & 0xf], 1 + (u->wst.ptr == i), 0);
|
|
|
|
drawicn(dst, x + 8, y, font[b & 0xf], 1 + (u->wst.ptr == i), 0);
|
2021-02-15 13:12:44 -05:00
|
|
|
}
|
2021-03-04 12:07:33 -05:00
|
|
|
for(x = 0; x < 32; ++x) {
|
|
|
|
drawpixel(dst, x, HEIGHT / 2, 2);
|
|
|
|
drawpixel(dst, WIDTH - x, HEIGHT / 2, 2);
|
|
|
|
drawpixel(dst, WIDTH / 2, HEIGHT - x, 2);
|
|
|
|
drawpixel(dst, WIDTH / 2, x, 2);
|
|
|
|
drawpixel(dst, WIDTH / 2 - 16 + x, HEIGHT / 2, 2);
|
|
|
|
drawpixel(dst, WIDTH / 2, HEIGHT / 2 - 16 + x, 2);
|
|
|
|
}
|
2021-02-15 13:12:44 -05:00
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
redraw(Uint32 *dst, Uxn *u)
|
2021-02-08 18:46:52 -05:00
|
|
|
{
|
2021-02-27 14:39:12 -05:00
|
|
|
Uint16 x, y;
|
2021-02-18 18:11:02 -05:00
|
|
|
for(y = 0; y < VER; ++y)
|
|
|
|
for(x = 0; x < HOR; ++x) {
|
2021-02-27 14:39:12 -05:00
|
|
|
Uint16 key = (y * HOR + x) * 16;
|
2021-02-18 18:11:02 -05:00
|
|
|
drawchr(dst, (x + PAD) * 8, (y + PAD) * 8, &screen.bg[key], 0);
|
|
|
|
drawchr(dst, (x + PAD) * 8, (y + PAD) * 8, &screen.fg[key], 1);
|
|
|
|
}
|
2021-02-15 13:12:44 -05:00
|
|
|
if(GUIDES)
|
|
|
|
drawdebugger(dst, u);
|
2021-02-08 18:46:52 -05:00
|
|
|
SDL_UpdateTexture(gTexture, NULL, dst, WIDTH * sizeof(Uint32));
|
|
|
|
SDL_RenderClear(gRenderer);
|
|
|
|
SDL_RenderCopy(gRenderer, gTexture, NULL, NULL);
|
|
|
|
SDL_RenderPresent(gRenderer);
|
2021-02-18 21:16:39 -05:00
|
|
|
screen.reqdraw = 0;
|
2021-02-08 18:46:52 -05:00
|
|
|
}
|
|
|
|
|
|
|
|
void
|
|
|
|
quit(void)
|
|
|
|
{
|
|
|
|
free(pixels);
|
|
|
|
SDL_DestroyTexture(gTexture);
|
|
|
|
gTexture = NULL;
|
|
|
|
SDL_DestroyRenderer(gRenderer);
|
|
|
|
gRenderer = NULL;
|
|
|
|
SDL_DestroyWindow(gWindow);
|
|
|
|
gWindow = NULL;
|
|
|
|
SDL_Quit();
|
|
|
|
exit(0);
|
|
|
|
}
|
|
|
|
|
|
|
|
int
|
|
|
|
init(void)
|
|
|
|
{
|
|
|
|
if(SDL_Init(SDL_INIT_VIDEO) < 0)
|
|
|
|
return error("Init", SDL_GetError());
|
|
|
|
gWindow = SDL_CreateWindow("Uxn", SDL_WINDOWPOS_UNDEFINED, SDL_WINDOWPOS_UNDEFINED, WIDTH * ZOOM, HEIGHT * ZOOM, SDL_WINDOW_SHOWN);
|
|
|
|
if(gWindow == NULL)
|
|
|
|
return error("Window", SDL_GetError());
|
|
|
|
gRenderer = SDL_CreateRenderer(gWindow, -1, 0);
|
|
|
|
if(gRenderer == NULL)
|
|
|
|
return error("Renderer", SDL_GetError());
|
|
|
|
gTexture = SDL_CreateTexture(gRenderer, SDL_PIXELFORMAT_ARGB8888, SDL_TEXTUREACCESS_STATIC, WIDTH, HEIGHT);
|
|
|
|
if(gTexture == NULL)
|
|
|
|
return error("Texture", SDL_GetError());
|
|
|
|
if(!(pixels = (Uint32 *)malloc(WIDTH * HEIGHT * sizeof(Uint32))))
|
|
|
|
return error("Pixels", "Failed to allocate memory");
|
|
|
|
clear(pixels);
|
2021-03-16 12:01:47 -04:00
|
|
|
SDL_StartTextInput();
|
2021-02-18 18:11:02 -05:00
|
|
|
SDL_ShowCursor(SDL_DISABLE);
|
2021-03-22 23:04:04 -04:00
|
|
|
screen.x1 = PAD * 8;
|
|
|
|
screen.x2 = WIDTH - PAD * 8 - 1;
|
|
|
|
screen.y1 = PAD * 8;
|
|
|
|
screen.y2 = HEIGHT - PAD * 8 - 1;
|
2021-02-08 18:46:52 -05:00
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
void
|
2021-02-26 19:38:20 -05:00
|
|
|
domouse(Uxn *u, SDL_Event *event)
|
2021-02-08 18:46:52 -05:00
|
|
|
{
|
2021-02-24 14:11:19 -05:00
|
|
|
Uint8 flag = 0x00;
|
2021-02-26 22:46:56 -05:00
|
|
|
Uint16 addr = devmouse->addr;
|
2021-02-25 19:03:45 -05:00
|
|
|
Uint16 x = clamp(event->motion.x / ZOOM - PAD * 8, 0, HOR * 8 - 1);
|
|
|
|
Uint16 y = clamp(event->motion.y / ZOOM - PAD * 8, 0, VER * 8 - 1);
|
2021-02-26 19:38:20 -05:00
|
|
|
u->ram.dat[addr + 0] = (x >> 8) & 0xff;
|
|
|
|
u->ram.dat[addr + 1] = x & 0xff;
|
|
|
|
u->ram.dat[addr + 2] = (y >> 8) & 0xff;
|
|
|
|
u->ram.dat[addr + 3] = y & 0xff;
|
|
|
|
u->ram.dat[addr + 5] = 0x00;
|
2021-02-24 14:11:19 -05:00
|
|
|
switch(event->button.button) {
|
|
|
|
case SDL_BUTTON_LEFT: flag = 0x01; break;
|
|
|
|
case SDL_BUTTON_RIGHT: flag = 0x10; break;
|
|
|
|
}
|
2021-02-09 20:22:52 -05:00
|
|
|
switch(event->type) {
|
2021-02-20 17:07:20 -05:00
|
|
|
case SDL_MOUSEBUTTONUP:
|
2021-02-26 19:38:20 -05:00
|
|
|
setflag(&u->ram.dat[addr + 4], flag, 0);
|
2021-02-20 17:07:20 -05:00
|
|
|
break;
|
|
|
|
case SDL_MOUSEBUTTONDOWN:
|
2021-02-26 19:38:20 -05:00
|
|
|
setflag(&u->ram.dat[addr + 4], flag, 1);
|
|
|
|
if(flag == 0x10 && getflag(&u->ram.dat[addr + 4], 0x01))
|
2021-03-12 14:37:45 -05:00
|
|
|
u->ram.dat[addr + 5] = 0x01;
|
|
|
|
if(flag == 0x01 && getflag(&u->ram.dat[addr + 4], 0x10))
|
2021-02-26 19:38:20 -05:00
|
|
|
u->ram.dat[addr + 5] = 0x10;
|
2021-02-20 17:07:20 -05:00
|
|
|
break;
|
2021-02-09 20:22:52 -05:00
|
|
|
}
|
2021-02-08 18:46:52 -05:00
|
|
|
}
|
|
|
|
|
2021-02-24 19:40:42 -05:00
|
|
|
void
|
2021-02-26 22:46:56 -05:00
|
|
|
dotext(Uxn *u, SDL_Event *event)
|
2021-02-24 19:40:42 -05:00
|
|
|
{
|
|
|
|
int i;
|
2021-02-26 22:46:56 -05:00
|
|
|
Uint16 addr = devkey->addr;
|
2021-02-24 19:40:42 -05:00
|
|
|
if(SDL_GetModState() & KMOD_LCTRL || SDL_GetModState() & KMOD_RCTRL)
|
|
|
|
return;
|
|
|
|
for(i = 0; i < SDL_TEXTINPUTEVENT_TEXT_SIZE; ++i) {
|
|
|
|
char c = event->text.text[i];
|
|
|
|
if(c < ' ' || c > '~')
|
|
|
|
break;
|
2021-02-26 22:46:56 -05:00
|
|
|
u->ram.dat[addr] = c;
|
2021-02-24 19:40:42 -05:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2021-02-14 14:51:36 -05:00
|
|
|
void
|
2021-02-26 19:53:09 -05:00
|
|
|
doctrl(Uxn *u, SDL_Event *event, int z)
|
2021-02-14 14:51:36 -05:00
|
|
|
{
|
|
|
|
Uint8 flag = 0x00;
|
2021-02-26 22:46:56 -05:00
|
|
|
Uint16 addr = devctrl->addr;
|
2021-03-11 15:19:59 -05:00
|
|
|
if(z && event->key.keysym.sym == SDLK_h && SDL_GetModState() & KMOD_LCTRL) {
|
2021-02-18 21:34:26 -05:00
|
|
|
GUIDES = !GUIDES;
|
2021-03-11 15:19:59 -05:00
|
|
|
redraw(pixels, u);
|
|
|
|
}
|
2021-02-14 14:51:36 -05:00
|
|
|
switch(event->key.keysym.sym) {
|
2021-02-28 12:40:19 -05:00
|
|
|
case SDLK_LCTRL: flag = 0x01; break;
|
|
|
|
case SDLK_LALT: flag = 0x02; break;
|
2021-02-25 19:03:45 -05:00
|
|
|
case SDLK_BACKSPACE:
|
|
|
|
flag = 0x04;
|
2021-02-28 12:40:19 -05:00
|
|
|
if(z) u->ram.dat[devkey->addr] = 0x08;
|
2021-02-25 19:03:45 -05:00
|
|
|
break;
|
|
|
|
case SDLK_RETURN:
|
|
|
|
flag = 0x08;
|
2021-02-28 12:40:19 -05:00
|
|
|
if(z) u->ram.dat[devkey->addr] = 0x0d;
|
2021-02-25 19:03:45 -05:00
|
|
|
break;
|
2021-02-14 14:51:36 -05:00
|
|
|
case SDLK_UP: flag = 0x10; break;
|
|
|
|
case SDLK_DOWN: flag = 0x20; break;
|
|
|
|
case SDLK_LEFT: flag = 0x40; break;
|
|
|
|
case SDLK_RIGHT: flag = 0x80; break;
|
|
|
|
}
|
2021-02-26 19:53:09 -05:00
|
|
|
setflag(&u->ram.dat[addr], flag, z);
|
2021-02-09 00:59:46 -05:00
|
|
|
}
|
|
|
|
|
|
|
|
#pragma mark - Devices
|
|
|
|
|
2021-02-26 17:36:48 -05:00
|
|
|
Uint8
|
2021-03-22 17:22:06 -04:00
|
|
|
console_poke(Uxn *u, Uint16 ptr, Uint8 b0, Uint8 b1)
|
2021-02-26 17:36:48 -05:00
|
|
|
{
|
2021-03-22 17:22:06 -04:00
|
|
|
Uint8 *m = u->ram.dat;
|
2021-03-01 11:55:16 -05:00
|
|
|
switch(b0) {
|
|
|
|
case 0x08: printf("%c", b1); break;
|
2021-03-12 14:37:45 -05:00
|
|
|
case 0x09: printf("0x%02x\n", b1); break;
|
|
|
|
case 0x0b: printf("0x%04x\n", (m[ptr + 0x0a] << 8) + b1); break;
|
2021-03-01 11:55:16 -05:00
|
|
|
}
|
2021-02-26 17:36:48 -05:00
|
|
|
fflush(stdout);
|
2021-02-26 19:38:20 -05:00
|
|
|
(void)m;
|
|
|
|
(void)ptr;
|
|
|
|
(void)b0;
|
2021-02-26 17:36:48 -05:00
|
|
|
return b1;
|
|
|
|
}
|
|
|
|
|
|
|
|
Uint8
|
2021-03-22 17:22:06 -04:00
|
|
|
screen_poke(Uxn *u, Uint16 ptr, Uint8 b0, Uint8 b1)
|
2021-02-26 17:36:48 -05:00
|
|
|
{
|
2021-03-22 17:22:06 -04:00
|
|
|
Uint8 *m = u->ram.dat;
|
2021-02-26 19:38:20 -05:00
|
|
|
ptr += 8;
|
|
|
|
if(b0 == 0x0c) {
|
|
|
|
Uint16 x = (m[ptr] << 8) + m[ptr + 1];
|
|
|
|
Uint16 y = (m[ptr + 2] << 8) + m[ptr + 3];
|
2021-02-26 17:36:48 -05:00
|
|
|
paintpixel(b1 >> 4 & 0xf ? screen.fg : screen.bg, x, y, b1 & 0xf);
|
|
|
|
screen.reqdraw = 1;
|
|
|
|
}
|
|
|
|
return b1;
|
|
|
|
}
|
|
|
|
|
|
|
|
Uint8
|
2021-03-22 17:22:06 -04:00
|
|
|
sprite_poke(Uxn *u, Uint16 ptr, Uint8 b0, Uint8 b1)
|
2021-02-26 17:36:48 -05:00
|
|
|
{
|
2021-03-22 17:22:06 -04:00
|
|
|
Uint8 *m = u->ram.dat;
|
2021-02-26 19:38:20 -05:00
|
|
|
ptr += 8;
|
|
|
|
if(b0 == 0x0e) {
|
|
|
|
Uint16 x = (m[ptr] << 8) + m[ptr + 1];
|
|
|
|
Uint16 y = (m[ptr + 2] << 8) + m[ptr + 3];
|
|
|
|
Uint16 a = (m[ptr + 4] << 8) + m[ptr + 5];
|
|
|
|
Uint8 source = (b1 >> 4) & 0xf;
|
|
|
|
Uint8 *layer = source % 2 ? screen.fg : screen.bg;
|
2021-03-22 23:04:04 -04:00
|
|
|
painticn(layer, x, y, &m[a], b1 & 0xf);
|
2021-02-26 19:38:20 -05:00
|
|
|
screen.reqdraw = 1;
|
|
|
|
}
|
2021-02-26 17:36:48 -05:00
|
|
|
return b1;
|
|
|
|
}
|
|
|
|
|
2021-03-04 23:15:01 -05:00
|
|
|
Uint8
|
2021-03-22 17:22:06 -04:00
|
|
|
file_poke(Uxn *u, Uint16 ptr, Uint8 b0, Uint8 b1)
|
2021-03-04 23:15:01 -05:00
|
|
|
{
|
2021-03-22 17:22:06 -04:00
|
|
|
Uint8 *m = u->ram.dat;
|
2021-03-16 12:01:47 -04:00
|
|
|
char *name = (char *)&m[(m[ptr + 8] << 8) + m[ptr + 8 + 1]];
|
2021-03-05 13:06:09 -05:00
|
|
|
Uint16 length = (m[ptr + 8 + 2] << 8) + m[ptr + 8 + 3];
|
2021-03-23 15:40:03 -04:00
|
|
|
Uint16 offset = (m[ptr + 0] << 8) + m[ptr + 1];
|
2021-03-04 23:15:01 -05:00
|
|
|
if(b0 == 0x0d) {
|
2021-03-05 13:06:09 -05:00
|
|
|
Uint16 addr = (m[ptr + 8 + 4] << 8) + b1;
|
|
|
|
FILE *f = fopen(name, "r");
|
2021-03-23 15:40:03 -04:00
|
|
|
if(f && fseek(f, offset, SEEK_SET) != -1 && fread(&m[addr], length, 1, f)) {
|
2021-03-05 13:06:09 -05:00
|
|
|
fclose(f);
|
|
|
|
printf("Loaded %d bytes, at %04x from %s\n", length, addr, name);
|
|
|
|
}
|
|
|
|
} else if(b0 == 0x0f) {
|
|
|
|
Uint16 addr = (m[ptr + 8 + 6] << 8) + b1;
|
2021-03-23 15:40:03 -04:00
|
|
|
FILE *f = fopen(name, (m[ptr + 2] & 0x1) ? "a" : "w");
|
|
|
|
if(f && fseek(f, offset, SEEK_SET) != -1 && fwrite(&m[addr], length, 1, f)) {
|
2021-03-05 13:06:09 -05:00
|
|
|
fclose(f);
|
|
|
|
printf("Saved %d bytes, at %04x from %s\n", length, addr, name);
|
|
|
|
}
|
2021-03-04 23:15:01 -05:00
|
|
|
}
|
|
|
|
return b1;
|
|
|
|
}
|
|
|
|
|
2021-02-28 14:17:32 -05:00
|
|
|
Uint8
|
2021-03-22 17:22:06 -04:00
|
|
|
system_poke(Uxn *u, Uint16 ptr, Uint8 b0, Uint8 b1)
|
2021-02-28 14:17:32 -05:00
|
|
|
{
|
2021-03-22 17:22:06 -04:00
|
|
|
Uint8 *m = u->ram.dat;
|
2021-03-21 16:52:38 -04:00
|
|
|
loadtheme(&m[PAGE_DEVICE + 0x00f8]);
|
2021-03-01 12:38:54 -05:00
|
|
|
(void)ptr;
|
|
|
|
(void)b0;
|
2021-02-28 14:17:32 -05:00
|
|
|
return b1;
|
|
|
|
}
|
|
|
|
|
2021-02-26 17:36:48 -05:00
|
|
|
Uint8
|
2021-03-22 17:22:06 -04:00
|
|
|
ppnil(Uxn *u, Uint16 ptr, Uint8 b0, Uint8 b1)
|
2021-02-26 17:36:48 -05:00
|
|
|
{
|
2021-03-22 17:22:06 -04:00
|
|
|
(void)u;
|
2021-02-26 19:38:20 -05:00
|
|
|
(void)ptr;
|
|
|
|
(void)b0;
|
2021-02-26 17:36:48 -05:00
|
|
|
return b1;
|
|
|
|
}
|
|
|
|
|
2021-02-09 20:22:52 -05:00
|
|
|
#pragma mark - Generics
|
|
|
|
|
2021-02-08 17:18:01 -05:00
|
|
|
int
|
2021-02-08 18:46:52 -05:00
|
|
|
start(Uxn *u)
|
2021-02-08 17:18:01 -05:00
|
|
|
{
|
2021-02-08 18:46:52 -05:00
|
|
|
int ticknext = 0;
|
|
|
|
evaluxn(u, u->vreset);
|
2021-03-21 16:52:38 -04:00
|
|
|
loadtheme(u->ram.dat + PAGE_DEVICE + 0x00f8);
|
2021-02-18 21:16:39 -05:00
|
|
|
if(screen.reqdraw)
|
2021-02-16 18:34:55 -05:00
|
|
|
redraw(pixels, u);
|
2021-02-08 18:46:52 -05:00
|
|
|
while(1) {
|
|
|
|
int tick = SDL_GetTicks();
|
|
|
|
SDL_Event event;
|
|
|
|
if(tick < ticknext)
|
|
|
|
SDL_Delay(ticknext - tick);
|
|
|
|
ticknext = tick + (1000 / FPS);
|
|
|
|
while(SDL_PollEvent(&event) != 0) {
|
|
|
|
switch(event.type) {
|
|
|
|
case SDL_QUIT: quit(); break;
|
|
|
|
case SDL_MOUSEBUTTONUP:
|
|
|
|
case SDL_MOUSEBUTTONDOWN:
|
2021-02-26 19:38:20 -05:00
|
|
|
case SDL_MOUSEMOTION: domouse(u, &event); break;
|
2021-02-26 22:46:56 -05:00
|
|
|
case SDL_TEXTINPUT: dotext(u, &event); break;
|
2021-02-26 19:53:09 -05:00
|
|
|
case SDL_KEYDOWN: doctrl(u, &event, 1); break;
|
|
|
|
case SDL_KEYUP: doctrl(u, &event, 0); break;
|
2021-02-08 18:46:52 -05:00
|
|
|
case SDL_WINDOWEVENT:
|
|
|
|
if(event.window.event == SDL_WINDOWEVENT_EXPOSED)
|
2021-02-15 13:12:44 -05:00
|
|
|
redraw(pixels, u);
|
2021-02-08 18:46:52 -05:00
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
2021-02-14 14:51:36 -05:00
|
|
|
evaluxn(u, u->vframe);
|
2021-02-18 21:16:39 -05:00
|
|
|
if(screen.reqdraw)
|
2021-02-15 13:12:44 -05:00
|
|
|
redraw(pixels, u);
|
2021-02-08 18:46:52 -05:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
int
|
|
|
|
main(int argc, char **argv)
|
|
|
|
{
|
2021-02-09 13:58:06 -05:00
|
|
|
Uxn u;
|
|
|
|
|
2021-02-08 17:18:01 -05:00
|
|
|
if(argc < 2)
|
2021-02-08 18:46:52 -05:00
|
|
|
return error("Input", "Missing");
|
|
|
|
if(!bootuxn(&u))
|
|
|
|
return error("Boot", "Failed");
|
|
|
|
if(!loaduxn(&u, argv[1]))
|
|
|
|
return error("Load", "Failed");
|
|
|
|
if(!init())
|
|
|
|
return error("Init", "Failed");
|
|
|
|
|
2021-03-05 13:06:09 -05:00
|
|
|
portuxn(&u, "console", console_poke);
|
|
|
|
devscreen = portuxn(&u, "screen", screen_poke);
|
|
|
|
portuxn(&u, "sprite", sprite_poke);
|
|
|
|
devctrl = portuxn(&u, "controller", ppnil);
|
|
|
|
devkey = portuxn(&u, "key", ppnil);
|
|
|
|
devmouse = portuxn(&u, "mouse", ppnil);
|
|
|
|
portuxn(&u, "file", file_poke);
|
|
|
|
portuxn(&u, "empty", ppnil);
|
|
|
|
portuxn(&u, "empty", ppnil);
|
|
|
|
portuxn(&u, "empty", ppnil);
|
|
|
|
portuxn(&u, "empty", ppnil);
|
|
|
|
portuxn(&u, "empty", ppnil);
|
|
|
|
portuxn(&u, "empty", ppnil);
|
|
|
|
portuxn(&u, "empty", ppnil);
|
2021-03-23 14:44:36 -04:00
|
|
|
portuxn(&u, "empty", ppnil);
|
2021-03-05 13:06:09 -05:00
|
|
|
portuxn(&u, "system", system_poke);
|
2021-02-28 14:17:32 -05:00
|
|
|
|
|
|
|
/* Write screen size to dev/screen */
|
|
|
|
u.ram.dat[devscreen->addr + 0] = (HOR * 8 >> 8) & 0xff;
|
|
|
|
u.ram.dat[devscreen->addr + 1] = HOR * 8 & 0xff;
|
|
|
|
u.ram.dat[devscreen->addr + 2] = (VER * 8 >> 8) & 0xff;
|
|
|
|
u.ram.dat[devscreen->addr + 3] = VER * 8 & 0xff;
|
2021-02-09 00:59:46 -05:00
|
|
|
|
2021-02-08 18:46:52 -05:00
|
|
|
start(&u);
|
|
|
|
quit();
|
2021-02-08 17:18:01 -05:00
|
|
|
return 0;
|
|
|
|
}
|