;
INCNXNU:MOV     DPTR,#0171H
INCNJ:  CALL    READEE          ;READ MEMORY AND STORE IN 46H
        INC     DPTR
        MOV     48H,46H
        CALL    WRITEEE         ;WRITE MEMORY MOVE TO NEXT POSITION DOWN
        DEC     DPL
        DEC     DPL
        MOV     A,DPL
        CJNE    A,#40H,INCNJ    ;changed from #41H
        MOV     DPTR,#0141H     ;added
        MOV     48H,44H         ;PUT LAST RESULT ON TOP AT 0141H
        CALL    WRITEEE
        RET
;   