基于单片机的里程表设计.doc

基于单片机的里程表设计摘要：本文介绍里程表设计以单片机和霍尔传感器为核心。霍尔传感器将到来的低电平脉冲信号输入到单片机进行控制与计算，再采用LED模块进行显示，使得电动自行车的里程数据能直观的显示给使用者。自行车里程表是用于远距离连续测量自行车行驶距离的仪表。它分为电源、霍尔传感器和显示器3部分。目前，里程表普遍使用在汽车和摩扦车上，是一种机械测量装置，测试精度相对低，自行车上使用里程表的还很少见。针对这种情况，研制新型的数字化里程表用于自行车上是非常必要的。本文介绍的自行车里程表是由电源稳压系统供电，AT89C52单片机为中央处理器，结合高精度的控制电路，方便地实现了智能化、高精度、高可靠性、高效率的自行车里程表的设计，并且使用方便。关键词：测控系统 单片机 自行车 码表 目录1 设计要求41.1基本要求41.2 发挥部分42 方案讨论42.1 速度的测量42.2 传感器的选择42.3 单片机的徐泽52.4 显示器选择53 功能描述64 结构框图65 电路图76 元器件简介7 6.1 AT89S52单片机简介7 6.2 LED数码管显示器7 6.3 霍尔开关型传感器87 系统流程图98 调试过程简述99 程序编写步骤1010 参考文献1211 附录11412 附录 225一 设计要求以单片机为核心器件设计一个自行车行车码表。以实际自行车为背景，码表精度尽可能高、体积尽可能小，成本尽可能低，功耗尽可能低、功能尽可能丰富。1.基本要求：（1）能够显示实时速度、里程等相关信息；（2）能够任意设定车轮周长；（3）能够记录最高及平均速度；2.发挥部分：（1）能够保存相关信息；（2）能够显示温度、风速、是否下雨等环境信息；二 方案讨论1 速度的测量测速度的方法有两类：1) 测量一定时间间隔t里自行车车轮转过的圈数n。假设车轮周长为c，则速度；2) 测量自行车车轮转过一圈的时间t，则速度。2 传感器的选择 有多种传感器可供选择：1) 光电传感器。光电传感器是采用光电元件作为检测元件的传感器。它首先把被测量的变化转换成光信号的变化，然后借助光电元件进一步将光信号转换成电信号。光电检测方法具有精度高、反应快、非接触等优点，而且可测参数多，传感器的结构简单，形式灵活多样。2) 红外对管。把红外对管分别安装在自行车车轮的两侧，当车轮转动时，辐条会阻挡红外对管的光路，接收管输出低电平，单片机根据此信号可计算里程、速度等。红外对管的优点是测量精度高，缺点是安装比较复杂和容易受外来光线、灰尘等的影响。3) 开关型霍尔传感器。霍尔传感器是利用霍尔效应把磁输入信号转换成电信号的器件。把开关型霍尔传感器安装在自行车贴近车轮的支架上，磁钢安装在辐条上，当磁钢靠近霍尔传感器的时候，传感器输出一个无抖动的低电平，单片机根据此信号可计算里程、速度等。霍尔传感器的优点是稳定和安装简易，缺点是成本较高。4) 干簧管。干簧管是一种磁敏的有触点无源电子开关元件，应用在里程表上的原理与开关型霍尔传感器类似，把干簧管安装在自行车贴近车轮的支架上，磁钢安装在辐条上，当磁钢靠近霍尔传感器的时候，干簧管闭合，单片机根据此信号可计算里程、速度等。干簧管的优点是成本低廉和安装简易，缺点是比较脆弱和不够稳定。3 单片机的选择选用MCS51系列的，也可以选用AT89S52、SST89E51RD等。4 显示器的选择 分两类：1) 动态扫描LED数码管显示。里程表的显示内容以数字为主，利用LED数码管可基本满足使用要求，且成本较低。但是用动态扫描的方式驱动数码管，亮度太低，在阳光下几乎看不见显示内容，失去使用价值。2) 串行静态LED数码管显示。把单片机的串行口设置为方式0（同步移位寄存器），输出显示信息，可实现LED数码管的静态显示，其亮度令人满意。但由于要使用74HC164/74LS164串并转换芯片驱动LED数码管，因此会带来体积大、成本高、功耗高等的缺点。3) LCD液晶显示模块。液晶显示模块具有体积小、功耗低、显示内容丰富等特点，现在字符型液晶显示模块已经是单片机应用设计中最常用的信息显示器件了。三 功能描述以AT89S52型单片机为核心，实时测量并显示自行车行驶过程中的各项参数，包括当前行驶累计时间、当前行驶累计里程（m/km自动调整）、当前速度（km/h）、最大速度（km/h）、平均速度（km/h）、加速度（m/s2）、当前时间等，各参数分屏显示。可更改自行车轮胎直径，适应不同的自行车，通用性好。接通电源或按复位后，显示欢迎画面；2秒后进入时钟设置画面；按Button13调整时钟后，按Button4确认；接着进入自行车轮胎半径设置画面；按Button1、Button2调整轮胎直径，按Button4确认，计速器开始工作。其中速度、里程、平均速度、时间可分时显示，按Button5依次切换。四 结构框图AT89S52单片机霍尔传感器按键电池超速报警LCD显示五 电路图六 元器件简介 AT89S52单片机简介AT89S52是一种低功耗、高性能CMOS 8位微控制器，具有8K在系统可编程Flash存储器。使用Atmel公司高密度非易失性存储器技术制造，与工业80C51产品指令和引脚完全兼容。片上Flash允许程序存储器在系统可编程，亦适于常规编程器。在单芯片上，拥有灵巧的8位CPU和在系统可编程Flash，使得AT89S52为众多嵌入式控制应用系统提供高灵活、超有效的解决方案。AT89S52具有以下标准功能：8k字节Flash，256字节RAM，32位I/O口线，看门狗定时器，2个数据指针，三个16位定时器/计数器，一个6向量2级中断结构，全双工串行口，片内晶振及时钟电路。另外，AT89S52可降至0Hz静态逻辑操作，支持2种软件可选择节电模式。空闲模式下，CPU停止工作，允许RAM、定时器/计数器、串口、中断继续工作。掉电保护方式下，RAM内容被保存，振荡器被冻结，单片机一切工作停止，直到下一个中断或硬件复位为止。 LED数码管显示器LED数码管以发光二极管作为发光单元，颜色有单红， 黄，蓝，绿，白，七彩效果。单色，分段全彩管可用大楼，道路，河堤轮廓亮化，LED数码管可均匀排布形成大面积显示区域，可显示图案及文字，并可播放不同格式的视频文件。通过电脑下flash、动画、文字等文件，或使用动画设计软件设计个性化动画，播放各种动感变色的图文效果。 霍尔开关型传感器霍尔传感器是根据霍尔效应制作的一种磁场传感器。霍尔效应是磁电效应的一种，这一现象是霍尔（A.H.Hall，18551938）于1879年在研究金属的导电机构时发现的。后来发现半导体、导电流体等也有这种效应，而半导体的霍尔效应比金属强得多，利用这现象制成的各种霍尔元件，广泛地应用于工业自动化技术、检测技术及信息处理等方面。霍尔效应是研究半导体材料性能的基本方法。通过霍尔效应实验测定的霍尔系数，能够判断半导体材料的导电类型、载流子浓度及载流子迁移率等重要参数。七 系统流程图开始显示欢迎信息检测按钮处理时钟设置刷新累计行驶时间及时钟初始化设置特殊寄存器、置定时常数、开中断、清屏等等待中断检测按钮处理直径设置刷新里程、速度等改变屏幕显示内容INT0INT1T0八 调试过程简述自行车里程表的原理比较简单，我编好一个比较简单但是核心的程序（只计算里程和速度）在Keil C上仿真，经过短暂的调试就成功了，这证明我关于里程表的最核心的想法是正确的，这给了我后面的制作和调试很大的信心。紧接着是在单片机上搭建硬件，重点是按键防抖动。我的模式选择按钮是接到单片机的外部中断的，一开始我按照普通按钮的防抖动的方法测试，没有成功。于是在中断服务程序的开始关闭中断，末尾再开中断，还是不行。后来在中断服务程序的末尾加了这样一句清除中断标志。因为即使单片机的外部中断是关闭的，但只要在中断服务程序执行期间按键抖动，中断标志又会置1，若没有清除中断标志，退出中断服务程序后又会执行一次服务程序，这样按一次按键就会执行两次中断服务程序。我的里程表的最初版本是利用串行LED数码管显示作为显示模块的（简介请参阅附录二）。但制成后发现体积太大，而且功耗比较高，不适合用于要求小巧、坚固、耐用的自行车里程表上。本系统的软件系统全部采用C51来编写，由于一般的仿真器对C51的支持有一定的缺陷，软件调试比较复杂。除了语法差错外，当确认程序没问题时，通过直接把程序烧到单片机来调试。即单独调试好每一个模块，然后再连接成一个完整的系统调试。硬件连线的步骤： 1.连好电脑主机的9针串口联机线,连好电脑主机的USB线(短线)和仿真器的USB线(长线)。 2.仿真器工作时需要的电源电流不大于150MA时，均不需外接电源，直接由电脑的USB接口供电(将金属跳冒跳在USB端)，能满足仿真要求。在特殊情况下(需要的电源电流大于150MA,或你不想用USB接口供电)，可自己购买一个5V的直流稳压电源(千万注意直流稳压电源插座是内正外负).用直流稳压电源供电,拔掉连在电脑主机的USB线(短线),将金属跳冒跳在OUT端。 仿真器的本质：仿真器就是通过仿真头用软件来代替了在目标板上的51芯片，关键是不用反复的烧写,不满意随时可以改,可以单步运行,指定端点停止等等，调试方面极为方便。仿真器的原理：仿真器内部的P口等硬件资源和51系列单片机基本是完全兼容的。仿真主控程序被存储在仿真器芯片特殊的指定空间内，有一段特殊的地址段用来存储仿真主控程序，仿真主控程序就象一台电脑的操作系统一样控制仿真器的正确运转。硬件、软件仿真调试： 经过硬件、软件单独调试后，即可进入硬件、软件联合仿真调试阶段，找出硬件、软件之间不相匹配的地方，反复修改和调试。九 程序编写步骤如何编写单片机应用程序，这是一个实践性很强的题目，也是一项艰苦而细致的工作。如果按照一定的步骤并且找出难点，事先对这些难点加以处理，能够收到事半功倍的效果。下面是开发中必经的几个步骤和可能遇到的难点的处理。编制步骤：1搞清功能和编写方案接到一个单片机项目设计之后，并不是马上动手编写程序，而是仔细研究技术要求或者技术说明，根据这些技术要求和技术说明，把程序应该具备的主要功能写清楚，写仔细，这是最关键的工作，否则在设计完成以后会发现有些功能由于事先没有考虑清楚再重新设计将会很麻烦，可能有些需要重新增加的功能很容易补充，而有些可能由于没有事先考虑周全而无法实现。2编写总流程图和各功能模块流程图根据要完成的程序功能写出总流程图，根据总流程图把整个程序划分成几个主要的功能模块，每个功能模块都要写出基本流程图，这主要是为以后的程序编写起到一个指导作用。当然，在实际的程序编写过程中肯定会有一些改动，一个基本的流程会指导写程序的过程中不会出现太大的偏差。3准备编程所需的资料 这些资料主要是编程语言方面的书籍、杂志等。因为程序语言的有些资料不可能记得太清楚，如每条指令的含义，具体操作每条指令所牵涉的硬件电路等。如果资料准备得比较充分，可以放在案边，若有需要，顺手查阅。4人机界面的编程 用单片机实现的项目人机界面相对简单。若为LED显示，应根据LED的位数选取简单、明了、用户一看便知的提示符；显示的数据位数应充分考虑技术的要求。5分析编程的难点和技术解决方案为了能比较顺利地完成程序设计，应根据程序所完成的功能和程序流程对整个程序的框架分析一下，并根据自己掌握的技能定位整个程序的难点，然后找到最佳的算法。6写程序在上面的准备工作完成后，就可以着手编写程序。因为有了明确的程序流程，有了充足的资料，可能遇到的难点基本上找到了解决方法。这样，事先准备得比较充分，即使在以后的程序编写过程中遇到困难，也较易解决。这样就可以节省很多时间，以便静下心来认真按照方案和流程编写程序。另外，一般写完一个功能程序就进行调试，通过后再编写另外一个功能代码，这样可以防止全部代码编写完毕后再调试可能带来的相互影响，从而可以搞清楚到底是哪部分程序有问题。7程序调试程序的调试过程是一个比较复杂的过程，有些需要高度的技巧和一定的方法。一般的编程软件都提供单步、单步越过、断点、运行到光标处等基本方法，一般掌握这几种基本方法就可以解决绝大部分问题。经过长时间的调试实践之后自然就可以掌握一定的调试技巧，即熟能生巧。 十 参考文献1闫石.单片机的汇编语言应用程序设计M.北京: 北京航空航天大学出版社, 20012王爽.汇编程序设计（第三版）.北京：清华大学出版社，2005.7 3张俊谟.单片机中级教程（第二版）.北京：北京航空航天大学出版社, 2007.94李维堤，郭强.液晶显示应用技术M.北京: 电子工业出版社, 19965高吉祥，唐朝京.数字系统与自动控制系统设计.北京：电子工业出版社, 2007.66船仓一郎，土屋尧，堀桂太郎.机器人控制电子学：北京：科学出版社,004.57蔡美琴，等.MCS-51系列单片机系统及其应用（第二版）.北京；高等教育出版社, 2004.68赵负图,传感器集成电路手册,第一版,化学工业出版社,2004,5905919马建国.电子系统设计.北京：高等教育出版社，2004.110北京清华蓬远公司.SED1335 控制器图形液晶显示模块使用手册Z. 北京: 清华蓬远公司, 200011孟立凡，蓝金辉.传感器原理与应用.北京：电子工业出版社，2007.8 12王建校. 51系列单片机及C51程序设计M . 北京:科学出版社, 2002.13霍孟友.单片机原理与应用M .北京：机械工业出版社，2004.14何立民,单片机应用系统设计,北京：航天航空大学出版社,25,465015李广弟,单片机基础,北京：北京航空航天大学出版社,2001,566416何希才,新型实用电子电路400例,电子工业出版社,2000年,606517张毅刚,彭喜元,新编MCS-51单片机应用设计,第一版,哈尔滨工业大学出版社,2003,2527,411417附录1 程序代码ORG 0000H LJMP START ORG 0003H ;外部中断0 INC 53H LJMP ZD0ORG 000BH ;定时器0 INC 54H ;T0溢出次数存54H MOV TH0,#0B1H MOV TL0,#0E0H RETIORG 001BH ;定时器1 INC 56H MOV A,56H CJNE A,#20,GUI AJMP SZ ;1秒到，转时钟程序GUI:RETIORG 0040HSZ:MOV 50H,#00H INC SJ6 ;存秒个位 MOV A,#0AH CJNE A,SJ6,GUI MOV SJ6,#00H INC SJ5 ;秒十位 MOV A,#06H CJNE A,SJ5,GUI MOV SJ5,#00H INC SJ4 ;分个位 MOV A,#0AH CJNE A,SJ4,GUI MOV SJ4,#00H INC SJ3 ;分十位 MOV A,#06H CJNE A,SJ2,GUI MOV SJ3,#00H INC SJ2 ;时个位 MOV A,#04H CJNE A,SJ2,GUI MOV SJ2,#00H INC SJ1 ;时十位 MOV A,#02H CJNE A,SJ1,GUI MOV SJ1,#00HORG 0040H MAIN: ZDSD1 EQU 30H ZDSD2 EQU 31H ZDSD3 EQU 32H PJSD1 EQU 33H PJSD2 EQU 34H PJSD3 EQU 35H SD1 EQU 36H SD2 EQU 37H SD3 EQU 38H LC1 EQU 39H LC2 EQU 3AH LC3 EQU 3BH LC4 EQU 3CH LC5 EQU 3DH LC6 EQU 3EH ZC1 EQU 3FH ZC2 EQU 40H ZC3 EQU 41HZC4 EQU 42H SS1 EQU 4BH ;位移SS2 EQU 4CHSS3 EQU 4DHSS4 EQU 4EH BJ1 EQU 4FH ;报警 BJ2 EQU 50H BJ3 EQU 51H BJ4 EQU 52H SJ EQU 55H MOV SP,#60H MOV TMOD,#11H MOV TH0,#0B1H MOV TL0,#0E0H ;20ms MOV TH1,#3CH MOV TL1,#0B0H ;50ms SETB EX0 SETB IT0 SETB ET0 SETB ET1 SETB TR1 SETB TR0 ;开T1中断，但先不开T0中断，因为还没有启动自行车 MOV R0,#20H MOV R1,#5FHCLEAR:MOV R0,#00H INC R0 DJNZ R1,CLEAR MOV 21H,#01H MOV R0,#00H MOV R1,#00H MOV R2,#00H MOV R3,#00H HERE:LCALL JUDG31 ;自检，闪3次 JB P1.3,HERE ZCSZ:MOV R4,#00 MOV R3,#00 MOV R2,#06 MOV R1,#00 LCALL SC C1:LCALL JUDG30 JB P1.3,C1 JB P1.3,A0 LCALL DELAY5MS JB P1.3,A0 SETB P1.2 N13:LCALL JUDG30 JNB P1.3,N13 JB P1.6,A0 LCALL DELAY5MS JB P1.6,A0 CLR P1.2 N12:LCALL JUDG60 JNB P1.6,N12 A0:JNB P1.4,N11 AJMP ZCSZ N11:LCALL DELAY5MS JNB P1.4,NEXT LJMP ZCSZ NEXT:CLR P1.2 INC R4 LCALL SC A1:LCALL JUDG40 JNB P1.4,A1 PD:JB P1.4,A2 LCALL DELAY5MS JB P1.4,A2 PD2:CJNE R4,#09H,JIA0 A4:CJNE R3,#09H,JIA1 A5:CJNE R2,#09H,JIA2 A8:CJNE R1,#09H,JIA3 YS:LCALL SC SETB P1.2 JNB P1.5,A6 JB P1.6,A6 LCALL DELAY5MS JB P1.6,A6 CLR P1.2 A6:JB P1.5,A6 LCALL DELAY5MS JB P1.5,YS CLR P1.2 LJMP PD1JIA0:JC JIA01 ; 如果R4不超过9，则如可以加 MOV A,R4 SUBB A,#09 MOV R4,A INC R3 AJMP A4 JIA01:INC R4 LJMP OKJIA1:JC JIA11 MOV A,R3 SUBB A,#09 MOV R3,A INC R2 AJMP A5 JIA11:MOV R4,#00 INC R3 LJMP OKJIA2:JC JIA21 MOV A,R2 SUBB A,#09 MOV R2,A INC R1 AJMP A8 JIA21:MOV R4,#00 MOV R3,#00 INC R2 LJMP OKJIA3:JNC YS MOV R4,#00 MOV R3,#00 MOV R2,#00 INC R1 OK:LCALL SC LCALL JUDG40 JNB P1.4,OK LJMP PD A2:JB P1.5,A3 LCALL DELAY5MS JB P1.5,A3 PD1:CJNE R4,#00H,JIAN0 CJNE R3,#00H,JIAN1 CJNE R2,#00H,JIAN2 CJNE R1,#00H,JIAN3 YS1:SETB P1.2 JNB P1.4,A7 JB P1.6,A7 LCALL DELAY5MS JB P1.6,A7 CLR P1.2 A7:JB P1.4,A7 LCALL DELAY5MS JB P1.4,YS1 CLR P1.2 LJMP PD2JIAN0:DEC R4 LJMP OK1JIAN1:DEC R3 MOV R4,#09 LJMP OK1JIAN2:DEC R2 MOV R3,#09 MOV R4,#09 LJMP OK1JIAN3:DEC R1 MOV R2,#09 MOV R3,#09 MOV R4,#09 CJNE R1,#09,PD3 LJMP OK1 PD3:JC OK1 LJMP YS OK1:LCALL SC LCALL JUDG50 JNB P1.5,OK1 LJMP PD A3:JNB P1.3,K2 LJMP PD K2:LCALL DELAY5MS JB P1.3,SD LCALL SC M001:LCALL JUDG30 JNB P1.3,M001 SETB EA LCALL MAIN1 LJMP CAIDAN2 SD:LJMP PD SC:MOV ZC4,R4 MOV ZC3,R3 MOV ZC2,R2 MOV ZC1,R1 LCALL MAIN0 RETMAIN0: MOV R1,#00H LCALL MAIN RETMAIN1: MOV R1,#01H LCALL MAIN RETMAIN2: MOV R1,#02H LCALL MAIN RETMAIN3: MOV R1,#03H LCALL MAIN RETMAIN4: MOV R1,#04H LCALL MAIN RETSTART:MOV A,#00H ;ACALL ZT MOV A,#38H;发始化指令38,0c，06,01 ACALL CHUSHI ACALL ZT MOV A,#0CH ACALL CHUSHI ACALL ZT MOV A ,#06H ACALL CHUSHI ACALL ZT MOV A,#01H ACALL CHUSHI ACALL ZTLOOP: CJNE R1,#00H,LOOP1 MOV A,#080H ACALL CHUSHI MOV A,#42H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#4AH ACALL WRITE ACALL DELAY1 MOV A,#3AH ACALL WRITE ACALL DELAY1 MOV DPTR,#TABLE MOV A,ZC1 MOVC A,A+DPTR ACALL WRITE ACALL DELAY1 MOV A,ZC2 MOVC A,A+DPTR ACALL WRITE ACALL DELAY1 MOV A,ZC3 MOVC A,A+DPTR ACALL WRITE ACALL DELAY1 MOV A,ZC4 MOVC A,A+DPTR ACALL WRITE ACALL DELAY1MOV A,#6DH ACALL WRITE ACALL DELAY1 MOV A,#6DH ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1RETLOOP1:CJNE R1,#01H,LOOP2 ;显示“Ready” MOV P0,#80H ACALL CHUSHI MOV A,#52H ACALL WRITE ACALL DELAY1 MOV A,#65H ACALL WRITE ACALL DELAY1 MOV A,#61H ACALL WRITE ACALL DELAY1 MOV A,#64H ACALL WRITE ACALL DELAY1 MOV A,#79H ACALL WRITE ACALL DELAY1 MOV A,#21H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1RETLOOP2:CJNE R1,#02H,pp2 ;显示最大速度与平均速度 SJMP M pp2:LCALL LOOP3M: MOV A,#80H ACALL CHUSHIMOV A,#5AH ACALL WRITE ACALL DELAY1 MOV A,#44H ACALL WRITE ACALL DELAY1 MOV A,#53H ACALL WRITE ACALL DELAY1 MOV A,#44H ACALL WRITE ACALL DELAY1 MOV A,#3AH ACALL WRITE ACALL DELAY1 MOV DPTR,#TABLE MOV A,ZDSD1 MOVC A,A+DPTR ACALL WRITE ACALL DELAY1 MOV A,ZDSD2 MOVC A,A+DPTR ACALL WRITE ACALL DELAY1 MOV A,#2EH ACALL WRITE ACALL DELAY1 MOV A,ZDSD3 MOVC A,A+DPTR ACALL WRITE ACALL DELAY1 MOV A,#6DH ACALL WRITE ACALL DELAY1 MOV A,#2FH ACALL WRITE ACALL DELAY1 MOV A,#73H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#0C0H ACALL CHUSHI MOV A,#50H ACALL WRITE ACALL DELAY1 MOV A,#4AH ACALL WRITE ACALL DELAY1 MOV A,#53H ACALL WRITE ACALL DELAY1 MOV A,#44H ACALL WRITE ACALL DELAY1 MOV A,#3AH ACALL WRITE ACALL DELAY1 MOV DPTR,#TABLE MOV A,PJSD1 MOVC A,A+DPTR ACALL WRITE ACALL DELAY1 MOV A,PJSD2 MOVC A,A+DPTR ACALL WRITE ACALL DELAY1 MOV A,#2EH ACALL WRITE ACALL DELAY1 MOV A,PJSD3 MOVC A,A+DPTR ACALL WRITE ACALL DELAY1 MOV A,#6DH ACALL WRITE ACALL DELAY1 MOV A,#2FH ACALL WRITE ACALL DELAY1 MOV A,#73H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1RETLOOP3:CJNE R1,#03H,PP3 LJMP Mm1 PP3:LCALL LOOP4Mm1: MOV A,#80H ACALL CHUSHI MOV A,#4CH ACALL WRITE ACALL DELAY1 MOV A,#43H ACALL WRITE ACALL DELAY1 MOV A,#3AH ACALL WRITE ACALL DELAY1 MOV DPTR,#TABLE MOV A,LC1 MOVC A,A+DPTR ACALL WRITE ACALL DELAY1 MOV A,LC2 MOVC A,A+DPTR ACALL WRITE ACALL DELAY1 MOV A,LC3 MOVC A,A+DPTR ACALL WRITE ACALL DELAY1 MOV A,LC4 MOVC A,A+DPTR ACALL WRITE ACALL DELAY1 MOV A,LC5 MOVC A,A+DPTR ACALL WRITE ACALL DELAY1 MOV A,LC6 MOVC A,A+DPTR ACALL WRITE ACALL DELAY1 MOV A,#6DH ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MOV A,#20H ACALL WRITE ACALL DELAY1 MO