control page progression with page_mask

HackerFoo · Dec 25, 2020 · d784a99 · d784a99
1 parent bc5bf37
commit d784a99
Show file tree

Hide file tree

Showing 2 changed files with 38 additions and 0 deletions.
diff --git a/midi_tasks.c b/midi_tasks.c
@@ -25,6 +25,7 @@
 #include "startle/types.h"
 #include "startle/macros.h"
 #include "startle/map.h"
+#include "startle/support.h"
 #include "midipush.h"
 #include "vec128b.h"
 #include "midi_tasks.h"
@@ -78,6 +79,13 @@ DTASK(beat, struct { unsigned int then, now; }) {
     (void)DREF(tick);
     (void)DREF(external_tick);
     DREF(beat)->now = MOD_INC(DREF(beat)->then, BEATS, 1);
+    if(!(DREF(beat)->now % BEATS_PER_PAGE)) { // next page
+      int last_page = DREF(beat)->then / BEATS_PER_PAGE;
+      int next_page = inc_mask(last_page, *DREF(page_mask)) % PAGES;
+      if(MOD_INC(last_page, PAGES, 1) != next_page) {
+        DREF(beat)->then = DREF(beat)->now = next_page * BEATS_PER_PAGE;
+      }
+    }
   }
   if(state->events & SHUTTLE) {
     DREF(beat)->now = MOD_OFFSET(DREF(beat)->then, BEATS, *DREF(shuttle) * BEATS_PER_PAGE / 4);
@@ -940,6 +948,23 @@ DTASK(save, bool) {
   return false;
 }
 
+DTASK_ENABLE(page_mask) {
+  COUNTUP(i, 6) {
+    send_msg(0xb0, 36 + i, !!(*DREF(page_mask) & (1 << i)));
+  }
+}
+
+DTASK(page_mask, unsigned int) {
+  const control_change_t *cc = DREF(control_change);
+  if(INRANGE(cc->control, 36, 41) && cc->value) {
+    int bit = 1 << (cc->control - 36);
+    *DREF(page_mask) ^= bit;
+    send_msg(0xb0, cc->control, !!(*DREF(page_mask) & bit));
+    return true;
+  }
+  return false;
+}
+
 // Local Variables:
 // eval: (add-to-list 'imenu-generic-expression '("Task" "^DTASK(\\([a-zA-Z0-9_]+\\),.*$" 1))
 // End:
diff --git a/startle/support.c b/startle/support.c
@@ -1464,3 +1464,16 @@ int count_char(const char *str, char c) {
 TEST(count_char) {
   return count_char("banana", 'a') == 3 ? 0 : -1;
 }
+
+unsigned int inc_mask(unsigned int x, unsigned int mask) {
+  unsigned int next = (x | mask) + 1;
+  return (x & mask) | (next & ~mask);
+}
+
+TEST(inc_mask) {
+  unsigned int mask = 0xf0f0, start = 0x50a0;
+  for(unsigned int i = start; i < 0x10000; i = inc_mask(i, mask)) {
+    printf("0x%x\n", i);
+  }
+  return 0;
+}