1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
|
/*
Copyright (c) 2023 Bad Diode
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.
*/
// TODO: A list of features I would like to get to implement in the near future.
//
// UI tweaks.
// + Display played notes on all tonal channels when a trig or channel is not
// selected. If a channel is selected show active note in that channel, if
// a trig is selected behaved as usual. These could be highlighted in
// different colors to make it easier on the eyes. If a pattern is selected,
// show the notes it would play on that pattern?
// - Notification support for feedback when doing some operations
// (copying/pasting)
// - Animations for cursor movement/current step highlight. (A fade out maybe?)
// - Theming support, with a number of pre-configured themes and custom colors.
//
// Quality of life improvements.
// + Per channel sound adjustments that modify the sound in all trigs.
// + Basic support.
// + Allow pasting parameters if they have been copied.
// + Draw the global params in grey if they haven't been adjusted or aren't
// currently selected.
// + Draw missing cursor.
// + Per-octave note adjustment with Select + L/R on a trig.
// + Transpose channel with SEL + L/R on channel select.
// + Wrap around cursor left/right.
// + Add START+SELECT for quick saving.
// - Pattern chaining for more than 1 queue and/or song mode.
// - Undo/Redo.
// - Add a settings page to change some configuration parameters.
//
// Advanced
// - Sync via MIDI via arduinoboy or something similar.
// - Sync via CV by using the link cable.
//
// Bugfixes
// - Sound can get hung up sometimes, but I can't reproduce when this happens.
// Not sure if this is an emulator thing or happens also in hardware.
// - Cursor can stay in position instead of dissapering, again I can't
// reproduce this right now, just happened randomly. Needs investigation.
//
#include "gba/gba.h"
#include "filesystem.c"
#include "renderer_m0.c"
#include "sequencer.c"
#define PROF_ENABLE 0
#include "profiling.c"
void
render(void) {
PROF(draw_rect(0, 0, SCREEN_WIDTH - 1, SCREEN_HEIGHT - 1, 1), clear_cycles);
if (redraw_trigs) {
PROF(draw_triggers(), draw_trigs_cycles);
redraw_trigs = false;
}
if (redraw_channels) {
PROF(draw_channels(), draw_btn_cycles);
redraw_channels = false;
}
if (redraw_pattern_buttons) {
PROF(draw_pattern_buttons(), draw_btn_cycles);
redraw_pattern_buttons = false;
}
if (redraw_bank_buttons) {
PROF(draw_bank_buttons(), draw_btn_cycles);
redraw_bank_buttons = false;
}
if (redraw_bpm) {
PROF(draw_bpm(), draw_btn_cycles);
redraw_bpm = false;
}
if (redraw_play_pause) {
PROF(draw_play(), draw_btn_cycles);
PROF(draw_stop(), draw_btn_cycles);
redraw_play_pause = false;
}
if (redraw_piano_note) {
PROF(draw_piano_notes(), draw_piano_cycles);
redraw_piano_note = false;
}
if (redraw_params) {
PROF(draw_parameters(), draw_param_cycles);
redraw_params = false;
}
PROF(draw_cursors(), draw_cursor_cycles);
}
void
update(void) {
last_trig_loc = trig_selection_loc;
last_channel_loc = channel_selection_loc;
last_pattern_loc = pattern_selection_loc;
last_right_col_loc = right_col_selection_loc;
if (update_bpm) {
set_time(patterns[current_pattern].bpm);
update_bpm = false;
}
}
int
main(void) {
// Adjust system wait times.
SYSTEM_WAIT = SYSTEM_WAIT_CARTRIDGE;
// Initialize filesystem.
fs_init();
// Initialize renderer.
renderer_init();
// Register interrupts.
irq_init();
irs_set(IRQ_VBLANK, irs_stub);
// Initialize sequencer.
sequencer_init();
txt_spacing(6);
// Main loop.
while (true) {
poll_keys();
bios_vblank_wait();
PROF_SHOW();
FRAME_START();
PROF(flip_buffer(), flip_cycles);
PROF(update(), update_cycles);
PROF(handle_sequencer_input(), input_cycles);
PROF(render(), render_cycles);
FRAME_END();
}
return 0;
}
|
