3 Ann Hell Ex Machina - Music Software
4 Copyright (C) 2003/2005 Angel Ortega <angel@triptico.com>
6 This program is free software; you can redistribute it and/or
7 modify it under the terms of the GNU General Public License
8 as published by the Free Software Foundation; either version 2
9 of the License, or (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
20 http://www.triptico.com
26 #ifndef SS_MAX_CHANNELS
27 #define SS_MAX_CHANNELS 16
30 #ifndef SS_MAX_GENERATORS
31 #define SS_MAX_GENERATORS 256
34 #ifndef SS_MAX_INSTRUMENTS
35 #define SS_MAX_INSTRUMENTS 256
38 /* STRUCTURES AND TYPES */
42 typedef double sample_t
;
48 double size
; /* size in frames */
49 int n_channels
; /* # of channels */
50 sample_t
** wave
; /* the PCM waves */
51 int s_rate
; /* original sample rate */
53 double loop_start
; /* start of loop (-1, no loop) */
54 double loop_end
; /* end of loop */
56 double base_freq
; /* base frequency */
57 double min_freq
; /* minimum frequency */
58 double max_freq
; /* maximum frequency */
65 int note_id
; /* note ID */
66 sample_t vol
; /* volume */
67 struct ss_wave
* w
; /* the wave data */
69 double cursor
; /* offset to next sample */
70 double inc
; /* increment (frequency) */
72 int sustain
; /* number of frames to play after release */
73 sample_t dvol
; /* volume decrement in sustain */
75 double vibrato
; /* vibrato oscillator */
76 double vib_depth
; /* vibrato depth */
77 double vib_inc
; /* increment for vibrato oscillator */
79 double portamento
; /* portamento sum to inc */
85 /* software syntesizer instruments */
89 int n_layers
; /* # of layers */
90 struct ss_wave
** layers
; /* layers */
92 struct ss_gen
* gens
; /* generator queue */
94 int n_channels
; /* number of channels */
95 sample_t
* vols
; /* volumes (1 per channel) */
96 struct ss_eff
** effs
; /* effect chains (1 per channel) */
98 double sustain
; /* sustain in msecs */
99 double vib_depth
; /* vibrato depth */
100 double vib_freq
; /* vibrato frequency */
103 /* digital effects */
107 sample_t
* wave
; /* wave buffer */
108 double size
; /* size of wave */
109 sample_t gain
; /* effect gain */
110 sample_t igain
; /* gain increment */
112 double lfo
; /* lfo value */
113 double lfo_depth
; /* lfo depth */
114 double lfo_inc
; /* lfo increment */
116 double cursor
; /* current buffer position */
118 sample_t (* func
)(struct ss_eff
*, sample_t
); /* processing function */
120 struct ss_eff
* next
; /* next in chain */
138 SONG_EV_SS_EFF_DELAY
,
141 SONG_EV_SS_EFF_ALLPASS
,
142 SONG_EV_SS_EFF_FLANGER
,
143 SONG_EV_SS_EFF_WOBBLE
,
144 SONG_EV_SS_EFF_SQWOBBLE
,
145 SONG_EV_SS_EFF_FADER
,
146 SONG_EV_SS_EFF_REVERB
,
149 SONG_EV_MIDI_CHANNEL
,
150 SONG_EV_MIDI_PROGRAM
,
153 SONG_EV_SS_PITCH_STRETCH
,
154 SONG_EV_SS_PRINT_WAVE_TEMPO
,
163 struct song_ev_generic
165 song_ev_type type
; /* event type */
166 double time
; /* event time (1: whole note) */
167 int trk_id
; /* track id */
172 song_ev_type type
; /* SONG_EV_NOTE */
175 int note
; /* MIDI-like note */
176 double len
; /* note length (1: whole note) */
177 sample_t vol
; /* note volume (1: full volume) */
182 song_ev_type type
; /* SONG_EV_TEMPO */
184 int trk_id
; /* always < 0 */
185 double tempo
; /* tempo in bpm */
190 song_ev_type type
; /* SONG_EV_METER */
192 int trk_id
; /* always < 0 */
193 int num
; /* meter numerator */
194 int den
; /* meter denominator */
197 struct song_ev_measure
199 song_ev_type type
; /* SONG_EV_MEASURE */
202 int line
; /* line number */
205 struct song_ev_ss_pitch_stretch
207 song_ev_type type
; /* SONG_EV_SS_PITCH_STRETCH */
210 int note
; /* MIDI-like note (to find the wave) */
211 double len
; /* note length (1: whole note) */
212 sample_t vol
; /* note volume (1: full volume) */
215 struct song_ev_ss_print_wave_tempo
217 song_ev_type type
; /* SONG_EV_SS_PRINT_WAVE_TEMPO */
220 int note
; /* MIDI-like note (to find the wave) */
221 double len
; /* note length (1: whole note) */
224 struct song_ev_ss_sustain
226 song_ev_type type
; /* SONG_EV_SS_SUSTAIN */
229 double sustain
; /* sustain time (in msecs) */
232 struct song_ev_ss_vibrato
234 song_ev_type type
; /* SONG_EV_SS_VIBRATO */
237 double vib_depth
; /* vibrato depth (in msecs) */
238 double vib_freq
; /* vibrato frequency (in Hzs) */
241 struct song_ev_ss_channel
243 song_ev_type type
; /* SONG_EV_SS_CHANNEL */
246 int channel
; /* channel */
247 sample_t vol
; /* volume */
250 struct song_ev_ss_wav
252 song_ev_type type
; /* SONG_EV_SS_WAV */
255 char * file
; /* path to .wav file */
256 int base
; /* MIDI-like base note */
257 int min
; /* MIDI-like minimum note */
258 int max
; /* MIDI-like maximum note */
259 double loop_start
; /* start of loop */
260 double loop_end
; /* end of loop */
263 struct song_ev_ss_pat
265 song_ev_type type
; /* SONG_EV_SS_PAT */
268 char * file
; /* path to .pat file */
271 struct song_ev_ss_eff
273 song_ev_type type
; /* effect type */
276 int channel
; /* channel */
277 double size
; /* size of effect */
278 sample_t gain
; /* gain */
279 double depth
; /* depth */
280 double freq
; /* freq */
281 double phase
; /* phase */
282 sample_t initial
; /* initial vol */
283 sample_t final
; /* final vol */
286 struct song_ev_midi_channel
288 song_ev_type type
; /* SONG_EV_MIDI_CHANNEL */
291 int channel
; /* midi channel (1-16) */
294 struct song_ev_midi_program
296 song_ev_type type
; /* SONG_EV_MIDI_PROGRAM */
299 int program
; /* midi program (0-127) */
304 struct song_ev_generic generic
;
306 struct song_ev_tempo tempo
;
307 struct song_ev_meter meter
;
308 struct song_ev_measure measure
;
310 struct song_ev_note note
;
312 struct song_ev_ss_pitch_stretch ss_pitch_stretch
;
313 struct song_ev_ss_print_wave_tempo ss_print_wave_tempo
;
315 struct song_ev_ss_sustain ss_sustain
;
316 struct song_ev_ss_vibrato ss_vibrato
;
317 struct song_ev_ss_channel ss_channel
;
319 struct song_ev_ss_wav ss_wav
;
320 struct song_ev_ss_pat ss_pat
;
322 struct song_ev_ss_eff ss_eff
;
324 struct song_ev_midi_channel midi_channel
;
325 struct song_ev_midi_program midi_program
;
333 extern int ss_frequency
;
334 extern int ss_interpolation
;
335 extern int ss_nchannels
;
339 extern sample_t ss_master_volume
;
340 extern int ss_output_clipped
;
341 extern sample_t ss_optimal_volume
;
345 extern union song_ev
* song
;
346 extern int n_song_ev
;
347 extern int solo_track
;
351 /* milliseconds to frames conversion */
352 #define MS2F(ms) ((ms / 1000.0) * ss_frequency)
359 double ss_note_frequency(int note
);
360 struct ss_wave
* ss_alloc_wave(int size
, int n_channels
, int s_rate
);
361 sample_t
ss_gesample_t(sample_t
* wave
, double size
, double offset
);
362 double ss_tempo_from_wave(struct ss_wave
* w
, int note
, double len
);
363 double ss_pitch_from_tempo(struct ss_wave
* w
, double tempo
, double len
);
367 struct ss_gen
* ss_gen_alloc(struct ss_gen
** q
);
368 void ss_gen_free(struct ss_gen
** q
, struct ss_gen
* g
);
369 void ss_gen_sustain(struct ss_gen
* g
, double sustain
);
370 void ss_gen_vibrato(struct ss_gen
* g
, double depth
, double freq
);
371 void ss_gen_play(struct ss_gen
* g
, double freq
, sample_t vol
, int note_id
,
373 void ss_gen_release(struct ss_gen
* g
);
374 int ss_gen_frame(struct ss_gen
* g
, int n_channels
, sample_t frame
[]);
378 void ss_ins_init(struct ss_ins
* i
);
379 void ss_ins_add_layer(struct ss_ins
* i
, struct ss_wave
* w
);
380 void ss_ins_copy_layers(struct ss_ins
* i
, struct ss_ins
* o
);
381 struct ss_wave
* ss_ins_find_layer(struct ss_ins
* i
, double freq
, int * off
);
382 void ss_ins_set_channel(struct ss_ins
* i
, int channel
, sample_t vol
);
383 void ss_ins_set_sustain(struct ss_ins
* i
, double sustain
);
384 void ss_ins_set_vibrato(struct ss_ins
* i
, double depth
, double freq
);
385 int ss_ins_play(struct ss_ins
* i
, double freq
, sample_t vol
, int note_id
,
387 int ss_ins_note_on(struct ss_ins
* i
, int note
, sample_t vol
, int note_id
);
388 void ss_ins_note_off(struct ss_ins
* i
, int note_id
);
389 void ss_ins_frame(struct ss_ins
* i
, sample_t frame
[]);
393 int ss_output_open(char * drvname
, char * filename
);
394 void ss_output_init_frame(sample_t frame
[]);
395 int ss_output_write(sample_t frame
[]);
396 void ss_output_close(void);
400 struct ss_wave
* ss_load_wave_file(char * file
,
401 double base_freq
, double min_freq
, double max_freq
,
402 double loop_start
, double loop_end
);
403 int ss_load_pat_file(struct ss_ins
* i
, char * file
);
407 void ss_eff_delay(struct ss_eff
** ec
, double size
);
408 void ss_eff_echo(struct ss_eff
** ec
, double size
, sample_t gain
);
409 void ss_eff_comb(struct ss_eff
** ec
, double size
, sample_t gain
);
410 void ss_eff_allpass(struct ss_eff
** ec
, double size
, sample_t gain
);
411 void ss_eff_flanger(struct ss_eff
** ec
, double size
, sample_t gain
,
412 double depth
, double freq
, double phase
);
413 void ss_eff_wobble(struct ss_eff
** ec
, double freq
, double phase
);
414 void ss_eff_square_wobble(struct ss_eff
** ec
, double freq
, double phase
);
415 void ss_eff_fader(struct ss_eff
** ec
, double size
, sample_t initial
, sample_t final
);
416 void ss_eff_reverb(struct ss_eff
** ec
);
418 sample_t
ss_eff_process(struct ss_eff
* e
, sample_t s
);
419 void ss_eff_off(struct ss_eff
** ec
);
423 void song_clear(void);
424 void add_song_ev(union song_ev
* ev
);
425 void song_sort(void);
426 int song_test_measure_boundary(double ev_time
, int num
, int den
, int line
);
430 int ss_song_render(int skip_secs
);
434 int midi_song_play(int skip_secs
);
435 int midi_device_open(char * devfile
);
436 void midi_device_close(void);
440 int compile_ahs_string(char * code
);
441 int compile_ahs(char * file
);
446 void add_to_library_path(char * path
, int strip
);
447 FILE * path_fopen(char * filename
, char * mode
);
448 char * locate_file(char * filename
);