汇编语言 走马灯设计

Question

对下列程序进行修改或自己重新编程，让相邻两个LED同时亮起来，逆时针形成走马灯。

code segment
assume cs:code
portA equ 400H ; PA口地址
go: mov dx,porta+3
mov al,80h
Out dx,al ; 三端口均初始化为方式0输出
L0: mov si,24
mov bx,1 ; 低16位初始值设为1（一个灯亮）
mov cl,0 ; 高8位初始值设为0
L1: mov ah,0bH
Int 21h ; 有无按键
Cmp al,0ffH
Jz exit
mov dx,porta ; 输出24位数
mov al,bl
Out dx,al
Inc dx
mov al,bh
Out dx,al
Inc dx
mov al,cl
Out dx,al
Call delay05 ; 延时
SHL bx,1 ; 低16位左移一位
Rcl cl,1 ; 高8位左移一位
dec si
jnz L1
Jmp L0 ; 重新开始
Exit: mov ah,4ch
Int 21h
delay05 proc near ; 循环延时子程序
push cx
push bx
mov cx,0000H
d1: mov bx,1200h
d2: dec bx
jnz d2
loop d1
pop bx
pop cx
ret
delay05 endp
Code ends
End go

Answer 1

楼主的程序，是 24 个灯，只有一个亮，循环移动。

对吧？

现在，想要改成《相邻两个LED同时亮》，只要改动一行：
mov bx,1 ; 低16位初始值设为1（一个灯亮）

改为：
mov bx,3 ; 把1改成3

即可。