出租车计价器2

#include

#define uint unsigned int

#define uchar unsigned char

sbit motor=P3^4;

sbit sclk=P3^5;

sbit io=P3^6;

sbit rst=P3^7;

sbit scl=P3^0;

sbit sda=P3^1;

uchar code table[]={

0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,

0x88,0x83,0xc6,0xa1,0x86,0x8e,0x89,0xa3,0x8c,0xc8,0xbf,0xff, //共阳数码管段码

0x40,0x79,0x24,0x30,0x19,0x12,0x02,0x78,0x00,0x10}; //带小数点的段码0-9 uint table1[5];

uint table2[8];

uchar a=50;

uchar shi,fen,miao,start,wait;

uint qibu=50,danjia=20,lucheng,zongjia,num,num1,num2;

void delay()

{;;}

void delayms(uint x)

{

uint i,j;

for(i=x;i>0;i--)

for(j=110;j>0;j--);

}

/****************************************************************************** ******

显示函数

******************************************************************************* *****/

void display(uchar a,uchar b,uchar c,uchar d,uchar e,uchar f,uchar g,uchar h)

{

P0=table[a];

P2=0x7f;

delayms(1);

P0=table[b];

P2=0xbf;

delayms(1);

P0=table[c];

P2=0xdf;

delayms(1);

P0=table[d];

P2=0xef;

delayms(1);

P0=table[e];

P2=0xf7;

delayms(1);

P0=table[f];

P2=0xfb;

delayms(1);

P0=table[g];

P2=0xfd;

delayms(1);

P0=table[h];

P2=0xfe;

delayms(1);

P2=0xff;

}

/****************************************************************************** *********

DS1302时间部分

******************************************************************************* ********/

void write_byte(uchar com,uchar date) //向DS1302模地址写数据

{

uchar i;

rst=0;

sclk=0;

rst=1;

for(i=0;i<8;i++)

{

if(com&0x01)io=1;

else io=0;

com>>=1;

sclk=0;

delayms(1);

sclk=1;

}

sclk=0;

for(i=0;i<8;i++)

{

if(date&0x01)io=1;

else io=0;

date>>=1;

sclk=0;

delayms(1);

sclk=1;

}

sclk=0;

rst=0;

}

uchar read_byte(uchar com)

{

uchar i,date;

rst=0;

sclk=0;

rst=1;

for(i=0;i<8;i++)

{

if(com&0x01)io=1;else io=0;

com>>=1;

sclk=0;

delayms(1);

sclk=1;

}

for(i=0;i<8;i++)

{

if(io)date|=0x80;

date>>=1;

sclk=1;

delayms(1);

sclk=0;

}

sclk=0;

rst=0;

return date;

}

void ds1302init()

{

sclk=0;

rst=0;

write_byte(0x8e,0); //写保护寄存器，最高位WP=1，写保护，WP=0，不写保护// write_byte(0x90,0); //充电控制寄存器（此处为不充电）

write_byte(0x90,0xa5); //充电控制寄存器，设置为充电状态

}

/*void reset_1302()

{

// uint i,j;

write_byte(0x8e,0);

// for(i=0;i<8;i++)

// {

// write_byte(0x80+j,table1[i]);

// j=j+2;

// }

write_byte(0x80,0); //秒

write_byte(0x82,0x43); //分

write_byte(0x84,0x13); //时

write_byte(0x86,0x14); //日

write_byte(0x88,0x10); //月

write_byte(0x8a,0x05); //星期

write_byte(0x8c,0x11); //年

write_byte(0x8e,0x80); //写保护

} */

/****************************************************************************** ***********

键盘扫描

******************************************************************************* **********/

uchar key_scan()

{

uchar k=0,temp;

static uchar key_up=1;

P1=0xff;

temp=P1;

if(temp!=0xff&&key_up)

{

delayms(10);

key_up=0;

temp=P1;

if(temp!=0xff)

{

temp=P1;

switch(temp)

{

case 0xfe:k=1;break;

case 0xfd:k=2;break;

case 0xfb:k=3;break;

case 0xf7:k=4;break;

case 0xef:k=5;break;

case 0xdf:k=6;break;

case 0xbf:k=7;break;

case 0x7f:k=8;break;

}

}

}

temp=P1;

if(temp==0xff)

{

key_up=1;

}

return k;

}

/****************************************************************************** **********

时间起步价和单价调整部分

******************************************************************************* *********/

void tiaoshi()

{

uchar t,a=1;

shi=read_byte(0x85);

fen=read_byte(0x83);

miao=read_byte(0x81);

shi=(shi/16)*10+shi%16;

fen=(fen/16)*10+fen%16;

miao=(miao/16)*10+miao%16;

t=key_scan();

if(t==1)

{

a++;

if(a==6)a=0;

}

while(a)

{

switch(a)

{

case 1:

t=key_scan();

if(t==1)

{

a++;

if(a==6)a=0;

}

switch(t)

{

case 2:

shi++;

if(shi==24)shi=0;

write_byte(0x84,((shi/10)*16+shi%10)); //时

break;

case 3:

shi--;

if(shi==-1)shi=23;

write_byte(0x84,((shi/10)*16+shi%10)); //时

break;

}

break;

case 2:

t=key_scan();

if(t==1)

{

a++;

if(a==6)a=0;

}

switch(t)

{

case 2:

fen++;

if(fen==60)fen=0;

write_byte(0x82,((fen/10)*16+fen%10)); //分

break;

case 3:

fen--;

if(fen==-1)fen=59;

write_byte(0x82,((fen/10)*16+fen%10)); //分

break;

}

break;

case 3:

t=key_scan();

if(t==1)

{

a++;

if(a==6)a=0;

}

switch(t)

{

case 2:

miao=0;

write_byte(0x80,((miao/10)*16+miao%10)); //秒

break;

case 3:

miao=0;

write_byte(0x80,((miao/10)*16+miao%10)); //秒

break;

}

break;

case 4:

t=key_scan();

if(t==1)

{

a++;

if(a==6)a=0;

}

switch(t)

{

case 2:qibu++;break;

case 3:qibu--;if(qibu==-1)qibu=0;break;

}

break;

case 5:

t=key_scan();

if(t==1)

{

a++;

if(a==6)a=0;

}

switch(t)

{

case 2:danjia++;break;

case 3:danjia--;if(danjia==-1)danjia=0;break;

}

break;

}

switch(a)

{

case 1:display(shi/10,shi%10,21,21,21,21,21,21);break;

case 2:display(21,21,21,fen/10,fen%10,21,21,21);break;

case 3:display(21,21,21,21,21,21,miao/10,miao%10);break;

case 4:display(21,qibu/100,(qibu%100/10+22),qibu%10,21,21,21,21);break;

case 5:display(21,21,21,21,21,danjia/100,(danjia%100/10+22),danjia%10);break;

}

}

}

/****************************************************************************** AT24C02存储与读取部分

******************************************************************************/ void start1()

{

sda=1;

delay();

scl=1;

delay();

sda=0;

delay();

}

void stop1()

{

sda=0;

delay();

scl=1;

delay();

sda=1;

delay();

}

void respons()

{

uchar i;

scl=1;

delay();

while((sda==1)&(i<250))i++;

scl=0;

delay();

}

void init()

{

sda=1;

delay();

scl=1;

delay();

}

void write_byte1(uchar date)

{

uchar i,temp;

temp=date;

for(i=0;i<8;i++)

{

temp=temp<<1;

scl=0;

delay();

sda=CY;

delay();

scl=1;

delay();

}

scl=0;

delay();

sda=1;

delay();

}

uint read_byte1()

{

uchar i,k;

scl=0;

delay();

sda=1;

delay();

for(i=0;i<8;i++)

{

scl=1;

delay();

k=(k<<1)|sda;

scl=0;

delay();

}

return k;

}

void write_add(uchar address,uint date) {

start1();

write_byte1(0xa0);

respons();

write_byte1(address);

respons();

write_byte1(date);

respons();

stop1();

}

uint read_add(uchar address)

{

uchar date;

start1();

write_byte1(0xa0);

respons();

write_byte1(address);

respons();

start1();

write_byte1(0xa1);

respons();

date=read_byte1();

stop1();

return date;

}

/*void lread_add(uchar address)

{

start1();

write_byte1(0xa0);

respons();

write_byte1(address);

respons();

start1();

write_byte1(0xa1);

respons();

table2[0]=read_byte1();

table2[1]=read_byte1();

table2[2]=read_byte1();

table2[3]=read_byte1();

} */

/****************************************************************************** ****

出租计价部分

******************************************************************************* ***/

void chuzu()

{

uchar a,b,c,d,e,f,g,h,t,jiajia=1,chaxun;

t=key_scan();

if(t==4)start=1;

while(start)

{

table1[2]=num;

lucheng=table1[2];

if(lucheng<30)

{

zongjia=qibu+table1[1]+table1[4];

table1[0]=qibu;

}

else

{

zongjia=table1[1]+table1[4]+qibu+((danjia*(lucheng-30))/10);

table1[0]=qibu+((danjia*(lucheng-30))/10);

}

a=zongjia/1000;

b=zongjia%1000/100;

c=zongjia%1000%100/10+22;

d=zongjia%10;

e=lucheng/1000;

f=lucheng%1000/100;

g=lucheng%1000%100/10+22;

h=lucheng%10;

display(a,b,c,d,e,f,g,h);

t=key_scan();

if(t==4)

{

start=!start;

lucheng=0;

}

switch(t)

{

case 5:

wait=1;

num2=55;

while(wait)

{

EX0=0;

e=num2/60/10;

f=num2/60%10;

g=num2%60/10;

h=num2%60%10;

table1[3]=((e*10)+f)*10;

zongjia=table1[0]+table1[1]+table1[3];

a=zongjia/1000;

b=zongjia%1000/100;

c=zongjia%1000%100/10+22;

d=zongjia%10;

display(a,b,c,d,e,f,g,h);

t=key_scan();

if(t==5)

{

wait=0;

goto m;

}

}

m:

table1[1]=table1[1]+table1[3];

EX0=1;

break;

case 6:

EA=0;

jiajia=!jiajia;

table1[4]=0;

if(jiajia)

{

table1[4]=20;

}

lucheng=table1[2];

if(lucheng<30)

{

zongjia=qibu+table1[1]+table1[4];

table1[0]=qibu;

}

else

{

zongjia=table1[1]+table1[4]+qibu+((danjia*(lucheng-30))/10);

table1[0]=qibu+((danjia*(lucheng-30))/10);

}

write_add(0,123);

delayms(5);

write_add(0x01,220);

delayms(5);

write_add(2,9);

delayms(5);

write_add(3,44);

break;

case 7:

chaxun=!chaxun;

while(chaxun)

{

table2[0]=read_add(0);

zongjia=table2[0];

a=zongjia/1000;

b=zongjia%1000/100;

c=zongjia%1000%100/10+22;

d=zongjia%10;

// lucheng=table1[2];

lucheng=read_add(1);

e=lucheng/1000;

f=lucheng%1000/100;

g=lucheng%1000%100/10+22;

h=lucheng%10;

display(a,b,c,d,e,f,g,h);

}

break;

}

}

}

void main()

{

uchar b;

TMOD=0X01;

TH0=(65536-1000*a)/256;

TL0=(65536-1000*a)%256;

EA=1;

ET0=1;

TR0=1;

EX0=1;

IT0=1;

ds1302init();

init();

// reset_1302();

motor=0;

start=1;

while(1)

{

if(start==0)

{

shi=read_byte(0x85);

display(shi/16,shi%16,20,fen/16,fen%16,20,miao/16,miao%16);

fen=read_byte(0x83);

display(shi/16,shi%16,20,fen/16,fen%16,20,miao/16,miao%16);

miao=read_byte(0x81);

display(shi/16,shi%16,20,fen/16,fen%16,20,miao/16,miao%16);

b=key_scan();

if(b==1)

{

tiaoshi();

}

}

else

{

chuzu();

}

}

}

void init0() interrupt 0

{

num++;

}

void time0() interrupt 1

{

TH0=(65536-1000*a)/256;

TL0=(65536-1000*a)%256;

num1++;

if(num1==20)

{

num1=0;

num2++;

}

}