INC R0 ；调整数据指针 DJNZ R7，LP ； RET

键盘中断子程序如下：

KEY:PUSH PSW PUSH DPL PUSH DPH PUSH ACC PUSH B SETB PSW.3

MOV DPTR，#7FFFH ；置状态口地址 MOVX A，@DPTR ；读FIFO状态 ANL A，#0FH ； JZ PKYR ；

MOV A，#40H ；置读FIFO命令 MOVX @DPTR，A ；送读FIFO命令 MOV DPTR，#7FFEH ；置数据口地址 MOVX A，@DPTR ；读数据

LJMP KEY1 ；转键值处理程序PKYR: POP B POP ACC POP DPH POP DPL POP PSW

RETI ； 驱动电路子程序的设计

49

PUSH:MOV R3 , # NUM

PUSH A PUSH PSW LOOP: SETB P1.0 ACALL DELAY1 CLR P1.0 ACALL DELAY2 DJNZ R3,LOOP POP PSW POP A RET 延时子程序的设计 MOV R2,#18H LCALL 7FEBH RET

ORG 7FEBH 序(07EBH & 0FEBH & ...)

L7FEB: PUSH 02H 02H)存放时间常数,进栈保护

L7FED: PUSH 02H L7FEF: PUSH 02H L7FF1: DJNZ R2,$ POP 02H DJNZ R2,L7FEF POP 02H

;通用延时子程复位后R2即为R2进栈保护 进栈 ;R2不为零等待 ;出栈 ; R2不为零转 ; 出栈

50

;R2( ; ;

DJNZ R2,L7FED ; R2不为零转 POP 02H ; 出栈 DJNZ R2,L7FEB ; R2不为零转 RET ;子程序返回

END

图6-4-1 主程序流程图

主程序如下:

CON: MOV R3, # N MOV TMOD , # 10H MOV TL1 , # LOW MOV TH1 , # H IGH JNB FLAG ,LEFT MOV R0 , RM AJMP TIME - S LEFT: MOV R0 , LM TIME: SETB EA SETB ET1 SETB TR1

步进电机控制程序p3.2正转,p3.3反转,p3.4停止 步进电机接p1.0p1.1p1.2p1.3

org 00h

stop: orl p1,#0ffh ; 步进电机停止 loop:jnB p3.2,for2 ; 如果p3.2按下正转

51

jnB p3.3,rev2 ; 如果p3.3按下反转 jnB p3.4,stop1 ; 如果p3.4按下停止 jmp loop ;反复监测键盘 for: mov r0,#00h ;正转到tAB取码指针初值

for1:mov A,r0 mov dptr,#tABle movC A,@A+dptr

jz for 结束码00h

Cpl A 向

mov p1,A 始正转

jnB p3.4,stop1 止

jnB p3.3,rev2 反转

CAll delAy inC r0 码

jmp for1 rev:mov r0,#05h 初值

rev1:mov A,r0

mov dptr,#tABle

;取码 ; ;是否到了 ;把ACC反 ;输出到p1开 ; 如果p3.4按下停 ; 如果p3.3按下 ;转动的速度 ;取下一个 ;继续正转 ;反转到tAB取码指针 ;取码

52

movC A,@A+tABle

jz rev ;是否到了结束码00h

Cpl A ;把ACC反向

mov p1,A 始反转

jnB p3.4,stop1 止

jnB p3.3,rev2 反转

CAll delAy inC r0 码

jmp rev1 stop1:CAll delAy 动

jnB p3.4,$ CAll delAy jmp stop

for2:CAll delAy 除抖动

jnB p3.2,$ CAll delAy jmp for

rev2:CAll delAy

;输出到p1开 如果p3.4按下停 ; 如果p3.3按下 ;转动的速度 ;取下一个 ;继续反转 按p3.4的消除抖 ; p3.4放开否? ;放开消除抖动 ; 按p3.2的消 ; p3.2放开否? ;放开消除抖动 ; 按p3.3的消

53

; ;