ref: ef707958359b91d9cc34a29f4f5328a069a4c1ce
dir: /src/it/ptmeffect.c/
/* _______ ____ __ ___ ___ * \ _ \ \ / \ / \ \ / / ' ' ' * | | \ \ | | || | \/ | . . * | | | | | | || ||\ /| | * | | | | | | || || \/ | | ' ' ' * | | | | | | || || | | . . * | |_/ / \ \__// || | | * /_______/ynamic \____/niversal /__\ /____\usic /| . . ibliotheque * / \ * / . \ * ptmeffect.c - Code for converting PTM / / \ \ * effects to IT effects. | < / \_ * | \/ /\ / * By Christopher Snowhill. Based on xmeffect.c \_ / > / * by Julien Cugniere. | \ / / * | ' / * \__/ */ #include <stdlib.h> #include <string.h> #include "dumb.h" #include "internal/it.h" void _dumb_it_ptm_convert_effect(int effect, int value, IT_ENTRY *entry) { if (effect >= PTM_N_EFFECTS) return; /* Linearisation of the effect number... */ if (effect == PTM_E) { effect = PTM_EBASE + HIGH(value); value = LOW(value); } /* convert effect */ entry->mask |= IT_ENTRY_EFFECT; switch (effect) { case PTM_APPREGIO: effect = IT_ARPEGGIO; break; case PTM_PORTAMENTO_UP: effect = IT_PORTAMENTO_UP; break; case PTM_PORTAMENTO_DOWN: effect = IT_PORTAMENTO_DOWN; break; case PTM_TONE_PORTAMENTO: effect = IT_TONE_PORTAMENTO; break; case PTM_VIBRATO: effect = IT_VIBRATO; break; case PTM_VOLSLIDE_TONEPORTA: effect = IT_VOLSLIDE_TONEPORTA; break; case PTM_VOLSLIDE_VIBRATO: effect = IT_VOLSLIDE_VIBRATO; break; case PTM_TREMOLO: effect = IT_TREMOLO; break; case PTM_SAMPLE_OFFSET: effect = IT_SET_SAMPLE_OFFSET; break; case PTM_VOLUME_SLIDE: effect = IT_VOLUME_SLIDE; break; case PTM_POSITION_JUMP: effect = IT_JUMP_TO_ORDER; break; case PTM_SET_CHANNEL_VOLUME: effect = IT_SET_CHANNEL_VOLUME; break; case PTM_PATTERN_BREAK: effect = IT_BREAK_TO_ROW; break; case PTM_SET_GLOBAL_VOLUME: effect = IT_SET_GLOBAL_VOLUME; break; case PTM_RETRIGGER: effect = IT_RETRIGGER_NOTE; break; case PTM_FINE_VIBRATO: effect = IT_FINE_VIBRATO; break; /* TODO properly */ case PTM_NOTE_SLIDE_UP: effect = IT_PTM_NOTE_SLIDE_UP; break; case PTM_NOTE_SLIDE_DOWN: effect = IT_PTM_NOTE_SLIDE_DOWN; break; case PTM_NOTE_SLIDE_UP_RETRIG: effect = IT_PTM_NOTE_SLIDE_UP_RETRIG; break; case PTM_NOTE_SLIDE_DOWN_RETRIG: effect = IT_PTM_NOTE_SLIDE_DOWN_RETRIG; break; case PTM_SET_TEMPO_BPM: effect = (value < 0x20) ? (IT_SET_SPEED) : (IT_SET_SONG_TEMPO); break; case PTM_EBASE + PTM_E_SET_FINETUNE: effect = SBASE + IT_S_FINETUNE; break; /** TODO */ case PTM_EBASE + PTM_E_SET_LOOP: effect = SBASE + IT_S_PATTERN_LOOP; break; case PTM_EBASE + PTM_E_NOTE_CUT: effect = SBASE + IT_S_DELAYED_NOTE_CUT; break; case PTM_EBASE + PTM_E_NOTE_DELAY: effect = SBASE + IT_S_NOTE_DELAY; break; case PTM_EBASE + PTM_E_PATTERN_DELAY: effect = SBASE + IT_S_PATTERN_DELAY; break; case PTM_EBASE + PTM_E_SET_PANNING: effect = SBASE + IT_S_SET_PAN; break; case PTM_EBASE + PTM_E_FINE_VOLSLIDE_UP: effect = IT_VOLUME_SLIDE; value = EFFECT_VALUE(value, 0xF); break; case PTM_EBASE + PTM_E_FINE_VOLSLIDE_DOWN: effect = IT_VOLUME_SLIDE; value = EFFECT_VALUE(0xF, value); break; case PTM_EBASE + PTM_E_FINE_PORTA_UP: effect = IT_PORTAMENTO_UP; value = EFFECT_VALUE(0xF, value); break; case PTM_EBASE + PTM_E_FINE_PORTA_DOWN: effect = IT_PORTAMENTO_DOWN; value = EFFECT_VALUE(0xF, value); break; case PTM_EBASE + PTM_E_RETRIG_NOTE: effect = IT_XM_RETRIGGER_NOTE; value = EFFECT_VALUE(0, value); break; case PTM_EBASE + PTM_E_SET_VIBRATO_CONTROL: effect = SBASE + IT_S_SET_VIBRATO_WAVEFORM; value &= ~4; /** TODO: value&4 -> don't retrig wave */ break; case PTM_EBASE + PTM_E_SET_TREMOLO_CONTROL: effect = SBASE + IT_S_SET_TREMOLO_WAVEFORM; value &= ~4; /** TODO: value&4 -> don't retrig wave */ break; default: /* user effect (often used in demos for synchronisation) */ entry->mask &= ~IT_ENTRY_EFFECT; } /* Inverse linearisation... */ if (effect >= SBASE && effect < SBASE + 16) { value = EFFECT_VALUE(effect - SBASE, value); effect = IT_S; } entry->effect = effect; entry->effectvalue = value; }