基于單片機和fpga的出租車計費系統單片機和電子技術專業畢業設計畢業論文-資料下載頁

　　

【正文】 H ；另存 MOV 59H,4FH MOV 22H,4DH MOV 21H,4EH MOV 20H,4FH LCALL HEXBCD2 SETB MOV FYDY8,13H MOV FYDY7,12H MOV FYDY6,12H MOV FYDY5,12H RET FYDISP: ANL P2,0F8H SETB MOV R0,4FH ；讀入數據 MOV R3,02H ；讀 3次 P0口 FYL1: MOV A, P0 MOV @R0, A DEC R0 MOV A, P2 INC A ；指向 CPLD 下一個數據 ADRC ADRB ADRA= MOV P2, A DJNZ R3, FYL1 ANL P2, 0F8H IF 1=4 MOV 4FH, 0FFH MOV 4EH, 00H ENDIF MOV 58H,4EH ；另存 MOV 59H, 4FH MOV 5FH, 0F4H 23 MOV 5EH, 01H LCALL ADDMB MOV 22H, 4DH MOV 21H, 4EH MOV 20H, 4FH MOV 4FH, 00H MOV 4EH, 00H MOV 4DH, 00H LCALL HEXBCD2 SETB MOV FYDY8, 0FH MOV FYDY7, 12H MOV FYDY6, 12H RET ； BCD 轉換及送顯緩 HEXBCD2:NOP ； 3BYTE HEX TO 4BYTE BCD HEX（ 22～ 20H） BCD（ 26～ 23H） MUBTD: MOV R0, 23H MOV R7, 04H CLR A LOPP1: MOV @R0, A INC R0 DJNZ R7, LOPP1 MOV R7, 18H LOOP4: MOV R1, 20H MOV R6, 03H CLR C LOPP2: MOV A,@R1 RLC A MOV @R1, A INC R1 DJNZ R6, LOPP2 MOV R5, 04H MOV R0, 23H LOOP3: MOV A,@R0 ADDC A,@R0 24 DA A MOV @R0, A INC R0 DJNZ R5, LOOP3 DJNZ R7, LOOP4 SBCD: MOV R0, 23H。 MOV R1, 38H MOV R3, 04H HEX1: MOV A,@R0 ANL A, 0FH MOV @R1, A INC R1 MOV A,@R0 ANL A, 0F0H SWAP A MOV @R1, A INC R1 INC R0 DJNZ R3, HEX1 NEXT2: RET ；時 鐘中斷處理子程序 PIT0:PUSH PSW ；時鐘中斷服務開始，保護斷點 PUSH ACC SETB ；選用 1組通用寄存器 MOV TL0, 0B6H MOV TH0, 03CH MOV A,30H ；循環次數處理 DEC A ；循環次數減 1 MOV 30H,A ；保存于 A中 JNZ RET0 ；不滿 20 次轉 RET1 返回 MOV 30H,14H ；滿 20次，則重賦循環次數初值 MOV R0,LED2 ；秒的十位緩沖單元 LCALL DAAD1 ；秒加 1 MOV A,R2 ；是否到了 60S？ XRL A, 60H 25 JNZ RET0 ；不到，轉 RET1 返回 LCALL CLR0 ；到了 60S，則秒顯示緩沖單元清 0 MOV R0,LED4 ；分的十位顯示緩沖單元地 址 LCALL DAAD1 ；分加 1 MOV A,R2 ；是否到了 60S XRL A, 60H JNZ RET0 ；不到，轉 RET0 返回 LCALL CLR0 ；到了 60分，則分顯示緩沖單元清 0 MOV R0,LED6 ；時的十位顯示緩沖單元地址 LCALL DAAD1 ；時加 1 MOV A,R2 ；是否到了 24 時？ XRL A, 24H JNZ RET0 ；不到，轉 RET0 返回 LCALL CLR0 ；到了 24 時，則時顯示緩沖單元清 0 RET0: LCALL SDBJ NEXT5: MOV LED7, 12H MOV LED8, 0AH LCALL DISP POP ACC ；恢復斷點 POP PSW RETI ；中斷返回 DAAD1:MOV A,@R0 ；加 1子程序，十位數送 A DEC R0 ；指向個位顯示緩沖單元地址 SWAP A ；十位數占高四位 ORL A,@R0 ；個位數占低四位 ADD A,01H ；加 1 DA A ；十進制調整 MOV R2,A ；全值暫存 R2中 ANL A,0FH ；取出個位數 MOV @R0,A ；個位值送顯示緩沖單元 MOV A, R2 INC R0 ANL A,0F0H ；取出十位數 SWAP A ；使十位數占低四位 MOV @R0,A ；十位數送顯示緩沖單元 26 RET ；返回 CLR0:CLR A ；清緩沖單元地址子程序 MOV @R0,A ；十位數緩沖單元清 0 DEC R0 MOV @R0,A ；個位數緩沖單元清 0 RET SDBJ:MOV A,LED6 ；時段比較子程序 CJNE A, 00H,SDL1 MOV A, LED5 CLR C SUBB A, 06H JNC SDL2 LJMP SDL0 SDL1: CLR C SUBB A, 02H JC SDL2 MOV A, LED5 CLR C SUBB A, 03H JNC SDL0 SDL2: SETB SDBZ LJMP NEXT7 SDL0: CLR SDBZ NEXT7: RET DDCL: MOV R0, LED8 MOV R1, 5FH MOV R3, 08H DDL0: MOV A,@R0 MOV R1, A DEC R0 DEC R1 DJNZ R3, DDL0 RET ；顯示程序 DISP: MOV R0, LED8 27 MOV R1, 08H JNB , DDLL0 MOV R0, FYDY8 LJMP DL7 DDLL0: JNB , DL0 DDL1: MOV R0, FYDY8 MOV R1, 08H LJMP DDL2 DL7: MOV A, R1 LJMP DL1 DDL2: MOV A, R1 LJMP DLL1 DL0: MOV A, R1 CJNE A, 05H, DL1 LJMP DL3 DL1: CJNE A, 03H, DL2 LJMP DL3 DLL1: CJNE A, 02H, DL2 LJMP DL3 DL2: MOV A,@R0 MOV DPTR, TAB1 MOVC A,@A+DPTR MOV SBUF, A LJMP DL4 DL3: MOV A,@R0 MOV DPTR, TAB1 MOVC A,@A+DPTR ORL A, 80H MOV SBUF, A DL4: JNB TI, DL4 CLR TI DEC R0 DJNZ R1, DL8 LJMP NEXT4 DL8:JB ,DL7 28 JB , DDL2 LJMP DL0 NEXT4: RET TAB1: db 0c0h, 0f9h, 0a4h, 0b0h, 99h, 92h db 82h,0f8h,80h,90h,88h db 83h, 0c6h,0a1h,86h,8eh db 8ch, 0bfh,0ffh,0ch,89h,0c7h ；鍵盤子程序 KKEYII:LCALL KKS1 ； KEY SCANNING PROG JNZ KLK1 ；有按鍵，轉跳 KLK1 KNN1: LCALL DELAY LCALL DELAY SETB RET KKEYI:LCALL KKS1 ； KEY SCANNING PROG JNZ KLK1 ；有按鍵，轉跳 KLK1 KN1: LCALL DELAY LCALL DELAY LJMP KKEYI ；無按鍵，轉跳 KKEYI 繼續掃描 KLK1: LCALL DELAY LCALL DELAY LCALL KKS1 JNZ KLK2 ；確實有按鍵，轉跳至 KLK2 LCALL DELAY LJMP KKEYI KLK2:NOP ； THERE IS KEYI JB , NOK1 MOV A, 00H LJMP GOHM NOK1: NOP JB , NOK2 MOV A,01H LJMP GOHM NOK2: NOP JB , NOK3 MOV A, 02H 29 LJMP GOHM NOK3: NOP JB , NOK4 MOV A, 03H LJMP GOHM NOK4: NOP JB , NOK5 MOV A,