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

  音も出るBASIC Koba 2004/02/28 04:50:57 
  確か、十進BASICには(WindowsNT系列でのみ使... 青木太一 2004/02/28 07:55:28 
   └ヘルプの中に在りました。2004/02/28 11:13:23 
    ├こんなのも使えそうですが?2004/02/28 11:25:23 
    ├サンプルが過去ログから消えてしまったので... 白石和夫 2004/03/04 08:45:22 
    └平均律音階 白石和夫 2004/03/04 08:47:52 

  音も出るBASIC Koba 2004/02/28 04:50:57  ツリーへ

音も出るBASIC 返事を書く
Koba 2004/02/28 04:50:57
いつも お世話に なっています。
開発者の白石先生に心から、感謝しています。
音も出るようにして、いただけないでしょうか。
例えば、NHKの時報のような音を作りたいです。
300Hz,440HZ,500Hz,1000Hz,
3000Hz。。。。というようにです。

たとえば
FOR A=1 TO 50
SOUND(500,5)
NEXT A
(500Hzの基準音を5秒間出し、
   それを50回繰り返す)。。。
。。。。というようなようなことは出来ないでしょうか。

よろしく お願いします。

木村良夫著 パソコンを遊ぶ簡単プログラミング 講談社
を 繰り返し読んでいます。


   

  確か、十進BASICには(WindowsNT系列でのみ使... 青木太一 2004/02/28 07:55:28  ツリーへ

Re: 音も出るBASIC 返事を書く
青木太一 2004/02/28 07:55:28
確か、十進BASICには(WindowsNT系列でのみ使える)Kobaさんが望んでいるようなそのものずばりの機能があったはず。
...と思って、ヘルプ、サンプル、インターネットなどいろいろ検索してみたけれど、情報が見つからない。
あれ?記憶違いかな。

   └ヘルプの中に在りました。2004/02/28 11:13:23  ツリーへ

Re: 確か、十進BASICには(WindowsNT系列でのみ使... 返事を書く
2004/02/28 11:13:23
ヘルプの中に在りました。

BEEP 数値式1, 数値式2
Windows APIのBEEPを呼び出す。
  Windows NT/2000/XPでは,数値式1は振動数(Hz),数値式2は継続時間(ミリ秒)を意味する。
  Windows 95/98/Meでは,数値式1,数値式2は意味を持たない。

    ├こんなのも使えそうですが?2004/02/28 11:25:23  ツリーへ

Re: ヘルプの中に在りました。 返事を書く
2004/02/28 11:25:23
こんなのも使えそうですが?

PLAY 文字列式
関連付けを利用して文字列式が表すファイルをplayする。
PLAY NOWAIT 文字列式
関連付けを利用して文字列式が表すファイルをplayする。指定されたプログラムの実行が終わるの待たずに次の行に進む。

    ├サンプルが過去ログから消えてしまったので... 白石和夫 2004/03/04 08:45:22  ツリーへ

Re: ヘルプの中に在りました。 返事を書く
白石和夫 2004/03/04 08:45:22
サンプルが過去ログから消えてしまったので再度書き込みます。
自然音階
LET la=440
LET DO=la*16/27
LET re=DO*9/8
LET mi=DO*81/64
LET fa=DO*4/3
LET so=DO*3/2
LET si=DO*243/128
LET do2=DO*2
PRINT DO,re,mi,fa,so,la,si,do2
beep DO,333
beep re,333
beep mi,333
beep fa,333
beep so,333
beep la,333
beep si,333
beep do2,333
END

    └平均律音階 白石和夫 2004/03/04 08:47:52  ツリーへ

Re: ヘルプの中に在りました。 返事を書く
白石和夫 2004/03/04 08:47:52
平均律音階
LET la=440
let do=la*2^(-3/4)
LET re=DO*2^(2/12)
LET mi=DO*2^(4/12)
LET fa=DO*2^(5/12)
LET so=DO*2^(7/12)
! LET la=DO*2^(9/12)
LET si=DO*2^(11/12)
LET do2=DO*2
PRINT DO,re,mi,fa,so,la,si,do2
beep DO,333
beep re,333
beep mi,333
beep fa,333
beep so,333
beep la,333
beep si,333
beep do2,333
END
Windows NT/2000/XPでのみ有効です。
Windows 95/98/Meではただ音が出るだけ。


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