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

*****************************************************************************/
//---主程序---//
void main(void)
   {
    unsigned int ad_adv;
long B;
    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(); //read 5045 when run         
     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); //write 5045
                        write5045(1,bw);delay2(20);
                         write5045(2,sw);delay2(20);
                         write5045(3,gw);delay2(20);
                      
                     }                    
         }
                 display5();                   
       display2();
      d