量程自动转换程序设计源程序.doc

*****************************************************************************///---主程序---//voidmain(void)  {   unsignedintad_adv;longB;   TMOD=0x01;TH0=hi;TL0=lo;     ET0=1;  TR0=1;          EA=1;lcm_init();//初始化液晶显示器lcm_clr();//清屏   lcm_w_test(0,0x80);lcm_w_word("欢迎使用本仪器");//显示欢迎字DelayM(3000);//显示等留3秒lcm_clr();//清屏   speak=1;  int_mem5045();//read5045whenrun             lcm_w_test(0,0x90);    lcm_w_word("梧州学院财政部");                                                    _250v:keyfun();P32=1;P31=0;P30=1;L1=1;L2=0;L3=1;DelayM(200);speak=1;          ad_adv=ADlvbo1();                      B=(long)ad_adv**1250/4095;       //xx*2000/4092*1185/1000;    //B=B*125;            if(B<1001){speak=0;goto_100v;}      qw=B/1000;   bw=(B%1000)/100;                sw=(B%100)/10;                gw=B%10;    if(key1==0)                 {         delay2(100);          if(key1==0)                    {                      write5045(0,qw);delay2(20);//write5045                       write5045(1,bw);delay2(20);                        write5045(2,sw);delay2(20);                        write5045(3,gw);delay2(20);                                          }                           }                display5();                         display2();     display3();                    //if(flag3==0)flag4=1;                   if(flag4==0)gotodianliu;                  elsegoto_250v;       _100v:keyfun();P32=1;P31