ORG 0000H
			LJMP MAIN
			ORG 0200H
MAIN:
START:      JB   P1.7,  DIR1
            MOV  DPTR, #TABEL1
			SJMP DIR
DIR1:       MOV  DPTR,#TABEL2
DIR:        MOV  R0,#00H
            MOV  R1,#01H
NEXT:       MOV  A,R0
            MOVC  A,@A+DPTR
			MOV  P0,A
			MOV  A,R1
			MOV  P2,A
			;LCALL DEY
			INC  R0
			RL   A
			MOV  R1,A
			CJNE R1,#0FDH,NEXT
			SJMP START
DEY:        ;MOV R5,#00 
            MOV  R6,#2
            MOV  R7,#2
D1:         DJNZ R7,$
D2:         DJNZ R6,D1
            ;DJNZ R5,D2
			RET

TABEL1:     DB 06H,5BH,4FH,66H,6DH 

TABEL2:     DB 78H,79H,38H,38H,3FH 


			END