时钟汇编程序——山理工大.doc

仅供参考，合理修改。作者：玉帝哥哥 DUAN EQU 20H SHU EQU 23H JISHU EQU 21H WEI EQU 22H MM EQU 24H MIAO EQU 25H ORG 0000H LJMP MAIN ORG 000BH LJMP I0NT ORG 001BH LJMP I1NT ORG 0030H ;-主程序- MAIN:MOV SP,#60H MOV SHU ,#0 MOV MM,#0 MOV R1,#0 MOV R2,#0 MOV R3,#0 MOV TMOD,#11H MOV TH0, #41H ;50ms MOV TL0, #0D9H MOV TH1, #0EBH MOV TL1, #064H ;10MS SETB ET1 SETB TR0 SETB ET0 SETB EA MOV P3,#0FFH MOV P2,#0BFH MOV A,#89H MOV DPTR,#0BFFFH;控制口 MOVX DPTR,A;-按键扫描，等待中断- KEY :MOV A,P1 CJNE A,#0FAH,K3 SJMP K4 K3: CJNE A,#0F8H,K2 K4: CLR TR1 MOV MM,#0 MOV MIAO,#0 MOV R7,#0 MOV R0,#0 SJMP L2 K2: CJNE A,#0FCH,K1 CLR TR1 SJMP L2 K1: CJNE A,#0FEH,L1 ;1键 SETB TR1 L2: MOV DUAN ,MM MOV WEI,#01H LCALL CHAI MOV DUAN ,MIAO ;显示秒表 LCALL CHAI MOV DUAN,R7 LCALL CHAI MOV DUAN ,R0 LCALL CHAI SJMP KEY L1: MOV DUAN ,R1 MOV WEI, #01H LCALL CHAI MOV A,#10 ;显示 时钟 LCALL DPLY MOV DUAN ,R2 LCALL CHAI MOV A,#10 LCALL DPLY MOV DUAN,R3 LCALL CHAI LJMP KEY ;-;-拆字程序- CHAI: MOV A,DUAN MOV B,#10 DIV AB MOV R4,A MOV A,B LCALL DPLY MOV A,R4 LCALL DPLY RET ;-显示程序- DPLY: MOV DPTR,#TAB MOVC A,A+DPTR MOV DPTR,#0BCFFH ;A口输出 ,段 MOVX DPTR,A MOV A,WEI MOV DPTR,#0BDFFH ;B口输出 ，位 MOVX DPTR,A RL A MOV WEI,A LCALL DL1 MOV A,#0FFH MOV DPTR,#0BCFFH ;A口输出 ，清显示 MOVX DPTR,A RET ;-时钟定时器- I0NT: PUSH ACC MOV TH0,#3CH ;#41H MOV TL0,#0B0H ;#0D9H INC SHU MOV A,SHU CJNE A ,#20,LEND MOV SHU ,#0 INC R1 CJNE R1,#60,LEND ;秒 MOV R1 ,#0 INC R2 ;分 CJNE R2 ,#60,LEND MOV R2 ,#0 INC R3 ;时 CJNE R3 ,#24 ,LEND MOV R3, #0 LEND: POP ACC RETI;-秒表定时器- I1NT: PUSH ACC MOV TH1, #0EBH MOV TL1, #64H INC MM MOV A,MM CJNE A,#100,LLEND ;M秒 MOV MM ,#0 INC MIAO MOV A,MIAO ;秒 CJNE A ,#60,LLEND MOV MIAO ,#0 INC R7 ;分 CJNE R7 ,#60 ,LLEND MOV R7, #0 INC R0 ;时 CJNE R0,#24,LLEND MOV R0 ,#0 LLEND:POP ACC RETI ;-延时程序- DL1: MOV R6, #01H ;0.5ms延时 DL11: MOV R5, #248 D