16位拉幕灯。
说明:
由P1、P2组成16位拉幕灯,依次由P1.0逐次点亮到P2.7。
再由P2.7到P1.0逐次熄灭。如此循环。
题目链接:http://zhidao.baidu.com/question/1509966686324214140.html
做而论道编程如下:2014-05-07 09:59
;试试看:
ORG 0000H
MOV 30H, #0
MOV 31H, #0
M_LOOP:
MOV R2, #16
DISP1:
MOV P1, 30H
MOV P2, 31H
CALL RIGHT
CALL DL
DJNZ R2, DISP1
MOV R2, #16
DISP2:
MOV P1, 30H
MOV P2, 31H
CALL LEFT
CALL DL
DJNZ R2, DISP2
SJMP M_LOOP
;-----------------------
LEFT:
CLR C
MOV A, 30H
RLC A
MOV 30H, A
MOV A, 31H
RLC A
MOV 31H, A
RET
;-----------------------
RIGHT:
SETB C
MOV A, 31H
RRC A
MOV 31H, A
MOV A, 30H
RRC A
MOV 30H, A
RET
;-----------------------
DL:
DJNZ R7, $
DJNZ R7, $
DJNZ R6, $ - 4
RET
;-----------------------
END
经过实验,本程序可以满足题目要求。
|