作者: yueshang 于 2007/3/29 21:26:40 發(fā)布:
ORG 0000H AJMP START ORG 0020H START: MOV P1,#0DEH LCALL DELAY lp: MOV P1,#7EH LCALL XI lp1: MOV P1,#0FEH LCALL FLASH5 lp2: SETB P1.7 CLR P1.6 LCALL XIII LP3:MOV P1,#0DBH LCALL XIIII lp4:MOV P1,#0DFH LCALL FL6 lp5:SETB P1.2 CLR P1.1 LCALL XIII LJMP LP XII:CLR P2.6 MOV R0,#4 MOV 50h,#09H MOV DPTR,#TAB1 LPP:MOV A,50H MOVC a,@a+dptr MOV P0,A LCALL DELAY LCALL DELAY DEC 50H MOV A,50H cjne a,#5H,LPP RET xi:a_bit equ 20h b_bit equ 21h TEMP equ 22h st:mov TEMP,#73 stlop:acall DISPLAY dec TEMP mov a,TEMP cjne a,#9,next lcall XII RET RET next:ljmp stlop DISPLAY:mov a,TEMP mov b,#10 div ab mov b_bit,a mov a_bit,b mov dptr,#tab1 mov r0,#10 dp11:mov r1,#250 dplop:mov a,a_bit movc a,@a+dptr mov p0,a clr p2.6 lcall d1ms setb p2.6 mov a,b_bit movc a,@a+dptr mov p0,a clr p2.5 lcall d1ms setb p2.5 djnz r1,dplop djnz r0,dp11 RET XIIII:a1_bit equ 20h b1_bit equ 21h TEMP1 equ 22h st1:mov TEMP1,#60 stlop1:acall DISPLAY1 dec TEMP1 mov a,TEMP1 cjne a,#9,next1 lcall XII RET RET next1:ljmp stlop1 DISPLAY1:mov a,TEMP1 mov b,#10 div ab mov b1_bit,a mov a1_bit,b mov dptr,#tab1 mov r0,#10 dp111:mov r1,#250 dplop1:mov a,a1_bit movc a,@a+dptr mov p0,a clr p2.6 lcall d1ms setb p2.6 mov a,b_bit movc a,@a+dptr mov p0,a clr p2.5 lcall d1ms setb p2.5 djnz r1,dplop1 djnz r0,dp111 ret FLASH5:clr p2.6 MOV R0,#5 MOV 40H,#05h MOV DPTR,#tab1 FLASH1: mov a,40h movc a,@a+dptr mov p0,a SETB P1.7 lcall delay CLR P1.7 LCALL DELAY DEC 40H DJNZ R0,FLASH1 RET FL6: CLR P2.6 MOV R0,#5 MOV 30H,#05H MOV DPTR,#tab3 PP: MOV A,30H MOVC A,@A+DPTR MOV P0,A SETB P1.2 LCALL DELAY CLR P1.2 LCALL DELAY DEC 30H DJNZ R0,PP RET XIII: CLR P2.6 MOV R0,#3 MOV 50h,#03H MOV DPTR,#TAB1 LPP1: MOV A,50H MOVC a,@a+dptr MOV P0,A LCALL DELAY LCALL DELAY DEC 50H MOV A,50H cjne a,#0,LPP1 RETI tab1: db 28h,7eh,0a2h,62h,74h,61h,21h,7ah,20h,60h tab3: db 28h,7eh,0a2h,62h,74h,61h,21h,7ah,20h,60h delay: mov  |