port1 (1).asm

来自「Proteus在MCS-51％26ARM7系统中的应用百例 Proteus在M」· 汇编 代码 · 共 15 行

          ORG       00H
LOOP:     MOV       A,  #0FEH		;赋初值
          MOV       R2, #8			;设计数值
OUTPUT:   MOV       P1, A			;送P1口输出
          RL        A				;数据移位
          ACALL     DELAY
          DJNZ      R2, OUTPUT
          LJMP      LOOP
DELAY:    MOV       R6, #0			;延时子程序
          MOV       R7, #0
DELAYLOOP:
          DJNZ      R6, DELAYLOOP
          DJNZ      R7, DELAYLOOP
          RET
          END