1 #define CONSTANT_SPEED_DECAY
4 float bgmscriptbufsize;
5 float bgmscriptbufloaded;
9 .float bgmscriptvolume;
11 .float bgmscriptstate;
12 .float bgmscriptstatetime;
14 float GetAttackDecaySustainAmplitude(float a, float d, float s, float t)
17 // attack: from 0 to 1, in time a for a full length
18 // decay: from 1 to s, in time d
30 return ((t - a) / d) * (s - 1) + 1;
35 float GetReleaseAmplitude(float d, float s, float r, float t)
37 float decayval, releaseval;
45 releaseval = s * (1 - t / r);
53 // value is s at time 0
55 decayval = ((t + d) / d) * (s - 1) + 1;
56 return max(decayval, releaseval);
62 float GetAttackTime(float a, float amp)
67 float GetReleaseTime(float d, float s, float r, float amp)
69 float decaytime, releasetime;
74 // if amp > s, we may be in the attack or in the prolonged decay curve
75 releasetime = (1 - amp / s) * r;
79 if(s == 1) // gracefully handle division by zero here
83 // value is s at time 0
85 decaytime = (amp - 1) / (s - 1) * d - d;
86 return max(decaytime, releasetime);
96 bgmscriptbuf = bgmscriptbufsize = 0;
97 bgmscriptbufloaded = 1;
98 s = strcat("maps/", mi_shortname, ".bgs");
99 fh = fopen(s, FILE_READ);
102 bgmscriptbuf = buf_create();
103 while((s = fgets(fh)))
105 bufstr_set(bgmscriptbuf, bgmscriptbufsize, s);
111 void BGMScript_InitEntity(entity e)
115 if(e.bgmscript != "")
117 if(!bgmscriptbufloaded)
122 m = strcat(e.bgmscript, " ");
125 e.bgmscriptline0 = -1;
126 for(i = 0; i < bgmscriptbufsize; ++i)
128 if(substring(bufstr_get(bgmscriptbuf, i), 0, l) == m)
131 e.bgmscriptline = e.bgmscriptline0 = i;
132 if(i >= bgmscriptbufsize)
134 print("ERROR: bgmscript does not define ", e.bgmscript, "\n");
140 float GetCurrentAmplitude(entity e, float trel)
143 return GetAttackDecaySustainAmplitude(e.bgmscriptattack, e.bgmscriptdecay, e.bgmscriptsustain, trel) * e.bgmscriptvolume;
146 #ifdef CONSTANT_SPEED_DECAY
147 return GetReleaseAmplitude(e.bgmscriptdecay, e.bgmscriptsustain * e.bgmscriptvolume, e.bgmscriptrelease, trel);
149 return GetReleaseAmplitude(e.bgmscriptdecay, e.bgmscriptsustain, e.bgmscriptrelease, trel) * e.bgmscriptvolume;
154 float GetTimeForAmplitude(entity e, float amp)
157 return GetAttackTime(e.bgmscriptattack, amp / e.bgmscriptvolume);
160 #ifdef CONSTANT_SPEED_DECAY
161 return GetReleaseTime(e.bgmscriptdecay, e.bgmscriptsustain * e.bgmscriptvolume, e.bgmscriptrelease, amp);
163 return GetReleaseTime(e.bgmscriptdecay, e.bgmscriptsustain, e.bgmscriptrelease, amp / e.bgmscriptvolume);
168 float BGMScript(entity e)
172 if(e.bgmscript == "")
175 if(cvar("bgmvolume") <= 0)
178 e.just_toggled = FALSE;
183 if(bgmtime < e.bgmscripttime)
185 //print("reset ", e.bgmscript, "\n");
186 amp = GetCurrentAmplitude(e, e.bgmscripttime - e.bgmscriptstatetime + drawframetime);
188 e.bgmscriptline = e.bgmscriptline0;
189 e.bgmscripttime = bgmtime;
191 // treat this as a stop event for all notes, to prevent sticking keys
192 e.bgmscriptstate = FALSE;
193 e.bgmscriptvolume = 1;
194 e.bgmscriptstatetime = bgmtime - GetTimeForAmplitude(e, amp);
197 // find the CURRENT line
200 tokenize_console(bufstr_get(bgmscriptbuf, e.bgmscriptline));
201 if(stof(argv(1)) >= bgmtime || argv(0) != e.bgmscript)
203 e.bgmscripttime = bgmtime;
204 return GetCurrentAmplitude(e, bgmtime - e.bgmscriptstatetime);
206 else if(bgmtime >= stof(argv(1)))
208 e.bgmscriptline += 1;
209 e.bgmscripttime = stof(argv(1));
211 amp = GetCurrentAmplitude(e, e.bgmscripttime - e.bgmscriptstatetime);
213 // time code reached!
217 e.just_toggled = e.bgmscriptstate = TRUE;
218 e.bgmscriptvolume = vel;
221 e.just_toggled = e.bgmscriptstate = FALSE;
223 e.bgmscriptstatetime = e.bgmscripttime - GetTimeForAmplitude(e, amp);