home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload
/
ShartewareOverload.cdr
/
windows
/
marylamb.zip
/
TESTER.C
< prev
next >
Wrap
C/C++ Source or Header
|
1986-01-03
|
1KB
|
57 lines
#include "windows.h"
#include "tunes.h"
NOTES notes[] =
{
OPENSOUND,
SETVOICEACCENT,1,100,0xffff,S_NORMAL,0,
SETVOICEQUEUESIZE,1,1000,
1, 44, 8, 0,
1, 42, 8, 0,
1, 40, 8, 0,
1, 42, 8, 0,
SETVOICEACCENT,1,100,0xffff,S_STACCATO,0,
1, 44, 8, 0,
1, 44, 8, 0,
1, 44, 4, 0,
1, 42, 8, 0,
1, 42, 8, 0,
1, 42, 4, 0,
STARTSOUND,
WAITSOUNDSTATE,QUEUEEMPTY,
SYNCALLVOICES,
1, 44, 8, 0,
1, 47, 8, 0,
1, 47, 4, 0,
SETVOICEACCENT,1,100,0xffff,S_NORMAL,0,
1, 44, 8, 0,
1, 42, 8, 0,
1, 40, 8, 0,
1, 42, 8, 0,
1, 44, 8, 0,
1, 44, 8, 0,
1, 44, 8, 0,
SETVOICEACCENT,1,100,0xffff,S_STACCATO,0,
1, 44, 8, 0,
1, 42, 8, 0,
1, 42, 8, 0,
1, 44, 8, 0,
1, 42, 8, 0,
1, 40, 2, 0,
STARTSOUND,
WAITSOUNDSTATE,QUEUEEMPTY,
CLOSESOUND,
STOPSOUND
};
extern far pascal PlayMusic();
int PASCAL WinMain( hInstance, hPrev, lpszCmdLine, cmdShow )
HANDLE hInstance, hPrev;
LPSTR lpszCmdLine;
int cmdShow;
{
PlayMusic( (LPTUNES)notes );
exit( 0 );
}