MC145157+AVR ATTINY2313 PLL制御の実験

ハムフェアでジャンクＩＣの袋詰めを買ったら、ＰＬＬのＩＣがいくつか入っていました。
モトローラのＭＣ１４５１５７で、かなり昔のＩＣで今ではディスコンです。
ネットで作例を探してみましたが、データシートは見つかったものの、作例は殆どありません。

やっとＭａｌｏ－Ｗｅｂというサイトで、使用例を見つけたので、これを参考に実験してみることにしました。
ドイツ語？のサイトなので内容はサッパリですが、回路図とプログラムは分かります。
ＰＬＬ制御のＦＭ送信機で、１／２０のプリスケーラで分周してからＰＬＬに入れているようです。

ＭＣ１４５１５７はどのくらいの周波数まで対応しているのかデータシートからはよく分からないので、ＨＦ帯でテストしてみることにしました。
ＭＣ１４５１５７は÷Ｒ、÷Ｎともに１４ビットで３～１６３８３まで設定できます。
設定はシリアルなので、ＡＶＲのＡＴＴＩＮＹ２３１３でプログラムを作って設定することにしました。

回路図です。
ＶＣＯは適当に組んだクラップ発振回路です。
発振させたところ１３８００ｋＨｚ付近だったので、ＰＬＬの周波数は１３８０分周して１０ｋＨｚとします。
リファレンスは６ＭＨｚを６００分周して１０ｋＨｚです。
ＡＶＲに付けたＬＥＤはテスト用で、ＬＥＤをピカピカさせて、プログラムが正しく書き込まれたことをチェックします。
ＰＬＬロック確認用のＬＥＤも付けました。


作成したＰＬＬ制御部です。
実験なので、ブレッドボードで組んでみました。
左がＡＶＲで右がＰＬＬのＭＣ１４５１５７です。


ＶＣＯ基板です。


ＰＬＬ部とＶＣＯ基板をつないでテスト中です。
１３８００ｋＨｚでロックしました。
周波数を変化させないとつまらないので、１３８００ｋＨｚと１３８１０ｋＨｚを２秒ごとに変化させてみました。


プログラムです。言語はＢＡＳＣＯＭです。
テスト用なので最適ではありませんが、とりあえず動きました。
テスト用のＬＥＤピカピカの部分は省略してあります。

$regfile = "attiny2313.dat"
$crystal = 10000000
Dim N As Long
Dim R As Long
Dim C As Long
Dim I As Integer
'Init
Config Portd.0 = Output 'Clock
Config Portd.1 = Output 'Data
Config Portd.2 = Output 'Enable
Config Portb.0 = Output 'Test LED
Reset Portd.0
Reset Portd.1
Reset Portd.2
'Set Ref　6000kz / 600 = 10kHz
R = 600

For I = 13 To 0 Step -1
　C = R
　Shift C , Right , I
　C = C And 1
　Portd.1 = C
　Pulseout Portd , 0 , 10 'Clock
　Waitus 30
Next

Set Portd.1
Pulseout Portd , 0 , 10 'clock
Waitus 30

'Enable
Pulseout Portd , 2 , 10 'enable

Do

　'13800kHz / 1380 = 10kHz
　For N = 1380 To 1381

　　For I = 13 To 0 Step -1
　　　C = N
　　　Shift C , Right , I
　　　C = C And 1
　　　Portd.1 = C
　　　Pulseout Portd , 0 , 10 'Clock
　　　Waitus 30
　　Next

　　Reset Portd.1
　　Pulseout Portd , 0 , 10 'clock
　　Waitus 30

　　'Enable
　　Pulseout Portd , 2 , 10 'enable
　Next
Loop
End

あとは表示部とＵＰ／ＤＯＷＮ用のＳＷかロータリーエンコーダーを付ければよさそうです。
３桁のＬＥＤくらいなら空きポートでなんとかなりそうです。
５０ＭＨｚのＡＭ機を検討してますが、ダイレクトに５０ＭＨｚの制御がＮＧなら、プリスケーラを付けるか、周波数変換するかですね。
ＩＣ袋にはＰＬＬ２００１という型番のいかにもＰＬＬと分かるＩＣも入っていたのでこれなら、２００ＭＨｚ対応とデータシートにあるので、良さそうです。
シリアル制御もビット数が違うだけで同じなので、プログラムも少し直せば使えそうです。