qcsrc/client/noise.qc

   1 #include "noise.qh"
   2
   3 #if defined(CSQC)
   4         #include "../dpdefs/csprogsdefs.qh"
   5 #elif defined(MENUQC)
   6 #elif defined(SVQC)
   7 #endif
   8
   9 entityclass(Noise)
  10 class(Noise) .float noise_baccum;
  11 class(Noise) .float noise_paccum;
  12 class(Noise) .float noise_paccum2;
  13 class(Noise) .float noise_paccum3;
  14 class(Noise) .float noise_bstate;
  15
  16 float Noise_Brown(entity e, float dt)
  17 {
  18         e.noise_baccum += random() * sqrt(dt); // same stddev for all dt
  19         return e.noise_baccum;
  20 }
  21 float Noise_Pink(entity e, float dt)
  22 {
  23         float f;
  24         f = dt * 60;
  25         // http://home.earthlink.net/~ltrammell/tech/pinkalg.htm
  26         if(random() > pow(0.3190, f))
  27                 e.noise_paccum = 0.34848 * (2 * random() - 1);
  28         if(random() > pow(0.7756, f))
  29                 e.noise_paccum2 = 0.28768 * (2 * random() - 1);
  30         if(random() > pow(0.9613, f))
  31                 e.noise_paccum3 = 0.43488 * (2 * random() - 1);
  32         return e.noise_paccum + e.noise_paccum2 + e.noise_paccum3;
  33 }
  34 float Noise_White(entity e, float dt)
  35 {
  36         return random() * 2 - 1;
  37 }
  38 float Noise_Burst(entity e, float dt, float p)
  39 {
  40         if(random() > pow(p, dt))
  41                 e.noise_bstate = !e.noise_bstate;
  42         return 2 * e.noise_bstate - 1;
  43 }