数码秒表.txt

来自「数码表（汇编）」· 文本 代码 · 共 102 行

                   MIAO EQU 40H
		   FEN  EQU 41H
		   MIAOGEWEI EQU 42H
		   MIAOSHIWEI EQU 43H
		   FENGEWEI EQU 44H
		   FENSHIWEI EQU 45H
		   ORG 0000H
		   SJMP START
		   ORG 000BH
		   AJMP TIMER0
		   ORG 0030H
START:
                   MOV SP,#60H
		   MOV MIAO,#0
		   MOV FEN,#0
		   MOV DPTR,#TAB
		   MOV 30H,#0
		   MOV TH0,#3CH
		   MOV TL0,#0B0H
		   MOV TMOD,#01H
		   MOV IE,#82H
		   SETB TR0
MAIN:
                   CALL PROCESS
		   CALL DISPLAY
                   SJMP MAIN
PROCESS:
                   MOV A,MIAO
		   MOV B,#10
		   DIV AB
		   MOV MIAOSHIWEI,A
		   MOV MIAOGEWEI,B
		   MOV A,FEN
		   MOV B,#10
		   DIV AB
		   MOV FENSHIWEI,A
		   MOV FENGEWEI,B
		   RET
DISPLAY:

                   MOV A,FENSHIWEI
		   MOVC A,@A+DPTR
                   SETB P2.0
		   MOV P0,A
		   CALL DELAY
		   CLR P2.0
                  

                   MOV A,FENGEWEI
		   MOVC A,@A+DPTR
                   SETB P2.1
                   MOV P0,A
		   CALL DELAY
		   CLR P2.1
                  

                   MOV A,MIAOSHIWEI
		   MOVC A,@A+DPTR
                   SETB P2.2
		   MOV P0,A
		   CALL DELAY
		   CLR P2.2
             

                   MOV A,MIAOGEWEI
		   MOVC A,@A+DPTR
                   SETB P2.3
		   MOV P0,A
		   CALL DELAY
		   CLR P2.3
		   RET
TIMER0:
                   CLR TF0
                   PUSH A
		   INC 30H
		   MOV A,30H
		   CJNE A,#20,JIXU
		   MOV 30H,#0
		   INC MIAO
		   MOV A,MIAO
		   CJNE A,#60,JIXU
		   MOV MIAO,#0
		   INC FEN
		   MOV A,FEN
		   CJNE A,#60,JIXU
		   MOV FEN,#0
JIXU:
                   POP A
		   MOV TH0,#3CH
		   MOV TL0,#0B0H
		   RETI
DELAY:
          MOV R0,#50
D2:
          MOV R1,#10
D1:
          DJNZ R1,D1
		  DJNZ R0,D2
		  RET
TAB:
    DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H
END