wavファイルを作る。
作品プログラム
- 動作環境
- プロデル 2.0.1322 Windows 11 Pro 64ビット メモリ:3.
- 投稿者
- ohisama
- 投稿日
- 2025-07-19 14:26:06
- ダウンロード数
- 92
作品のプログラム
ファイル名は「[デスクトップ]test0.wav」 書き込みデータというバイナリファイルを作る 書き込みデータにファイル名を書き込み専用で開く //書き込みデータのエンコードの名前を報告する 書き込みデータへ 「RIFF」を文字列として書き込む 書き込みデータへ 88232を、符号なし整数として書き込む 書き込みデータへ 「WAVE」を文字列として書き込む 書き込みデータへ 「fmt 」を文字列として書き込む 書き込みデータへ 16を、符号なし整数として書き込む 書き込みデータへ 1を、符号なし短整数として書き込む 書き込みデータへ 1を、符号なし短整数として書き込む 書き込みデータへ 44100を、符号なし整数として書き込む 書き込みデータへ 88200を、符号なし整数として書き込む 書き込みデータへ 2を、符号なし短整数として書き込む 書き込みデータへ 16を、符号なし短整数として書き込む 書き込みデータへ「data」を文字列として書き込む 書き込みデータへ 88200を、符号なし整数として書き込む iを0から44100まで増やしながら繰り返す 【値：短整数】は、サイン（i / 44100 × 2 × π × 440）× 10000 ＋ 10000 書き込みデータへ値を、符号なし短整数として書き込む 繰り返し終わり 書き込みデータを閉じる 「ok」を報告する 読み込みファイルというバイナリファイルを作る 読み込みファイルへファイル名を読み取り専用で開く ダンプは、読み込みファイルからすべて読み取ったもの 書込器は、文字列書込器を作ったもの //1からダンプの個数まで数を増やしながら繰り返す 1から48まで数を増やしながら繰り返す （（「00」＆（ダンプ（数）の十六進数））から末尾から2文字取り出したもの）を書込器へ加える （数を16で割った余り）が0なら 改行を書込器へ加える でなければ 「 」を書込器へ加える そして そして 読み込みファイルを閉じる 書込器の内容を報告する