ＰＩＣＢＡＳＩＣコンパイラ
〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜
まるでインタプリタ。でもコンパイラです。超カンタン超シンプルです。
〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜〜

［第１９９回］



●ＰＩＣ１６Ｆ１８２７（１２）４ｘＰＬＬ（２）

納得がいかないこととか辻褄が合わないことがおきるとそれがクリアできるまで気持ちが落ち着きません。
これはあれだ。
きっとＤａｔａＳｈｅｅｔが間違っているんだ。
うん。
そういうことにしよう。
そうしてしまえば気は晴れるのではと一時は思うのですが。
やっぱり自分の心はそうは簡単にごまかせないのですよねえ。
なんだか小骨が喉にひっかかっているようで実に嫌な気分です。
それでまたプログラムとＤａｔａＳｈｅｅｔを見比べながら考え始めます。
短い冬の日はじきに暮れてしまいます。
なんとも因果な性分であります。
早朝から深夜まで繰り返し眺めていますと。
突然あの至福の時がやってきます。
わかったぞ！
そういうことだったんだ！
今回もそういうことでした。
ま。
しかし。
自分の至らなさを棚に上げておいて何なのですけれど。
ちょっと言わせてもらえば。
Ｍｉｃｒｏｃｈｉｐさまももう少し分かりやすく書いていただけませんでしょうかねえ。

下はＰＩＣ１６Ｆ１８２７のオシレータ回路の説明です。

［出典］Ｍｉｃｒｏｃｈｉｐ　Ｔｅｃｈｎｏｌｏｇｙ　Ｉｎｃ．ＰＩＣ１６Ｆ１８２７ＤａｔａＳｈｅｅｔ

問題解決のカギとなったのはＦＩＧＵＲＥ５−１のブロック図でした。

今回は簡便な内蔵クロック発振モードを使います。
このモードを選択するとクリスタルを外付けしなくてもそれなりの精度のクロックが簡単に得られます。
内蔵発振モードでは最高１６ＭＨｚのクロックが得られますが今回はそれをさらに４ｘＰＬＬ回路で４倍にしたいと思います。
上図の通りその場合には内蔵発振クロックは８ＭＨｚを選択することになります。
内蔵８ＭＨｚを４ｘＰＬＬ回路に通す選択スイッチは図によればＦＯＳＣ＜２：０＞＝１００です。
ＦＯＳＣはＣＯＮＦＩＧで設定します。
下がＣＯＮＦＩＧ１のビット説明です。

［出典］Ｍｉｃｒｏｃｈｉｐ　Ｔｅｃｈｎｏｌｏｇｙ　Ｉｎｃ．ＰＩＣ１６Ｆ１８２７ＤａｔａＳｈｅｅｔ


［出典］Ｍｉｃｒｏｃｈｉｐ　Ｔｅｃｈｎｏｌｏｇｙ　Ｉｎｃ．ＰＩＣ１６Ｆ１８２７ＤａｔａＳｈｅｅｔ

ＦＯＳＣ＜２：０＞はＣＯＮＦＩＧ１のｂｉｔ２−０です。
ＦＯＳＣ＜２：０＞＝１００は上から４番目にあります。
ＩＮＴＯＳＣです。
ところで内蔵発振モードの８ＭＨｚはどこで設定するのでしょうか？
下はその設定を行なうレジスタ（ＯＳＣＣＯＮ）です。

［出典］Ｍｉｃｒｏｃｈｉｐ　Ｔｅｃｈｎｏｌｏｇｙ　Ｉｎｃ．ＰＩＣ１６Ｆ１８２７ＤａｔａＳｈｅｅｔ

そのｂｉｔ６−３（ＩＲＣＦ＜３：０＞）で設定するようです。
８ＭＨｚは下から２番目にあります。
ＩＲＣＦ＜３：０＞＝１１１０です。
それともうひとつＳｙｓｔｅｍ　Ｃｌｏｃｋ　Ｓｅｌｅｃｔ　ｂｉｔｓも設定が必要なようです。
ここで判断ミスをしてしまったのが４ｘＰＬＬが働かなかった原因でした。
そら判断ミスをしてしまいますよお。
１ｘ＝Ｉｎｔｅｒｎａｌ　ｏｓｃｉｌｌａｔｏｒ　ｂｌｏｃｋを選択しました。
ねえ。
そう思いますでしょう。
下が初めに書いたテストプログラムです。

;;;pic p16f1827 test ;25/1/3 1/4 ; #include<p16f1827.inc> ;cpuclock=32MHz(4xPLL),internal OSC ; __CONFIG _CONFIG1,_FOSC_INTOSC & _WDTE_OFF __CONFIG _CONFIG2,_PLLEN_ON ; w=0 f=1 c=0 z=2 ; cntr0=20 cntr2=21 testcntr=22 testcntr2=23 ; org 0 goto start ; org 5 start banksel ANSELA;BANK3 clrf ANSELA clrf ANSELB ; banksel TRISA;BANK1 clrf TRISA 　　clrf TRISB movlw 0f3 movwf OSCCON ; banksel LATA;BANK2 ; testloop movf testcntr,w movwf LATA testloop2 call t1ms decfsz testcntr2 goto testloop2 decf testcntr goto testloop ; ;1msec timer t1ms movlw 0a;=10 movwf cntr2 t1ms2 call tm100micros decfsz cntr2 goto t1ms2 return ; tm100micros movlw 64;=100 movwf cntr0 tm100micros2;1micros nop nop nop movlw 0ff;1/8 xorwf LATB;1/8 decfsz cntr0;1/8 goto tm100micros2;2/8 return ; end ;

このプログラムだと４ｘＰＬＬは利きません。
ＣＰＵクロックは８ＭＨｚになります。
プログラムの中ほど
ｍｏｖｌｗ　０ｆ３
ｍｏｖｗｆ　ＯＳＣＣＯＮ
と書いています。
これでは駄目だったのです。

下がそこを書き直したプログラムです。

;;;pic p16f1827 test ;25/1/3 1/4 1/6 ; #include<p16f1827.inc> ;cpuclock=32MHz(4xPLL),internal OSC ; __CONFIG _CONFIG1,_FOSC_INTOSC & _WDTE_OFF __CONFIG _CONFIG2,_PLLEN_ON ; w=0 f=1 c=0 z=2 ; cntr0=20 cntr2=21 testcntr=22 testcntr2=23 ; org 0 goto start ; org 5 start banksel ANSELA;BANK3 clrf ANSELA clrf ANSELB ; banksel TRISA;BANK1 clrf TRISA clrf TRISB movlw 0f0 movwf OSCCON ; banksel LATA;BANK2 ; testloop movf testcntr,w movwf LATA testloop2 call t1ms decfsz testcntr2 goto testloop2 decf testcntr goto testloop ; ;1msec timer t1ms movlw 0a;=10 movwf cntr2 t1ms2 call tm100micros decfsz cntr2 goto t1ms2 return ; tm100micros movlw 64;=100 movwf cntr0 tm100micros2;1micros nop nop nop movlw 0ff;1/8 xorwf LATB;1/8 decfsz cntr0;1/8 goto tm100micros2;2/8 return ; end ;

ｍｏｖｌｗ　０ｆ０
ｍｏｖｗｆ　ＯＳＣＣＯＮ
に変更しました。
ＳＣＳ＜１：０＞＝００　Ｃｌｏｃｋ　ｄｅｔｅｒｍｉｎｅｄ　ｂｙ　ＦＯＳＣ＜２：０＞　ｉｎ　Ｃｏｎｆｉｇｕｒａｔｉｏｎ　Ｗｏｒｄ　１
です。
なんとまあわかりにくいこと。
最初の図をよくよく見ますと。
図の右のほうＣｌｏｃｋ　ＣｏｎｔｒｏｌのところにＦＯＳＣ＜２：０＞とＳＣＳ＜１：０＞があります。
しかし。
それで理解せよって、ちょっと無理があるのじゃありませんか。

それはともかく。
そのようにプログラムを直したところ。

やっと１μｓの出力パルスが得られました。
ちょっとなんだかなあという感がありますが。

ともあれ。
やっと。
一件落着です。
やれやれ。
疲れること。

ＰＩＣＢＡＳＩＣコンパイラ［第１９９回］
２０２５．１．１６　ｕｐｌｏａｄ

前へ

ホームページトップへ戻る