单片机数显程序.doc

数显程序： org 0000h ajmp reset org 0030hreset: 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 startpulse: 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 rettran: 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 retdelay: mov r5,#4 ;采集速度延时0.2sdel: mov r7,#100 del11: mov r6,#250del22: djnz r6,del22 djnz r7,del11 djnz r5,del ret ；共阴极tab: db03fh,006h,05bh,04fh,066h ;0,1,2,3,4 db06dh,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 0030hreset: mov sp,#5fh setb ea lcall forward /调用电机正转子程序 lcall yanshi /外部中断边沿触发 lcall stopstart: mov p1,#0ffh /扫描按键确定是key1 or key2 cjne r2,#0,go /a=1就到go,说明之前离合器分离 jnb p1.1,key1 /a=0的情况下才进入这一步，若p1.1为0，则驾驶员给分离命令，跳入执行分离命令子程序 ajmp startgo: jnb p1.2,key2 ajmp start key1: lcall reverse /调用电机反转子程序 lcall yanshi acall stop ajmp startkey2: 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 /混合低位有进位，则在混合高位上进1lp: 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低，继续判断lp2: lcall forward lcall yanshi lcall stop ajmp startyanshi: mov r5,#5;延时1.25秒子程序y1: mov r6,#0ffhy2: mov r7,#0ffhy3: djnz r7,y3 djnz r6,y2 djnz r5,y1 retforward: setb p2.0 /p2.1电机正转使能端，p2.3正传指示灯 clr p2.2 /电机正转子程序，p2.0伺服电机使能端 setb p2.1 mov r2,#0 retreverse: setb p2.0 /p2.2电机反转使能端，p2.4反转指示灯 clr p2.1 /电机反转子程序 setb p2.2 mov r2,#1 retstop: clr