這是我編的用小鍵盤（8279）控制步進電機的匯編程序

ID:112317 · 發(fā)表于 2016-4-6 21:54

Z8279 EQU 212H
D8279 EQU 210H
D8251 EQU 228H
Z8251 EQU 22aH
LEDMOD EQU 00 ;左邊輸入,八位顯示外部譯碼八位顯示
LEDFEQ EQU 38H ;掃描頻率
STACK SEGMENT STACK
STA DW 512 DUP (?)
TOP EQU LENGTH STA
STACK ENDS
DATA SEGMENT
LED DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,77H,7CH,39H
DB 5EH,79H,71H
MESS1 DB 0DH,0AH,0DH,0AH
DB ' Speed-----Press 1~F',0DH,0AH
DB ' Direction-----Press + OR -',0DH,0AH
DB ' ESC-----Press 0',0DH,0AH,'
MESS2 DB 0dh,' Dir Now----','
SPDLY DB 1
DIRE DB '+'
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA,SS:STACK
START: MOV AX,STACK ;初始化
MOV SS,AX
MOV SP,TOP
MOV AX,DATA
MOV DS,AX
MOV DX,20BH ;8255初始化
MOV AL,80H
OUT DX,AL
MOV CX,100
LOOP $
MOV CX,05H
NEXT:PUSH CX
MOV DX,Z8251 ;初始化8251
MOV AL,00H
OUT DX,AL
MOV CX,04H
LOOP $
OUT DX,AL
MOV CX,04H
LOOP $
OUT DX,AL
MOV CX,04H
LOOP $
MOV AL,40H
OUT DX,AL
MOV CX,100
LOOP $
MOV AL,0CEH ;異步方式，設(shè)置為8個數(shù)據(jù)位,兩個停止位波特率因子為16
OUT DX,AL ;無奇偶校驗位
MOV CX,100
LOOP $
MOV AL,25H ;設(shè)為請求發(fā)送,允許發(fā)送,允許接收狀態(tài)
OUT DX,AL
MOV CX,100
LOOP $
POP CX
LOOP NEXT
NOP
MOV DX,Z8279
MOV AL,LEDMOD
OUT DX,AL
MOV AL,LEDFEQ
OUT DX,AL
MOV DX,D8279
MOV AL,7FH
OUT DX,AL
MOV DX,D8279
MOV AL,7FH
OUT DX,AL
MOV DX,D8279
MOV AL,7DH
OUT DX,AL
MOV DX,D8279
MOV AL,7FH
OUT DX,AL
MOV DX,D8279
MOV AL,70H
OUT DX,AL
MOV DX,D8279
MOV AL,5EH
OUT DX,AL
MOV DX,D8279
MOV AL,79H
OUT DX,AL
MOV DX,D8279
MOV AL,77H
OUT DX,AL ;以上為寫(AEDK8688)
NOP
BG:MOV DX,Z8279
MOV AL,0C2H
OUT DX,AL ;置空FIFO寄存器
PUSH DX
LEA DX,MESS1 ;顯示信息1
MOV AH,09H
INT 21H
LEA DX,MESS2
MOV AH,09H
INT 21H
MOV DL,DIRE ;顯示方向信息
MOV AH,06H
INT 21H
POP DX
WAIIT:MOV AH,0BH
INT 21H
CMP AL,0FFH;有鍵輸入則為0FFH
JNE WAT;無鍵入轉(zhuǎn)
L3:MOV AH,08H
INT 21H
L4:CMP AL,'+'
JE L0
CMP AL,'-'
JE L1
CMP AL,'9'
JNA DA
SUB AL,37H
CMP AL,0AH
Jb WAIIT
CMP AL,0FH
Ja WAIIT
JMP JIAN
DA: SUB AL,30H
CMP AL,00H
JB WAT
JMP PAN
WAT:NOP
IN AL,DX
MOV BL,AL
AND AL,80H
CMP AL,80H
JE WAT ;FIFO正在清除期間則跳轉(zhuǎn)等待
MOV AL,BL
AND AL,0FH
CMP AL,00H
JE WAIIIT ;無鍵按下轉(zhuǎn)
BG3:MOV DX,Z8279
MOV AL,40H ;寫讀FIFO RAM命令字
OUT DX,AL
MOV DX,D8279 ;讀入FIFO RAM內(nèi)容
IN AL,DX
NOP
JMP PAN
WAIIIT:PUSH DX
MOV DX,Z8251
MOV AH,02H
IN AL,DX ;有數(shù)據(jù)送到嗎?
AND AL,AH
JZ WAIIT ;讀入寄存器空，沒有數(shù)據(jù)送到則跳轉(zhuǎn)至發(fā)送
L5:MOV DX,D8251 ;有數(shù)據(jù)送到則從數(shù)據(jù)緩沖區(qū)讀入
IN AL,DX
JMP L4
PAN:CMP AL,00H ;是結(jié)束符則結(jié)束
JZ AK
JIAN:MOV BL,AL ; 查表,將鍵碼放入AL中
CMP AL,0fH;速度不在1~15之間
JA BG1
MOV SPDLY,AL;
JMP BB0
L4:JMP BG
BG1: CMP AL,13H ;方向控制鍵
JE L0
CMP AL,12H
JNE L4
L1:MOV DIRE,'-'
JMP BG2
L0:MOV DIRE,'+'
BG2:push dx
LEA DX,MESS2
MOV AH,09H
INT 21H
MOV DL,DIRE;顯示方向信息
MOV AH,06H
INT 21H
POP DX
MOV DX,Z8279 ;清FIFO RAM寄存器
MOV AL,0C2H
OUT DX,AL
JMP BB1
L2:JMP L3
BB0: mov cx,08h
mov al,00h
clear: MOV DX,D8279
out dx,al
loop clear
mov dx,z8279
mov al,83h
out dx,al
MOV AL,BL
LEA BX,LED
XLAT
MOV DX,D8279 ;將AL中內(nèi)容寫到數(shù)碼管上
OUT DX,AL
MOV DX,Z8279 ;清FIFO RAM寄存器
MOV AL,0C2H
OUT DX,AL
JMP BB1
AK: JMP FINI
BG4:JMP BG3
L6:JMP L5
BB1: MOV AH,0BH ;判斷PC機是否有鍵按下
INT 21H
CMP AL,0FFH
JE L2
MOV DX,Z8279
IN AL,DX
NOP
AND AL,0FH
CMP AL,00H
JNE BG4
MOV DX,Z8251
MOV AH,02H
IN AL,DX ;有數(shù)據(jù)送到嗎?
AND AL,AH
JNZ L6
XOR CX,CX
MOV CL,SPDLY
CALL DELAY
MOV DX,208H
MOV AL,00000001B
OUT DX,AL
CMP DIRE,'+' ;控制轉(zhuǎn)向
JNE BB2
XOR CX,CX
MOV CL,SPDLY
CALL DELAY
MOV DX,208H
MOV AL,00000010B
OUT DX,AL
XOR CX,CX
MOV CL,SPDLY
CALL DELAY
MOV DX,208H
MOV AL,00000100B
OUT DX,AL
XOR CX,CX
MOV CL,SPDLY
CALL DELAY
MOV DX,208H
MOV AL,00001000B
OUT DX,AL
JMP BB1
BB2:XOR CX,CX
MOV CL,SPDLY
CALL DELAY
MOV DX,208H
MOV AL,00001000B
OUT DX,AL
XOR CX,CX
MOV CL,SPDLY
CALL DELAY
MOV DX,208H
MOV AL,00000100B
OUT DX,AL
XOR CX,CX
MOV CL,SPDLY
CALL DELAY
MOV DX,208H
MOV AL,00000010B
OUT DX,AL
JMP BB1
FINI: MOV DX,Z8279 ;清FIFO寄存器并關(guān)蜂鳴器
MOV AL,0C2H
OUT DX,AL
MOV AH,4CH
INT 21H
DELAY PROC NEAR
PUSH CX
MOV CX,80 ;延時子程序
DELAY1: PUSH CX
MOV CX,2000H
LOOP $
POP CX
LOOP DELAY1
POP CX
LOOP DELAY
RET
DELAY ENDP
CODE ENDS
END START

復(fù)制代碼

帳號		自動登錄	找回密碼
密碼			立即注冊