汇编实验1——利用8255实现LED的流水点亮实验

前言

做这个实验耗时近半天，其中安装虚拟机5小时，编写程序3小时。
踩过不少的坑，比如说一开始一直显示不出来usb插件，最后发现是开关没开；又比如，程序逻辑没有问题，但始终显示不出正确的结果，最后发现是先连接反了…不过好在，在一天快要结束的时候和搭档一起完成了实验。成就感满满，虽然本人没怎么参与编写代码

实验目的

掌握8255A和微机接口的连接方法，了解8255A的基本的工作原理和编程方法。

实验内容

PA口接8个拨动开关K1-K8，PB口接8个LED。初始由开关K1-K8设定8位不同的值，当执行程序后LED按K1-K8初始设定的值点亮，并向右流动。8255工作在0方式。

实验编程提示

在LED右流水中，如果开关的位置发生了变化，LED右流水从变化的位置重新开始。
提示：程序要能检测到某个时间开关状态的变化，并针对变化后的开关状态右流水，因此程序中要有两个变量，一个保存当前开关的状态以检测开关状态是否发生了变化，一个存LED右流水的状态，以便使LED连续右流动。为了使流水显示明显，每个位置应加延时程序。

连线图

注意那个美丽的彩虹线不要接反了，要一一对应（是个坑！！

代码分解

数据段初始化端口地址

DSEG SEGMENT
	PORTA EQU 280H; A端口
	PORTB EQU 281H; B端口
	PORTD EQU 283H; 命令与状态口
DSEG ENDS

方式命令设置

PA口接8个拨动开关K1-K8所以为1输入，PB口接8个LED所以为0输出。

    MOV DX,PORTD
	MOV AL,90H;1001 0000 初始化命令：A端口0方式输入，B端口0方式输出
	OUT DX,AL;将初始化命令输入到命令状态口

保存最开始的流水状态

    MOV DX,PORTA; 
	IN AL,DX; 输入初始开关状态到AL
	MOV CL,AL; CL保存流水状态
	MOV BL,AL; BL保存旧的开关状态, 在此初始化BL

亮灯

这个点，不理解之前觉得好难，理解了之后觉得不过如此——无非就是读PA处的代码，然后输出到PB去，由于都是八位，只需要一个中间寄存器CL。

    MOV AL,CL; AL中存入流水线状态
	MOV DX,PORTB;
	OUT DX,AL; 灯亮

控制时延

要让灯亮就必须控制延长时间啊，一次循环最多ffffh，那就多来几个循环呗！哈哈哈

DELAY1 PROC ;子程序
 	mov cx,25
    AGAIN:
    mov dx,0ffffh
    delay:dec dx
    jnz delay
    LOOP AGAIN
RET
DELAY1 ENDP

流水灯流动

软件控制硬件，也就是靠程序实现实际功能。如下一行代码，令人叹服！妙哉妙哉。

	ROR AL,1;右移一个灯

核心

救命，我的字好吃藕
CL负责控制当前该亮的灯，在light程序段中负责控制灯的亮和延时.
而BL,BH分别保存上一时刻的开关和现在的开关，注意这里每移动一个灯就判断一次。

    MOV DX,PORTA
	IN AL,DX
	MOV BH,AL;  BH存放新的开关状态
	
	CMP BH,BL; 判断开关状态是否发生改变
	JZ LIGHT; 如果开关状态未变，则调转到LIGHT
	MOV BL,BH; 否则旧的开关状态变为新状态
	MOV CL,BL; 把当前开关状态存入CL, 更新流水线状态

代码

下面这个是第一次写的。漏洞百出…而且写的很不美观，看着乐呵乐呵就好，比如那个可怕的delay大循环hhh惨不忍睹，最后趁着老师还在检查别人代码的时候改成了使用双层函数，此外也调了很多很多的不过。

	.model small 
	.386 ;老师说要加...
DSEG SEGMENT
	PORTA EQU 280H; A端口
	PORTB EQU 281H; B端口
	PORTD EQU 283H; 命令与状态口
DSEG ENDS



CSEG SEGMENT
ASSUME CS:CSEG,DS: DSEG
START: 
	
	MOV AX,DSEG;
	MOV DS,AX;

	MOV DX,PORTD
	MOV AL,90H;1001 0000 初始化命令：A端口0方式输入，B端口0方式输出
	OUT DX,AL;将初始化命令输入到命令状态口
	
	MOV DX,PORTA;
	IN AL,DX; 输入初始开关状态到AL
	MOV CL,AL; CL保存流水状态
	MOV BL,AL; BL保存旧的开关状态, 在此初始化BL
LP1:
	MOV DX,PORTA
	IN AL,DX
	MOV BH,AL;  BH存放新的开关状态
	
	CMP BH,BL; 判断开关状态是否发生改变
	JZ LIGHT; 如果开关状态未变，则调转到LIGHT
	MOV BL,BH; 否则旧的开关状态变为新状态
	MOV CL,BL; 把当前开关状态存入CL, 更新流水线状态
	
LIGHT:
	MOV AL,CL; AL中存入流水线状态
	MOV DX,PORTB;
	OUT DX,AL; 灯亮
	
	mov bx,0ffffh; 	
delay:dec bx
       jnz delay	   
       mov bx,0ffffh
delay1:dec bx
       jnz delay1
       mov bx,0ffffh
delay2:dec bx
       jnz delay2
       mov bx,0ffffh
delay3:dec bx
       jnz delay3
       mov bx,0ffffh
delay4:dec bx
       jnz delay4
       mov bx,0ffffh
delay5:dec bx
       jnz delay5
       mov bx,0ffffh
delay6:dec bx
       jnz delay6  
	 
	ROR AL,1;右移一个灯
	MOV CL,AL; CL 保存下一个要亮的灯
	
	JMP LP1;
	
CSEG ENDS
END START 

    .model small 
    .386 ;老师说要加...
DSEG SEGMENT
    PORTA EQU 280H; A端口
    PORTB EQU 281H; B端口
    PORTD EQU 283H; 命令与状态口
DSEG ENDS



CSEG SEGMENT
ASSUME CS:CSEG,DS: DSEG
START: 
    
    MOV AX,DSEG;
    MOV DS,AX;

    MOV DX,PORTD
    MOV AL,90H;1001 0000 初始化命令：A端口0方式输入，B端口0方式输出
    OUT DX,AL;将初始化命令输入到命令状态口
    
    MOV DX,PORTA;
    IN AL,DX; 输入初始开关状态到AL
    MOV CL,AL; CL保存流水状态
    MOV BL,AL; BL保存旧的开关状态, 在此初始化BL
LP1:
    MOV DX,PORTA
    IN AL,DX
    MOV BH,AL;  BH存放新的开关状态
    
    CMP BH,BL; 判断开关状态是否发生改变
    JZ LIGHT; 如果开关状态未变，则调转到LIGHT
    MOV BL,BH; 否则旧的开关状态变为新状态
    MOV CL,BL; 把当前开关状态存入CL, 更新流水线状态
    
LIGHT:
    MOV AL,CL; AL中存入流水线状态
    MOV DX,PORTB;
    OUT DX,AL; 灯亮

    CALL DELAY1 
    ROR AL,1;右移一个灯
    MOV CL,AL; CL 保存下一个要亮的灯
    
    JMP LP1;
    
DELAY1 PROC ;子程序
 mov cx,25
    AGAIN:
    mov dx,0ffffh
    delay:dec dx
    jnz delay
    LOOP AGAIN
RET
DELAY1 ENDP



CSEG ENDS
END START 

又是一个被汇编实验折磨的夜晚啊