waveOutOpen test2

/* WATCOM=/opt/watcom PATH=$WATCOM/binl:$PATH INCLUDE=$WATCOM/h:$WATCOM/h/win LIB=$WATCOM/lib286:$WATCOM/lib286/dos wcl -bcl=windows main.c -q mmsystem.lib */

#include <windows.h>
#include <stddef.h>
#include <stdlib.h>
#include <stdio.h>
#include <mmsystem.h>



void error(const char* str)
{
    MessageBox((HWND)0, str, "", 0);
    exit(1);
}

void CALLBACK _export waveOutProc(HWAVEOUT hwo, UINT uMsg, DWORD dwInstance, DWORD dwParam1, DWORD dwParam2)
{
}

int _pascal WinMain( HINSTANCE instance, HINSTANCE prev, char FAR *cmdline, int show )
{
    SEGINFO info;
    char t[100];
    PCMWAVEFORMAT format;
    int result;
    HWAVEOUT hout;

    format.wf.wFormatTag = WAVE_FORMAT_PCM;
    format.wf.nChannels = 1;
    format.wf.nSamplesPerSec = 11025;
    format.wf.nBlockAlign = 1;
    format.wf.nAvgBytesPerSec = 11025;
    format.wBitsPerSample = 8;

    if ((result = waveOutOpen(&hout, WAVE_MAPPER, (WAVEFORMAT*)&format, (DWORD)waveOutProc, 0, CALLBACK_FUNCTION)) != MMSYSERR_NOERROR)
    {
        sprintf(t, "Error %d\n", result);
        error(t);
	}

    error("success");
    return 0;
}