58 lines
962 B
C
58 lines
962 B
C
|
|
#include "audio.h"
|
|
#include "sounds.h"
|
|
|
|
void sound_loop_1(int (*sp)(int i), int t) {
|
|
for (t = 0;;t++) {
|
|
p((*sp)(t));
|
|
}
|
|
}
|
|
|
|
int sound_1(int t) {
|
|
return (t >> 6 | t | t >> (t >> 16)) * 10 + ((t >> 11) & 7);
|
|
}
|
|
|
|
int sound_2(int t) {
|
|
return (t*(((t>>12)|(t>>8))&(63&(t>>4))));
|
|
}
|
|
|
|
int sound_3(int t) {
|
|
return (t*9&t>>4|t*5&t>>7|t*3&t/1024);
|
|
}
|
|
|
|
int sound_4(int t) {
|
|
int i = 0;
|
|
|
|
i = (t>>7-(t>>15)&-t>>7-(t>>15));
|
|
if (i==0) {
|
|
i=1;
|
|
}
|
|
return (t>>4|t&(t>>5)/i);
|
|
}
|
|
|
|
int sound_5(int t) {
|
|
return (((t*("36364689"[t>>13&7]&15))/12&128)+(((((t>>12)^(t>>12)-2)%11*t)/4|t>>13)&127));
|
|
}
|
|
|
|
int sound_6(int t) {
|
|
int y = 0, x = 0;
|
|
|
|
x=t*"6689"[t>>16&3]/24&127;
|
|
y=t&16383;
|
|
if (y==0) {
|
|
y=1;
|
|
}
|
|
if (x==0) {
|
|
y=1;
|
|
}
|
|
return ((30000000000/(y)&1)*35+(x)*y/400000000+((t>>8^t>>10|1>>14|x)&63));
|
|
}
|
|
|
|
int sound_7(int t) {
|
|
int i;
|
|
i=t<<2*(t^t*2);
|
|
return (((t&(t>>i)))^(t*("salve munde"[t>>13&7]&15))/12&32);
|
|
}
|
|
|
|
// vim:set sw=2 sts=2 et ai:
|