音も出る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ではただ音が出るだけ。 |