home *** CD-ROM | disk | FTP | other *** search
- /* $Id: d10wfg.mnu,v 1.6 89/05/06 17:13:19 lee Exp $
- * GLIB - a Generic LIBrarian and editor for synths
- *
- * D10 Tone Waveform Generator Librarian
- *
- * Code started 24 JAN 89 -- Michael R. Kesti mrk@gvgspd.GVG.TEK.COM
- * modified by Greg Lee
- * $Log: d10wfg.mnu,v $
- * Revision 1.6 89/05/06 17:13:19 lee
- * rel. to comp.sources.misc
- *
- */
-
- #include "glib.h"
- #include "vis.h"
-
- #define D10TONSIZE 246
- #define RESERVESIZE 20
-
- char *visnum(), *visonoff();
-
- /* This array contains arbitrary screen labels */
- struct labelinfo Ldwfg[] = {
-
- #MENU for wfg
-
-
-
- COMMON PITCH ENV 1 2 3 4
- ----------------- -------------------------------------
- Depth @ @ @ @
- Structures % % Vel Sens @ @ @ @
- Partial Ena % Time KF @ @ @ @
- Env Mode % Attack @ @ @ @
- Decay @ @ @ @
- WAVEFORM GEN 1 2 3 4 Recover @ @ @ @
- ------------------------------------- Release @ @ @ @
- Coarse Pitch % % % % Start Lev @ @ @ @
- Fine Pitch % % % % Attack Lev @ @ @ @
- Pitch KF % % % % Decay Lev @ @ @ @
- Bend Switch % % % % End Lev @ @ @ @
- Wave/PCMBank % % % % LFO Rate @ @ @ @
- PCM Number % % % % LFO Depth @ @ @ @
- Pulse Width % % % % Mod Sens @ @ @ @
- PW Vel Sens % % % %
-
-
-
- Press SPACE BAR to sound note @ at volume @ for duration @ on channel @ .
- #END wfg menu
-
- -1,-1,NULL
- };
-
- struct paraminfo Pdwfg[] = {
-
- /*NAME TYPE POS MAX OFFSET MASK SHIFT ADHOC
- */
-
- #O struct12 struct %% 12 10
- #O struct34 struct %% 12 11
- #O parmute pmute %% 15 12
- #O envmode envmode %% 1 13
-
- #O wg_coarse_pitch1 cpitch %% 96 14
- #O wg_coarse_pitch2 cpitch %% 96 72
- #O wg_coarse_pitch3 cpitch %% 96 130
- #O wg_coarse_pitch4 cpitch %% 96 188
- #O wg_fine_pitch1 finetune %% 100 15
- #O wg_fine_pitch2 finetune %% 100 73
- #O wg_fine_pitch3 finetune %% 100 131
- #O wg_fine_pitch4 finetune %% 100 189
- #O wg_pitch_kf1 pkeyfol %% 16 16
- #O wg_pitch_kf2 pkeyfol %% 16 74
- #O wg_pitch_kf3 pkeyfol %% 16 132
- #O wg_pitch_kf4 pkeyfol %% 16 190
- #O wg_bend_switch1 onoff %% 1 17
- #O wg_bend_switch2 onoff %% 1 75
- #O wg_bend_switch3 onoff %% 1 133
- #O wg_bend_switch4 onoff %% 1 191
- #O wg_wave_bank1 wavebank %% 3 18
- #O wg_wave_bank2 wavebank %% 3 76
- #O wg_wave_bank3 wavebank %% 3 134
- #O wg_wave_bank4 wavebank %% 3 192
- #O wg_pcm_number1 pcmnum %% 127 19
- #O wg_pcm_number2 pcmnum %% 127 77
- #O wg_pcm_number3 pcmnum %% 127 135
- #O wg_pcm_number4 pcmnum %% 127 193
- #O wg_pulse_width1 num %% 100 20
- #O wg_pulse_width2 num %% 100 78
- #O wg_pulse_width3 num %% 100 136
- #O wg_pulse_width4 num %% 100 194
- #O wg_pw_vel_sens1 velsens %% 14 21
- #O wg_pw_vel_sens2 velsens %% 14 79
- #O wg_pw_vel_sens3 velsens %% 14 137
- #O wg_pw_vel_sens4 velsens %% 14 195
-
- #O penv_depth1 num @@ 10 22
- #O penv_depth2 num @@ 10 80
- #O penv_depth3 num @@ 10 138
- #O penv_depth4 num @@ 10 196
- #O penv_vel_sens1 num @@ 3 23
- #O penv_vel_sens2 num @@ 3 81
- #O penv_vel_sens3 num @@ 3 139
- #O penv_vel_sens4 num @@ 3 197
- #O penv_time_kf1 num @@ 4 24
- #O penv_time_kf2 num @@ 4 82
- #O penv_time_kf3 num @@ 4 140
- #O penv_time_kf4 num @@ 4 198
- #O penv_attack1 num @@ 100 25
- #O penv_attack2 num @@ 100 83
- #O penv_attack3 num @@ 100 141
- #O penv_attack4 num @@ 100 199
- #O penv_decay1 num @@ 100 26
- #O penv_decay2 num @@ 100 83
- #O penv_decay3 num @@ 100 142
- #O penv_decay4 num @@ 100 200
- #O penv_recover1 num @@ 100 27
- #O penv_recover2 num @@ 100 85
- #O penv_recover3 num @@ 100 143
- #O penv_recover4 num @@ 100 201
- #O penv_release1 num @@ 100 28
- #O penv_release2 num @@ 100 86
- #O penv_release3 num @@ 100 144
- #O penv_release4 num @@ 100 202
- #O penv_start_lev1 envlev @@ 100 29
- #O penv_start_lev2 envlev @@ 100 87
- #O penv_start_lev3 envlev @@ 100 145
- #O penv_start_lev4 envlev @@ 100 203
- #O penv_attack_lev1 envlev @@ 100 30
- #O penv_attack_lev2 envlev @@ 100 88
- #O penv_attack_lev3 envlev @@ 100 146
- #O penv_attack_lev4 envlev @@ 100 206
- #O penv_decay_lev1 envlev @@ 100 31
- #O penv_decay_lev2 envlev @@ 100 89
- #O penv_decay_lev3 envlev @@ 100 147
- #O penv_decay_lev4 envlev @@ 100 205
-
- #O penv_end_lev1 envlev @@ 100 33
- #O penv_end_lev2 envlev @@ 100 91
- #O penv_end_lev3 envlev @@ 100 149
- #O penv_end_lev4 envlev @@ 100 207
- #O penv_lfo_rate1 num @@ 100 34
- #O penv_lfo_rate2 num @@ 100 92
- #O penv_lfo_rate3 num @@ 100 150
- #O penv_lfo_rate4 num @@ 100 208
- #O penv_lfo_depth1 num @@ 100 35
- #O penv_lfo_depth2 num @@ 100 93
- #O penv_lfo_depth3 num @@ 100 151
- #O penv_lfo_depth4 num @@ 100 209
- #O penv_mod_sens1 num @@ 100 36
- #O penv_mod_sens2 num @@ 100 94
- #O penv_mod_sens3 num @@ 100 152
- #O penv_mod_sens4 num @@ 100 210
-
-
- "autopitch", NULL, -1,-1, @@, visnum, 0, 127, 60, 0,
- "autovol", NULL, -1,-1, @@, visnum, 0, 127, 63, 0,
- "autodur", NULL, -1,-1, @@, visnum, 1, 20, 5, 0,
- "autochan", NULL, -1,-1, @@, visnum, 1, 16, 1, 0,
-
- NULL, NULL, -1,-1, -1, -1, visnum, 0, 0, 0, 0
- };
-
-
- /*
- * dwfgdin
- *
- * Take library bank 'data' and stuff values in the P array, by using
- * the setval function.
- */
-
- dwfgdin(data)
- char *data;
- {
- /* The first RESERVESIZE bytes are reserved (arbitrarily) for the voice name */
- #SETVAL
- }
-
- /*
- * dwfgdout
- *
- * Take (possibly changed) parameters values out of the P array and
- * put them back into the library bank 'data'.
- */
-
- dwfgdout(data)
- char *data;
- {
- #GETVAL
- }
-
- /* end */
-