PICアセンブラ、これって変？

PIC16F84でのアセンブラなのですが、下記のプログラムで・・・。

MAIN
　　　　MOVLW　B'00000000'
　　　　MOVWF　PORTB
　　　　BTFSC　PORTA,3
　　　　GOTO　 FINISH
　　　　GOTO　 MAIN
FINISH
　　　　MOVLW　B'11111111'
　　　　MOVWF　PORTB
　　　　END

PortAが入力、Bが出力なのですが、MAINでループしながら待機、
PortAの3bitめがHになったらPortBをすべて立てて終了という感じに
なると思いますが、上手くいかないんです。

3bit目にあらかじめ+5Vを印加しておくと、一瞬でPortBがすべて立つのですが、
ループ中にやっても何も変化がありません。

ループしていないか、判定ができていないかのどちらかなのですが・・・。

デバッグしてみても、きちんとループ・判定できているのですが
いざ焼いてみると動作しません。わかりますでしょうか。

No.6 ベストアンサー 回答者： hamuzo 回答日時： 2001/06/23 13:09

回路の方はどうなっていますか？

特に入力ピンの処理は行っていますか？

入力ピンが不安定だときちんと動きません。
もし他のPORTAのピンを使っていなのであればＧＮＤなどにおとすか出力ピンに設定してしまいましょう。

+5Vを印加とのことですが５Ｖをいれる前のPORTA(3)はＧＮＤになっているのでしょうか？
5Vを直接いれるのであれば１０ＫΩ程度の抵抗でPORTA(3)をＧＮＤに接続しておいてスイッチなどで５Ｖが直接入るようにしてやればいいです。

また、
　　　　CLRF PORTB
MAIN
　　　　BTFSC　PORTA,3
　　　　GOTO　 FINISH
　　　　GOTO　 MAIN
こっちの方が気持ち的にいいかな？
(PORTBにCLRFって使えたっけな？)

この回答へのお礼

ありがとうございます。
入力ピンの設定はできているのですが、どうしてもダメでした。
ループするところでしていんたいので、もしやと思ってクリスタルを抜いてみたら・・・同じ症状でした。

すみません、発振部分がイカれていたようです。
なんとか正常に動作させることができました。お騒がせして申し訳ありません。

お礼日時：2001/06/25 15:43

No.5 回答者： vcmshiro 回答日時： 2001/06/23 03:53

＼(^o^)/コンバンワ！！

ＩＭＵＳＡＩ時代から、ＴＫ８０を経て現在まで現役で仕事をしています。
アセンブラなどは懐かしく思い、ついチョッカイを書いてみました。

ＰＩＣなど秋月電気通商さんなどで売っているあれ？でしょうか？

ＰＩＣは使った事ありませんので、知りませんが予測してみますのでチャレンジしてみて下さい。

【ご質問の整理】
ご質問のビットを確認しているのだが、分岐で実行されない。と言う事ですね。

【根本原因】
フラグがたたないので分岐しないと思われます。

８０系のＣＰＵは、ＭＯＶ命令などで値を移動しても、移動した数値によりフラグレジスターは変化しません。
６８系のＭＰＵは、ＭＯＶ命令などで数値を移動するだけで、フラグレジスターに変化が表れます。

このＰＩＣはどうやら６８系ＣＰＵみたいですね。

BTFSC　PORTA,3 の命令を
BTFSS　PORTA,3 に変更してみて下さい。

ＰＯＲＴＡの３ビット目が、ｔｒｕｅであれば、次の命令をスキップする。と言う事になり、目的が果たせるかと思われます。

我々の時代は、ＩＣＥと言うものを使ってＣＰＵ自体をシュミレートするマシンを使って、メインボードなどのハードウエア欠陥を治したものです。あの頃が懐かしい。

ＰＩＣのニューモニック一覧表を添付しておきました。

楽しいＰＩＣライフを過ごせると良いですね。

参考URL：http://www.phys.waseda.ac.jp/shalab/~riku/resear …

この回答へのお礼

このPICは、ビットのH/Lで単純分岐してくれるので、フラグは考えなくても良いようです。
プログラムには誤りが無いようなんですが（デバッグokでした）、原因は発振部分の不良により、プログラムカウンタが進んでいなかったようです。
お騒がせして申し訳ありません。ありがとうございました。

お礼日時：2001/06/25 15:47

No.4 回答者： KOH_da 回答日時： 2001/06/23 03:40

プログラムにおかしいところはないように見えます。

PORTAのI/Oの設定をしていない。
配線が間違っている。
シリアル通信でON=1と思い込んでいる。

などが考えられます。
シリアル通信ではON=1のときと、ON=0のときがありますよね。
たとえば、PCとWonderSwanが逆だということに気付かないと...
って、それは私のことです(^^;)。

PORTAの入出力を設定しているところを数行見せてください。

この回答への補足

デバッガでは問題なかったのでハード的なものかと思ったのですが、正にその通りでした。(T_T)
クリスタルにつけたコンデンサの不良で、発振されていなかったようです。交換したら無事に動作しました。お騒がせしてすみません・・・。

補足日時：2001/06/25 15:47

No.3 回答者： gould09 回答日時： 2001/06/23 00:48

PORTAの初期化を行っていないようですが大丈夫でしょうか？

よく分かっていないのですが、レジスタのアドレスを初期化で入れるのではないでしょうか？
違っていたら、ごめんなさい。

この回答への補足

初期化として、入出力のモードを設定、出力データを設定というのが必要なのですが、
とりあえずPortAは入力に指定し、出力はしないので初期値は0としてあります。
う～ん、お手上げかもしれません・・・。(笑)
お手を煩わせてしまって申し訳ありません。

補足日時：2001/06/23 01:09

No.2 回答者： gould09 回答日時： 2001/06/22 22:11

BTFSCを調べた所オペランドのビット指定が０～７と成っています。

プログラムで３を指定していると言う事は、４番目のビットになるのではないでしょうか？


BTFSC
f レジスタ の指定ビットが 0 なら次の命令をスキップ

書式
[label]BTFSCf, b( label は省略可　はスペースを示す )

オペランド
f：ファイル・レジスタのアドレス ( 00(00h) ～ 127(7Fh) )
b：ビット指定 ( 0 ～ 7 )

この回答への補足

ありがとうございます。一通りの入力ピンを試してみたのですが、だめでした。
リセット時初からHiになっている時のみ正しく動くのですが、やはりハードウェア側がおかしいのでしょうか・・・。

補足日時：2001/06/22 23:10

No.1 回答者： gould09 回答日時： 2001/06/22 20:11

すみません。

回答では無いです。

PICアセンブラがどのくらい有名なのかわからないのですが、
アセンブラを知っていてもPICアセンブラを知らない人も多いと思います。
PICアセンブラの説明も載っていれば、回答出来る人が増えると思いますが。

例えばBTFSCのコマンドの説明です。
それがわかれば、なぜGOTO文が２つ並んでいるのか分かるのでしょうか?
　　　　GOTO　 FINISH
　　　　GOTO　 MAIN

この回答への補足

そうですね。お手数をおかけしてすみません。

MOVLW　B'00000000'
0hをWReg（作業領域）にコピーします。

MOVWF　PORTB
Wregの内容をPORTBに移動します。

これで、マイコンのポートB（出力用/8bit）のビットをすべて0にします。

BTFSC　PORTA,3
ポートA（入力用）の3ビット目を見て、0だったら直後の命令をスキップします。

GOTO　 FINISH
GOTO　 MAIN
1だったらFINISHにジャンプ、それ以外はループ続行です。

FINISH
内では、同じように出力ビットをすべて立てて終了します。

ということなのですが・・・。
5V駆動なので、この3bit目に5Vを入れたりGNDに落としたりしているのですが、ダメでした・・・。(汗)

補足日時：2001/06/22 20:41