Exotica
- Posted by mwfch at MWEB.CO.ZA Jul 06, 2001
- 412 views
This is a multi-part message in MIME format. ------=_NextPart_000_0007_01BFD47F.A0F1CEC0 charset="iso-8859-1" Hi . What is wrong with my Exotica program : --BEGIN CODE include emain.ew object funcval funcval=3Dc_func(EXOTICA_INIT,{hwnd,hInst}) =20 end if object val val =3D c_func(DMUSIC_INIT,{NULL}) object val2 val2 =3D c_func(DMUSIC_REVERB_AVAIL,{NULL})=20 return val2 if val2 =3D 0 then object val3,C_INT C_INT =3D 0 val3 =3D c_proc(DMUSIC_TOGGLE_REVERB,{C_INT})=20 elsif val2 =3D 1 then object val4,C_INT C_INT =3D 1 val4 =3D c_proc(DMUSIC_TOGGLE_REVERB,{C_INT}) end if object mid_file,Filename Filename =3D boss.mid=20 mid_file =3D c_proc(MIDI_OPEN,{Filename})=20 object play play =3D c_proc(MIDI_PLAY,{NULL}) --END CODE Thanx Ferdinand ------=_NextPart_000_0007_01BFD47F.A0F1CEC0 Content-Type: text/html; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2614.3500" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV>Hi .</DIV> <DIV>What is wrong with my Exotica program :</DIV> <DIV> </DIV> <DIV>--BEGIN CODE</DIV> <DIV> </DIV> <DIV>include emain.ew</DIV> <DIV> </DIV> <DIV>object funcval<BR>funcval=3Dc_func(EXOTICA_INIT,{hwnd,hInst}) = <BR>end=20 if</DIV> <DIV> </DIV> <DIV>object val<BR>val =3D c_func(DMUSIC_INIT,{NULL})</DIV> <DIV> </DIV> <DIV>object val2<BR>val2 =3D c_func(DMUSIC_REVERB_AVAIL,{NULL}) = <BR>return=20 val2</DIV> <DIV> </DIV> <DIV>if val2 =3D 0 then<BR> object val3,C_INT<BR> C_INT =3D = 0<BR> =20 val3 =3D c_proc(DMUSIC_TOGGLE_REVERB,{C_INT}) <BR>elsif val2 =3D 1 = then<BR> =20 object val4,C_INT<BR> C_INT =3D 1<BR> val4 =3D=20 c_proc(DMUSIC_TOGGLE_REVERB,{C_INT})<BR>end if</DIV> <DIV> </DIV> <DIV>object mid_file,Filename<BR>Filename =3D boss.mid <BR>mid_file =3D=20 c_proc(MIDI_OPEN,{Filename}) </DIV> <DIV> </DIV> <DIV>object play<BR>play =3D c_proc(MIDI_PLAY,{NULL})</DIV> <DIV> </DIV> <DIV>--END CODE</DIV> <DIV> </DIV> <DIV>Thanx</DIV> <DIV> </DIV> ------=_NextPart_000_0007_01BFD47F.A0F1CEC0--