sound_engine_osc.c 2.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293
  1. #include "sound_engine_osc.h"
  2. static inline uint16_t sound_engine_pulse(uint32_t acc, uint32_t pw) //0-FFF pulse width range
  3. {
  4. return (((acc >> (((uint32_t)ACC_BITS - 17))) >= ((pw == 0xfff ? pw + 1 : pw) << 4) ? (WAVE_AMP - 1) : 0));
  5. }
  6. static inline uint16_t sound_engine_saw(uint32_t acc)
  7. {
  8. return (acc >> (ACC_BITS - OUTPUT_BITS - 1)) & (WAVE_AMP - 1);
  9. }
  10. static inline uint16_t sound_engine_triangle(uint32_t acc)
  11. {
  12. return ((((acc & (ACC_LENGTH / 2)) ? ~acc : acc) >> (ACC_BITS - OUTPUT_BITS - 2)) & (WAVE_AMP * 2 - 1));
  13. }
  14. static inline uint16_t sound_engine_sine(uint32_t acc, SoundEngine* sound_engine)
  15. {
  16. return (sound_engine->sine_lut[(acc >> (ACC_BITS - SINE_LUT_BITDEPTH))] << (OUTPUT_BITS - SINE_LUT_BITDEPTH));
  17. }
  18. inline static void shift_lfsr(uint32_t* v, uint32_t tap_0, uint32_t tap_1)
  19. {
  20. typedef uint32_t T;
  21. const T zero = (T)(0);
  22. const T lsb = zero + (T)(1);
  23. const T feedback = (
  24. (lsb << (tap_0)) ^
  25. (lsb << (tap_1))
  26. );
  27. *v = (*v >> 1) ^ ((zero - (*v & lsb)) & feedback);
  28. }
  29. uint16_t sound_engine_osc(SoundEngine* sound_engine, SoundEngineChannel* channel, uint32_t prev_acc)
  30. {
  31. switch(channel->waveform)
  32. {
  33. case SE_WAVEFORM_NOISE:
  34. {
  35. if((prev_acc & (ACC_LENGTH / 32)) != (channel->accumulator & (ACC_LENGTH / 32)))
  36. {
  37. shift_lfsr(&channel->lfsr, 22, 17);
  38. channel->lfsr &= (1 << (22 + 1)) - 1;
  39. }
  40. return (channel->lfsr) & (WAVE_AMP - 1);
  41. break;
  42. }
  43. case SE_WAVEFORM_PULSE:
  44. {
  45. return sound_engine_pulse(channel->accumulator, channel->pw);
  46. break;
  47. }
  48. case SE_WAVEFORM_TRIANGLE:
  49. {
  50. return sound_engine_triangle(channel->accumulator);
  51. break;
  52. }
  53. case SE_WAVEFORM_SAW:
  54. {
  55. return sound_engine_saw(channel->accumulator);
  56. break;
  57. }
  58. case SE_WAVEFORM_NOISE_METAL:
  59. {
  60. if((prev_acc & (ACC_LENGTH / 32)) != (channel->accumulator & (ACC_LENGTH / 32)))
  61. {
  62. shift_lfsr(&channel->lfsr, 14, 8);
  63. channel->lfsr &= (1 << (14 + 1)) - 1;
  64. }
  65. return (channel->lfsr) & (WAVE_AMP - 1);
  66. break;
  67. }
  68. case SE_WAVEFORM_SINE:
  69. {
  70. return sound_engine_sine(channel->accumulator, sound_engine);
  71. break;
  72. }
  73. }
  74. return 0;
  75. }