Add mouse device support with SELECT toggle

1 files changed, 112 insertions, 65 deletions

diff --git a/src/main.c b/src/main.c
index c8a15af..8a694a8 100644
--- a/src/main.c
+++ b/src/main.c
@@ -1,9 +1,7 @@
 #include <string.h>
-#include <time.h>
 
 #include "common.h"
 #include "bitmap.h"
-// #include "small-font.c"
 #include "bd-font.c"
 
 #include "uxn/uxn.h"
@@ -24,10 +22,25 @@ THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 WITH REGARD TO THIS SOFTWARE.
 */
 
+typedef enum {
+    CONTROL_CONTROLLER,
+    CONTROL_MOUSE,
+} ControlMethod;
+
+static ControlMethod control_method = CONTROL_CONTROLLER;
+
+#define MOUSE_DELTA 1
+typedef struct Mouse {
+    int x;
+    int y;
+} Mouse;
+
 static Ppu ppu;
 static Device *devscreen;
 static Device *devctrl;
-time_t time_seconds;
+static Device *devmouse;
+
+static Mouse mouse = {SCREEN_WIDTH / 2, SCREEN_HEIGHT / 2};
 
 void
 nil_talk(Device *d, Uint8 b0, Uint8 w) {
@@ -82,17 +95,7 @@ screen_talk(Device *d, Uint8 b0, Uint8 w) {
 
 void
 datetime_talk(Device *d, Uint8 b0, Uint8 w) {
-        struct tm *t = localtime(&time_seconds);
-        t->tm_year += 1900;
-        mempoke16(d->dat, 0x0, t->tm_year);
-        d->dat[0x2] = t->tm_mon;
-        d->dat[0x3] = t->tm_mday;
-        d->dat[0x4] = t->tm_hour;
-        d->dat[0x5] = t->tm_min;
-        d->dat[0x6] = t->tm_sec;
-        d->dat[0x7] = t->tm_wday;
-        mempoke16(d->dat, 0x08, t->tm_yday);
-        d->dat[0xa] = t->tm_isdst;
+        (void)d;
         (void)b0;
         (void)w;
 }
@@ -102,9 +105,6 @@ init_uxn(Uxn *u) {
     // Initialize PPU.
     initppu(&ppu, 30, 20, 0);
 
-    // Init clock.
-    time_seconds = time(NULL);
-
     // Copy rom to VM.
     memcpy(u->ram.dat + PAGE_PROGRAM, uxn_rom, sizeof(uxn_rom));
 
@@ -118,7 +118,7 @@ init_uxn(Uxn *u) {
     portuxn(u, 0x6, "---", nil_talk);
     portuxn(u, 0x7, "---", nil_talk);
         devctrl = portuxn(u, 0x8, "controller", nil_talk);
-    portuxn(u, 0x9, "---", nil_talk);
+        devmouse = portuxn(u, 0x9, "mouse", nil_talk);
     portuxn(u, 0xa, "---", nil_talk);
         portuxn(u, 0xb, "datetime", datetime_talk);
     portuxn(u, 0xc, "---", nil_talk);
@@ -132,53 +132,102 @@ init_uxn(Uxn *u) {
 void
 handle_input(Uxn *u) {
     poll_keys();
-
-        // TODO: We don't need ifs if we use KEY_INPUTS directly and mayvbe just
-        // swap some things if needed.
-        Uint8 *flag = &devctrl->dat[2];
-        if (key_pressed(KEY_A) | key_hold(KEY_A)) {
-            *flag |= 0x01;
-        } else {
-            *flag &= ~0x01;
-    }
-        if (key_pressed(KEY_B) | key_hold(KEY_B)) {
-            *flag |= 0x02;
-        } else {
-            *flag &= ~0x02;
-    }
-        if (key_pressed(KEY_L) | key_hold(KEY_L)) {
-            *flag |= 0x04;
-        } else {
-            *flag &= ~0x04;
-    }
-        if (key_pressed(KEY_R) | key_hold(KEY_R)) {
-            *flag |= 0x08;
-        } else {
-            *flag &= ~0x08;
-    }
-        if (key_pressed(KEY_UP) | key_hold(KEY_UP)) {
-            *flag |= 0x10;
-        } else {
-            *flag &= ~0x10;
-    }
-        if (key_pressed(KEY_DOWN) | key_hold(KEY_DOWN)) {
-            *flag |= 0x20;
-        } else {
-            *flag &= ~0x20;
-    }
-        if (key_pressed(KEY_LEFT) | key_hold(KEY_LEFT)) {
-            *flag |= 0x40;
-        } else {
-            *flag &= ~0x40;
-    }
-        if (key_pressed(KEY_RIGHT) | key_hold(KEY_RIGHT)) {
-            *flag |= 0x80;
-        } else {
-            *flag &= ~0x80;
+        if (key_pressed(KEY_SELECT)) {
+            switch (control_method) {
+                case CONTROL_CONTROLLER: {
+                devctrl->dat[2] = 0;
+                evaluxn(u, mempeek16(devctrl->dat, 0));
+                devctrl->dat[3] = 0;
+                control_method = CONTROL_MOUSE;
+            } break;
+                default: {
+                    devmouse->dat[6] = 0;
+                    devmouse->dat[7] = 0;
+                mempoke16(devmouse->dat, 0x2, -10);
+                mempoke16(devmouse->dat, 0x4, -10);
+                evaluxn(u, mempeek16(devmouse->dat, 0));
+                control_method = CONTROL_CONTROLLER;
+            } break;
+            }
     }
 
-    evaluxn(u, mempeek16(devctrl->dat, 0));
-    devctrl->dat[3] = 0;
+    if (control_method == CONTROL_CONTROLLER) {
+        // TODO: We don't need ifs if we use KEY_INPUTS directly and mayvbe just
+        // swap some things if needed.
+        Uint8 *flag = &devctrl->dat[2];
+        if (key_pressed(KEY_A) | key_hold(KEY_A)) {
+            *flag |= 0x01;
+        } else {
+            *flag &= ~0x01;
+        }
+        if (key_pressed(KEY_B) | key_hold(KEY_B)) {
+            *flag |= 0x02;
+        } else {
+            *flag &= ~0x02;
+        }
+        if (key_pressed(KEY_L) | key_hold(KEY_L)) {
+            *flag |= 0x04;
+        } else {
+            *flag &= ~0x04;
+        }
+        if (key_pressed(KEY_R) | key_hold(KEY_R)) {
+            *flag |= 0x08;
+        } else {
+            *flag &= ~0x08;
+        }
+        if (key_pressed(KEY_UP) | key_hold(KEY_UP)) {
+            *flag |= 0x10;
+        } else {
+            *flag &= ~0x10;
+        }
+        if (key_pressed(KEY_DOWN) | key_hold(KEY_DOWN)) {
+            *flag |= 0x20;
+        } else {
+            *flag &= ~0x20;
+        }
+        if (key_pressed(KEY_LEFT) | key_hold(KEY_LEFT)) {
+            *flag |= 0x40;
+        } else {
+            *flag &= ~0x40;
+        }
+        if (key_pressed(KEY_RIGHT) | key_hold(KEY_RIGHT)) {
+            *flag |= 0x80;
+        } else {
+            *flag &= ~0x80;
+        }
+
+        evaluxn(u, mempeek16(devctrl->dat, 0));
+        devctrl->dat[3] = 0;
+    } else if (control_method == CONTROL_MOUSE) {
+        devmouse->dat[7] = 0x00;
+        if (key_pressed(KEY_B) | key_hold(KEY_B)) {
+            devmouse->dat[6] |= 0x01;
+            devmouse->dat[7] = 0x01;
+        } else {
+            devmouse->dat[6] &= ~0x01;
+        }
+        if (key_pressed(KEY_A) | key_hold(KEY_A)) {
+            devmouse->dat[6] |= 0x10;
+            devmouse->dat[7] = 0x10;
+        } else {
+            devmouse->dat[6] &= ~0x10;
+        }
+        if (key_pressed(KEY_UP) | key_hold(KEY_UP)) {
+            mouse.y = CLAMP(mouse.y - MOUSE_DELTA, 0, SCREEN_HEIGHT - 8);
+        }
+        if (key_pressed(KEY_DOWN) | key_hold(KEY_DOWN)) {
+            mouse.y = CLAMP(mouse.y + MOUSE_DELTA, 0, SCREEN_HEIGHT - 8);
+        }
+        if (key_pressed(KEY_LEFT) | key_hold(KEY_LEFT)) {
+            mouse.x = CLAMP(mouse.x - MOUSE_DELTA, 0, SCREEN_WIDTH - 8);
+        }
+        if (key_pressed(KEY_RIGHT) | key_hold(KEY_RIGHT)) {
+            mouse.x = CLAMP(mouse.x + MOUSE_DELTA, 0, SCREEN_WIDTH - 8);
+        }
+        mempoke16(devmouse->dat, 0x2, mouse.x);
+        mempoke16(devmouse->dat, 0x4, mouse.y);
+            evaluxn(u, mempeek16(devmouse->dat, 0));
+    }
 }
 
 static Uxn u;
@@ -208,13 +257,11 @@ int main(void) {
     // Main loop.
     int frame_counter = 0;
     evaluxn(&u, 0x0100);
-    // flipbuf(&ppu);
     while(true) {
         bios_vblank_wait();
         handle_input(&u);
         evaluxn(&u, mempeek16(devscreen->dat, 0));
         flipbuf(&ppu);
-        time_seconds++;
         frame_counter++;
     }