没有合适的资源?快使用搜索试试~ 我知道了~
基于89C51的多功能精密电子秤
5星 · 超过95%的资源 需积分: 9 33 下载量 106 浏览量
2009-08-11
09:32:18
上传
评论 2
收藏 54KB DOC 举报
温馨提示
试读
27页
2008年2期“多功能精密电子秤”一文所涉及的源程序 〔 作者:Admin 点击数:3069 更新时间:2008-3-21 〕 2008年2期“多功能精密电子秤”一文的源程序如下,仅供读者参考
资源推荐
资源详情
资源评论
2008 年 2 期“多功能精密电子秤”一文所涉及的源程序
[ 作者:Admin 点击数:3193 更新时间:2008-3-21]
【字体: 】
2008 年 2 期“多功能精密电子秤”一文的源程序如下,仅供读者参考:
附录 2
BitCnt data 3Ch ; 数据位计数器
ByteCnt data 3Dh ; 数据字节计数器
Command data 3Eh ; 命令字节地址
RcvDat DATA 40H ; 接收数据缓冲区
XmtDat DATA 50H ; 发送数据缓冲区
;端口位定义
IO_DATA bit P0.1 ; 数据传送总线
SCLK bit P0.2 ; 时钟控制总线
RST bit P0.0 ; 复位总线
RS EQU P3.7;确定具体硬件的连接方式
RW EQU P3.6 ;确定具体硬件的连接方式
E EQU P3.5 ;确定具体硬件的连接方式
ORG 0000H
LJMP MAIN1
ORG 0100H
MAIN1:
;**********************系统的初始化*******************
MOV 4DH,#0
MOV 4CH,#0
MOV 4BH,#0
MOV 4AH,#0
MOV R4,#0
MOV 69H,#0
MOV 30H,#0
MOV 31H,#0
MOV 32H,#0
MOV 33H,#0
MOV 34H,#0
MOV 35H,#0
MOV P2,#00000001B;清屏并光标复位
LCALL ENABLE;调用写入命令子程序
MOV P2,#00111000B;设置显示模式:8 位 2 行 5x7 点阵
LCALL ENABLE ;调用写入命令子程序
MOV P2,#00001100B;显示器开、光标开、光标允许闪烁
LCALL ENABLE ;调用写入命令子程序
MOV P2,#00000110B;文字不动,光标自动右移
LCALL ENABLE ;调用写入命令子程序
LCALL Write_Enable;写允许
LCALL Osc_Disable
LCALL Write_Multiplebyte;初始化 1302,将我们要设定的数据写入
;**********************系统的初始化*******************
MAIN:
MOV 3AH,#0
MOV 3BH,#0
MOV 5EH,#0
MOV 5DH,#0
MOV 5CH,#0
MOV 5BH,#0
MOV 5AH,#0
MOV 70H,#0
MOV 71H,#0
MOV 72H,#0
MOV 73H,#0
MOV 74H,#0
MOV 75H,#0
MOV TH1,#0
MOV TL1,#0
MOV TMOD,#10h
ADC:JB P3.3,ADC
WH:JNB P3.3,WH;第一个上升沿,启动定时
NOP
NOP
MOV TL1,#00H
MOV TH1,#00H
SETB ET1
SETB EA
SETB TR1
WL:JB P3.3,WL
CLR TR1;第二个下降沿,关闭定时
NOP
NOP
CLR C
MOV A,TH1
RRC A
MOV 3AH,A
MOV A,TL1
RRC A
MOV 3BH,A
MOV A,3BH
;********数据存取选用了 5AH-5EH*********
MOV A,3BH;初始给存储单元赋低 8 位值
MOV B,#10
DIV AB
MOV 5AH,B
MOV B,#10
DIV AB
MOV 5BH,B
MOV 5CH,A
MOV A,3AH
CJNE A,#0,SM
LJMP JS
SM:
MOV A,5AH;不停的加上 256
ADD A,#6
MOV B,#10
DIV AB
MOV 5AH,B
ADD A,5BH
ADD A,#5
MOV B,#10
DIV AB
MOV 5BH,B
ADD A,5CH
ADD A,#2
MOV B,#10
DIV AB
MOV 5CH,B
ADD A,5DH
MOV B,#10
DIV AB
MOV 5DH,B
ADD A,5EH
MOV 5EH,A
DEC 3AH
MOV A,3AH
CJNE A,#0,SM
js:
;************数据调整*************
MOV A,5DH
ADD A,#10
SUBB A,#9
MOV B,#10
DIV AB
MOV 5DH,B
ADD A,5EH
DEC A
MOV 5EH,A
MOV 4FH,#0
MOV 30H,#0
MOV 31H,#0
MOV 32H,#0
MOV 33H,#0
MOV 34H,#0
MOV 35H,#0
MOV 5FH,#1
;************除以 63,进行重量校准*************
LOOP:
MOV A,4FH
ADD A,#10
SUBB A,#3
MOV B,#10
DIV AB
MOV 4FH,B
ADD A,5AH
ADD A,#10
DEC A
SUBB A,#6
MOV B,#10
DIV AB
MOV 5AH,B
ADD A,5BH
ADD A,#10
DEC A
MOV B,#10
DIV AB
MOV 5BH,B
ADD A,5CH
ADD A,#10
DEC A
MOV B,#10
DIV AB
MOV 5CH,B
ADD A,5DH
ADD A,#10
DEC A
MOV B,#10
DIV AB
MOV 5DH,B
ADD A,5EH
ADD A,#10
DEC A
MOV B,#10
DIV AB
MOV 5EH,B
ADD A,5FH
DEC A
MOV 5FH,A
MOV A,5FH
CJNE A,#1,TUICHU
INC 32H
MOV A,32H
CJNE A,#10,TUI
MOV 32H,#0
INC 33H
MOV A,33H
剩余26页未读,继续阅读
资源评论
- yuangd0022015-12-01很好的资源,正需要。。
lawzm
- 粉丝: 0
- 资源: 2
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功