AT89C51檢測旋轉(zhuǎn)光電編碼器程序

1、光電編碼器輸出正交信號方式如下圖所示： 順時針旋轉(zhuǎn)A超前B相信號90°： A: _|-|_|-|_ B: _|-|_|-| 逆時針旋轉(zhuǎn)B相信號超前A相信號90°： A:_|-|_|-|_ B:_|-|_|-|_ 下面是AT89C2051檢測并進行二倍頻程序： ;采用外部中斷方式 ORG 00H LJMP MAIN ORG 03H LJMP INT0 ORG 13H LJMP INT1 ORG 50H MAIN: MOV SP,#40H MOV P3,#0FFH MOV IE,#10000101B ;設(shè)定外部中斷 MOV TCON,#00000101B SETB EA MA1

2、: MOV P1,#0FFH MOV P3,#0FFH SJMP MA1 ;* INT0: PUSH PSW CLR EA I0: JNB P1.0,FAN CLR P3.4 SJMP INT0END FAN: CLR P3.5 INT0END: POP PSW SETB EA MOV P3,#0FFH RETI INT1: PUSH PSW CLR EA JNB P1.0,ZHENG CLR P3.5 SJMP INT1END ZHENG: CLR P3.4 INT1END: POP PSW SETB EA MOV P3,#0FFH RETI 處理后由P3.4P3.5分別在順時針和逆時針時輸

3、出脈沖信號，送入AT89C51的T0,T1進行計數(shù) 下面是計數(shù)及處理程序 AT89C51負責信號處理并在12864液晶顯示模塊上把實際值顯示出來，分辨率0.05MM 液晶模塊用的金鵬的OCMJ4X8C RS EQU P0.0 ;選擇I/O口定義，RS為指令/數(shù)據(jù)選擇端 RW EQU P0.1 E EQU P0.2 ;選擇I/O口定義，E為使能端 PSB EQU P0.3 RESET EQU P0.4 FIRST_COL EQU 36H ;定義字符/漢字顯示起始行 FIRST_ROW EQU 37H ;定義字符/漢字顯示起始列 WORD_WID EQU 38H ;定義字符/漢字顯示長度 WORD

4、_LIN EQU 39H ;定義字符/漢字顯示行數(shù) FIRST_ADD EQU 3AH ;定義字符/漢字顯示起始位置 START_ADD EQU 3BH ;起始位置緩存單元 FIRST_LIN EQU 3CH ;起始行位置緩存單元 A0 EQU 30H A1 EQU 31H ; A2 EQU 32H B0 EQU 33H B1 EQU 34H Z0 EQU 35H ; Z5 BIT 20H.0 ;正反負數(shù)標志 ORG 00H LJMP MAIN ORG 0BH LJMP TT0 ORG 1BH LJMP TT1 ORG 50H MAIN: MOV SP,#40h SETB RESET SETB

5、 PSB CLR RW MOV A0,#00H MOV A1,#00H MOV A2,#00H MOV B0,#00H MOV B1,#00H CLR Z5 MOV TMOD,#66H ;定時器定時方式2，自動裝載 MOV TH0,#0ECH ;計夠20個脈沖產(chǎn)生次中斷 MOV TL0,#0ECH ;設(shè)檢測盤周長為250MM，1P脈沖為0.05MM MOV TH1,#0ECH ;2P脈沖為0.1MM，20P為1MM，200P為10MM MOV TL1,#0ECH SETB TR0 SETB TR1 SETB ET1 SETB ET0 SETB EA QIU1: LCALL INITIL ;調(diào)用

6、系統(tǒng)初始化程序 MOV A, #0CH ;開顯示，關(guān)游標 LCALL INPUT LCALL DELAY01 MOV A, #01H ;DDRAM清零，DDRAM地址計數(shù)器到00H LCALL INPUT LCALL DELAY01 LCALL QIU2 QIU3: LCALL INITIL ;調(diào)用系統(tǒng)初始化程序 MOV A, #0CH ;開顯示，關(guān)游標 LCALL INPUT LCALL DELAY01 MOV A, #01H ;DDRAM清零，DDRAM地址計數(shù)器到00H LCALL INPUT LCALL DELAY01 MOV FIRST_ADD,#00H ;設(shè)定字符/漢字顯示起始位置

7、為第一個顯示單元 MOV FIRST_LIN,#01H ;設(shè)定字符/漢字顯示起始位置為第一行 MOV word_WID,#08H ;每行顯示漢字個數(shù) MOV word_LIN,#04H ;顯示行數(shù) MOV START_ADD,#00H ;清首個顯示地址緩存單元 SETB TR0 LJMP QIU2 ;-* QIU: LJMP QIU1 ;* TT0: PUSH PSW ;計夠20P脈沖中斷發(fā)生即1MM PUSH A MOV A,A2 JNZ T00 MOV A,A1 JNZ T00 MOV A,A0 JNZ T00 CLR Z5 T00: JB Z5,T02 MOV A,A0 ADD A,#0

8、1H DA A MOV A0,A CJNE A,#00H,TT0END ;夠100即100mm ;MOV A0,#00H MOV A,A1 ADD A,#01H DA A MOV A1,A CJNE A,#00H,TT0END ;夠100即10000MM=10M ; MOV A1,#00H MOV A,A2 ADD A,#01H DA A MOV A2,A CJNE A,#03H,TT0END ;夠3即30M MOV A2,#00H MOV A1,#00H MOV A0,#00H CLR Z5 SJMP TT0END T02: MOV A,A0 ADD A,#99H ;-1程序 DA A MO

9、V A0,A CJNE A,#99H,TT0END ;有借位產(chǎn)生執(zhí)行下面程序 ; MOV A0,A MOV A,A1 ADD A,#99H DA A MOV A1,A CJNE A,#99H,TT0END ; MOV A1,#00H MOV A,A2 JNZ T03 ADD A,#99H DA A MOV A2,A CJNE A,#99H,TT0END MOV A2,#00H MOV A1,#00H MOV A0,#00H T03: CLR Z5 TT0END: POP A POP PSW RETI ;* TT1: PUSH PSW PUSH A MOV A,A2 JNZ T10 MOV A,

10、A1 JNZ T10 MOV A,A0 JNZ T10 SETB Z5 T10: JB Z5,T11 MOV A,A0 ADD A,#99H DA A MOV A0,A CJNE A,#99H,TT1END MOV A,A1 ADD A,#99H DA A MOV A1,A CJNE A,#99H,TT1END MOV A,A2 ADD A,#99H DA A MOV A2,A CJNE A,#99H,TT1END MOV A2,#00H MOV A1,#00H MOV A0,#00H T110: SETB Z5 SJMP TT1END T11: MOV A,A0 ADD A,#01H DA

11、A MOV A0,A CJNE A,#00H,TT1END ;夠100即100mm MOV A0,#00H MOV A,A1 ADD A,#01H DA A MOV A1,A CJNE A,#00H,TT1END ;夠100即10000MM=10M MOV A1,#00H MOV A,A2 ADD A,#01H DA A MOV A2,A CJNE A,#00H,TT1END ;夠100即100M MOV A2,#00H SETB Z5 TT1END: POP A POP PSW RETI ;* INITIL: LCALL DELAY ;延時 ;首先選擇基本指令集 MOV A, #30H ;3

12、0-基本指令操作 LCALL INPUT ;調(diào)寫入子程序 LCALL DELAY01 MOV A, #01H ;指令#01H為：清除屏幕文字，把地址指針指向00H單元 LCALL INPUT ;調(diào)寫入子程序 LCALL DELAY01 MOV A, #06H ;指定在資料寫入或讀取時，設(shè)定游標的移動方向及指定顯示的移位 LCALL INPUT LCALL DELAY01 RET ;- ;漢字顯示子程序 ;- QIU2: ;*1* MOV A,#80H LCALL INPUT MOV R1,#08H MOV DPTR,#TA WORD1: CLR A ;因為要連續(xù)輸入機內(nèi)碼高位（區(qū)碼）、低位（位

13、碼） MOVC A, A+DPTR ;所以要輸入兩次數(shù)據(jù)，如果是字符就是輸入兩個字符字符代碼可以看說明書 LCALL DISPL ;DATA INPUT INC DPTR ;顯示地址會自動加一，如果連續(xù)寫就不用再輸入地址，空白可用某空白漢字或字符代替 CLR A MOVC A, A+DPTR LCALL DISPL ;DATA INPUT LCALL DELAY01 INC DPTR DJNZ R1,WORD1 ;*2* MOV A,#90H LCALL INPUT MOV DPTR,#TB1 MOV R1,#08H WORD2: CLR A ;因為要連續(xù)輸入機內(nèi)碼高位（區(qū)碼）、低位（位碼）

14、MOVC A, A+DPTR ;所以要輸入兩次數(shù)據(jù)，如果是字符就是輸入兩個字符字符代碼可以看說明書 LCALL DISPL ;DATA INPUT INC DPTR ;顯示地址會自動加一，如果連續(xù)寫就不用再輸入地址，空白可用某空白漢字或字符代替 CLR A MOVC A, A+DPTR LCALL DISPL ;DATA INPUT LCALL DELAY01 INC DPTR DJNZ R1,WORD2 ;*3* MOV A,#88H LCALL INPUT MOV DPTR,#TB2 MOV R1,#08H WORD3: CLR A ;因為要連續(xù)輸入機內(nèi)碼高位（區(qū)碼）、低位（位碼） MOV

15、C A, A+DPTR ;所以要輸入兩次數(shù)據(jù)，如果是字符就是輸入兩個字符字符代碼可以看說明書 LCALL DISPL ;DATA INPUT INC DPTR ;顯示地址會自動加一，如果連續(xù)寫就不用再輸入地址，空白可用某空白漢字或字符代替 CLR A MOVC A, A+DPTR LCALL DISPL ;DATA INPUT LCALL DELAY01 INC DPTR DJNZ R1,WORD3 ;*位移顯示處理區(qū)* HUANSUAN: CLR C MOV A,TL0 MOV B,TL1 SUBB A,B JNC SS0 ;有借位說明A是負數(shù)，即補碼，要調(diào)整后使用 CPL A INC A

16、SS0: MOV Z0,A ;*小數(shù)轉(zhuǎn)換* CLR C MOV A,Z0 MOV B,#5 MUL AB MOV Z0,A MOV A,Z0 MOV B,#100 DIV AB MOV A,B MOV B,#10 DIV AB MOV B0,A MOV B1,B ;*至此小數(shù)位轉(zhuǎn)換完畢* JNB Z5 ,SS4 MOV A,#89H LCALL INPUT CLR A MOV DPTR,#TA0 MOVC A,A+DPTR LCALL WE CLR A MOV DPTR,#TA1 MOVC A,A+DPTR LCALL WE SJMP SS5 SS4: MOV A,#89H LCALL INP

17、UT CLR A MOV DPTR,#TA0 MOVC A,A+DPTR LCALL WE MOV A,#20H LCALL WE SS5: MOV A,#8AH LCALL INPUT MOV DPTR,#TAB1 MOV A,A2 LCALL WD1 MOV A,A2 LCALL WD2 MOV A,A1 ;8B LCALL WD1 MOV A,A1 LCALL WD2 ;8C MOV A,A0 LCALL WD1 MOV A,A0 LCALL WD2 MOV A,#8EH LCALL INPUT MOV A,B0 LCALL WD2 MOV A,B1 LCALL WD2 ;*4* MOV

18、 A,#98H LCALL INPUT MOV DPTR,#TAB1 ; MOV R1,#08H WORD4: ;CLR A ;因為要連續(xù)輸入機內(nèi)碼高位（區(qū)碼）、低位（位碼） ; MOVC A, A+DPTR ;所以要輸入兩次數(shù)據(jù)，如果是字符就是輸入兩個字符字符代碼可以看說明書 ; LCALL DISPL ;DATA INPUT ; INC DPTR ;顯示地址會自動加一，如果連續(xù)寫就不用再輸入地址，空白可用某空白漢字或字符代替 ; CLR A ; MOVC A, A+DPTR ; LCALL DISPL ;DATA INPUT ; LCALL DELAY01 ; INC DPTR ; DJN

19、Z R1,WORD4 MOV A,TL0 LCALL WD1 MOV A,TL0 LCALL WD2 MOV A,TL1 LCALL WD1 MOV A,TL1 LCALL WD2 ;2 MOV A,#20H LCALL WE MOV A,#20H LCALL WE MOV A,A2 LCALL WD1 MOV A,A2 LCALL WD2 MOV A,A1 LCALL WD1 MOV A,A1 LCALL WD2 ;2 MOV A,A0 LCALL WD1 MOV A,A0 LCALL WD2 MOV A,#20H LCALL WE MOV A,#20H LCALL WE ;2 JB Z5,

20、S0 MOV A,#00H LCALL WD1 MOV A,#00H LCALL WD2 LJMP QIU3 S0: MOV A,#11H LCALL WD1 MOV A,#11H LCALL WD2 LJMP QIU3 ;* WD1: ANL A,#0F0H SWAP A MOVC A,A+DPTR LCALL DISPL LCALL DELAY01 RET WD2: ANL A,#0FH MOVC A,A+DPTR WE: LCALL DISPL LCALL DELAY01 RET WR: CLR A MOVC A,A+DPTR LCALL DISPL INC DPTR CLR A MOV

21、C A,A+DPTR LCALL DISPL CLR A LCALL DELAY01 RET READ: MOV P3, #0FBH ;讀數(shù)據(jù)子程序 ;p3-CONTRAL I/O NOP ;p3=11111011B RS=1 R/W=1 READ DATA SETB E ;E=E(I/O LCALL DELAY01 MOV A, P1 ;p1=DATA(I/O NOP CLR E RET ;- CHK_BUSY: CLR RS ;讀忙狀態(tài)子程序 SETB RW SETB E HEHE1: JB P1.7,HEHE1 CLR E RET ;- ;寫數(shù)據(jù)子程序 ;- DISPL: LCALL C

22、HK_BUSY ;p3-CONTRAL I/O NOP ;p3=11111001B RS=1 WRITE DATA SETB RS CLR RW SETB E ;E=E(I/O MOV P1, A ;p1=DATA(I/O LCALL DELAY01 NOP CLR E NOP MOV P1,#0FFH RET ;- ;寫指令子程序 ;- INPUT: LCALL CHK_BUSY ;以確保上一指令/數(shù)據(jù)模塊已經(jīng)接收處理完 ;p3-CONTRAL I/O NOP ;p3=11111000B RS=0 WRITE INSTRUTION CLR RS CLR RW SETB E ;E=E(I/O MOV P1