オルゴールに必要なサブルーチン群
音楽データ1バイト（オクターブ：トーン）を、サイン波上の角速度に変換するルーチン。
PIC12F1822には便利な FSR(File Select Register) が２つあり、間接アドレシングが可能。
４１、４２行目で、FSR0が０ｘ４０と設定されてコールされると、FSR0がTone0、FSR1がTone0+1をアドレスするようになる。
５０、５３行目のように、MOVWF INDF0 で WREG(ワークレジスタ)の値が間接アドレスされて Tone0 に格納される。
FSR0 と INDF0、FSR1 と INDF1 が対応してC言語でいうところのポインタとその中身の関係。
４９、５２行目の CALL 文、WREGにINDEX値を設定してテーブル名をCALLすると、INDEX値に応じた結果をWREGに入れて返してくれる。
テーブルの書き方は、以下のように、BRW（Relative Branch with W）を先頭に、中身を RETLW(Return with Literal in W) で列挙する。
１７７８行 D’０’などの D は10進数（Decimal）表記の意。
↑プログラムの最後にテーブルを置いた。１８０５行目のプログラムアドレスは０ｘ７FF。
プログラムの最後には END を書く。
音楽データ（音符長）をループ回数に変換するルーチン。
７１、７５行目のように、FSRはMOVWI、MOVIWで使うとき、相対指定も可能。最初に設定された FSR0 が０ｘ４０（=Tone0）だった場合、2[FSR0] は Lngt0 、3[FSR0] は Lngt0+1 を指すことになる。
７０、７４行目の CALL 文もデータに応じた値をテーブルから取ってきている。テーブルは以下。
PWM値を設定したあと角速度分つぎのサイン波リード位置をひとつ進めるため累算するルーチン。
８２、８４行目のように MOVIW 命令では、FSR相対指定による間接アドレス読み込みができる。3C[FSR0]の３Cは、意味的には－４。
相対指定は、－３２～３１の範囲で可能だが、コードで書くときは16進補数表現にしなければならない。
８５、８７行目は、FSR値をリテラルで加減算できる。この場合１を足すだけなので、INCF FSR0,F と書くことも可能。９３行目は－1の例。
９４行目、MOVIWはまた FSR0-- のように間接アドレス読み込みとポストデクリメントのようなことができて便利。
９５～９７行目は、累算結果を整数でまるめる（意味は四捨五入、正確には１２７捨１２８入）処理。サイン波テーブルをより正確に引く。
エンベロープカウンタ（ポインタ）の更新とその値（位相差）を設定するルーチン
１０４～１０６行目、こちらの方「ELM - WaveTable電子オルゴール」のアタック期間テーブルを使わせていただきました。アタック期間とサステイン期間を合体させるとテーブルが4ページ（２５６バイトｘ４）に及びます。そのアタック期間はサイン波を減衰させない処理。
１０７～１１０行目、エンベロープテーブルは０ｘ８０バイト（１２８バイト）なのでカウンタが１２８を超えないようにする処理。
１１１～１１３行目、EnvC[0..2]から値を読み込み、エンベロープテーブルで取得した値を、EnvV[0..2]に設定。
以下エンベロープテーブルは長いので途中割愛してあるが、データ数１２８個、上限値を６４にした右肩あがりのグラフにすればよい。
以下参考：グラフ化したもの
データ構造１チャネル分をクリアするルーチン
今回のプログラムではチャネルの使用状況を LpBit という変数の中の3bitで管理する。1チャネル使う前に以前のデータを消去するのに使う。
１チャネルを確保し、中身を消去するルーチン
累算し四捨五入した値を使ってPWMに設定する値をテーブルから取得するルーチン
１６６～１７２行目、４ページにまたがるテーブルからインデクス値に応じた値を取得するため、PCL（プログラムカウンタ）の加算を利用しています。他にも実装方法があるかも知れませんが割りと短いコードで済んでいます。
１９３行目からが、サイン波の重ね合わせによる減衰を実現しているところです。サイン波の値は０～２５５までの範囲なので、それぞれ２で割ってから足し算しています。
以下テーブル。長いので途中割愛していますが、先ほどのリンク先からデータは入手できます。サステイン部分は自分でサイン波を１２８個作り足します。
１４７０行目、Sustainラベルの下に BRW が無いことに注意。att4 テーブルは Sustain まで含めて２５６バイト。
各チャネル出力値を合算するルーチン
単音から３和音まで、少しずつ出力が大きくなるようになっている。
２００ｍｓ待ちルーチン
曲間の待ち時間を作ったり、外部EEPROMの起動を待ったり、ボタンのチャタリングを待ったり、といろいろ使える。
曲データの読み込みルーチン
外部EEPROMからの読み込みに改造する場合は、この部分を置き換えてデータをバッファにためるようにする。
今回は簡易的にデータテーブル以下で実現。
０ｘFFを２つ書くとメインループの中で曲データ最後を認識できる。
ここまで細かなサブルーチン群と広大なデータテーブルでした。
PIC12F1822はプログラム領域が２０４８バイトしかないので、テーブルだけで１３００バイト超えている本プログラムは切り詰めが必須です。
次回はメインループ予定。