....初學(xué)單片機(jī)，望各位大俠指導(dǎo)！

   START:MOV R0,#40H
      MOV A,#01H
      LP:MOV P1,A
      LCALL DELY
      RL A
      DJNZ R0,LP
      MOV P0,#00H
      HALT:SJMP HALT;SJMP $
      DELY:MOV R7,#0FFH
        DL1:MOV R6,#0FFH
        DL2:DJNZ R6,DL2
        DJNZ R7,DL1
      RET
      END