t0602.asm

汇编语言开发的各种实用程序

           ORG  0000H
		   LJMP MAIN
		   ORG  0B00H
		   LJMP INT0X
MAIN:      
SECOND     EQU    30H
TCOUNT     EQU    31H
SATRT:     MOV   SECOND,#00H
           MOV   A,SECOND
		   MOV   B,#10
		   DIV   AB
		   MOV   DPTR,#TABLE
		   MOVC  A,@A+DPTR
		   MOV   P0,A
		   MOV   A,B
		  ;MOV   DPTR,#TABLE
		   MOVC  A,@A+DPTR
		   MOV   P2,A
		   MOV   TCOUNT,#00H
		   MOV   TMOD,#01H
		   MOV   TH0,#(65536-50000)/256
		   MOV   TL0,#(65536-50000) MOD 256
		   SETB  TR0
		   SETB  ET0
		   SETB  EA
		   LJMP  $
INT0X:     MOV   TH0,#(65536-50000)/256
		   MOV   TL0,#(65536-50000) MOD 256
		   INC   TCOUNT
		   MOV   A,TCOUNT
		   CJNE  A,#20,NEXT
		   MOV   TCOUNT,#00H
		   INC   SECOND
		   MOV   A,SECOND
		   CJNE  A,#60,DISP
		   MOV   SECOND,#00H
DISP:      MOV   A,SECOND
           MOV   B,#10
		   DIV   AB
		   MOV	 DPTR,#TABLE
		   MOVC  A,@A+DPTR
		   MOV   P0,A
		   MOV   A,B
		   MOVC  A,@A+DPTR
		   MOV   P2,A
NEXT:      RETI
TABLE:     DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH 

           END