单片机出租车计价器程序及原理图

《单片机出租车计价器程序及原理图》由会员分享，可在线阅读，更多相关《单片机出租车计价器程序及原理图（27页珍藏版）》请在装配图网上搜索。

1、#clue re52#includ absacch#efine uin unignd in#dfieuchar unsigned char#inDSPO0x3/显示开#deiDSPOF0x3/显示关fneFRSROW0xc0/显示起始行设立11L5 4 3 L2 L1 0,在0到6行间选择#defineETYxb8/方向，页64行， 11 1PP1 P0，0到8页选择#eiETX040 /X方向,半屏64列，0 1 CC4 C3 C2C1 C0 ,0到6列选择/*P口16位编址,有效位是P2.3，无关位用“”表达P2.0-,P2.1-RW，2-CS2，P2.3-CS1右屏命令和数据读写编址 W

2、 */ #defneLLCD_CD_RXBE0xf4f/0 1 0#deineLLD_WRXYTfff/ 1 1#efieLLD_CD_XBYTExf6ff/0 1 0defeLL_A_DBYTE0f7ff/0 1 1 1左屏命令和数据读写编址*/#definRLD_CMD_WRXBYTExf8f/1 0 0 0#efneRCD_DAT_WXYTExf9ff/ 0 1#defnRLDMDRDXBYExaf/1 0 1 0deieRLCDDAT_RDXBYE0xfbff/1 0 1/*数据坐标记录*左-路程：整数部分 x=,y1,小数部分 x=31,y=左路程费用：整数部分 x=9,y3,小数部

3、分x3,y3总费用:整数部分左:x=5,=5路程单价:x=，y=7右-时间:整数部分 x=20,y=右-时间费用：整数部分 x=10,=,小数部分 x=32,y=3总费用：小数部分-右：x=,y5时间单价：x=44，y*/#fneMile_X_Z9#defineL_Mle_X_30#defnLMle_Y1 #efL_ostXZ#efnCostX_D30#dnL_Cost_Y3#defn_ota_X#efineL_Tol_Y5#dfeL_UnitX34#definL_nit_Y7#efnR_Tme_0deineRTime_Y1efneR_Cost_Z0#defieR_CostX_D1#eineR

4、_Cost_Y3#eeRToalXeine_tal_Y5#deneR_nitX44diR_UnitY7sitD=P27 ;sSTARTP0；sbitTOP=P1;LEARP12;sbtMUN_UPP4;sbtMUIN_D=15;sbitTUIN_P=P1;sbiTUIT=P17；uchile_Uni4，Time_it;longtime_os,time_costZ,me_csD，timecon_s,ime_con_;lgmile_cot,milest_Z,mi_ost_D，milecon_m,me_on_k;ngspedcon,spe_con_m,speed，spe_fla，cos_flag;l

5、ongtotl_z=,ttald;codchrshu106=0x3E,0x41,41,0x41，x3E,000， /00x00,0x42,0x7，0x40,x0,0x, /10x42,0x61，0x51，x9，0x6,0x0， /0x2,01,0x4,0x49,x36,0x0, /30x38，0x24,0x22，0x7F，0x20,00， /0x27,0x45,045，0x45，039,0x0, /5,0x4,0x45,x45,0x38,0x00， /6x01,001，0x79,0x5,0x03,0x00， /70x36,x49，0x49,0x49,03,0x00, /800E，51，0x51

6、,0x51,0x3,000,/；/*初始化界面*/cod ucr logo=xF，0x0，0x03,0xE1,0x11,0x09，0，09,0x0，0,0x09,0x0,0x0，x9,0x09,0x0，08,0x9,x,00，0x09,00,0x09，x09,0x0,0x09,0x09,0x09,009，x09,x09,0x9，0x08,x9,0x09,0x0,09,0x,0x0,0x09，008,0x09,0x09,0x9,0x09,0x09,0x09,x09，0x8,0x9,0x，x9,0x09,009,09,0x，0x8,0x09,x09,0x11,xE1，003,0x07,0FF,xF

7、F,0x07，0x03,0E1,011,0x0，0x0,x09，008,0x09，x0,0x09，0x0,x09,0x09,0x09，0x0，0x0,x0，0x09，x9，009，0x0，x9,008,0x09,0x09,0x09，0x0，0x0,0x,0x,0x08,0,9,00,0x09,0x09,009,09,08,009,0x9,009,0x0,0x9,x09,009,0x08，0x09,0x09,0x0,0x09，09,09,x09，0x08,x0,00,x11,xE1,x,07,xFF,xFE,0x00,0x0，0FF，00,0x7E,0x3C,018,0x00,00,0x0，00

8、0,0x00,0x00,0x00，0x0,00,0x00,00，x00,x00,x00,0x00,0x00,0x00,0x0，0x00,0C0,0xC0,0x0,0x0,0x0,x0，000,0x0,00,0x00,00，0x00,0x00,0x0,x00,x0,0x，x0，0x0,0x00,x0,0xFE,0x10，0x2，0x4,0x82,x00，0xF,0x0,0xF8,0x8,0xF8,0x00，0,0x0,0,0F,0xF,00，0x0,xFF，0x0,0x7E,0x3C,0x18,0x00,0x,x00,0x00,000,0x0，0x0，x00,0x00,x00,0x，0x0,x0

9、，000,0x00,000，x00,0x,0x0,0x0,0x00,0x,0x00，0x00,000,x00,x00,0x00,0x00,0x00,00，00，0x00,0x0，0x,0x00,x00，x,0xF,00,0xF8,0x0,0xFE,0x0，0xF4,0，0xF8,008，0xF8，x08，0xF8,000，0FF,0x00,0x0,0xFE,0xFE,00，000，xF,0x,x0,0x0,0x00,000,0x2，0x02，x02,0x02,0x02,x0,0x，0x0,0x02，0x02,x02,00,0x02,002，0x02,0x02,0x2,0x00，0x00,x0,

10、0x0,0,2，0x0,2,002，0x00,02,0x02,0x2,0x02,0x02,0x00,0x02,x2，x02,02,x0,000,0x00，x0,0x0,0,0x00,0x0,x0,x80,x40,0x00,0x00,0x0，0xFF,x00,0x00,0xFF,0xF,0x0,0x0，0xFF,000，x00,0x00,000,0,000,0x00,0x00,00,000，00,000,0x00,00,0,0x,0x02,0x,0x02,x02,002,x00,002,0x2,0x02,0x0，0x0,000,x02,0x02,0x2,0x02,0x0,0x00，00,x,0x

11、00,0x0，,0x0,00,0x00,0x0,0x0,x0,x0,0x40,0x80，0x00,0x0,0x0，x80,0x40,00，0x0,0x0,0xFF，0x00，0x00,0F，0FE,0x00,00,0,0xF,7，0x30,0x0,000,0x00，0,0x00,0x0,0x00，x,00,0,x00,x00,x0,0，,0x00,0x00,0x,000，x0,x60，0x0,0x0,0x0，0x0，x00，000,0x,0x0,0x00,0x00,000,000，000,000，000,000,0x00,000,x0,x00,000，0x12,1，013,0x7E,1，0x1

12、,012,0x00,x00,0x00，xF,x00，0x00,xF,0xF,00，0x00,0xFF,0x0，0xFC,078,030，0x00,000,0x0,000,00，0x00,00,x00,0x00,x0,000，000,0x00，0x00，0x0,0x0,x00，0,00，x0，00,060,0x00，0x00，0x0,00,x0,0x00,0x0，x0，x，0x0,0x0,0x0,0x00,0x00,x0，x，x0,0x0，0x0,x0,012，x12，0x3,x7E,013，0x2，12,0x00,x00,000,0xFF,0x00,000,0xFE,0x,0x00,00,0x

13、01，0x0,0x04,x4，0x0,0x04，x05,05，05,0x5,0x5,0x0,0x05，0x05，0x05,05,0x0,0x04,x05,0x05，0x05,0x0,0xC,0x24,0x14,x14,014,x15，0x15,0x15,0x15,x15,x14,0x15,x15,015,0x15,05,0x4,0x1,x1,015,1，0x1,x14,0x14,014,0x1,0x14，x，x14,04,0x1,0x4,014,0x1，0x12,x11,x0,10,0x,x,0x1，0x10,01,0x12,04，014，0x1,0x14,0x4,0，0x5，x15,0x1,

14、015,1，0x5,15，x5,015，x，0x14,0x5,x15,0x1，0x,0，x1,0x1,0x1，0x4，x,0x15,0x1,0x5,0x15,014，05,0x5,0xC5,005,0x05,0x0,x05,0x05,0x05,0x5,0x5,x05，0x0，0x04,0x04,0x0,0x04，0x0,0,x4,0x4,x04,00，x01,0x00,x00,0xF,0xFE,0x0,0x0，x00,0,0x0,00,0x，0x0,x0，0x00,0x0，0x00,0x00，0x00，0x00,0x00，0x00,0x0，0x00,0x00，0x0,000，x00,0x00,

15、0FF,00,0x00，000,0FF,0x7E,0x3,0x1,x00,0x00,000,x00,0x0,00,0,000,00,0,x00,x00,0,0x00,x0,x00,0x00,x0,0x00,0,0x0,x00，0x00，0x00,0x00，0x0，000，000,0x00,0x00,0x60,0x0,0x,00,0x0,0x00,0x00,000,0x,x00,x00,x0,x00,000,0,0x00，0x00,0x，0x0,0x00，00,x0,0x00,0x00,0x00,0x00,0x00,x00,0x0,0x00,09,0x4,0x4C,0x8，04C,x4,0x49

16、，0x0，0x00,000,0xF，00,0x0,00，0x0,000,x00，x0,0,x0,0x0,0x00,0x00,0x00,0x00,000，x00,x00，0,0x0,0x0,0x0,x00,0x0,xFE,xFE,x,0x00，x0,0x00,00,0x00,0x00,x0,0x00,0x00,x0，0x0,00,00,x00，0x00,0x0,x0,x00，x00,x0，x00，x00,x00,0x1,002，04，004,0x0,x04,00,00,004,0,x04,0x4,04,0x4,x0,x04,0x4，0x04,0x04,x04，05,0x05,x05,5,00，0

17、x0,0x05，x05,0，05，0x5,x04，x0,05,0x05，5,0x5,04,0xFC,0F,0x04,05,0，00，0x05,0x05,0x04,x0,0x，x0，0x,005,0x0,0x05,5,005，0x05,0x05，0x04,0x4，x04,0x04，0x04,0x04,0x0,x0,04,0x4,x,x04，004，0x0,0x04，0x4,0x04,0x0,0x04,x,0x01,00,000,0x0，0x00,00,0x,x00,0x,x00,x00,0x00,0x00,x0,0x00，0x00，000，0x0,000，00,000，x00,0x0,00,xE

18、,xFE,0xE,0xC0，x80,080，0x80,0x8，0x80,0x0，0x0，0x80，0x80,0x0,0x80,x9,0A,0x0,0x9,0x80,xBC，82,082,0xBC，0x，0xD,x80,0x84,9E,xA4，xA4,080,0B,0x36,0x8，0x0,0x00，0x00,x00,0x0,0x0，0x00,0x3,0,x0,0x3E，0x4,x41,041,3E,x80,x0,0x8,8，0x80,0x0,08,x0,x8,0x80,0，0x80,0xC0，0xE0,0xFF，x，xE，0C0,00,0,0x8,80，0x80，0,x8,8,00,080,0

19、80,x9E,0A，02，0E,x0，0xBC,0x,x82，0xC，0x0,0xD,x0,0x8，0x9E，0xA4，xA4,080，0xB6,0x36,08,0x80,0x3,0x41,0x4,x1,x3E,x00,0x3,030,x,x00，000，0x00,0x0,0x00,0x8,0x80,x0,0,0x80，0x80,0x8,000,0x,0x80,0x80,00,xC0,0xE0，0E,; *写命令*vodldcmwr(char cmdcode,uchrigt)i（right)LCD_CMD_WR=cmcoe;eseLLD_CDR=cmdcoe;/*写数据*/vd lc_dat_

20、wr(uchar dispdata,ucr ight)if(rigt)RLCD_DA=disp;lseLLCD_A_=dispdaa;/*数据清屏*/void lcd_clr（d）ucha ,j；for(i0；i8；i)c_mr(STi,0);d_cmd_wr(SETX，0);lcd_c_r(SETY+,1);lccm_wr(SETX,1);or(j=；j4;）ld_atwr(0,);d_datar（0,1）;/*写一种数字*void lchu_wr(uca w，ucar x,ua y,uchr shu_1)uchr i;cd_cd_w(STYy,w);_cmdr（SETXx,);for（i0

21、;i6;i+）cd_data_wr(uhu_i，w);/*写一种三个数字*/ oid lcah_wr(chr,char ,uhar y,it) uint bai,hi，g；ai=st/0;shi=（str%10)0;=r%10;lcd_hu_wr（w,x,y,ai);lshu_r（w,+6,si）;ld_ur(，x+,y,ge); /*写一贞28X6点旳图片显示*/odld_mr(ucha *bp)uchar i,j;o(i=0;i0;y-)fo(x=113；0；x-)；/*LD初始化*oi cd_iit(vid)lcd_md(DIP,0);lccdw(FRSTO，）；cd_cmd_w（TY,

22、);ld_cmdwr(STX，0)；lcd_md_wr(DISPON,1);lcd_cd_w(FIRSTRW,1);_md_wr(STY,1）;ld_md_w（SETX,1）;lcd_lr();Dayms(500);lc_p_wr（og);/welcoini（)；/*初始化中断,定期器等*vo nerrputini()IT0=1；/外部中断0触发方式：边沿触发EX1；/开外部中断0T0=1;/开定期器中断0ET=1;/开定期器中断1/EA=1;/开部中断MO=0x11;/000100010（65535-50000)/256；TL0=（53-50000)25;T1;TH（65535-50000）

23、/256；=(655350000）56；TR1;/*显示数据*/viddisp（)ldsnshwr(0,L_ile_X,L_le_Y,ile_n_k)； /写行驶路程d_sanshr（0,_Mi_D,L_i_Y，mile_con_）; lcd_snshu_wr（，LCosX_,L_CostY,mi_cst_）; /写路程费用lc_anshuwr（0,L_CostX_D，L_Cost_Y,mle_cst_);lc_su_r(0，LTo_,L_Toa_Y,ttal_z);/写总费用整数部分ld_hu_r(0,Uni_X,_nitY,Mle_nit）；/写路程单价cdsashuwr(,Time_X，

24、R_Tie_,te_conm）； /写行驶时间lcd_snshu_w(1,R_st_X_Z，R_ost_Y,tme_cos_Z）;/写时间费用lcdshu_w(1，R_Co_D,R_ost，time_cost_D);lc_anshu_w(,R_Ta_,_Toa_Y，tl_d）；/写总费用小数部分ld_suw(，_nit,R_Ut_,Tie_Uit）;/写时间单价/*键盘输入*/vod keyboard(）1=0xf;if(P1！=0xf)DelaNs(1);i(P1!=0xf)(!TAT)=1;if（!STOP)EA0;if(！CLAR）ile_con_km=0;le_c_0;iecostZ0

25、;mie_costD=0;oa_z=5；time_c_m=;time_cost_Z;timecst_=0;tl=0；dsply();（!MUINT_U）Mile_Uit+;wle(!MNT_UP)；lc_sh_r(0，L_Uit_,L_UniY,Mile_Unit）;写路程单价if（!MUITD)le_Uit-;wi(!MUINTD);lcd_shu_wr（0，L_UnitX,Uni_Y，Mle_Un);/写路程单价if(!TUINTP）Time_Uit+;ie(!TUINT_);lcd_su_w(,i_X,R_Unit_Y，Time_Uit）；/写时间单价if(！TNT_)Tie_Uit-;

26、whil(！TUINT);lcdshuw(1，RUnit_X,R_Uni_Y，Time_Uit）；/写时间单价/*测速*/voi tesspeed()if（seed=18)speed_flg=;TR1=0;elsespee_flag0；TR1=1;*主函数*/vo mai()lcd_i();interrput_iit（);spy(）;hile（) kyboad()；esspeed（)；/*外部中断0服务程序测所走过旳路程,并且测车速*/oid It0(） interrupt 0LED=!LD;sped_co_+;i（spedflag）mie_on_m+；i（mie_con_m=1000）mil

27、_on_m0;mle_co_m+;if(mile_on_km=1)st_flag;/*定期器0中断服务程序测速计时器*/void tmer（) interup 1H0=(6553-000)/256;/5sL0(655-500）%256;see_con+；i(sped_cn5=) /0.25测速一次see=spee_onm*2;spee_cnm=0；if(see_con=20）/1s刷新显示一次speecon;if(st_fl)milecos_D=(mil_onm*Ml_Unit)%100;/计算路费用iecos_Z=(milec_km-1)*Mile_Unit;ml_costZ=mile_co

28、s_Z+(mlcn_*Mile_Uit)10;toal_milecost_Z+me_cost_Z； /计算总费用tal_z+=5;toa_d=mie_cost_D+timect_D100；total=totl_tt_d/100;tta_d=tot_d%0; dspa();/*定期器1中断服务程序准时间计费计时器*oid ti1() interut 3TH1=(6553-50000)/25; /50ms计时TL1=(535-500)6;tim_cons+；（imeco_=100)/一分钟ie_ns0;timecn_+;tecost=timeom*Time_U;/计算时间费用teost_Z=timecost/10;time_cos_D=tm_os%10；