![](https://iknow-base.cdn.bcebos.com/lxb/notice.png)
基于51单片机,用霍尔传感器测算智能小车行走的距离!谁有汇编程序,贴上来我学习学习。
2个回答
展开全部
ORG 0000H
SJMP MAIN
MAIN:
MOV TMOD,#05H
MOV TH0,#0
MOV TL0,#0
SETB EA
MOV P0,#0FFH
SETB TR0
ST:
MOV A,TL0
MOV 30H,A
LCALL BTOD
LCALL DISP
SJMP ST
BTOD:
MOV A,30H
MOV B,#100
DIV AB
MOV 20H,A
MOV A,B
MOV B,#10
DIV AB
MOV 21H,A
MOV 22H,B
RET
DISP:
MOV DPTR,#SEG7
MOV A,21H
MOVC A,@A+DPTR
MOV P0,A
CLR P3.0
LCALL DELAY
SETB P3.0
MOV A,22H
MOVC A,@A+DPTR
MOV P0,A
CLR P3.1
LCALL DELAY
SETB P3.1
RET
DELAY:MOV R7,#20
D00:MOV R6,#100
D11:DJNZ R6,D11
DJNZ R7,D00
RET
SEG7: DB 0C0H,0F9H,0A4H,0B0H
DB 99H,92H,82H,0F8H
DB 80H,90H,88H,83H
DB 0C6H,0A1H,86H,8EH
END
用单片机的p3.4口 数码管显示p0口 共阳极数码管动态显示p3.0和p3.1接com端,我这个程序你得修改一下 根据你的轮子的大小 计算每圈走的距离就可以算出小车行走的距离 祝你成功!
SJMP MAIN
MAIN:
MOV TMOD,#05H
MOV TH0,#0
MOV TL0,#0
SETB EA
MOV P0,#0FFH
SETB TR0
ST:
MOV A,TL0
MOV 30H,A
LCALL BTOD
LCALL DISP
SJMP ST
BTOD:
MOV A,30H
MOV B,#100
DIV AB
MOV 20H,A
MOV A,B
MOV B,#10
DIV AB
MOV 21H,A
MOV 22H,B
RET
DISP:
MOV DPTR,#SEG7
MOV A,21H
MOVC A,@A+DPTR
MOV P0,A
CLR P3.0
LCALL DELAY
SETB P3.0
MOV A,22H
MOVC A,@A+DPTR
MOV P0,A
CLR P3.1
LCALL DELAY
SETB P3.1
RET
DELAY:MOV R7,#20
D00:MOV R6,#100
D11:DJNZ R6,D11
DJNZ R7,D00
RET
SEG7: DB 0C0H,0F9H,0A4H,0B0H
DB 99H,92H,82H,0F8H
DB 80H,90H,88H,83H
DB 0C6H,0A1H,86H,8EH
END
用单片机的p3.4口 数码管显示p0口 共阳极数码管动态显示p3.0和p3.1接com端,我这个程序你得修改一下 根据你的轮子的大小 计算每圈走的距离就可以算出小车行走的距离 祝你成功!
2010-12-07
展开全部
我发给你
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询