// [105] wavファイルを作る。 //
//投稿日: 2025-07-19 14:26:06
//投稿者: ohisama  
//動作環境: プロデル 2.0.1322 Windows 11 Pro 64ビット メモリ:3.
ファイル名は「[デスクトップ]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なら
　　　　改行を書込器へ加える
　　でなければ
　　　　「 」を書込器へ加える
　　そして
そして
読み込みファイルを閉じる
書込器の内容を報告する