jdq.asm

继电器控制,设8255为A口输入,C口输出,延时5s,是否有键按下,若有则转exit,查询8255的PA0是否为高电平,若不是则继续,定时时间到

;***************************;
;*     继电器控制          *;
;***************************;
ioport		equ 0d400h-0280h
io8255a		equ ioport+280h
io8255b		equ ioport+281h
io8255c		equ ioport+283h
io8255d		equ ioport+288h
io8255e		equ ioport+28bh
code segment
	  assume cs:code
start:	mov dx,io8255e         ;设8255为A口输入,C口输出
	mov al,90h
lll:    out dx,al
	mov al,01           ;将PC0置位
	out dx,al
	call delay          ;延时5s
	mov al,0            ;将PC0复位
	out dx,al
	call delay          ;延时5s
	jmp lll             ;转lll
delay proc near           ;延时子程序
	push dx
	mov dx,io8255c         ;设8253计数器为方式3
	mov al,36h
	out dx,al
	mov dx,io8255a
	mov ax,10000          ;写入计数器初值10000
	out dx,al
	mov al,ah
	out dx,al
	mov dx,io8255c
	mov al,70h          ;设计数器1为工作方式0
	out dx,al
	mov dx,io8255b
	mov ax,500          ;写入计数器初值500
	out dx,al
	mov al,ah
	out dx,al
ll2:	mov ah,06            ;是否有键按下
	mov dl,0ffh
	int 21h
	jne exit            ;若有则转exit
	mov dx,io8255d
	in  al,dx           ;查询8255的PA0是否为高电平
	and al,01
	jz  ll2             ;若不是则继续
	pop dx
	ret                 ;定时时间到，子程序返回
exit:   mov ah,4ch
	int 21h
delay endp
	code ends
	end start