START:								   
        ORG 2000H	
	    LJMP MAIN			
	
	    ORG 2003H
	    MOV DPTR,#0001H
	    MOVX A,@DPTR		
	    RETI
	   		
	    ORG 2030H  
MAIN:  
	ACALL SERIAL
        MOV IE,#10000001B
	    SETB TCON.0
HERE:   MOV A,#07H
	    MOV DPTR,#0001H
	    MOVX @DPTR,A
		ACALL HEXTODEC
		ACALL DECTOASCII
        SJMP HERE
SERIAL:
        MOV TMOD,#20H
		MOV TH1,#0F6H
		MOV SCON,#50H
		SETB TR1
		RET  	  
HEXTODEC:	 
        MOV R0,#40H
	    MOV B,#10
	    DIV AB
	    MOV @R0,B
	    INC R0
	    MOV B,#10
	    DIV AB
	    MOV @R0,B
	    INC R0
	    MOV @R0,A
	    RET
DECTOASCII:    
        MOV R0,#42H
	    MOV R1,#3
H1:	    MOV A,@R0
	    ORL A,#30H
	    ACALL TX
	    DEC R0
	    DJNZ R1,H1
        RET 

TX:	    CLR TI
        MOV SBUF,A
L5:	    JNB TI,L5
	    RET
	    END