- 締切済み
PIC16F819とMAX232Cについて困っています。
まだ駆け出しでわからないことだらけで、以下のプログラムをふまえてPIC16F819とMAX232C(RS232C？)を接続したいのですが、どうプログラム(アセンブラ)を追加したら、また回路的にどうしたらいいのかわからないので教えてください。以下のプログラム(コメント省略)は、電圧変化により出力(LEDの点灯数の変化)を行ったものです。 LIST p=PIC16F819 #include <P16F819.inc> __CONFIG _HS_OSC & _WDT_OFF & _PWRTE_ON & _CP_OFF & _LVP_OFF AD_DATA_H EQU 20h AD_DATA_L EQU 21h WAITCOUNT EQU 22h ORG H'00' GOTO START ORG H'04' GOTO START ;------------------------------ ; 初期設定 ;------------------------------ START BSF STATUS, RP0 BCF ADCON1, ADFM BCF ADCON1, ADCS2 BSF ADCON1, PCFG3 BSF ADCON1, PCFG2 BSF ADCON1, PCFG1 BCF ADCON1, PCFG0 MOVLW B'00000001' MOVWF TRISA MOVLW B'00000000' MOVWF TRISB BCF STATUS, RP0 CLRF ADCON0 CLRF PORTA CLRF PORTB ;------------------------------- ; メインルーチン ;------------------------------- MAIN CALL AD_CONVERT MOVLW b'10000000' SUBWF AD_DATA_H, W BTFSC STATUS, C GOTO V_UPPER_HALF GOTO V_LOWER_HALF V_UPPER_HALF MOVLW b'11000000' SUBWF AD_DATA_H, W BTFSC STATUS, C GOTO V_3_4 GOTO V_1_2 V_LOWER_HALF MOVLW b'01000000' SUBWF AD_DATA_H, W BTFSC STATUS, C GOTO V_1_4 GOTO V_ZERO V_3_4 MOVLW b'00000111' MOVWF PORTB GOTO MAIN V_1_2 MOVLW b'00000011' MOVWF PORTB GOTO MAIN V_1_4 MOVLW b'00000001' MOVWF PORTB GOTO MAIN V_ZERO MOVLW b'00000000' MOVWF PORTB GOTO MAIN ;--------------------------------- ; A/D 変換サブルーチン ;--------------------------------- AD_CONVERT MOVLW B'10000001' MOVWF ADCON0 CALL WAIT_100U BSF ADCON0, GO BTFSC ADCON0, GO GOTO ADLOOP MOVF ADRESH, W MOVWF AD_DATA_H MOVF ADRESL, W MOVWF AD_DATA_L RETURN ;------------------------------------------------------------ ; 100usec ( 100usec = 0.2u/Cycle at 20MHz x 500 ) ;------------------------------------------------------------ WAIT_100U MOVLW D'165' MOVWF WAITCOUNT WAIT_100UL DECFSZ WAITCOUNT,F GOTO WAIT_100UL RETURN END 長くなりましたがご教授どうかお願いします。
- Mystery0
- お礼率50% (2/4)
- その他（プログラミング・開発）
- 回答数2
- ありがとう数2
- みんなの回答 （2）
- 専門家の回答
みんなの回答
- ponpoko213
- ベストアンサー率50% (10/20)
はじめまして，ご質問の投稿からずいぶんと時間がたっているようなので，この回答が届くかどうかはわかりませんが，ご参考までに． いただいたプログラムはA/D変換のテストプログラムなので，経験の無い私にはお答えしかねるのですが，一般論で申し上げるのであれば，他の方のソースを読み，カットアンドコピー＆修正しながら習得してゆけばよろしいかと思います． あまり良い例とは言えないかもしれませんが，私も趣味でPICをいじっていて，ブログにその有様を公開しています． http://fp-masamichi.cocolog-nifty.com/pic/ 特段の目的も無く，趣味の日記代わりですが．今はRS-232CやデジタルI/O（液晶表示やスイッチパネルなど）制御を対象に，PIC16F88に厚くなっています．同じ16Fシリーズですからアセンブラは共通ですが，ご質問のPICとは異なります．PIC88はMax232等と組み合わせてRS-232C通信を実現するための非同期シリアルコミュニケーションI/F(UART)を内蔵しているタイプです．強力なPICですが，16F84Aよりも安いんですよ（秋月価格：18PinDIPタイプは230円です）． 2008/1/2の日記に公開したソースには，RS-232Cの簡単なテストソフトが入っています．暇さえあればRS-232Cへ"Hello World!!"とのべつ幕無し送信しまくるだけのものですが，Windowsマシン＋秋月のUSB-232C変換機にテラターム（フリーのターミナルソフト）を起動して38.4KBpsで連続受信しています．（ごくたまにPIC側の送信ミスなのか，テラターム側の受信こぼれが発生しますが，実用上は全く問題なく動作しています）もちろん，受信側も動作確認は済んでいます． 回路図も以前の記事に添付しています．ただ，RS232Cのドライバレシーバには，MAX232ではなく，もっと格安なADM3202を使っていますが． こんなに小さくて安いCPUですが，侮る無かれ，本当に奥が深いですね．お互い，楽しみましょう．
- zwi
- ベストアンサー率56% (730/1282)
PIC16F819はUARTという回路を内蔵していませんので、下記のページのようにには接続できません。↓ http://www.picfun.com/pic19.html PIC16F84が同様にUART回路なしですので、下記のページが参考になると思います。↓ http://www.picfun.com/equipj30.html タイマー割り込みを利用しているので難易度は上がりますが、PIC16F819でも利用可能です。 よくわからなければ、また質問してください。
関連するQ&A
- PIC 初歩プログラムについて
PICの初めてのプログラムを書いたのですがテキストのように動きません。 ORG 0 ; MAIN BSF STATUS,RP0 MOVLW B'00000000' ;ポートB 出力 MOVWF TRISB ; MOVLW B'00001111' ;ポートA 0,1,2,3入力 MOVWF TRISA ; BCF STATUS,RP0 SW BTFSS PORTA,0 GOTO LED1 BTFSS PORTA,1 GOTO LED2 GOTO SW LED1 MOVLW B'00000010' MOVWF PORTB GOTO SW LED2 MOVLW B'00000001' MOVWF PORTB GOTO SW END 入力SWを押していないときがHIです。したがって何もしなければSWのループになると思うのですが、LED2に行ってしまいます。BTFSC POARTA,1とすればSWループ状態ですがテキストとは違います。 何かおかしいのでしょうか？
- ベストアンサー
- その他（プログラミング・開発）
- マイコンPIC16F84Aについて
BSF STATUS,RP0 BSF TRISA,0 CLRF TRISB BCF STATUS,RP0 LOOP MOVLW０５ｈ MOVＷＦ,PORTB MAIN BTFSC PORT,0 こんな感じです。 入力にセンサーを使用してオンしたらLEDが点灯する回路にしたいのですがプログラムに詳しい方がいましたら教えていただけないでしょうか？
- 締切済み
- その他（プログラミング・開発）
- ＰＩＣ（デジタル電圧計のプログラム）について教えてください
今回ＰＩＣ16Ｆ819を用いてデジタル電圧計作成しています。 仕様は1点(0ｃｈ)０～５Ｖ 7セグメントＬＥＤにより0.0～4.9まで表示。 というものです。 とりあえず考えてはみましたが、0.1単位で表示させるときはどうしたらよいのでしょうか。 右側の7セグメントLEDが9になったら左側を+1して、4.9になったら0にクリアする・・という部分はなんとかできる気がするのですが・・ （今このプログラムにその部分はありません） ちなみにできたプログラム内容はＩＣに書き込み、ブレッドボード上の回路に入れて使用します。 その時2進の情報でも7セグメントで表示されるので、その部分のプログラムは必要ありません。 （0001は1,0010は2と表示される） __CONFIG _CP_OFF & _WDT_OFF & _PWRTE_ON & _HS_OSC & _LVP_OFF TCNT EQU 20H ORG 0x000 GOTO MAIN MAIN BSF STATUS,RP0 CLRF TRISB MOVLW 081H MOVWF OPTION_REG MOVLW 00EH MOVWF ADCON1 MOVLW 001H MOVWF TRISA BCF STATUS,RP0 LOOP MOVLW 081H MOVWF ADCON0 CALL ADWAIT BSF ADCON0,GO WAIT BTFSC ADCON0,GO GOTO WAIT MOVF ADRESH,W MOVWF PORTB CALL ADWAIT GOTO LOOP ADWAIT MOVLW 020H MOVWF TCNT NOP TLOOP DECFSZ TCNT GOTO TLOOP RETURN 初心者でテキストを見ながら必死でやっているので、 できれば解説もお願いします。 何か補足としてほしい情報があればまたご連絡ください。 よろしくお願いします。
- ベストアンサー
- その他（プログラミング・開発）
- PIC16F84Aで入力があるとスタートするプログラム
PIC16F84Aで、アセンブリ言語でプログラムをしています。 RA4を入力端子とし、入力があればプログラムがスタートするということをしたいんですけどうまくいきません。 私の作ったプログラムはこのようになっています。 listp=16f84A include <p16f84A.inc> __CONFIG _HS_OSC & _PWRTE_ON & _WDT_OFF tim1 EQU 0x20 org 0x00 NOP GOTO start start BSF STATUS,RP0 MOVLW B'00010000' MOVWF TRISA CLRF TRISB BCF STATUS,RP0 MOVLW B'00010000' MOVWF PORTA CLRF PORTB main MOVLW 001h MOVWF tim1 timlp1 BTFSC PORTA,5 CALL playball GOTO main playball MOVLW B'00001111' MOVWF PORTA MOVLW B'11111111' MOVWF PORTB RETURN 修正点などありましたら教えて下さい。
- ベストアンサー
- その他（プログラミング・開発）
- PICの条件分岐について
お世話になります。PICについて質問があります。ボタンを押せば、PORTBのLEDに対する出力が変わるという物ですが、意図したようになりません。PORTに対する設定は間違っていないと思うのですが、チャタリングを考慮したプログラムになっており、上手く条件分岐してくれません。条件というのは、PORTAに入力があれば、25ms待機して再度PORTAを見に行きます。そのときにもPORTAに入力があれば、変数に格納した数値を一つずつ減らしていき、そのときに０であればPORTBを設定したとおりに出力するというものです。以下がソースですが、ここがおかしいということだけでも教えてくださると助かります。よろしくお願いします。 list p=16f628a #include<p16f628a.inc> __CONFIG _CP_OFF & _WDT_OFF & _BODEN_OFF & _PWRTE_ON & _INTRC_OSC_NOCLKOUT & _MCLRE_OFF & _LVP_OFF SWI equ 0x21 SWI2 equ 0x22 CNT1 EQU 0x20 CNT2 EQU 0x21 ORG 0x000 goto main ORG 0x004 main bcf STATUS,RP0 bcf STATUS,RP1 clrf INTCON clrf PORTA movlw 0x07 movwf CMCON bsf STATUS,RP0 bsf PCON,OSCF clrf TRISB movlw 0x03 movwf TRISA bcf STATUS,RP0 clrf PORTA clrf PORTB clrf SWI main_loop btfss PORTA,1 goto flase_wait_routine goto trues_wait_routine flase_wait_routine goto main_loop trues_wait_routine call DLY_25 btfss PORTA,1 goto main_loop incf SWI,f movf SWI,W movwf SWI2 decfsz SWI2,f goto a_loop_1 bsf PORTB,0 bcf PORTB,1 bcf PORTB,2 bcf PORTB,3 goto main_loop a_loop_1 decfsz SWI2,f goto a_loop_2 bcf PORTB,0 bsf PORTB,1 bcf PORTB,2 bcf PORTB,3 goto main_loop a_loop_2 decfsz SWI2,f goto a_loop_3 bcf PORTB,0 bcf PORTB,1 bsf PORTB,2 bcf PORTB,3 goto main_loop a_loop_3 decfsz SWI2,f goto a_loop_4 bcf PORTB,0 bcf PORTB,1 bcf PORTB,2 bsf PORTB,3 clrf SWI goto main_loop a_loop_4 goto main_loop ;Delay Routine DLY_25 ; 25ms movlw d'25' movwf CNT1 DLP1;1ms movlw d'20' movwf CNT2 DLP2 nop nop decfsz CNT2,f goto DLP2 decfsz CNT1,f goto DLP1 return END
- ベストアンサー
- その他（プログラミング・開発）
- PIC16F88の使い方?に関する質問（アセンブラ）
現在PICの16F88に書きこむプログラムをアセンブラで書いてます。4番ピンのMCLRをRA5として使いたいのですが、MPLABのWATCHの機能を使って、ポートAの動きを見てみると、ポートAが出力になっているはずなのに、何をしてもポートAの0～4がHにならず、ポートAのRA5はBSF,BCFの命令が利きません。コンフィグの設定が怪しいと思うのですが、自分には理由が分からないので、誰か教えてください。お願いします。(下に書いたプログラムはテスト用に書いたプログラムなので特に目的はありません) ;外部発振,セラロック20MHz使用 LIST P=PIC16F88 INCLUDE P16F88.INC __CONFIG _CONFIG1, _CP_OFF & _DEBUG_OFF & _CPD_OFF & _LVP_OFF & _BODEN_OFF & _MCLR_OFF & _WDT_OFF & _PWRTE_ON & _HS_OSC __CONFIG _CONFIG2, _IESO_OFF & _FCMEN_OFF BSF STATUS,RP0 MOVLW B'000000' MOVWF TRISA MOVLW B'00000000' MOVWF TRISB BCF STATUS,RP0 MAIN CLRF PORTA MOVLW B'11111111' MOVWF PORTA MOVWF PORTB BSF PORTA,0 BCF PORTA,0 BSF PORTA,1 BCF PORTA,1 BSF PORTA,2 BCF PORTA,2 BSF PORTA,3 BCF PORTA,3 BSF PORTA,4 BCF PORTA,4 BSF PORTA,5 BCF PORTA,5 GOTO MAIN END
- ベストアンサー
- その他（インターネット・Webサービス）
- PIC12F683 AD変換について
PIC12F683のアセンブラの設定についてご教授ください。 以下のように設定したところGP4ピンにてAD変換できませんでした。 init MOVLW 07h MOVWF CMCON0 BSF STATUS,RP0 MOVLW b'00111000' MOVWF TRISIO MOVLW 070h MOVWF OSCCON MOVLW 018h MOVWF ANSEL BCF STATUS,RP0 MOVLW b'10001101' MOVWF ADCON0 「MOVLW 018h」の行を削除すると問題なくAD変換動作します。 しかしその場合「ANSEL」に070hが入るのでGP4がデジタル 入出力になり動作しない用に感じますが、なぜか動作します。 動作するので問題はないのですが、なぜかすっきりしません。 原因が分る方がおられましたら教えていただけますでしょうか？ .
- ベストアンサー
- その他([技術者向] コンピューター)
- 初歩のＰＩＣプログラム
最近ＰＩＣはじめたばかりの全くの初心者です。９番ピンのＬＥＤが点滅を繰り返すという１６Ｆ６２８用のプログラムがあります。 これを１６Ｆ８４Ａ用に書き換えたいんですが２９行目に「Symbol not previously defined (CMCON)」というエラーがでます。どうやら１６Ｆ８４にはCMCONがないからのようです。これをなんとか回避する方法はないんでしょうか。うまく動かない書き換えたプログラムを下におきます。 list p=16f84a w_temp EQU 0x70 status_temp EQU 0x71 CNT1 EQU 0x20 CNT2 EQU 0x21 ORG 0x000 goto main ORG 0x004 movwf w_temp movf STATUS,W movwf status_temp ;ISR Code movf status_temp,w movwf STATUS swapf w_temp,f swapf w_temp,w retfie main bcf STATUS,RP0 bcf STATUS,RP1 clrf INTCON clrf PORTA movlw 0x07 movwf CMCON ；ここでエラーがでる bsf STATUS,RP0 clrf TRISA clrf TRISB bcf STATUS,RP0 clrf PORTA clrf PORTB main_loop bsf PORTB,3 call DLY_250 bcf PORTB,3 call DLY_250 goto main_loop ;Dalay Routine DLY_250 ;250mS 以下省略 空白が文字化けして見にくくてすみません。
- ベストアンサー
- 物理学
- ＰＩＣ 初心者で行き詰まりました（汗、、、）
ＰＩＣ初心者です。よろしくお願いします。 ＰＩＣ16Ｆ84Ａを使って 「ポートＡ ０ｂIt 」 に入力があったとき（１になったとき） ラベルの「ＯＰＥＮ」に飛びポートＢのＬＥＤが一秒点灯。 「ポートＡ １bit 」に入力があったとき ラベルの「ＣＬＯＳＥ」に飛びポートＢのＬＥＤが一秒点灯。 これだけのプログラムなのですが ＭＰＬＡＢ ＩＤＥ ｖ8.63で Ｄｅｂｕｇ ａｌｌ すると ；の記述のところで表記のエラーが出ます。 プログラムはこちらです。 list P=pic16f84a include "p16f84a.inc" __CONFIG _HS_OSC & _WDT_OFF & _PWRTE_ON & _CP_OFF CNT1 EQU 0CH CNT2 EQU 0DH CNT3 EQU 0EH ORG 0 GOTO MAIN MAIN BSF STATUS,RP0 MOVWF TRISA CLRF TRISB BCF STATUS,RP0 CLRF PORTB CLRW LOOP BTFSC PORTA,0 GOTO OPEN BTFSC PORTA,1 GOTO CLOSE ；ここで「Symbol not previously defined (CLOSE）」 のエラー GOTO LOOP OPEN MOVLW 010H MOVWF PORTB CALL TIMER3 ；ここでSymbol not previously defined (TIMER3）エラー CLRF PORTB END CLOSE MOVLW 020H MOVWF PORTB CALL TIMER3 CLRF PORTB END TIMER1 MOVLW D'62' MOVWF CNT1 LOOP1 NOP DECFSZ CNT1,1 LOOP1 RETURN TIMER2 MOVLW D'100' MOVWF CNT2 LOOP2 NOP CALL TIMER1 DECFSZ CNT2,1 goto LOOP2 RETURN TIMER3 MOVLW D'100' MOVWF CNT3 LOOP3 NOP CALL TIMER2 DECFSZ CNT3,1 goto LOOP3 RETURN END 何日も堂々巡りをしてまして埒があかないので質問させていただきました。 どこが間違えているのでしょうか？？？？ よろしくお願いいたします。
- 締切済み
- その他（プログラミング・開発）
- ＰＩＣ16Ｆ84Ａから16Ｆ628Ａの変換について
以前ＰＩＣ16Ｆ84Ａで問題なく動作しているプログラムを 初期設定を変えて（これでいいのか？も疑問）16Ｆ628Ａで動かそうとしていますが サブルーチンに入り「タイマー」のルーチンから抜け出せないみたいです。 BILD ALL ではエラーは出ません。 割込みは正常に動作します。 どこがいけないのでしょうか？ よろしくお願いいたします。 プログラムはこちらです。 ;------------------------------------------------------------------------- ; 初期設定 list P=pic16f628a include "p16f628a.inc" __CONFIG _HS_OSC & _CP_OFF & _WDT_OFF & _PWRTE_ON & _BODEN_ON & _LVP_OFF & _MCLRE_OFF ORG 0 GOTO MAIN ;----------------------------------------------------------------------- ; 割り込み処理 ORG 4 ;割り込みアドレス CLRW CLRF PORTB ;ポートＢクリア GOTO MAIN ;----------------------------------------------------------------------- ; メインプログラム MAIN BCF STATUS,RP0 MOVLW B'00000111' MOVWF CMCON BSF INTCON,INTE ;割りこみ許可？ BSF STATUS,RP0 ;ポートＡを全て入力に設定 MOVWF TRISA MOVLW H'01' ;ポートＢは０（ゼロ）以外は出力に設定 MOVWF TRISB MOVLW 90H ;INT割り込み許可 MOVWF INTCON BCF STATUS,RP0 ;ポートＢをクリア CLRF PORTB CLRW ;---------------------------------------------------------------------- ; スイッチ入力チエック LOOP BTFSS PORTA,0 ;オープンＳＷがＯＮか？ GOTO OPEN ;ＯＮだったら ＯＰＥＮへ GOTO LOOP ;----------------------------------------------------------------------- ; オープン動作 OPEN MOVLW 010H ;ポートＢ４番に５Ｖ出力（リレーＯＮ） MOVWF PORTB MOVLW D'250' ;動作時間 '250'設定 MOVWF 0EH ;アドレス0EHに250を入力 CALL LOOP3 ;サブルーチンLOOP3を呼び出す GOTO MAIN ;サブルーチンが終わったら MAIN に戻れ ;------------------------------------------------------------------------ ;----------------------------------------------------------------------- ; サブルーチン（タイマー） TIMER1 MOVLW D'220' MOVWF 0CH LOOP1 NOP DECFSZ 0CH,1 GOTO LOOP1 RETURN TIMER2 MOVLW D'100' ;アドレス0DHに100を入力 MOVWF 0DH LOOP2 NOP CALL TIMER1 ;TIMER1を呼び出し（行く） DECFSZ 0DH,1 ;アドレス0DH から１を引き算する GOTO LOOP2 ;結果が"0"でなかったら LOOP2に戻ってまた引き算 RETURN ;引き算の結果が"0"になったら「CALL」した「次に（下）」へ戻る LOOP3 NOP ;何もしない CALL TIMER2 ;TIMER2を呼び出す（行く） DECFSZ 0EH,1 GOTO LOOP3 RETURN END END
- ベストアンサー
- その他(ソフトウェア)
お礼
有難うございます。参考にして頑張ってみたいと思います。まだまだ、未熟者ですのでまたわからない事が沢山あると思いますので、その時はまたよろしくお願いします。きっと2,3日したらまた質問させていただくと思います(笑)