268 lines
10 KiB
C++
268 lines
10 KiB
C++
/**
|
|
* Furnace Tracker - multi-system chiptune tracker
|
|
* Copyright (C) 2021-2023 tildearrow and contributors
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License along
|
|
* with this program; if not, write to the Free Software Foundation, Inc.,
|
|
* 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
*/
|
|
|
|
#include "gui.h"
|
|
#include "imgui.h"
|
|
#include "misc/cpp/imgui_stdlib.h"
|
|
#include "intConst.h"
|
|
#include "../ta-log.h"
|
|
|
|
void FurnaceGUI::drawSpeed(bool asChild) {
|
|
if (nextWindow==GUI_WINDOW_SPEED) {
|
|
speedOpen=true;
|
|
ImGui::SetNextWindowFocus();
|
|
nextWindow=GUI_WINDOW_NOTHING;
|
|
}
|
|
if (!speedOpen && !asChild) return;
|
|
bool began=asChild?ImGui::BeginChild("Speed"):ImGui::Begin("Speed",&speedOpen,globalWinFlags);
|
|
if (began) {
|
|
if (ImGui::BeginTable("Props",2,ImGuiTableFlags_SizingStretchProp)) {
|
|
ImGui::TableSetupColumn("c0",ImGuiTableColumnFlags_WidthFixed,0.0);
|
|
ImGui::TableSetupColumn("c1",ImGuiTableColumnFlags_WidthStretch,0.0);
|
|
|
|
ImGui::TableNextRow();
|
|
ImGui::TableNextColumn();
|
|
if (ImGui::SmallButton(tempoView?"Base Tempo##TempoOrHz":"Tick Rate##TempoOrHz")) {
|
|
tempoView=!tempoView;
|
|
}
|
|
if (ImGui::IsItemHovered()) {
|
|
if (tempoView) {
|
|
ImGui::SetTooltip("click to display tick rate");
|
|
} else {
|
|
ImGui::SetTooltip("click to display base tempo");
|
|
}
|
|
}
|
|
ImGui::TableNextColumn();
|
|
float avail=ImGui::GetContentRegionAvail().x;
|
|
float halfAvail=(avail-ImGui::GetStyle().ItemSpacing.x)*0.5;
|
|
ImGui::SetNextItemWidth(halfAvail);
|
|
float setHz=tempoView?e->curSubSong->hz*2.5:e->curSubSong->hz;
|
|
if (ImGui::InputFloat("##Rate",&setHz,1.0f,1.0f,"%g")) { MARK_MODIFIED
|
|
if (tempoView) setHz/=2.5;
|
|
if (setHz<1) setHz=1;
|
|
if (setHz>999) setHz=999;
|
|
e->setSongRate(setHz,setHz<52);
|
|
}
|
|
if (tempoView) {
|
|
ImGui::SameLine();
|
|
ImGui::Text("= %gHz",e->curSubSong->hz);
|
|
} else {
|
|
if (e->curSubSong->hz>=49.98 && e->curSubSong->hz<=50.02) {
|
|
ImGui::SameLine();
|
|
ImGui::Text("PAL");
|
|
}
|
|
if (e->curSubSong->hz>=59.9 && e->curSubSong->hz<=60.11) {
|
|
ImGui::SameLine();
|
|
ImGui::Text("NTSC");
|
|
}
|
|
}
|
|
|
|
if (dejarteArriba) {
|
|
ImGui::TextWrapped("UNREGISTERED\nRegister to unlock all Speed settings.");
|
|
} else {
|
|
ImGui::TableNextRow();
|
|
ImGui::TableNextColumn();
|
|
if (keepGrooveAlive || e->curSubSong->speeds.len>2) {
|
|
if (ImGui::SmallButton("Groove")) {
|
|
e->lockEngine([this]() {
|
|
e->curSubSong->speeds.len=1;
|
|
});
|
|
if (e->isPlaying()) play();
|
|
}
|
|
if (ImGui::IsItemHovered()) {
|
|
ImGui::SetTooltip("click for one speed");
|
|
}
|
|
} else if (e->curSubSong->speeds.len>1) {
|
|
if (ImGui::SmallButton("Speeds")) {
|
|
e->lockEngine([this]() {
|
|
e->curSubSong->speeds.len=4;
|
|
e->curSubSong->speeds.val[2]=e->curSubSong->speeds.val[0];
|
|
e->curSubSong->speeds.val[3]=e->curSubSong->speeds.val[1];
|
|
});
|
|
if (e->isPlaying()) play();
|
|
}
|
|
if (ImGui::IsItemHovered()) {
|
|
ImGui::SetTooltip("click for groove pattern");
|
|
}
|
|
} else {
|
|
if (ImGui::SmallButton("Speed")) {
|
|
e->lockEngine([this]() {
|
|
e->curSubSong->speeds.len=2;
|
|
e->curSubSong->speeds.val[1]=e->curSubSong->speeds.val[0];
|
|
});
|
|
if (e->isPlaying()) play();
|
|
}
|
|
if (ImGui::IsItemHovered()) {
|
|
ImGui::SetTooltip("click for two (alternating) speeds");
|
|
}
|
|
}
|
|
ImGui::TableNextColumn();
|
|
if (keepGrooveAlive || e->curSubSong->speeds.len>2) {
|
|
int intVersion[256];
|
|
unsigned char intVersionLen=e->curSubSong->speeds.len;
|
|
unsigned char ignoredLoop=0;
|
|
unsigned char ignoredRel=0;
|
|
memset(intVersion,0,sizeof(int));
|
|
for (int i=0; i<16; i++) {
|
|
intVersion[i]=e->curSubSong->speeds.val[i];
|
|
}
|
|
if (intVersionLen>16) intVersionLen=16;
|
|
|
|
keepGrooveAlive=false;
|
|
|
|
ImGui::SetNextItemWidth(avail);
|
|
if (ImGui::InputText("##SpeedG",&grooveString)) {
|
|
decodeMMLStr(grooveString,intVersion,intVersionLen,ignoredLoop,1,255,ignoredRel);
|
|
if (intVersionLen<1) {
|
|
intVersionLen=1;
|
|
intVersion[0]=6;
|
|
}
|
|
if (intVersionLen>16) intVersionLen=16;
|
|
e->lockEngine([this,intVersion,intVersionLen]() {
|
|
e->curSubSong->speeds.len=intVersionLen;
|
|
for (int i=0; i<16; i++) {
|
|
e->curSubSong->speeds.val[i]=intVersion[i];
|
|
}
|
|
});
|
|
if (e->isPlaying()) play();
|
|
MARK_MODIFIED;
|
|
}
|
|
if (!ImGui::IsItemActive()) {
|
|
encodeMMLStr(grooveString,intVersion,intVersionLen,-1,-1,false);
|
|
} else {
|
|
keepGrooveAlive=true;
|
|
}
|
|
} else {
|
|
ImGui::SetNextItemWidth(halfAvail);
|
|
if (ImGui::InputScalar("##Speed1",ImGuiDataType_U8,&e->curSubSong->speeds.val[0],&_ONE,&_THREE)) { MARK_MODIFIED
|
|
if (e->curSubSong->speeds.val[0]<1) e->curSubSong->speeds.val[0]=1;
|
|
if (e->isPlaying()) play();
|
|
}
|
|
if (e->curSubSong->speeds.len>1) {
|
|
ImGui::SameLine();
|
|
ImGui::SetNextItemWidth(halfAvail);
|
|
if (ImGui::InputScalar("##Speed2",ImGuiDataType_U8,&e->curSubSong->speeds.val[1],&_ONE,&_THREE)) { MARK_MODIFIED
|
|
if (e->curSubSong->speeds.val[1]<1) e->curSubSong->speeds.val[1]=1;
|
|
if (e->isPlaying()) play();
|
|
}
|
|
}
|
|
}
|
|
|
|
if (!basicMode) {
|
|
ImGui::TableNextRow();
|
|
ImGui::TableNextColumn();
|
|
ImGui::Text("Virtual Tempo");
|
|
ImGui::TableNextColumn();
|
|
ImGui::SetNextItemWidth(halfAvail);
|
|
if (ImGui::InputScalar("##VTempoN",ImGuiDataType_S16,&e->curSubSong->virtualTempoN,&_ONE,&_THREE)) { MARK_MODIFIED
|
|
if (e->curSubSong->virtualTempoN<1) e->curSubSong->virtualTempoN=1;
|
|
if (e->curSubSong->virtualTempoN>255) e->curSubSong->virtualTempoN=255;
|
|
}
|
|
if (ImGui::IsItemHovered()) {
|
|
ImGui::SetTooltip("Numerator");
|
|
}
|
|
ImGui::SameLine();
|
|
ImGui::SetNextItemWidth(halfAvail);
|
|
if (ImGui::InputScalar("##VTempoD",ImGuiDataType_S16,&e->curSubSong->virtualTempoD,&_ONE,&_THREE)) { MARK_MODIFIED
|
|
if (e->curSubSong->virtualTempoD<1) e->curSubSong->virtualTempoD=1;
|
|
if (e->curSubSong->virtualTempoD>255) e->curSubSong->virtualTempoD=255;
|
|
}
|
|
if (ImGui::IsItemHovered()) {
|
|
ImGui::SetTooltip("Denominator (set to base tempo)");
|
|
}
|
|
|
|
ImGui::TableNextRow();
|
|
ImGui::TableNextColumn();
|
|
ImGui::Text("Divider");
|
|
ImGui::TableNextColumn();
|
|
ImGui::SetNextItemWidth(halfAvail);
|
|
unsigned char realTB=e->curSubSong->timeBase+1;
|
|
if (ImGui::InputScalar("##TimeBase",ImGuiDataType_U8,&realTB,&_ONE,&_THREE)) { MARK_MODIFIED
|
|
if (realTB<1) realTB=1;
|
|
if (realTB>16) realTB=16;
|
|
e->curSubSong->timeBase=realTB-1;
|
|
}
|
|
ImGui::SameLine();
|
|
ImGui::Text("%.2f BPM",calcBPM(e->curSubSong->speeds,e->curSubSong->hz,e->curSubSong->virtualTempoN,e->curSubSong->virtualTempoD));
|
|
}
|
|
|
|
ImGui::TableNextRow();
|
|
ImGui::TableNextColumn();
|
|
ImGui::Text("Highlight");
|
|
ImGui::TableNextColumn();
|
|
ImGui::SetNextItemWidth(halfAvail);
|
|
if (ImGui::InputScalar("##Highlight1",ImGuiDataType_U8,&e->curSubSong->hilightA,&_ONE,&_THREE)) {
|
|
MARK_MODIFIED;
|
|
}
|
|
ImGui::SameLine();
|
|
ImGui::SetNextItemWidth(halfAvail);
|
|
if (ImGui::InputScalar("##Highlight2",ImGuiDataType_U8,&e->curSubSong->hilightB,&_ONE,&_THREE)) {
|
|
MARK_MODIFIED;
|
|
}
|
|
}
|
|
ImGui::EndTable();
|
|
}
|
|
|
|
ImGui::Separator();
|
|
|
|
if (ImGui::BeginTable("Props2",3,ImGuiTableFlags_SizingStretchProp)) {
|
|
ImGui::TableSetupColumn("c0",ImGuiTableColumnFlags_WidthFixed,0.0);
|
|
ImGui::TableSetupColumn("c1",ImGuiTableColumnFlags_WidthStretch,0.0);
|
|
ImGui::TableSetupColumn("c2",ImGuiTableColumnFlags_WidthStretch,0.0);
|
|
ImGui::TableNextRow();
|
|
ImGui::TableNextColumn();
|
|
ImGui::Text("Pattern Length");
|
|
ImGui::TableNextColumn();
|
|
float avail=ImGui::GetContentRegionAvail().x;
|
|
ImGui::SetNextItemWidth(avail);
|
|
int patLen=e->curSubSong->patLen;
|
|
if (ImGui::InputInt("##PatLength",&patLen,1,3)) { MARK_MODIFIED
|
|
if (patLen<1) patLen=1;
|
|
if (patLen>DIV_MAX_PATTERNS) patLen=DIV_MAX_PATTERNS;
|
|
e->curSubSong->patLen=patLen;
|
|
}
|
|
|
|
if (!basicMode) {
|
|
ImGui::TableNextRow();
|
|
ImGui::TableNextColumn();
|
|
ImGui::Text("Song Length");
|
|
ImGui::TableNextColumn();
|
|
ImGui::SetNextItemWidth(avail);
|
|
int ordLen=e->curSubSong->ordersLen;
|
|
if (ImGui::InputInt("##OrdLength",&ordLen,1,3)) { MARK_MODIFIED
|
|
if (ordLen<1) ordLen=1;
|
|
if (ordLen>DIV_MAX_PATTERNS) ordLen=DIV_MAX_PATTERNS;
|
|
e->curSubSong->ordersLen=ordLen;
|
|
if (curOrder>=ordLen) {
|
|
setOrder(ordLen-1);
|
|
}
|
|
}
|
|
}
|
|
|
|
ImGui::EndTable();
|
|
}
|
|
}
|
|
if (!asChild && ImGui::IsWindowFocused(ImGuiFocusedFlags_ChildWindows)) curWindow=GUI_WINDOW_SPEED;
|
|
if (asChild) {
|
|
ImGui::EndChild();
|
|
} else {
|
|
ImGui::End();
|
|
}
|
|
}
|