新しく発言する EXIT インデックスへ
音も出るBASIC

  音も出るBASIC2004/04/17 17:53:44 
  ありがとうございました。 koba 2004/04/18 07:09:52 
   └少し問題ありで追記2004/04/18 10:46:28 

  音も出るBASIC2004/04/17 17:53:44  ツリーへ

音も出るBASIC 返事を書く
2004/04/17 17:53:44
以前kobaさんより「NHKの時報のような音を作りたいです。」
と言う希望がありましたが9○系でDLLを利用して作成して見ました。

DECLARE EXTERNAL FUNCTION PlaySound

LET S$="C:\WINDOWS\MEDIA\Chord.wav"
LET n=PlaySound(S$, "", 128)
LET S$="C:\WINDOWS\MEDIA\Ding.wav"
LET n=PlaySound(S$, "", 128)
END

EXTERNAL FUNCTION PlaySound(pszSound$, hmod$, fdwSound)
ASSIGN "winmm.dll","PlaySoundA"
END FUNCTION

.wavのところに希望するwavファイルを作成して記述すればどんなサウンドでも発生できます。
wavファイルはフリーソフトのOSCILLATER(低周波発振機)などを利用して作ってください。

  ありがとうございました。 koba 2004/04/18 07:09:52  ツリーへ

Re: 音も出るBASIC 返事を書く
koba 2004/04/18 07:09:52
ありがとうございました。

昔、PC−98の時代に 確か PLAY SOUNDの
ような コマンドを使用した記憶があり、
書き込みをしたような訳です。
感謝します。

   └少し問題ありで追記2004/04/18 10:46:28  ツリーへ

Re: ありがとうございました。 返事を書く
2004/04/18 10:46:28
少し問題ありで追記
フリーソフトのOSCILLATERのWAVファイルは8Bitですし問題があります。
サウンドレコーダーを使って16Bitに変換したり、音の大きさ、長さを編集してください。


インデックスへ EXIT
新規発言を反映させるにはブラウザの更新ボタンを押してください。