FJCニュ－ス11月号

新着順:1/87

投稿者：ty 投稿日：2009年10月28日(水)16時08分17秒

　通報

FJCニュ－ス11月号今月は2相ユニポーラパルスモーター制御のサンプル１２Ｃ５０９Ａの MPSA ソースファイルです。回路図とうはホームページのパルスモータのページをご覧ください｡ ;------------------------------------------- LIST P=12C509A #include "P12C509A.INC" ;内部クロック　4MHz ;MCLR を　入力ポ－ト　ＧＰ３　で使う __CONFIG _MCLRE_OFF & _CP_OFF & _WDT_OFF &_IntRC_OSC __IDLOCS H'0306' ; 1相励磁パルスモータコントローラ t.yamahara ; ; ; ; GND s1 s2 s3 ; ┌────────────┐ ; │⑧ ⑦ ⑥ ⑤ │ ; │VSS GP0 GP1 GP2 │ ; │ PIC12C509 │ ; │VDD GP5 GP4 GP3 │ ; │① ② ③ ④ │ ; └────────────┘ ; DC5V ccw s4 ｃｗ ; IN IN ; s1 equ 0 ;パルスモターφ１出力 GPIO_0 s2 equ 1 ;パルスモターφ２出力 GPIO_1 s3 equ 2 ;パルスモターφ３出力 GPIO_2 s4 equ 4 ;パルスモターφ４出力 GPIO_4 ccwin equ 5 ;ＣＣＷ回転司令負パルス入力 GPIO_5 cwin equ 3 ;ＣＣＷ回転司令負パルス入 GPIO_3 stc equ 8 ;モーター位置カウンター tmdt equ 9 ;タイマーデーター cu1 equ 10 ;汎用 cu2 equ 11 bf equ 12 gpbf equ 13 ;ＧＰＩＯｎｏバッファ org 0 goto start ; ＧＰＩＯの読み込み ; １２Ｃ５０９Ａを内部ＲＣ発振で使用しますので1サイクル４ＭＨｚ／4 ; １uｓで約１０uｓの間にｇｐiｏの値が変化すると読み直しとなり ; ＣＣＷ，ＣＷ制御パルスに入る１０uｓ以下のノイズをカットできます。 ; ＮＯＰを１つ増やす事で１uｓフイルターを伸ばせます｡ ingp movf GPIO,0 ;gpbf に GPIO の値を入れる。 movwf gpbf nop ; １uｓ nop nop movf GPIO,0 ;GPIOの値が変わっていればingpへジャンプ subwf gpbf,0 btfss 3,2 goto ingp retlw 0 ; 電源立ち上がり時の誤動作防止タイマー start clrf cu1 clrf cu2 movlw 2 movwf bf start1 nop decfsz cu1,1 goto start1 decfsz cu2,1 goto start1 decfsz bf,1 goto start1 movlw 101000b ; GPIO i/o set TRIS GPIO clrf GPIO movlw 000111b ; trm0 i/o Pul up OPTION loop0 clrf GPIO ;motor off bsf GPIO,s1 ;モターを０ポジションにセット clrf stc loop1 call ingp ;１０uｓソフトフイルターをとうして入力監視 btfss gpbf,cwin ;ＣＷパルスＩＮ goto incs btfss gpbf,ccwin ;ＣＣＷパルスＩＮ goto decs goto loop1 ;ＣＷパルスＩＮ incs incf stc,1 ;位置カウンター＋１(１ステップ時計回り位置） movlw 4 subwf stc,0 btfss 3,2 goto tmset clrf stc goto tmset ; ＣＣＷパルスＩＮ decs movlw 1 ;位置カウンター＋１(１ステップ反時計回り位置） subwf stc,1 btfsc 3,0 goto tmset movlw 3 movwf stc ; 位置カウンターに合わせて励磁 tmset movlw 1 subwf stc,0 btfsc 3,2 goto p1 movlw 2 subwf stc,0 btfsc 3,2 goto p2 movlw 3 subwf stc,0 btfsc 3,2 goto p3 bsf GPIO,s1 ;モータ位置 0 励磁 bcf GPIO,s2 bcf GPIO,s3 bcf GPIO,s4 goto tmon p1 bcf GPIO,s1 ;モータ位置１励磁 bsf GPIO,s2 bcf GPIO,s3 bcf GPIO,s4 goto tmon p2 bcf GPIO,s1 ;モータ位置２励磁 bcf GPIO,s2 bsf GPIO,s3 bcf GPIO,s4 goto tmon p3 bcf GPIO,s1 ;モータ位置３励磁 bcf GPIO,s2 bcf GPIO,s3 bsf GPIO,s4 goto tmon ; 負入力のパルスがＯＦＦ（電圧Ｈ）になるまで待つ。 tmon call ingp btfss gpbf,cwin goto tmon btfss gpbf,ccwin goto tmon goto loop1 END

》記事一覧表示

新着順:1/87

《前のページ | 次のページ》

JG1FJCの部屋

投稿募集！　スレッド一覧