|
- ;============================================================
- ;程序編寫人:蘭建
- ;編寫地點:51hei培訓機構
- ;時間:5月23日下午 星期六
- ;功能:本程序實現P0口的對2個數碼管顯示0到99,一個按鍵實現一次
- ;按鍵只遞加1次,到99回到0,按著不動不影響數碼管動態顯示;任何時
- ;刻,任何一個按鍵,若按鍵時間超過3秒,循環顯示0到9回到0,時間
- ;間隔1秒。若時間小于1秒,顯示加1,低電平亮
- ;P2口實現對數碼管的片選功能
- ;===============================================================
- ;=========================開始初始化============================
- SHUCHU EQU P0 ;定義P0口為輸出口
- PIANXUAN EQU P2 ;定義P2口為片選口
- SHUZI EQU 30H ;設置處理數據存放地址
- JIANBIT0 BIT 20H.0 ;設置按鍵標志位
- XIAN0 BIT 20H.2 ;顯示標志位
- T_BIT BIT 21H.0 ;設置中斷定時器0標志位
- MODE EQU 01
- ;========================程序開始==============================
- ORG 00H ;程序開始
- LJMP START ;跳到START
- ORG 0BH ;中斷定時器0入口地址
- JMP T0_1 ;跳到定時器0服務程序
- ORG 0030H ;入口地址
- ;=========================主程序===============================
- START:MOV SP,#60H ;移開指針
- MOV PIANXUAN,#00 ;片選初始化
- MOV SHUZI,#00 ;數據初始化
- MOV DPTR,#TAB ;查表初始化
- MOV P1,#0F8H ;設置P1.0口為輸入
- CALL INIT ;開中斷
- CLR JIANBIT0 ;按鍵標志位清0
- SETB T_BIT ;中斷標志位置1
- MAIN:JNB T_BIT,MAIN ;等待中斷
- CLR T_BIT ;中斷標志位清0
- CALL JISUAN ;計算分離十位和個位
- CALL DISPLAY ;顯示個位和十位
- JNB JIANBIT0,PANDUAN;按鍵標志位=1判斷P1.3口,若為0則判斷按鍵是否抬起
- JNB P1.3,XIANSHI0 ;;若P1.3=0則調到XIANSHI0
- CLR JIANBIT0 ;長按標志位清0
- CLR XIAN0 ;顯示標志位清0
- JMP MAIN ;返回MAIN
- PANDUAN:JB P1.3,NEXT ;若按鍵抬起則返回MAIN,若沒有抬起按鍵標志位清0
- SETB JIANBIT0
- NEXT:JMP MAIN
- XIANSHI0:
- JB XIAN0,MAIN
- SETB XIAN0 ;顯示標志位清0
- CALL JIACHULI ;加處理
- JMP MAIN
-
- ;====================定時中斷0服務子程序========================
- ;輸入:無
- ;輸出:無
- ;實現的功能:實現定時20MS,影響標志位T_BIT.
- ;===============================================================
- T0_1:MOV TMOD,#MODE ;定時器1工作方式1
- MOV TL0,#0E0H ;設置定時初值
- MOV TH0,#0B1H
- SETB T_BIT ;定時標志位清0
- RETI
- ;========================中斷設置子程序=========================
- ;輸入:無
- ;輸出:無
- ;實現的功能:初始化設置定時器,設置初值
- ;===============================================================
- INIT:MOV TMOD,#MODE ;定時器0工作方式1
- MOV TL0,#0E0H
- MOV TH0,#0B1H
- MOV IE,#82H ;開定時器中斷0
- SETB TR0 ;開定時器0
- RET
- ;========================計算子程序=============================
- ;輸入:30H
- ;輸出:"A和B"
- ;實現的功能:把30H的數據的十位和個位分離出來
- ;===============================================================
- JISUAN:MOV A,SHUZI ;數據放在A中
- MOV B,#10 ;除數放在B中
- DIV AB ;商放在A中,余數放在B中
- RET
- ;========================顯示子程序=============================
- ;輸入:"A"
- ;輸出:"P0口"
- ;實現的功能:把A的數輸出到P0口顯示,十位和個位分開顯示
- ;===============================================================
- DISPLAY:MOVC A,@A+DPTR ;查表
- MOV SHUCHU,A ;顯示十位
- MOV PIANXUAN,#02H ;片選
- CALL DELAY ;查表
- ;MOV SHUCHU,#0FFH ;關閉數碼管
- MOV A,B
- MOVC A,@A+DPTR ;查表
- MOV SHUCHU,A ;顯示個位
- MOV PIANXUAN,#03H ;片選
- CALL DELAY ;延時
- ;MOV SHUCHU,#0FFH ;關閉數碼管
- RET
- ;======================加處理子程序=============================
- ;輸入:無
- ;輸出:無
- ;實現的功能:把30H地址加1
- ;===============================================================
- JIACHULI:MOV A,SHUZI
- CJNE A,#99,L0 ;若A不等于9,則跳到LL
- MOV A,#00
- JMP L1
- L0:INC A ;自加一
- L1:MOV SHUZI,A
- RET
- ;========================延時程序===============================
- ;輸入;無
- ;輸出: 無
- ;實現的功能:延時一段時間
- ;===============================================================
- DELAY:
- MOV R6,#80
- L7:MOV R5,#80
- L8:DJNZ R5,L8
- DJNZ R6,L7
- RET
- ;=====================共陽查表數據==============================
- TAB:DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H
- ;=======================程序結束================================
- END
復制代碼
|
|