２０２５．３．１５
前へ
次へ
ホームページトップへ戻る


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

［第２３５回］



●ＰＩＣ１６Ｆ６２８Ａ（３）／ＰＩＣＷＲも／ＥＲＡＳＥもＯＫになりました！

現行のＰＩＣ　ＷＲＩＴＥＲプログラムではＰＩＣ１６Ｆ６２８Ａは／ＥＲＡＳＥと／ＰＩＣＷＲはエラーになってしまいます。
そこでまずは／ＥＲＡＳＥについて検討しました。
考えるべき点は２つです。
一つ目はＶｄｄとＶｐｐの起動順序です。
それについては［第１８９回］に書きました。
当初はそれを受けてそれまでのＰＩＣ１６Ｆ８４用ＷＲＩＴＥＲプログラムをもとにＰＩＣ１６Ｆ６２７専用のＷＲＩＴＥＲプログラムを作ってテストをしてきました。
その後にＰＩＣ１６Ｆ８４Ａがまともに書けないという問題にぶつかってしまいその対策として最初にＶｄｄをＯＮにしてから数百ｍｓウェイトした後にＶｐｐをＯＮにするようにしたところ／ＰＩＣＷＲも／ＰＩＣＲＤもまともにできるようになりました。
その時点でＰＩＣ１６Ｆ８４用とＰＩＣ１６Ｆ６２７用とＰＩＣ１６Ｆ８４Ａ用のＷＲＩＴＥＲプログラムができてしまいました。
各プログラムを比較したところ最初の電圧を投入するところ以外は同じプログラムでいけそうということがわかってきました。
そこでＰＩＣ１６Ｆ８４Ａ用に作ったＷＲＩＴＥＲプログラムでＰＩＣ１６Ｆ８４とＰＩＣ１６Ｆ６２７を再度テストしたところどちらも正しく書き込み読み出し消去できました。
最終的にＰＩＣ１６Ｆ８４Ａ用ＷＲＩＴＥＲプログラムが共通して使えることになったのですが。
ということからするとＰＩＣ１６Ｆ６２７も電圧の投入順序にはこだわらなくてもよいということになります。
なんだかなあという感じではありましたが、それでいけるなら回路もプログラムもそれだけシンプルになるので助かります。
ところがそのＷＲＩＴＥＲプログラムはＰＩＣ１６Ｆ６２８Ａでは通用しませんでした。
ＰＩＣ１６Ｆ８４／８４ＡはＶｐｐが１２Ｖ〜１４ＶでＰＩＣ１６Ｆ６２７はＶｄｄ＋３．５Ｖ〜１３．５ＶなのですがＶｐｐ＝９Ｖでも正しく機能しました。
しかしＰＩＣ１６Ｆ６２８ＡのＶｐｐは１０Ｖ〜１３．５Ｖとなっていて事実Ｖｐｐ＝９Ｖでは正しくＲＥＡＤできませんでした。
［２０２５．３．１６注記］上記には記憶違いがありました。ノートを確認したところ１６Ｆ８４も１６Ｆ８４Ａも１６Ｆ６２７もＶｐｐ＝９Ｖでは駄目な場合があると書いていました。いずれもＶｐｐ＝１３．５Ｖが必要でした。
Ｖｐｐ＝１３．５Ｖにしたところ／ＰＩＣＲＤは正しく実行できましたが／ＰＩＣＷＲと／ＥＲＡＳＥは上に書きましたようにエラーになってしまいました。
そういうことからここはまずはルール通りということでＶｄｄとＶｐｐの起動順序についてはＤａｔａＳｈｅｅｔの通り、最初にＶｐｐをＯＮにしてから次にＶｄｄをＯＮにするようにプログラムを改めました。
もうひとつＤａｔａＳｈｅｅｔをよくよく確認したところバルクイレーズについてはＰＩＣ１６Ｆ６２８ＡはＰＩＣ１６Ｆ６２７／６２８とはコマンドが異なっていました。
どうして同じコマンドにしないのでしょうかねえ。
文句を言っても仕方がありませんからそこもプログラムを変更しました。
そのように直して作成したＰＩＣ１６Ｆ６２８Ａ用ＷＲＩＴＥＲプログラムを使ってＰＩＣ１６Ｆ６２８Ａに／ＥＲＡＳＥを実行し、続いて確認のために／ＰＩＣＲＤを実行しました。
logfile piciolog\0311104215.txt open
*** pic i/o ***
picio-30 connected
>/erase
400C[FF][3F][FF][3F]
>/picrd
400C[FF][3F][FF][3F]
type=04,uadrs=00
[08]
0000[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
0010[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
0020[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
0030[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
0040[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
0050[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]


07D0[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
07E0[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
07F0[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
[01]
type=04,uadrs=01
[08]
400E[FF][3F]
[10]
>

おお。
／ＥＲＡＳＥはうまくいったようです。
それならひょっとして／ＰＩＣＷＲもうまくいくかと期待したのですが…。

テストプログラム１６Ｆ６２８ＡＴＥＳＴ．ＨＥＸをロードして/PICＷＲを実行しました。 
>/hload 16f628atest.hex
loading 16f628atest.hex ...
i=175,binbfend=72
>/picwr
400C[FF][3F][FF][3F]
i=6,b=2,[04]0000
[05][04][02][00][00][00][00][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF]
[01]
i=12,b=2,[00]0000
[05][00][02][00][00][05][28][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF]
[01]
i=22,b=6,[00]000a
[05][00][06][00][0A][07][30][9F][00][83][16][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF]
[01]
i=42,b=16,[00]0010
[05][00][10][00][10][85][01][86][01][83][12][21][08][85][00][12][20][A2][0B][0D][28]
[01]
i=62,b=16,[00]0020
[05][00][10][00][20][A1][03][0B][28][FA][30][A0][00][86][06][A0][0B][14][28][08][00]
[01]
i=68,b=2,[00]400e
[05][00][02][40][0E][F9][3F][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF]
[03]
picwrend

>


続いてベリファイを実行しました。 
>/verify
inbfend=0
400C[FF][3F][FF][3F]
i=6,b=2,[04]0000
[06][04][02][00][00][00][00][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF]
(01)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)
i=12,b=2,[00]0000
[06][00][02][00][00][05][28][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF]
(02)(00)(00)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)
[x][x]error!
i=22,b=6,[00]000a
[06][00][06][00][0A][07][30][9F][00][83][16][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF]
(06)(00)(00)(00)(00)(00)(00)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)
[x][x][x][o][x][x]error!
i=42,b=16,[00]0010
[06][00][10][00][10][85][01][86][01][83][12][21][08][85][00][12][20][A2][0B][0D][28]
(10)(00)(00)(00)(00)(00)(00)(00)(00)(00)(00)(00)(00)(00)(00)(00)(00)
[x][x][x][x][x][x][x][x][x][o][x][x][x][x][x][x]error!
i=62,b=16,[00]0020
[06][00][10][00][20][A1][03][0B][28][FA][30][A0][00][86][06][A0][0B][14][28][08][00]
(10)(00)(00)(00)(00)(00)(00)(00)(00)(00)(00)(00)(00)(00)(00)(00)(00)
[x][x][x][x][x][x][x][o][x][x][x][x][x][x][x][o]error!
i=68,b=2,[00]400e
[06][00][02][40][0E][F9][3F][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF]
(10)(BD)(1E)(50)(28)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)
[x][x]error!
vfend
error=38
>

エラーになってしまいました。

／ＰＩＣＲＤコマンドを実行しました。 
>/picrd
400C[FF][3F][FF][3F]
type=04,uadrs=00
[08]
0000[10][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00]
0010[10][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00]
0020[10][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00]
0030[10][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00]
0040[10][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00]
0050[10][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00][00]

やっぱり／ＰＩＣＷＲは駄目でした。

あらためてＰＩＣ１６Ｆ６２８ＡのＤａｔａＳｈｅｅｔを確認してみたところ書き込みプログラムも変更が必要ということがわかりました。
ＰＩＣ１６Ｆ６２８とＰＩＣ１６Ｆ６２８Ａで書き込みプログラムが違っているなんて。
ほんとため息が出てしまいます。

再テストのための準備として／ＥＲＡＳＥを実行し全部消去しました。
そのあと／ＰＩＣＲＤを実行して消去できていることを確認しました。 
>/erase
400C[FF][3F][FF][3F]
>/picrd
400C[FF][3F][FF][3F]
type=04,uadrs=00
[08]
0000[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
0010[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
0020[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
0030[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
0040[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
0050[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]


07D0[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
07E0[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
07F0[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
[01]
type=04,uadrs=01
[08]
400E[FF][3F]
[10]
>/exit

リモート接続を終了しました
logfile closed at Tue Mar 11 10:52:22 2025

全部消去されていることを確認しました。
そこまで準備したあとＷＲＩＴＥプログラムを直して再テストをしました。
／ＨＬＯＡＤコヒマンドで１８Ｆ６２８ＡＴＥＳＴ．ＨＥＸをロードしたあと／ＰＩＣＷＲを実行しました。 
logfile piciolog\0311113305.txt open
*** pic i/o ***
picio-30 connected
>/hload 16f628atest.hex
loading 16f628atest.hex ...
i=175,binbfend=72
>/picwr
400C[FF][3F][FF][3F]
i=6,b=2,[04]0000
[05][04][02][00][00][00][00][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF]
[01]
i=12,b=2,[00]0000
[05][00][02][00][00][05][28][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF]
[01]
i=22,b=6,[00]000a
[05][00][06][00][0A][07][30][9F][00][83][16][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF]
[01]
i=42,b=16,[00]0010
[05][00][10][00][10][85][01][86][01][83][12][21][08][85][00][12][20][A2][0B][0D][28]
[01]
i=62,b=16,[00]0020
[05][00][10][00][20][A1][03][0B][28][FA][30][A0][00][86][06][A0][0B][14][28][08][00]
[01]
i=68,b=2,[00]400e
[05][00][02][40][0E][F9][3F][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF]
[03]
picwrend

>


／ＶＥＲＩＦＹを実行しました。 
>/verify
inbfend=0
400C[FF][3F][FF][3F]
i=6,b=2,[04]0000
[06][04][02][00][00][00][00][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF]
(01)(FF)(3F)(FF)(3F)(46)(D3)(A3)(24)(9B)(E5)(30)(08)(50)(80)(B8)(05)
i=12,b=2,[00]0000
[06][00][02][00][00][05][28][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF]
(02)(05)(28)(FF)(3F)(46)(D3)(A3)(24)(9B)(E5)(30)(08)(50)(80)(B8)(05)
[o][o]
i=22,b=6,[00]000a
[06][00][06][00][0A][07][30][9F][00][83][16][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF]
(06)(07)(30)(9F)(00)(83)(16)(A3)(24)(9B)(E5)(30)(08)(50)(80)(B8)(05)
[o][o][o][o][o][o]
i=42,b=16,[00]0010
[06][00][10][00][10][85][01][86][01][83][12][21][08][85][00][12][20][A2][0B][0D][28]
(10)(85)(01)(86)(01)(83)(12)(21)(08)(85)(00)(12)(20)(A2)(0B)(0D)(28)
[o][o][o][o][o][o][o][o][o][o][o][o][o][o][o][o]
i=62,b=16,[00]0020
[06][00][10][00][20][A1][03][0B][28][FA][30][A0][00][86][06][A0][0B][14][28][08][00]
(10)(A1)(03)(0B)(28)(FA)(30)(A0)(00)(86)(06)(A0)(0B)(14)(28)(08)(00)
[o][o][o][o][o][o][o][o][o][o][o][o][o][o][o][o]
i=68,b=2,[00]400e
[06][00][02][40][0E][F9][3F][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF]
(10)(F9)(3F)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)(FF)(3F)
[o][o]
vfend
error=0
>

今度はＥＲＲＯＲ＝０になりました。
／ＰＩＣＷＲもうまくいきました。

念のために／ＰＩＣＲＤを実行して確認しました。 
>/picrdf 16f628atest250311.hex
400C[FF][3F][FF][3F]
type=04,uadrs=00
[08]
0000[10][05][28][FF][3F][FF][3F][FF][3F][FF][3F][07][30][9F][00][83][16]
0010[10][85][01][86][01][83][12][21][08][85][00][12][20][A2][0B][0D][28]
0020[10][A1][03][0B][28][FA][30][A0][00][86][06][A0][0B][14][28][08][00]
0030[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
0040[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
0050[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]


07D0[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
07E0[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
07F0[10][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F][FF][3F]
[01]
type=04,uadrs=01
[08]
400E[F9][3F]
[10]
>/exit

リモート接続を終了しました
logfile closed at Tue Mar 11 11:42:06 2025


やっと。
ＰＩＣ１６Ｆ６２８Ａ用のＷＲＩＴＥＲプログラムができました。
ところで。
結局のところ／ＥＲＡＳＥも／ＰＩＣＷＲもプログラムが正しく対応できていなかったことがエラーの原因でした。
ひょっとするとＶｄｄとＶｐｐの起動順序はエラーとは無関係だったかも。
そこで。
とりあえずうまくいったＰＩＣ１６Ｆ６２８Ａ用のＷＲＩＴＥＲプログラムのうちＶｄｄとＶｐｐの起動順序のところだけをＰＩＣ１６Ｆ８４Ａ用ＷＲＩＴＥＲプログラムと同じにしたプログラムを作成しました。
テスト結果は冗長になりますから省略しますがそのようにしたＷＲＩＴＥＲプログラムでもＰＩＣ１６Ｆ６２８Ａは正しく書き込み読み出し消去できました。

ＰＩＣ１６Ｆ６２８Ａにテストプログラムを書き込んだあと実際に動作テストをしてみました。

ＰＩＣ１６Ｆ８４、ＰＩＣ１６Ｆ６２７と同じように正しく動作しました。

あとはコピープロテクトについてですが。
本日も時間がありません。
それは次回に書くことにいたします。

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

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