aboutsummaryrefslogtreecommitdiff
path: root/fmdsp/fmdsp-pacc.c
diff options
context:
space:
mode:
Diffstat (limited to 'fmdsp/fmdsp-pacc.c')
-rw-r--r--fmdsp/fmdsp-pacc.c178
1 files changed, 178 insertions, 0 deletions
diff --git a/fmdsp/fmdsp-pacc.c b/fmdsp/fmdsp-pacc.c
index 54a37ea..31b1e62 100644
--- a/fmdsp/fmdsp-pacc.c
+++ b/fmdsp/fmdsp-pacc.c
@@ -11,6 +11,7 @@
#include <string.h>
#include "fmdsp_platform_info.h"
+#include <stdio.h>
#include <math.h>
enum {
@@ -576,6 +577,139 @@ static void update_track_without_key(
x+BAR_X+BAR_W*(track->ticks>>2), y+BAR_Y, BAR_W, BAR_H);
}
+static void update_track_info_fm(struct fmdsp_pacc *fp, int ch,
+ const bool *slotmask, int x, int y) {
+ const struct opna_fm_channel *c = &fp->opna->fm.channel[ch];
+ for (int si = 0; si < 4; si++) {
+ if (slotmask && slotmask[si]) continue;
+ const struct opna_fm_slot *s = &c->slot[si];
+ int level = s->tl << 5; // (0 - 4064)
+ int envlevel = level + (s->env<<2);
+ int leveld = (4096 - level) / 64; // (0 - 63)
+ if (leveld < 0) leveld = 0;
+ int envleveld = (4096 - envlevel) / 64;
+ if (envleveld < 0) envleveld = 0;
+ fp->pacc.buf_rect(fp->pc, fp->buf_vertical_3,
+ x, y+2+si*6, 128, 4);
+ fp->pacc.buf_rect(fp->pc, fp->buf_vertical_2,
+ x, y+2+si*6, envleveld*2, 4);
+ if (leveld) {
+ fp->pacc.buf_rect(fp->pc, fp->buf_vertical_7,
+ x+(leveld-1)*2, y+2+si*6, 1, 4);
+ }
+ const char *envstr = "";
+ switch (s->env_state) {
+ case ENV_ATTACK:
+ envstr = "ATT";
+ break;
+ case ENV_DECAY:
+ envstr = "DEC";
+ break;
+ case ENV_SUSTAIN:
+ envstr = "SUS";
+ break;
+ case ENV_RELEASE:
+ envstr = "REL";
+ break;
+ }
+ fp->pacc.buf_printf(
+ fp->pc, fp->buf_font_1_d,
+ x+130, y+si*6, "%s", envstr);
+ fp->pacc.buf_printf(
+ fp->pc, fp->buf_font_1_d,
+ x+150, y+si*6, "%03X", s->env);
+ if (slotmask) {
+ fp->pacc.buf_printf(
+ fp->pc, fp->buf_font_1_d,
+ x+170, y+si*6, "%04X", (si != 3) ? fp->opna->fm.ch3.fnum[si] : c->fnum);
+ }
+ }
+ if (!slotmask) {
+ fp->pacc.buf_printf(
+ fp->pc, fp->buf_font_1_d,
+ x+170, y, "%04X", c->fnum);
+ }
+}
+
+static void update_track_info_ssg(struct fmdsp_pacc *fp, int ch, int x, int y) {
+ int envleveld = opna_ssg_channel_level(&fp->opna->ssg, ch);
+ fp->pacc.buf_rect(fp->pc, fp->buf_vertical_3,
+ x, y+2, 128, 4);
+ fp->pacc.buf_rect(fp->pc, fp->buf_vertical_2,
+ x+64, y+2, envleveld*2, 4);
+ fp->pacc.buf_rect(fp->pc, fp->buf_vertical_7,
+ x, y+2, 64, 4);
+ fp->pacc.buf_printf(
+ fp->pc, fp->buf_font_1_d,
+ x+170, y, " %03X", opna_ssg_tone_period(&fp->opna->ssg, ch));
+}
+
+static void update_track_info_adpcm(struct fmdsp_pacc *fp, int x, int y) {
+ fp->pacc.buf_printf(
+ fp->pc, fp->buf_font_1_d,
+ x, y, "VOL DELTA START PTR END");
+ fp->pacc.buf_printf(
+ fp->pc, fp->buf_font_1_d,
+ x, y+6, "%3d %04X %06X %06X %06X",
+ fp->opna->adpcm.vol,
+ fp->opna->adpcm.delta,
+ fp->opna->adpcm.start<<5,
+ fp->opna->adpcm.ramptr<<5,
+ (fp->opna->adpcm.end+1)<<5);
+}
+
+static void update_track_info_ppz8(struct fmdsp_pacc *fp, int ch, int x, int y) {
+ if (!fp->work->ppz8) return;
+ const struct ppz8_channel *c = &fp->work->ppz8->channel[ch];
+ fp->pacc.buf_printf(
+ fp->pc, fp->buf_font_1_d,
+ x, y, "PAN VOL FREQ PTR END LOOPS LOOPE");
+ char panstr[5];
+ if (c->pan) {
+ int pan = c->pan-5;
+ snprintf(panstr, sizeof(panstr), "%+d", pan);
+ char cc = ' ';
+ if (pan < 0) cc = 'L';
+ if (pan > 0) cc = 'R';
+ panstr[0] = cc;
+ } else {
+ snprintf(panstr, sizeof(panstr), "--");
+ }
+ fp->pacc.buf_printf(
+ fp->pc, fp->buf_font_1_d,
+ x, y+6, " %2s %03d %08X %08X %08X %08X %08X",
+ panstr,
+ c->vol, c->freq,
+ (unsigned)(c->ptr>>16), (unsigned)(c->endptr>>16),
+ (unsigned)(c->loopstartptr>>16), (unsigned)(c->loopendptr>>16));
+}
+
+static void update_track_info_13(struct fmdsp_pacc *fp, int x) {
+ const uint8_t *track_table = track_disp_table_13;
+ for (int it = 0; it < 13; it++) {
+ int t = track_table[it];
+ if (t == FMDRIVER_TRACK_NUM) break;
+ int tnum = track_type_table[t].num;
+ const struct fmdriver_track_status *track = &fp->work->track_status[t];
+ if (track->info == FMDRIVER_TRACK_INFO_PPZ8 ||
+ track->info == FMDRIVER_TRACK_INFO_PDZF) {
+ update_track_info_ppz8(fp, track->ppz8_ch - 1, x, TRACK_H_S*it);
+ } else {
+ switch (track_type_table[t].type) {
+ case FMDRIVER_TRACKTYPE_FM:
+ update_track_info_fm(fp, tnum - 1, tnum == 3 ? track->fmslotmask : 0, x, TRACK_H_S*it);
+ break;
+ case FMDRIVER_TRACKTYPE_SSG:
+ update_track_info_ssg(fp, tnum - 1, x, TRACK_H_S*it);
+ break;
+ case FMDRIVER_TRACKTYPE_ADPCM:
+ update_track_info_adpcm(fp, x, TRACK_H_S*it);
+ break;
+ }
+ }
+ }
+}
+
static void update_track_13(struct fmdsp_pacc *fp, int x) {
const uint8_t *track_table = track_disp_table_13;
for (int it = 0; it < 13; it++) {
@@ -605,6 +739,34 @@ static void update_track_13(struct fmdsp_pacc *fp, int x) {
}
}
+static void update_track_info_10(struct fmdsp_pacc *fp, const uint8_t *track_table, int x) {
+ for (int it = 0; it < 10; it++) {
+ int t = track_table[it];
+ if (t == FMDRIVER_TRACK_NUM) break;
+ int tnum = track_type_table[t].num;
+ const struct fmdriver_track_status *track = &fp->work->track_status[t];
+ if (track->info == FMDRIVER_TRACK_INFO_PPZ8 ||
+ track->info == FMDRIVER_TRACK_INFO_PDZF) {
+ update_track_info_ppz8(fp, track->ppz8_ch - 1, x, TRACK_H*it);
+ } else {
+ switch (track_type_table[t].type) {
+ case FMDRIVER_TRACKTYPE_FM:
+ update_track_info_fm(fp, tnum - 1, tnum == 3? track->fmslotmask : 0, x, TRACK_H*it);
+ break;
+ case FMDRIVER_TRACKTYPE_SSG:
+ update_track_info_ssg(fp, tnum - 1, x, TRACK_H*it);
+ break;
+ case FMDRIVER_TRACKTYPE_ADPCM:
+ update_track_info_adpcm(fp, x, TRACK_H*it);
+ break;
+ case FMDRIVER_TRACKTYPE_PPZ8:
+ update_track_info_ppz8(fp, tnum - 1, x, TRACK_H*it);
+ break;
+ }
+ }
+ }
+}
+
static void update_track_10(struct fmdsp_pacc *fp, const uint8_t *track_table, int x) {
for (int it = 0; it < 10; it++) {
int t = track_table[it];
@@ -1858,6 +2020,22 @@ void fmdsp_pacc_render(struct fmdsp_pacc *fp) {
update_default(fp);
break;
case FMDSP_RIGHT_MODE_TRACK_INFO:
+ switch (fp->lmode) {
+ case FMDSP_LEFT_MODE_OPNA:
+ update_track_info_10(fp, track_disp_table_opna, 320);
+ break;
+ case FMDSP_LEFT_MODE_OPN:
+ update_track_info_10(fp, track_disp_table_opn, 320);
+ break;
+ case FMDSP_LEFT_MODE_13:
+ update_track_info_13(fp, 320);
+ break;
+ case FMDSP_LEFT_MODE_PPZ8:
+ update_track_info_10(fp, track_disp_table_ppz8, 320);
+ break;
+ default:
+ break;
+ }
break;
case FMDSP_RIGHT_MODE_PPZ8:
update_track_10(fp, track_disp_table_ppz8, 320);