0--99 asm.txt

来自「单片机写的程序都含有Protues仿真结果」· 文本 代码 · 共 79 行

		ORG		OOOOH
		LJMP	MAIN
		ORG		0030H
		N		EQU		5FH		
		BCD1	EQU		5EH
		BCD2	EQU		5DH
		CRTN1	EQU		5CH
		CRTN2	EQU		5BH
   MAIN:MOV		SP,#60H
   		MOV		N,#00H
		MOV		P0,#0C0H
		MOV 	P2,#0C0H
  DELAY:MOV	 	R7,#04H
  	DL1:MOV		R6,#250
	DL2:MOV		R5,#250
	DL3:NOP
		NOP
        ORG		OOOOH
		LJMP	MAIN
		ORG		0030H
		N		EQU		5FH		
		BCD1	EQU		5EH
		BCD2	EQU		5DH
		CRTN1	EQU		5CH
		CRTN2	EQU		5BH
   MAIN:MOV		SP,#60H
   		MOV		N,#00H
		MOV		P0,#0C0H
		MOV 	P2,#0C0H
  DELAY:MOV	 	R7,#04H
  	DL1:MOV		R6,#250
	DL2:MOV		R5,#250
	DL3:NOP
		NOP
		DJNZ	R5,DL3
		JNB		P3.2,MAIN3
		DJNZ	R6,DL2
		DJNZ	R7,DL1
		MOV		A,N
		CJNE	A,#99,MAIN1
		SJMP	MAIN2
  MAIN1:ACALL	NBCD
  		ACALL	TBFLIN
		ACALL	DISPLAY
		LJMP	DELAY
  MAIN2:MOV		BCD1,#0FH
  		MOV		BCD2,#0FH
		ACALL	TBFLIN
  MAIN3:ACALL	DISPLAY
  		SJMP	MAIN3
   NBCD:CLR	   	A
   		CLR		C
		MOV		A,N
		ADD		A,#1
		DA		A
		MOV 	N,A
		ANL		A,#0FH
		MOV		BCD1,A
		MOV		A,N
		SWAP	A
		ANL		A,#0FH
		MOV		BCD2,A
		RET
 TBFLIN:MOV		A,BCD1
 		MOV		DPTR,#DOT
		MOVC	A,@A+DPTR
		MOV		CRTN1,A
		MOV		A,BCD2
		MOVC	A,@A+DPTR
		MOV		CRTN2,A
		RET
	DOT:DB		0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H
		DB		80H,90H,40H,79H,24H,30H,86H,8EH
DISPLAY:MOV		P2,CRTN1
		MOV		P0,CRTN2
		RET
		END