mirror of
https://github.com/ZDoom/raze-gles.git
synced 2024-12-25 11:10:47 +00:00
8de955053c
git-svn-id: https://svn.eduke32.com/eduke32@8132 1a8010ca-5511-0410-912e-c29ae57300e0
164 lines
3.8 KiB
C
164 lines
3.8 KiB
C
/* Extended Module Player
|
||
* Copyright (C) 1996-2018 Claudio Matsuoka and Hipolito Carraro Jr
|
||
*
|
||
* Permission is hereby granted, free of charge, to any person obtaining a
|
||
* copy of this software and associated documentation files (the "Software"),
|
||
* to deal in the Software without restriction, including without limitation
|
||
* the rights to use, copy, modify, merge, publish, distribute, sublicense,
|
||
* and/or sell copies of the Software, and to permit persons to whom the
|
||
* Software is furnished to do so, subject to the following conditions:
|
||
*
|
||
* The above copyright notice and this permission notice shall be included in
|
||
* all copies or substantial portions of the Software.
|
||
*
|
||
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
||
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
||
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
||
* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
||
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
||
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
||
* THE SOFTWARE.
|
||
*/
|
||
|
||
#include <stdlib.h>
|
||
#include "lfo.h"
|
||
|
||
#define WAVEFORM_SIZE 64
|
||
|
||
static const int sine_wave[WAVEFORM_SIZE] = {
|
||
0, 24, 49, 74, 97, 120, 141, 161, 180, 197, 212, 224,
|
||
235, 244, 250, 253, 255, 253, 250, 244, 235, 224, 212, 197,
|
||
180, 161, 141, 120, 97, 74, 49, 24, 0, -24, -49, -74,
|
||
-97,-120,-141,-161,-180,-197,-212,-224,-235,-244,-250,-253,
|
||
-255,-253,-250,-244,-235,-224,-212,-197,-180,-161,-141,-120,
|
||
-97, -74, -49, -24
|
||
};
|
||
|
||
/* LFO */
|
||
|
||
static int get_lfo_mod(struct lfo *lfo)
|
||
{
|
||
int val;
|
||
|
||
if (lfo->rate == 0)
|
||
return 0;
|
||
|
||
switch (lfo->type) {
|
||
case 0: /* sine */
|
||
val = sine_wave[lfo->phase];
|
||
break;
|
||
case 1: /* ramp down */
|
||
val = 255 - (lfo->phase << 3);
|
||
break;
|
||
case 2: /* square */
|
||
val = lfo->phase < WAVEFORM_SIZE / 2 ? 255 : -255;
|
||
break;
|
||
case 3: /* random */
|
||
val = ((rand() & 0x1ff) - 256);
|
||
break;
|
||
#ifndef LIBXMP_CORE_PLAYER
|
||
case 669: /* 669 vibrato */
|
||
val = lfo->phase & 1;
|
||
break;
|
||
#endif
|
||
default:
|
||
return 0;
|
||
}
|
||
|
||
return val * lfo->depth;
|
||
}
|
||
|
||
static int get_lfo_st3(struct lfo *lfo)
|
||
{
|
||
if (lfo->rate == 0) {
|
||
return 0;
|
||
}
|
||
|
||
/* S3M square */
|
||
if (lfo->type == 2) {
|
||
int val = lfo->phase < WAVEFORM_SIZE / 2 ? 255 : 0;
|
||
return val * lfo->depth;
|
||
}
|
||
|
||
return get_lfo_mod(lfo);
|
||
}
|
||
|
||
/* From OpenMPT VibratoWaveforms.xm:
|
||
* "Generally the vibrato and tremolo tables are identical to those that
|
||
* ProTracker uses, but the vibrato’s “ramp down” table is upside down."
|
||
*/
|
||
static int get_lfo_ft2(struct lfo *lfo)
|
||
{
|
||
if (lfo->rate == 0)
|
||
return 0;
|
||
|
||
/* FT2 ramp */
|
||
if (lfo->type == 1) {
|
||
int phase = (lfo->phase + (WAVEFORM_SIZE >> 1)) % WAVEFORM_SIZE;
|
||
int val = (phase << 3) - 255;
|
||
return val * lfo->depth;
|
||
}
|
||
|
||
return get_lfo_mod(lfo);
|
||
}
|
||
|
||
#ifndef LIBXMP_CORE_DISABLE_IT
|
||
|
||
static int get_lfo_it(struct lfo *lfo)
|
||
{
|
||
if (lfo->rate == 0)
|
||
return 0;
|
||
|
||
return get_lfo_st3(lfo);
|
||
}
|
||
|
||
#endif
|
||
|
||
int libxmp_lfo_get(struct context_data *ctx, struct lfo *lfo, int is_vibrato)
|
||
{
|
||
struct module_data *m = &ctx->m;
|
||
|
||
switch (m->read_event_type) {
|
||
case READ_EVENT_ST3:
|
||
return get_lfo_st3(lfo);
|
||
case READ_EVENT_FT2:
|
||
if (is_vibrato) {
|
||
return get_lfo_ft2(lfo);
|
||
} else {
|
||
return get_lfo_mod(lfo);
|
||
}
|
||
#ifndef LIBXMP_CORE_DISABLE_IT
|
||
case READ_EVENT_IT:
|
||
return get_lfo_it(lfo);
|
||
#endif
|
||
default:
|
||
return get_lfo_mod(lfo);
|
||
}
|
||
}
|
||
|
||
|
||
void libxmp_lfo_update(struct lfo *lfo)
|
||
{
|
||
lfo->phase += lfo->rate;
|
||
lfo->phase %= WAVEFORM_SIZE;
|
||
}
|
||
|
||
void libxmp_lfo_set_phase(struct lfo *lfo, int phase)
|
||
{
|
||
lfo->phase = phase;
|
||
}
|
||
|
||
void libxmp_lfo_set_depth(struct lfo *lfo, int depth)
|
||
{
|
||
lfo->depth = depth;
|
||
}
|
||
|
||
void libxmp_lfo_set_rate(struct lfo *lfo, int rate)
|
||
{
|
||
lfo->rate = rate;
|
||
}
|
||
|
||
void libxmp_lfo_set_waveform(struct lfo *lfo, int type)
|
||
{
|
||
lfo->type = type;
|
||
}
|