数显程序：
ORG 0000H
AJMP RESET
ORG 0030H
RESET: MOV P1,#000H ;初始化
MOV P0,#0FFH
MOV P2,#0FFH
MOV DPTR,#TAB ;数码管显示表地址START: ACALL PULSE ;记录0.2s时间的脉冲数ACALL TRAN ;将脉冲数T0转化为车速并存储
ACALL DISPLAY ;显示速度0.8s
AJMP START
PULSE: MOV TMOD,#55H ;T0 T1初始化计数方式二
;MOV TMOD,#60H CLR EA
MOV TL0,#00H
MOV TH0,#00H ;置T0初值0
MOV TL1,#00H
MOV TH1,#00H ;置T1初值0
MOV TCON,#50H
ACALL DELAY ;0.2S延时
MOV TCON,#00H
RET
TRAN: MOV A,TL0 ;TLO是T0计数器的低8位
MOV B,#10
DIV AB ;A/B,商入A，余数入B
MOV R0,B
MOV B,#7
MUL AB ;A*B,高8位存入A，低8位存入B
MOV 32H,A
MOV A,R0
MOV B,#7
MUL AB
MOV B,#10
DIV AB
ADD A,32H
MOV 32H,A
MOV 30H,B
MOV A,TL0
MOV B,#100
DIV AB
MOV R0,B
MOV B,#6
MUL AB
ADD A,32H
MOV 32H,A
MOV A,R0
MOV B,#10
DIV AB
MOV R0,B
MOV B,#6
MUL AB
MOV B,#10
DIV AB
ADD A,32H
MOV 32H,A
MOV A,B
ADD A,30H
MOV 30H,A
MOV A,R0
MOV B,#6
MUL AB
MOV B,#10
DIV AB
ADD A,30H
MOV B,#10
DIV AB
MOV 30H,B
ADD A,32H
MOV 32H,A
MOV B,#10
DIV AB
MOVC A,@A+DPTR
MOV 32H,A
MOV A,B
MOVC A,@A+DPTR
MOV 31H,A
MOV A,30H
MOVC A,@A+DPTR
MOV 30H,A
RET
; 显示把数据传入数码管显示DISPLAY: MOV P1,#00H
MOV P2,32H
SETB P1.2 ;置1
CLR P1.2 ;清0 启动74LS273
MOV P2,31H
SETB P1.1
CLR P1.1
MOV P2,30H
SETB P1.0
CLR P1.0
RET
DELAY: MOV R5,#4 ;采集速度延时0.2S DEL: MOV R7,#100
DEL11: MOV R6,#250
DEL22: DJNZ R6,DEL22
DJNZ R7,DEL11
DJNZ R5,DEL
RET
；共阴极
TAB: DB 03FH,006H,05BH,04FH,066H ;0,1,2,3,4 DB 06DH,07DH,007H,07FH,06FH ;5,6,7,8,9
DB 077H,07CH,039H,05EH,079H,71H ;A,B,C,D,E,F
END
主程序：
ORG 0000H
AJMP RESET
ORG 0030H
RESET: MOV SP,#5FH
SETB EA
LCALL FORWARD //调用电机正转子程序
LCALL YANSHI //外部中断边沿触发
LCALL STOP
START: MOV P1,#0FFH //扫描按键确定是KEY1 OR KEY2
CJNE R2,#0,GO //A=1就到go,说明之前离合器分离
JNB P1.1,KEY1 //A=0的情况下才进入这一步，若P1.1为0，则驾驶员给分离命令，跳入执行分离命令子程序
AJMP START
GO: JNB P1.2,KEY2
AJMP START
KEY1: LCALL REVERSE //调用电机反转子程序
LCALL YANSHI
ACALL STOP
AJMP START
KEY2: MOV TMOD,#55H //测速，离合器即将结合，结合调用forward命令
MOV TL0,#0
MOV TH0,#0
MOV TL1,#0
MOV TH1,#0
MOV TCON,#50H
LCALL DELAY
MOV TCON,#0 //取值并比较判断
MOV A,TL0 //车速24%换算后计算模块
MOV B,#5
DIV AB
MOV B,#6
MUL AB
MOV R4,A
MOV A,TL0 //车速转换
MOV B,#5
MUL AB
MOV R0,A
MOV R1,B
MOV A,TL1 //链速转换
MOV B,#4
MUL AB
CLR C
ADD A,R4 //与车速相差24%
MOV R2,A
JNC LP //进位标志位为0就转移
INC B //混合低位有进位，则在混合高位上进1
LP: MOV A,B
MOV R3,A
MOV A,R1
CLR C
SUBB A,R3 //R0-车低位，R1-车高位，R2-混合低位，R3-混合高位
JZ LP1 //判断C高-H高,相等继续判断低位
JNC KEY2 //CY=0,C高>H高，继续判断
JC LP2 //C高<H高，结合
LP1: MOV A,R0
CLR C
SUBB A,R2
JZ LP2 //判断C低-H低,相等就结合
JNC KEY2 //CY=0,C低>H低，继续判断
LP2: LCALL FORWARD
LCALL YANSHI
LCALL STOP
AJMP START
YANSHI: MOV R5,#5 ;延时1.25秒子程序
Y1: MOV R6,#0FFH
Y2: MOV R7,#0FFH
Y3: DJNZ R7,Y3
DJNZ R6,Y2
DJNZ R5,Y1
RET
FORWARD: SETB P2.0 //P2.1电机正转使能端，P2.3正传指示灯CLR P2.2 //电机正转子程序，P2.0伺服电机使能端
SETB P2.1
MOV R2,#0
RET
REVERSE: SETB P2.0 //P2.2电机反转使能端，P2.4反转指示灯CLR P2.1 //电机反转子程序
SETB P2.2
MOV R2,#1
RET
STOP: CLR P2.0 //电机停止子程序
SETB P2.3
SETB P2.4
RET
DELAY: MOV R5,#10 ;延时0.1秒子程序D1: MOV R6,#20
D2: MOV R7,#248
DJNZ R7,$
DJNZ R6,D2
DJNZ R5,D1
RET
END。
