More fixes to the gurgle sound. I guess it's ready and working

[voretournament/voretournament.git] / data / qcsrc / server / vore.qc

diff --git a/data/qcsrc/server/vore.qc b/data/qcsrc/server/vore.qc
index 037aca006a15102948c5f1d1500f5bdf81403c87..b43a4db22d78987f20bcc93ce1c98fed37356618 100644 (file)
--- a/data/qcsrc/server/vore.qc
+++ b/data/qcsrc/server/vore.qc
@@ -214,6 +214,25 @@ void Vore_StomachKick()
        }\r
 }\r
 \r
+.float gurglesound_finished, gurglesound_oldstomachload;\r
+void Vore_Gurglesound()\r
+{\r
+       if(time > self.gurglesound_finished || self.gurglesound_oldstomachload != self.stomach_load)\r
+       {\r
+               local float vol;\r
+               vol = VOL_BASE * self.stomach_load / cvar("g_balance_vore_swallow_limit");\r
+\r
+               precache_sound("player/gurgle.ogg");\r
+               if(self.stomach_load)\r
+                       sound (self, CHAN_TRIGGER, "player/gurgle.ogg", vol, ATTN_NORM);\r
+               else\r
+                       stopsound(self, CHAN_TRIGGER);\r
+\r
+               self.gurglesound_finished = time + 11; // yes, hard coded sound length. I know it's bad but what can I do?\r
+               self.gurglesound_oldstomachload = self.stomach_load;\r
+       }\r
+}\r
+\r
 void Vore()\r
 {\r
        // skip the vore system under some circumstances\r
@@ -288,6 +307,9 @@ void Vore()
                }\r
        }\r
 \r
+       if(cvar("g_vore_gurglesound"))\r
+               Vore_Gurglesound();\r
+\r
 // --------------------------------\r
 // Code that addresses the prey:\r
 // --------------------------------\r