EEPROM数据线(精)

1、scl equ p1.5;EEPROM 时钟线quan equ 30h;存放圈数;?*J org 00hjmp mai norg 03hjmp in tOOorg 0bhretiorg 13hjmp int_1org 1bhjmp intt1org 23hreti.*J;主程序.*Jorg 30hmai n:callclear11: jb p1.2,key1mov qua n, #22jmp datainkey1:jb p1.3,key2movqua n, #24jmp datainkey2:jb p1.6,key3mov qua n, #26jmp datainsda equ p1.4;EE

2、PROM 数据线key3:jb p1.7,err1jmp l2.*初始化.*clear:mov tmod,#90h;设置 T1，门控，方式一movtcon, #05h;INT0,INT1边沿触发setbpx0;INT0 中断优先级最高movsp,#70h;设置堆栈clr 20h.0clr amovr0,#2fhclear_loop:i ncr0movrO,amovqua n,#28jmpdatainerr1:callerrjmpl1datain:callcmd;车圈长度调入子程序l2:long:movsetbclrcalljbcalljmpie,#1OOO11O1b;8bhtr1p3.1rea

3、dp3.0,longdisvl2call diss;eeprom数据调入;里程处理;速度处理mov p1,#OffH;p1 置高电平cjner0,#40h,clear_loopret.*in tOO:pushaccpush psw inc 54h clr a cjne a,54h,i ntO_rominc 55hcjne a,55h,i ntO_rominc 56hin tO_rom:callromwpop pswpop accreti.*int 1:mov33h,tl1;计数单元保存mov34h,th1mov35h,31hmov36h,32hmovtl1,#00;计数单元清零in tl111

4、:in tl112:pushaccpushpswclr ex1;关外部中断一jnb20h.0,i ntl11;判断标志位,mov33h,#0ffh;超速处理mov34h,#0ffhmov35h,#0ffhmov36h,#0ffhjmpin tl120 未超速为mov th1,#OOcmd:mov a,30hmov 31h,#00mov 32h,#00clr 20h.0setb ex1pop pswpop accreti.*in tt1:pushaccpushpswinc31hclracjnea,31h,tim1inc32hcjnea,32h,tim1setb0htim1:poppswpop a

5、ccret.*J;出错处理.*Jerr:cpl p3.1call delay_1msret.*J;车圈长度调入子程序mov th1,#OOcmd:mov a,30h.*cjne a,#22,cmd_24mov 4fh,#00mov 4eh,#2dhmov 4dh,#0c6hmov 4ch,#0c0hmov 2fh,#01hmov 2eh,#0f4hjmpcmd_out；一公里转 500 圈cmd 24:cjne a,#24,cmd_26mov 4fh,#00hmov 4eh,#2dhmov 4dh,#0c6hmov 4ch,#0c0hmov 2fh,#01hmov 2eh,#0c2hjmpcm

6、d_out;一公里转450cmd_26:cjne a,#26,cmd_28mov 4fh,#00hmov 4eh,#2dhmov 4dh,#0c6hmov 4ch,#0c0hmov 2fh,#01hmov 2eh,#90hjmpcmd_out；一公里 400cmd_28:cjne a,#28,cmd_outmov4fh,#00hmov4eh,#2dhmov4dh,#0c6hmov4ch,#0c0hmov 2fh,#01h；一公里 350 圈mov 2eh,#5ehcmd_out:ret.*J7/;eeprom 与.*Jromw:mov r3,#0a0h;设置器件地址mov4bh,#00;eep

7、rom 首址movr1,#54h;要送出数据首址movr7,#3;共三个字节setbsdasetbsclclrsdamova,r3callsubsmova,4bhcallsubsw_aga in:mov a,r1call subsinc r1djnzr7,w_aga inclr sdacall de_wsetb sclcall de_wsetb sdaretsubs:mov r0,#08hsubs_loop:clr scl rlc a mov sda,cnop setb sclcall de_wdjnz r0,subs_loop clr sclcall de_wsetb sclmov c,sd

8、ajc repclr sclretnopnopret.*Jread : mov r3,#0a0h;设置器件地址mov4bh,#00;eeprom 首址movr1,#54h;要送出数据首址movr7,#3setbsdasetbsclclr sdamova,r3callsubsmova,4bhcallsubssetbsdasetbsclclr sdarep:de_w:mov a,r3setb acc.Ocall subsmore:call subrmovr1,aincr1djnzr7,moreclrsdacall de_wsetbsclcall de_wsetbsdaretsubr:mov r0,

9、#08r_loop:setb sclsetb sdacallde_wmovc,sdarlc aclr sclcallde_wdjnzr0,r_loopcjner7,#01h,low1setbsdajmpsetokclrsdacallde_wsetbsclcallde_wclrscllowl:setok:call de wsetb sdaret.*J;里程处理.*qua ns:mov 45h,#00jmp divstret.*J;速度处理子程序.*Jdisv:setb pl.O;关里程显示;开速度显示diss:setbp1.1clrp1.0callquanscallplayret;开里程指示mo

10、v44h,#00mov43h,#00mov42h,#00mov41h,#00hmov40h,56hmov3fh,55hmov3eh,54hmov4ah,#00hmov49h,#00hmov48h,2fhmov47h,2eh;被除数赋初值;除数赋初值clr p1.1mov a,#Offhcjne a,36h,dsp11setb p3.1jmp exitdsp11:clr p3.1call playexit:ret.*J;速度转换子程序(v=L/t.*call kmph;调速度转换子程序;与设置速度比较，超速报警;报警指示灯亮;关报警指示灯调显示子程序kmph:mov 45h,#00mov44h,

11、#00mov43h,#00mov42h,#00mov41h,4fhmov40h,4ehmov3fh,4dhmov3eh,4chmov4ah,36hmov49h,35hmov48h,34hmov47h,33hjmp divstkkk:nopcall bcdstmova,50hanla,#0fhmov3ah,a;除数赋初值;调除法子程序mov a,50h;被除数赋初值;调 bcd 码转换子程序swap aanl a,#Ofhmov 3bh,amov a,51hanl a,#0fhmov 3ch,aret*;除法子程序.*divst:setbrsOsetbrs1clr cmova,3ehsubb a

12、,47hmova,3fhsubb a,48hmova,40hsubb a,49hmova,41hsubb a,4ahjnc div_outmovr2,#20hdiv_loop:clrcmova,3ehrlc amov3eh,amova,3fhrlc amov3fh,a;用寄存器 1mov a,40hrlc amov40h,amova,41hrlc amov41h,amova,42hrlc amov42h,amova,43hrlc amov43h,amova,44hrlc amov44h,amova,45hrlc amov45h,amovfO,cclr cmova,42hsubb a,47hmo

13、vr3,amova,43hsubb a,48hmovr4,amova,44hsubb a,49hmovr5,amova,45hsubb a,4ah jb fO,div_loop1jc div_loop2div_loop1:mov 45h,amova,r5mov44h,amova,r4mov43h,amova,r3mov42h,ainc3ehdiv_loop2:djnz r2,div_loopclr f0div_out:clr rs0clr rs1jmp kkkdiv_out1:setb f0jmp div_out.*J;bcd 码转换子程序.*Jbcdst:mov r7,#10hclr cmo

14、v 50h,#00mov 51h,#00 bcdst_loop:mov a,3eh rlc amov 3eh,amov a,3fhrlc amov3fh,amova,50haddca,50hda amov50h,amova,51haddca,51hdaamov51h,adjnzr7,bcdst_loopret.*J;显示子程序.*Jplay:mov r1,#3ahmov r2,#0fehplay_loop:mov a,r2mov p2,amov a,r1anl a,#0fhmov dptr,#tabmove a,a+dptrmov p0,acall delay_1ms;显示 1msinc r1mov a,r2jnb p2.2,play_outrl amov r2,ajmp play_loop