＃i nclude  
 //此程序实现"数控步进直流稳压电源"的功能，调试时为了避免资源冲突，应使实验板上 的拔码开 
 
关S8拔向高电平  
  //本程序设定S9键为增加键，当按住S9键不松开时，输出Vout以0.1V连续步进，  
  //直至键S9松开,当以一定的时间间隔点动S9键时，输出Vout也为点动步进  
  //递减键S11的功能与S9基本相同时，输出电压的值显示在3个LED上  
unsigned  char  R1，R2，R3，TXDATA，LEDF，BJF，COUNTW，data；  
unsigned  int     i；  
          const    char    table[11]={0xc0，0xf9，0xa4，0xb0，0x99，          0x92，   0x82 
 
，0XD8，0x80，0x90，0xFF}；  
  //不带小数点的显示段码表  
const    char    table0[11]={0X40，0X79，0X24，0X30，0X19，0X12，0X02，0X78，0X00，0X10， 
 
0xFF}；  
   //带小数点的的显示段码表  
unsigned char   s[4]；     //定义一个显示缓冲数组  
   //把需要显示的数字装入显示缓冲数组  
void sfz()  
  {   
        s[0]=R3；  
        s[1]=R2；  
        s[2]=R1；  
         s[3]=0x0A；     //最后一个LED显示"DARK"  
  }  
  //系统各寄存器初始化子程序  
void initial()  
  {  
        R1=0X00；  
        R2=0X00；  
         R3=0X00；  
         sfz()；     //把需要显示的数字装入显示缓冲数组  
         TXDATA=0X00；  
         LEDF=0X01；  
         BJF=0X01；  
         TRISB1=0；  
         TRISB2=0；  
         TRISB4=1；  
         TRISB5=1； //设置与键盘相关的各口的输入输出方式  
         RB1=0；  
         RB2=0； //设置扫描初始条件   
   }  
    //spi方式显示初始化子程序  
void  SPIINIT()  
  {  
         PIR1=0；  
         SSPCON=0x30；  
          SSPSTAT=0xC0；  
    //设置SPI的控制方式，允许SSP方式，并且时钟下降沿发送，与"74HC595,当其  
    //SCLK从低到高跳变时，串行输入寄存器"的特点相对应  
        TRISC=0xD7；    //SDO引脚为输出，SCK引脚为输出  
        TRISA5=0；     //RA5引脚设置为输出，以输出显示锁存信号  
 }  
   //I2C初始化子程序  
void  i2cint()  
  {  
        SSPCON = 0X08；         //初始化SSPCON寄存器  
        TRISC3 =1；   //设置SCL为输入口  
         TRISC4 =1；            //设置SDA为输入口  
        TRISA4 = 0；  
        SSPSTAT=0X80；          //初始化SSPSTAT寄存器  
        SSPADD=0X02；           //设定I2C时钟频率  
        SSPCON2=0X00；           //初始化SSPCON2寄存器  
          di()；                 //关闭总中断  
          SSPIF=0；              //清SSP中断标志  
           RA4=0；              //关掉74HC165的移位时钟使能，以免74HC165  
           //移位数据输出与I2C总线的数据线发生冲突  
            SSPEN=1； //SSP模块使能  
   }  
                   //软件延时子程序  
void  DELAY()  
         {  
         for(i = 3553； --i ；) continue；  
          }  
//键服务子程序  
void keyserve()  
   {  
        PORTB=0XFD ；  
         if(RB5==0) BJF=0X01；    //S9键按下，步进加标志置1  
         PORTB=0XFB ；  
         if(RB5==0) BJF=0X00；    //S11键按下，步进加标志清0  
         RB1=0；                 //恢复PORTB的值  
         RB2=0；  
}  
//键扫描子程序  
void KEYSCAN()  
  {  
         while(1){   
         while(1) {  
           if (RB5==0) break；  
  }  
       DELAY()；             //若有键按下，则软件延时  
         if (RB5==0)break；   //若还有键按下，则终止循环扫描，返回  
     }  
}  
//SPI传送数据子程序  
void  SPILED(data)  
{  
          SSPBUF=data；       // 启动发送  
         do {  
       ；  
         }while(SSPIF==0)；  
        SSPIF=0；  
  }  
//显示子程序  
void display()  
 {  
                SPIINIT()； //spi方式显示初始化  
                RA5=0； //准备锁存  
                 for(COUNTW=0；COUNTW<4；COUNTW++) {  
                 data=s[COUNTW]；  
                 if(COUNTW==1) data=table0[data]；//第二位需要显示小数点  
                 else data=table[data]；  
                 SPILED(data)； //发送显示段码  
 }  
            for(COUNTW=0；COUNTW<4；COUNTW++){  
            data=0xFF；  
            SPILED(data)； //连续发送4个DARK，使显示看起来好看一些  
 }  
          RA5=1； //最后给一个锁存信号，代表显示任务完成  
 }  
//I2C总线输出数据子程序  
void i2cout()  
{  
         i2cint()； //因为SPI输出和I2C输出不能同时工作，则需要  
//不断在两种方式见切换  
          SEN=1； //产生I2C启动信号  
          for(i=0x02；--i；) continue； //给予一定的延时，保证启动  
  do {  
       RSEN=1； //产生I2C启动信号  
       }while(SSPIF==0)； //如果没能启动，则反复启动，直到启动为止  
         SSPIF=0； //SSPIF标志清0  
         SSPBUF=0X58； //I2C总线发送地址字节  
    do {  
      ；  
         }while(SSPIF==0)； //等待地址发送完毕  
          SSPIF=0； //SSPIF标志清0  
          SSPBUF=0X01； //I2C总线发送命令字节  
       do {  
            ；  
         }while(SSPIF==0)； //等待命令发送完毕  
           SSPIF=0； //SSPIF标志清0  
            SSPBUF=TXDATA； //I2C总线发送数据字节  
      do {  
         ；  
            }while(SSPIF==0)； //等待数据发送完毕  
            SSPIF=0； //SSPIF标志清0  
             PEN=1； //产生停止条件  
      do {  
           ；  
         }while(SSPIF==0)； //等待停止条件产生  
         SSPIF=0； //SSPIF标志清0   
  }  
//步进加子程序  
void BJADD()  
{  
            R1++；  
           TXDATA=TXDATA+2；  
           if(R1>9) {  
             R1=0；  
             R2++；  
            if(R2>9) {  
               R2=0；  
                  R3++；  
 }  
}  
           if((R3==1)&&(R2==2)&&(R1==1)){  
          R3=0；  
           R2=0；  
              R1=0； //若R3，R2，R1超过120，则又从0计起  
           TXDATA=0；  
 }  
           sfz()； //把需要显示的数字装入显示缓冲数组  
}  
//步进减子程序  
void BJSUB()  
{  
                 R1--；  
                   TXDATA=TXDATA-2；  
                  if(R1==0XFF) {  
                 R1=9；  
                    R2--；  
                   if(R2==0XFF) {  
                  R2=9；  
                R3--；  
                   if(R3==0XFF) {  
                  R3=1；  
                   R2=2；  
                R1=0；//若R3，R2，R1小于0，则又从120计起  
                     TXDATA=0XF0；  
              }  
         }  
    }  
   sfz()； //把需要显示的数字装入显示缓冲数组  
}  
//主程序  
main()  
  {  
             initial()； //系统各寄存器初始化  
             display()； //调用一次显示子程序  
             while(1) {  
               i2cout()； //调用I2C子程序，启动D/A转换   
               KEYSCAN()； //键盘扫描  
               keyserve() ； //若确实有键按下，则调用键服务程序   
             if(BJF==0X01) BJADD()；//若步进加标志为1，则调用步进加子程序  
             else BJSUB()； //若步进加标志为0，则调用步进减子程序  
             display()； //调用一次显示子程序  
   }