MY8255_AEQU 0A860H;8255A口地址
MY8255_BEQU 0A861H;8255B口地址
MY8255_CEQU 0A862H;8255C口地址
MY8255_MODE EQU 0A863H;8255控制口地址
CODE SEGMENT
ASSUME CS:CODE
START: MOV DX,MY8255_MODE
MOV AL,82H
OUT DX,AL;将控制字82H写入8255控制口,A口方式0输出,B口方式0输入, C口未用到。
A1:MOV DX,MY8255_B
IN AL,DX ;读8255 B口内容
MOV DX,MY8255_A
OUT DX,AL ; 将前面读到的B口内容送到A口,即A口内容=B口内容
CALL BREAK;调用子程序BREAK
JMP A1;跳转到A1
BREAK PROC NEAR ;BREAK子程序
MOV AH,1
INT 16H
JZ RETURN ;读按键字符,ZF=1,则返回;ZF=0,则AL=字符
MOV AX,4C00H
INT 21H ;返回DOS
RETURN:RET
BREAK ENDP
CODE ENDS 皮氏渗
END START
流水灯显示
MY8255_AEQU 0b860H;8255A口地址
MY8255_BEQU 0b861H;8255B口地址
MY8255_CEQU 0b862H;8255C口地址
MY8255_MODE EQU 0b863H;8255控制口地址
DATA SEGMENT
LA DB ?;留出1个字节
LB DB ?;留出1个字节
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA
START: MOV AX,DATA
MOV DS,AX
MOV DX,MY8255_MODE
MOV AL,80H
OUT DX,AL ;控制字80H送入8255控制口,A口、B口都是方式0输出,C口未用到。
MOV DX,MY8255_A
MOV AL,7FH
OUT DX,AL ;将7FH送入A口
MOV LA,AL ;将7FH送入LA存储单元燃脊
MOV DX,MY8255_B
MOV AL,0FEH
OUT DX,AL;将FEH送入B口
MOV LB,AL ;将FEH送入LB存储单元
CALL DALLY
A1:MOV AL,LA
ROR AL,1;LA内容循环右移1次
MOV LA,AL
MOV DX,MY8255_A
OUT DX,AL ;将循环右移后的LA内容送A口,其目的是让A口连接的LED灯依次向右循环点亮
MOV AL,LB
ROL AL,1 ;LB内容循环左移1次
MOV LB,AL
MOV DX,MY8255_B
OUT DX,AL ;将循环左移后的LB内容送B口,核如其目的是让B口连接的LED灯依次向左循环点亮
CALL DALLY ;延时,让一个LED灯发光稳定之后再点亮另一个
CALL BREAK ;调用BREAK子程序,看是否有键按下
JMP A1 ;跳转到A1
DALLY: MOV CX,3FFH ;延时子程序
D1:MOV AX,0FFFFH
D2:DEC AX
JNZ D2
LOOP D1
RET
BREAK PROC NEAR ;是否有键按下
MOV AH,06H
MOV DL,0FFH
INT 21H
JE RETURN ;若无,则转RETURN
MOV AX,4C00H
INT 21H ;返回DOS
RETURN:RET
BREAK ENDP
CODE ENDS
END START
我的思路是,延时用8253 的方式3,两个通道连用,输出周期为1秒的方波信携,在0.5秒的低电平时,让8255工作,0.5秒的高电平时,不让8255工作,这滑清伏个题的延时正嫌是通过硬件电路实现的,如果用软件延时,8253一点用都没有我X!百度把我刚才的答案给屏蔽了。我又重写一扁。主要就是通过8255的A口悉乎氏作高电平输入。B口作为LED的反馈。然后对A扣的闭合取反。 这个是电路图。 设A~控制口依次为 E0 E2 E4 E6 方式字为 92H 默认C口输出 A工作在方式0 B工作睁散顷穗在方式0 MOV AL,92H OUT E6H,AL LED:IN AL,E0H NOT AL OUT E2H,AL JMP LED 亮为闭合。灭为打开。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)