2 float bgmscriptbufsize;
3 float bgmscriptbufloaded;
7 .float bgmscriptvelocity;
10 .float bgmscriptstatetime;
11 .float bgmscriptdelta;
13 float GetAttackDecaySustainAmplitude(float a, float d, float s, float t)
16 // attack: from 0 to 1, in time a for a full length
17 // decay: from 1 to s, in time d
26 return max(0, ((t - a) / d)) * (s - 1) + 1;
31 float GetReleaseAmplitude(float s, float r, float t)
34 return s * (1 - min(1, t / r));
39 float GetAttackTime(float a, float amp)
44 float GetReleaseTime(float s, float r, float amp)
47 return (1 - amp / s) * r;
56 bgmscriptbuf = bgmscriptbufsize = 0;
57 bgmscriptbufloaded = 1;
58 s = strcat("maps/", mi_shortname, ".bgs");
59 fh = fopen(s, FILE_READ);
62 bgmscriptbuf = buf_create();
63 while((s = fgets(fh)))
65 bufstr_set(bgmscriptbuf, bgmscriptbufsize, s);
71 void BGMScript_InitEntity(entity e)
77 if(!bgmscriptbufloaded)
82 m = strcat(e.bgmscript, " ");
85 e.bgmscriptline0 = -1;
86 for(i = 0; i < bgmscriptbufsize; ++i)
88 if(substring(bufstr_get(bgmscriptbuf, i), 0, l) == m)
91 e.bgmscriptline = e.bgmscriptline0 = i;
92 if(i >= bgmscriptbufsize)
94 print("func_pointparticles: bgmscript does not define ", e.bgmscript, "\n");
100 float BGMScript(entity e)
105 if(e.bgmscript == "")
108 if(cvar("bgmvolume") <= 0)
111 e.just_toggled = FALSE;
113 t = gettime(GETTIME_CDTRACK);
114 if(t < e.bgmscripttime)
116 e.bgmscriptline = e.bgmscriptline0;
118 e.bgmscriptstatetime = t - drawframetime - e.bgmscriptdelta; // FIXME this causes a tiny hitch
121 // find the CURRENT line
124 tokenize_sane(bufstr_get(bgmscriptbuf, e.bgmscriptline));
125 if(stof(argv(1)) >= t)
127 if(argv(0) != e.bgmscript)
129 // end of bgmscript, will revert to beginning later
132 else if(t >= stof(argv(1)))
134 e.bgmscriptline += 1;
135 e.bgmscripttime = stof(argv(1));
138 amp = GetAttackDecaySustainAmplitude(e.bgmscriptattack, e.bgmscriptdecay, e.bgmscriptsustain, e.bgmscripttime - e.bgmscriptstatetime) * e.bgmscriptvelocity;
140 amp = GetReleaseAmplitude(e.bgmscriptsustain, e.bgmscriptrelease, e.bgmscripttime - e.bgmscriptstatetime);
142 // time code reached!
143 e.bgmscriptvelocity = stof(argv(2));
144 if(e.bgmscriptvelocity > 0)
145 e.just_toggled = e.bgmscriptstate = TRUE;
147 e.just_toggled = e.bgmscriptstate = FALSE;
150 e.bgmscriptstatetime = e.bgmscripttime - GetAttackTime(e.bgmscriptattack, amp / e.bgmscriptvelocity);
153 e.bgmscriptstatetime = e.bgmscripttime - GetReleaseTime(e.bgmscriptsustain, e.bgmscriptrelease, amp);
154 amp = GetReleaseAmplitude(e.bgmscriptsustain, e.bgmscriptrelease, e.bgmscripttime - e.bgmscriptstatetime);
161 // attack, decay or sustain
162 e.bgmscriptdelta = t - e.bgmscriptstatetime;
163 return GetAttackDecaySustainAmplitude(e.bgmscriptattack, e.bgmscriptdecay, e.bgmscriptsustain, e.bgmscriptdelta) * e.bgmscriptvelocity;
168 e.bgmscriptdelta = t - e.bgmscriptstatetime;
169 return GetReleaseAmplitude(e.bgmscriptsustain, e.bgmscriptrelease, self.bgmscriptdelta);