write_loop: 

MOV A,R1 
MOVC A,@A+DPTR 
