82 lines
2.2 KiB
C++
82 lines
2.2 KiB
C++
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <malloc.h>
|
|
#include <Windows.h>
|
|
#include <MMSystem.h>
|
|
|
|
int notes[16] = { 122, 115, 109, 103, 97, 92, 86, 82, 77, 73, 69, 65, 61, 58, 54, 51 };
|
|
int arpeggio[][4] = {
|
|
{ 0, 3, 7, 12 },
|
|
{ 2, 5, 7, 10 },
|
|
{ 1, 5, 7, 10 },
|
|
{ 1, 3, 5, 8 },
|
|
{ 1, 3, 5, 10 },
|
|
};
|
|
int arpseq[16] = { 0, 0, 1, 1, 2, 2, 4, 3, 0, 0, 1, 1, 2, 3, 4, 4 };
|
|
|
|
int notes2[25] = { 134, 142, 150, 159, 169, 179, 189, 201, 213, 225, 239, 253, 268, 284, 301, 319, 338, 358, 379, 401, 425, 451, 477, 506, 536 };
|
|
int bassbeat[8] = { 0, 0, 1, 0, 0, 1, 0, 1 };
|
|
int bassline[16] = { 12, 12, 15, 10, 12, 12, 17, 10, 12, 12, 15, 7, 8, 8, 3, 7 };
|
|
|
|
static inline unsigned char voice_arp(unsigned long i)
|
|
{
|
|
int note = notes2[12 + arpeggio[arpseq[(i >> 13) & 15]][(i >> 8) & 3]];
|
|
return (((i * note) >> 5) & 128) - 1;
|
|
// return (((i << 1) / (notes[arpeggio[arpseq[(i >> 13) & 15]][(i >> 8) & 3]] >> 2)) & 1) << 7;
|
|
}
|
|
|
|
static inline unsigned char voice_bass(unsigned long i)
|
|
{
|
|
int note = notes2[bassline[(i >> 13) & 15]];
|
|
int beat = bassbeat[(i >> 10) & 7] ? 7 : 8;
|
|
return (((i * note) >> beat) & 0x7F) + (((i * note + i) >> beat) & 0x7F);
|
|
}
|
|
|
|
void fill(char *data)
|
|
{
|
|
static unsigned long i = 0;
|
|
|
|
for (int j = 0; j < 4096; j++)
|
|
{
|
|
unsigned char sample = /*(voice_bass(i) >> 1) + */(voice_arp(i) >> 1);
|
|
data[j] = sample - 128;
|
|
i++;
|
|
}
|
|
}
|
|
|
|
static const WAVEFORMATEX fmt = {
|
|
WAVE_FORMAT_PCM, 1, 8000, 8000, 1, 8, 0
|
|
};
|
|
|
|
int main(int argc, char *argv[])
|
|
{
|
|
HWAVEOUT out;
|
|
HRESULT rc = waveOutOpen(&out, WAVE_MAPPER, &fmt, NULL, NULL, CALLBACK_NULL);
|
|
if (rc != MMSYSERR_NOERROR)
|
|
{
|
|
printf("error %d on open\n");
|
|
exit(1);
|
|
}
|
|
|
|
WAVEHDR bufs[2] = {
|
|
{ (char *)malloc(4096), 4096 },
|
|
{ (char *)malloc(4096), 4096 },
|
|
};
|
|
int i = 0;
|
|
|
|
fill(bufs[i].lpData);
|
|
bufs[i].dwFlags = WHDR_PREPARED;
|
|
waveOutPrepareHeader(out, bufs + i, sizeof(WAVEHDR));
|
|
waveOutWrite(out, bufs + i, sizeof(WAVEHDR));
|
|
i ^= 1;
|
|
|
|
while (!(GetAsyncKeyState(VK_ESCAPE) & 1))
|
|
{
|
|
fill(bufs[i].lpData);
|
|
bufs[i].dwFlags = WHDR_PREPARED;
|
|
waveOutPrepareHeader(out, bufs + i, sizeof(WAVEHDR));
|
|
waveOutWrite(out, bufs + i, sizeof(WAVEHDR));
|
|
i ^= 1;
|
|
while (waveOutUnprepareHeader(out, bufs + i, sizeof(WAVEHDR)) == WAVERR_STILLPLAYING);
|
|
}
|
|
} |