wt:     jnb ie0,wt
        mov A,P1
        movx @DPTR,A
        inc dptr
        sjmp wt