curioustorvald/tsvm
1
0
Fork 0
mirror of https://github.com/curioustorvald/tsvm.git synced 2026-06-15 08:54:05 +09:00
Code Issues Packages Projects Releases Wiki Activity

taut: IT note fade

Browse Source
This commit is contained in:
minjaesong
2026-06-14 19:35:07 +09:00
parent 62fe227b6b
commit af8dd6aea8
5 changed files with 39 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
tsvm_core/src/net/torvald/tsvm/AudioJSR223Delegate.kt
View File

@@ -24,7 +24,8 @@ import net.torvald.tsvm.peripheral.MP2Env
*
* Note values: 0x4000 = C3 (sample's native pitch), 4096 steps per octave.
* Empty row: note = 0x0000 (no trigger). Note sentinels (0x0000..0x001F): 0x0000 = no-op,
* 0x0001 = key-off, 0x0002 = note cut, 0x0010..0x001F = Int0..IntF (reserved interrupts).
* 0x0001 = key-off, 0x0002 = note cut, 0x0003 = note fade (IT-style, by instrument fadeout),
* 0x0004 = fast fade, 0x0010..0x001F = Int0..IntF (reserved interrupts).
* Valid playable notes are 0x0020..0xFFFF. All 256 instrument slots (0-255) are valid.
*
* ## How to upload PCM audio into a playhead

22
tsvm_core/src/net/torvald/tsvm/peripheral/AudioAdapter.kt
View File

@@ -2959,8 +2959,25 @@ class AudioAdapter(val vm: VM) : PeriBase(VM.PERITYPE_SOUND) {
startFastFade(voice, playhead)
}
}
// 0x0003 (IT-style slow note fade, "~~~~") not yet implemented; 0x0005..0x000F reserved.
in 0x0003..0x000F -> { /* reserved sentinel range, no engine handler */ }
// IT-style note fade ("~~~~"): set the Note-Fade flag (Schism CHN_NOTEFADE,
// effects.c:1505-1509) — the voice's own fadeout step (activeFadeoutStep, the
// instrument's volume fadeout) drives fadeoutVolume to 0 in the line ~3676 fade
// path, while the sustain loop and volume envelope keep running. Unlike KEY_OFF
// (0x0001) it does NOT release sustain (no applyKeyLift); unlike the fast fade
// (0x0004) it does NOT override the fadeout rate. If the instrument's fadeout is
// 0 the note rings on — matches IT, where CHN_NOTEFADE with a zero fadeout
// subtracts nothing. Honours a sub-row S$Dx delay like KEY_OFF / note-cut do.
0x0003 -> {
val dTick = if ((row.effect == EffectOp.OP_S) && ((row.effectArg ushr 12) and 0xF) == 0xD)
(row.effectArg ushr 8) and 0xF else 0
if (dTick > 0) {
voice.noteDelayTick = dTick; voice.delayedNote = 0x0003
voice.delayedInst = 0; voice.delayedVol = -1
} else {
voice.noteFading = true
}
}
in 0x0005..0x000F -> { /* reserved sentinel range, no engine handler */ }
in 0x0010..0x001F -> { /* Int0..IntF: reserved interrupt slots, no engine handler yet */ }
else -> {
if (toneG && voice.active) {
@@ -3451,6 +3468,7 @@ class AudioAdapter(val vm: VM) : PeriBase(VM.PERITYPE_SOUND) {
applyKeyLift(voice, instruments[voice.instrumentId])
}
0x0002 -> { voice.active = false; cutLayerChildren(ts, vi) } // delayed note cut
0x0003 -> voice.noteFading = true // delayed note fade (IT CHN_NOTEFADE)
0x0004 -> startFastFade(voice, playhead) // delayed fast fade
else -> {
applyDuplicateCheck(ts, vi, voice.delayedInst, voice.delayedNote)