8255A 端口检测开关状态并控制 LED 显示的汇编程序示例

问题描述： 已知某 CPU、8255A 和 74LS138 译码器等芯片如下图所示，有 8 个开关 K7～K0，要求通过 8255A 的 A 口每隔 10 秒不断检测它们的通断状态，并随时通过 8255A 的 B 口在发光二极管 LED7～LED0 上显示出来，开关断开，相应的 LED 点亮，开关闭合，相应的 LED 熄灭。

解决方案：

确定相应端口的地址。

8255A 的 A 口：0x00
8255A 的 B 口：0x01
74LS138 译码器：地址线 A0、A1、A2 接地，使其地址为 0x00。

编写一段源程序，完成题目所要求的功能。

; 8255A 端口定义
portA equ 0x00
portB equ 0x01
portC equ 0x02
controlReg equ 0x03

; 初始化 8255A，将 PortA 和 PortB 设为输出，PortC 设为输入
mov al, 0b10011010
out controlReg, al

; 循环检测开关状态并显示到 LED 上
loop:
  in al, portC ; 读取 PortC 的值
  and al, 0b11111111b ; 去掉高位无效位
  out portB, al ; 将读取到的状态值显示到 LED 上
  jmp loop ; 跳转回循环开始处，继续检测开关状态

; 延时函数，延时 10 秒
delay:
  mov cx, 0 ; 清空计数器
delay1:
  mov dx, 0FFFFh ; 设置计时器初值
delay2:
  dec dx ; 计时器减一
  cmp dx, 0 ; 计时器是否为 0
  jne delay2 ; 不为 0 则继续计时
  inc cx ; 计数器加一
  cmp cx, 65535 ; 计数器是否达到最大值
  jne delay1 ; 未达到最大值则继续延时
  ret

; 主程序
main:
  call delay ; 调用延时函数，延时 10 秒
  jmp loop ; 跳转到循环开始处，继续检测开关状态

程序说明：

portA, portB, portC, controlReg 分别定义了 8255A 的 A 口、B 口、C 口和控制寄存器的端口地址。
初始化部分使用 mov 和 out 指令将控制寄存器的值设置为 0b10011010，这表示将 PortA 和 PortB 设为输出，PortC 设为输入。
循环检测开关状态部分使用 in 指令读取 PortC 的值，然后使用 and 指令去除高位无效位，最后使用 out 指令将读取到的状态值输出到 PortB，控制 LED 的亮灭状态。
延时函数使用 mov, dec, cmp, jne, inc 等指令实现，该函数将计时器设置为 0xFFFFh，并进行 65536 次循环，每次循环减 1，直到计时器为 0，最终实现 10 秒的延时。

总结：

本程序通过 8255A 芯片检测开关状态，并通过 8255A 的 B 口控制 LED 的亮灭状态，实现了简单的数据采集和显示功能。该程序可以作为学习 8255A 芯片和汇编语言编程的参考。