#-------------------------------------------------------------------------------
# sdbin2h.pl
#-------------------------------------------------------------------------------

$op0 = $ARGV[0];
$op1 = $ARGV[1];
$op2 = $ARGV[2];

$inf=$op0;
$outf=$op1;

print "IN=$inf\n";
print "OUT=$outf\n";

$size = -s $inf;         # ファイルのサイズを得る
open(IN, $inf);          # ファイルを開く
open(OUT, ">$outf");          # ファイルを開く
binmode(IN);                   # バイナリモードにする


print OUT "
// $inf

const signed char $op2 _data[] PROGMEM ={
";

for(;;)
{
	read(IN, $buf, 20);         # データを読み込む
	last if(eof IN);

	 @c = unpack("C*",$buf);
	 	 	print OUT "    ";
	foreach $data (@c)
	 {
$data = sprintf"0x%02x",$data;		#16進数で出力
	 	 	print OUT  "$data";
	 	 	print OUT  ",";
	 }
	 	 	print OUT  "\n";

}

print OUT "
};
";

close(IN);                     # クローズする
close(OUT);                    # クローズする
#-------------------------------------------------------------------------------

C:\Perl\foo>

C:\Perl\foo>perl sdbin2h.pl E233_Alert1_imaADPCM.wav E233_Alert1_imaADPCM.h E233_Alert1
IN=E233_Alert1_imaADPCM.wav
OUT=E233_Alert1_imaADPCM.h

C:\Perl\foo>perl sdbin2h.pl E233_Alert3_imaADPCM.wav E233_Alert3_imaADPCM.h E233_Alert3
IN=E233_Alert3_imaADPCM.wav
OUT=E233_Alert3_imaADPCM.h

C:\Perl\foo>perl sdbin2h.pl E233_break1_imaADPCM.wav E233_break1_imaADPCM.h E233_break1
IN=E233_break1_imaADPCM.wav
OUT=E233_break1_imaADPCM.h

C:\Perl\foo>

// 1khz.wav
const signed char 1kh_data[] PROGMEM ={
    0x52,0x49,0x46,0x46,0x34,0x20,0x00,0x00,0x57,0x41,0x56,0x45,0x66,0x6d,0x74,0x20,0x14,0x00,0x00,0x00,
    0x11,0x00,0x01,0x00,0x40,0x1f,0x00,0x00,0xd7,0x0f,0x00,0x00,0x00,0x01,0x04,0x00,0x02,0x00,0xf9,0x01,
    0x66,0x61,0x63,0x74,0x04,0x00,0x00,0x00,0x20,0x3f,0x00,0x00,0x64,0x61,0x74,0x61,0x00,0x20,0x00,0x00,
    0xbe,0x06,0x00,0x00,0x77,0xf7,0xff,0x1f,0x77,0xf4,0x9c,0x41,0x13,0xba,0x9d,0x41,0x13,0xba,0x9d,0x41,
    0x13,0xba,0x9d,0x41,0x13,0xba,0x9d,0x41,0x13,0xba,0x9d,0x32,0x14,0xc9,0x9b,0x41,0x23,0xca,0x9c,0x41,
　　　・
　　　・
　　　・
    0x80,0x08,0x80,0x80,0x08,0x80,0x08,0x80,0x08,0x08,0x08,0x08,0x08,0x80,0x80,0x80,0x80,0x80,0x90,0x00,
    0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
    0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,

};

typedef struct dvi_adpcmblockheader_tag {
    int  iSamp0;
    BYTE bStepTableIndex; 
    BYTE bReserved;
} DVI_ADPCMBLOCKHEADER;

is equal to four) each data word contains eight sample codes as shown in the following diagram.
データワードが選択されたサンプル当たりのビット数に応じて異なって解釈されています。
次の図に示すように（は4に等しい）4ビットのDVI ADPCMの場合は、各データ・ワードは、8つのサンプルコードが含まれています。

アドレスオフセット(Data Word1)	コード	意味	詳細
(HEX)	(HEX)	.	.
+00	00	iSamp0:0x0400	LoByte
+01	04		HiByte
+02	00	bStepTableIndex:0x00 (1Byte)	.
+03	00	bReserved:0x00	.
+04	77	Byte0:0x77	.
+05	77	Byte1:0x00	.
+ n	**	Byten:0x**	.
+FE	9D	Byte251:0x9D	.
+FF	41	Byte252:0x41	.

・
・
・

アドレスオフセット(Data Word2)	コード	意味	詳細
+00	7A	iSamp0:0x3F7A	LoByte
+01	3F		HiByte
+02	53	bStepTableIndex:0x53 (1Byte)	.
+03	00	bReserved:0x00	.
+04	91	Byte0:0x77	.
+05	AC	Byte1:0x00	.
+ n	**	Byten:0x**	.

★ADPCMスケッチについて

コマンドステーション DCS50K用に若干手を加えてあります。
F1,F2,F3,F4 にサウンドを割り当ててあります。
β２のダウンロード

既知の問題(^^;
・AudacityのIMA ADPCM変換なのか、またはデコーダプログラムの処理が足りないのかわからないのですが、
　IMA ADPCMからPCM変換時に、レベルが大きく狂い【プチ】音が発生してしまう。
・フェードアウト処理は未確認
・ソースが汚いw
・デコード部分が大きい
・再生時にSerial.print()を使うと音程が低くなりますw

わかっていること
・1kHzのサイン波を再生させると、途中途中で波形が崩れることがわかっています。
　赤：PCMデータ
　青：IMA ADPCMデータ（極性bit+振幅data）なので、波形にするには適しませんが・・・

【クリックすると画像が大きくなります】

・IMA ADPCMデータに0xffが入っていると、デコードさせると上図の様な波形が出来てしまう。

【クリックすると画像が大きくなります】

　Audacityの波形表示ではちゃんと表示されているようですし・・・再生させてもちゃんと再生できるし
　デコーダプログラムに足りないアルゴリズムがあるのか？
　手っ取り早く、エンコーダーを変えてみようかなーと考え中。

この辺の事情に詳しい方がおられましたら、あやのブログ、掲示板にてアドバイスいただけると助かります(^_^)

★プチ音調査１

１、Audacityによる波形表示による比較
　　振幅が所々変わるようです。だけど、Audacityで再生させてもプチ音は発生しません。

上側が8bit PCMで、下側がIMA ADPCMの波形です。


【クリックすると画像が大きくなります】

２、エンコーダソフトを変えてみる
　WindowsXP付属のサウンドサウンドレコーダーが必要ですが、IMA ADPCMに変換することができます。

【クリックすると画像が大きくなります】
　似たように 0xFFが含まれるエンコード結果でした・・・

３、IMA ADPCMデータを細かく見てみる
IMA ADPCM検証データ←エクセルのデータです。

【クリックすると画像が大きくなります】

【クリックすると画像が大きくなります】

IMA ADPCMフォーマットを最近結構みているので、各信号の意味がわかりつつありますが、
初見の人用には説明を書いてないのでわかりにくいと思いますが・・・
結果がわかりやすくする為に検証データは1kHzのサイン波のデータを使用しています。
512ポイント毎にscale_change_tblが[8]になるようである（ピンクのグラフ）
その結果、stepテーブルが増えるため、デコード値が大きく増加してしまう。
・・・
デコードするときに512ポイント毎にブロックの最初のサンプル値に改めてリロードする処理を
入れるのかな？

★プチ音調査２

IMA ADPCMは、データ内部に256byte毎にサンプル値とステップ（量子化テーブル）が埋め込まれているため、
再設定する必要がある事がわかりました。
カウンタを追加して、サンプル値とステップ（量子化テーブル）を読み取るプログラムを追加しました。
本来はRIFFで定義されている値を取り出してスマートに書くと良いですｗ
ソースファイルも若干整理しなおしました。
とりあえず、IMA ADPCMから16bit PCM を生成して、8bitに間引くタイプはこれでクローズにしようかと思います。

β４のダウンロード

1kHzのサイン波をプロットすると、256Byte毎のつなぎ目が無くなり、きれいなサイン波になりました。


【クリックすると画像が大きくなります】

フェードアウト処理がデータ上、フェードアウト途中で終わっている様であるとブログに書きましたが実際波形をプロット
してみるとこんな感じでした。


【クリックすると画像が大きくなります】

---

2015/11/7 初版
2015/11/8 ちょっと調べた内容を追加
2015/11/9 ちょっと調べた内容を追加、画像を縮小させました。