CODE SEGMENT
ASSUME CS:CODE
CONTROL equ 43h
COUNT0 equ 40h
COUNT1 equ 41h
COUNT2 equ 42h
DAPORT EQU 0FF80h ;电机控制口
IOCONPT EQU 0FF2BH ;扩展8255命令口
IOBPT EQU 0FF29H ;扩展8255 PB口
IOAPT EQU 0FF28H ;扩展8255 PA口
PA EQU 0FF20H ;字位口
PB EQU 0FF21H ;字形口
PC EQU 0FF22H ;键入口
ZP DW ? ;显示指针
ORG 1630H ;程序起始地址
START: JMP START0
saveKeyBuf DB ?,?,?,?,?,? ;密码缓冲区
inputBuf DB ?,?,?,?,?,? ;输入缓冲区
KZ DB ? ;存放键值
ltime db ? ;定时单元
lkey db ? ;上次键值
data1: db 0c0h,0f9h,0a4h,0b0h,99h,92h,82h,0f8h,80h,90h,88h,83h,0c6h,0a1h
db 86h,8eh,0ffh,0ch,89h,0deh,0c7h,8ch,0f3h,0bfh,8FH,0F1H
data3: dw 2273, 2024, 1805, 1704 ;音频表
dw 1517, 1353, 1205, 1136
saveKeyBuf_INIT: ;saveKeyBuf初始化，写"----"
MOV saveKeyBuf,17H
MOV saveKeyBuf+1,17H
MOV saveKeyBuf+2,17H
MOV saveKeyBuf+3,17H
MOV saveKeyBuf+4,0ffH
MOV saveKeyBuf+5,0ffH
RET
inputBuf_INIT: ;inputBuf初始化，写"----"
MOV inputBuf,17H
MOV inputBuf+1,17H
MOV inputBuf+2,17H
MOV inputBuf+3,17H
MOV inputBuf+4,0ffH
MOV inputBuf+5,0ffH
RET
BUFRIGHT: ;inputBuf写"1111"
MOV inputBuf,01H
MOV inputBuf+1,01H
MOV inputBuf+2,01H
MOV inputBuf+3,01H
MOV inputBuf+4,0ffH
MOV inputBuf+5,0ffH
RET
START0:
CALL saveKeyBuf_INIT ;密码缓冲区初始化,"----"
CALL inputBuf_INIT ;输入缓冲区初始化,"----"
MOV AL,88H
MOV DX,IOCONPT
OUT DX,AL
MOV AL,80H ;定义PA输出
MOV DX,IOCONPT ;控制口
