久产久精品,欧美综合一区,av在线一区二区三区

/**************************************************
4 1/2 Digital Voltmeter MCU Program
Using MCU STC10F04XE with 6.000MHz Crystal
With PCB v1.01
UART Command
0xF1 Key Long
0xF2 Ket Short
0xF3 Erase EEPROM 0x0800
0xF4 Reboot(choosen)
0x00 Reboot
Created By Edward
Creation Date 14-Apr-2012
Latest Version 27-May-2012
Copyright 2012 Edward All rights reserved.
**************************************************/
#include
#include
/*Declare SFR associated*/
sfr CLK_DIV = 0x97;//System clock divide
sfr P4 = 0xC0;//P4 Port
sfr P4SW = 0xBB;//P4SW Register
sfr P0M0 = 0x94;//IO Port Type Register
sfr P0M1 = 0x93;
sfr P1M0 = 0x92;
sfr P1M1 = 0x91;
sfr P2M0 = 0x96;
sfr P2M1 = 0x95;
sfr P3M0 = 0xB2;
sfr P3M1 = 0xB1;
sfr P4M0 = 0xB4;
sfr P4M1 = 0xB3;
sfr AUXR = 0x8E;//Auxiliary register
sfr BRT = 0x9C;//Baud-Rate Timer register
sfr WAKE_CLKO=0x8F;//Clock output and Power-down Wakeup Control register
sfr IAP_CTRL = 0xC7;//ISP/IAP Control register
/*Declare SFR associated with the IAP */
sfr IAP_DATA = 0xC2; //Flash data register
sfr IAP_ADDRH= 0xC3; //Flash address HIGH
sfr IAP_ADDRL= 0xC4; //Flash address LOW
sfr IAP_CMD = 0xC5; //Flash command register
sfr IAP_TRIG = 0xC6; //Flash command trigger
sfr IAP_CONTR= 0xC7; //Flash control register
/*Define ISP/IAP/EEPROM command*/
#define CMD_IDLE 0 //Stand-By
#define CMD_READ 1 //unsigned char-Read
#define CMD_PROGRAM 2 //unsigned char-Program
#define CMD_ERASE 3 //Sector-Erase
/*Define ISP/IAP/EEPROM operation const for IAP_CONTR*/
#define ENABLE_IAP 0x84 //SYSCLK<6MHz
/*Define Which Command that Received to Reboot System*/
#define REBOOT_CMD 0xF4
//#define REBOOT_CMD 0x00 //STC-ISP Default Download Command
/*Define if the Sysytem will Reboot after Sent Command*/
#define REBOOT_CTRL 1 //Rebot
//#define REBOOT_CTRL 0 //not reboot
/*Define the Different ways to reboot*/
#define REBOOT_WAY 0x60 //From ISP
//#define REBOOT_WAY 0x20 //
sbit S1 = P4^0;//Key1
sbit CLK = P1^0;//ICL7135 Clock
sbit BSY = P1^1;//ICL7135 BUSY signal
sbit POL = P1^2;//ICL7135 Polarity output
sbit RH = P1^3;//ICL7135 Run/Hold
sbit STB = P3^2;//ICL7135 STROBE signal
sbit OVR = P1^4;//ICL7135 Over Range signal
sbit UNR = P1^5;//ICL7135 Under Range signal
sbit LED = P1^6;//LEDs
sbit D1 = P3^6;//Seven-Segment LED, the right the first
sbit D2 = P3^7;
sbit D3 = P3^5;
sbit D4 = P3^4;
sbit D5 = P1^7;
/*For Seven segment LED display*/
unsigned char code Led_Dsp[]={
0x3F,0x06,0x5B,0x4F,0x66,0x6D,0x7D,0x27,//0-7
0x7F,0x6F,0x77,0x7C,0x58,0x5E,0x79,0x71,//8-F
0x39,0x3D,0x74,0x76,0x30,//0x39-C,0x3D-G,0x74-h,0x76-H,0x30-I
//20
0x0E,0x38,0x54,0x5C,0x73,//0x0E-J,0x38-L,0x54-n,0x5C-o,0x73-P
0x67,0x50,0x6D,0x78,0x1C,//0x67-q,0x50-r,0x6D-S,0x78-t,0x1C-u
//30
0x3E,0x6E,0x00,0x40,0x0C},//0x3E-U,0x6E-y,0x00-,0x40--,0x0C-
/*Menu Display data*/
MenuDat[][6]={
0x00,27,14,11,24,29,//rEbot LEDx 0
0x01,28,14,23,13,33,//SEnd LED1 1
0x03,28, 1,28,14,29,//S1SEt LED1-2 2
0x07,13,25,28,14,29,//dpSEt LED1-3 3
0x0F,15,26,28,14,29,//FqSEt LED1-4 4
0x1F,28,34,28,14,29,//S-SEt LED1-5 5
0x3F,26,31,20,29,33,//qUIt LED1-6 6
0x7F,27,14,28,14,29,//rESEt LED1-7 7
0xAA,33, 0,15,15,33,// OFF LED2,4,6,8 8
0x55,33, 0,23,33,33,// On LED1,3,5,7 9
0x10,0x20,0x40,0x80,0,0x01,//For LED 10
0x11,15,33,33,33, 4,//F 4 LED1,5 11
0x22,15,33,33, 1, 0,//F 10 LED2,6
0x33,15,33,33, 5, 0,//F 50 LED
0x44,15,33, 1, 0, 0,//F 100 LED
0x55,15,33, 1, 2, 0,
0x66,15,33, 1, 2, 5,
0x77,15,33, 1, 5, 0,
0x88,15,33, 2, 5, 0,
0x99,15,33, 3, 0, 0,
0xAA,15,33, 5, 0, 0,
0xBB,15,33, 6, 0, 0,
0xCC,15, 1, 0, 0, 0,
0xDD,15, 1, 5, 0, 0,//F1500 LED 23
0xFF,28,30,12,12,14,//SuccE LED1-8 24
0xA5,14,27,27,24,27 //Error LED1,3,6,8 25
};
unsigned char
Dat[]={0,1,2,3,4,5,0},//ICL7135 Digital output with Polatity
//Data formate: POL MSD ... LSD LED
DatSend[]={0xFF,0xEE,0xEE,0xEE,0x00,0xAA},//Data for send
//Data format:0xff H=POL/OVR L-MSB+0x0E ... L-LSB CRC8 0xAA
DatRom[]={0,0,0},//Data for EEPROM
//Data format H-Send,L-S1;H-Dp,L-CLK;CRC
Dp,//Decimal point setting,0 is the left
ADCLK,//ICL7135 Clock Settings
i,
countdwn0,//Use for timing or countdown
sendjud,//Send Data judgment and countdown
Keyjud,//For key and menu
dispmod,//Display Mode
dispcnt,//For display
S1Func;//S1 Func
bit
readjud,//Read ICL7135 data judgment
KeyScanjud,//Key scan judgment
KeyLong, //Key
KeyShort,
sendctrl,//Send data control
sndctldsp,//Send data control for display
readadctrl;//Read AD Status control
/*---------------------------------------------
Software Delay Function
Input char for different delay time
Output void
---------------------------------------------*/
void Delay(char xx)
{
unsigned int y;
switch (xx)
{
case 0: //For Init Function and Key scan
{
for(xx=0;xx++;xx<255)
for(y=0;y++;y<255);
}break;
case 1: //For LED Display
{
xx=1;
while(xx--)
{
y=65500;
while(++y);
}
}break;
case 2: //For Reboot
{
xx=8;
while(xx--)
{
y=0;
while(++y);
}
}break;
}
}
/*----------------------------
Disable ISP/IAP/EEPROM function
Make MCU in a safe state
----------------------------*/
void IapIdle()
{
IAP_CONTR = 0; //Close IAP function
IAP_CMD = 0; //Clear command to standby
IAP_TRIG = 0; //Clear trigger register
IAP_ADDRH = 0x80; //Data ptr point to non-EEPROM area
IAP_ADDRL = 0; //Clear IAP address to prevent misuse
}
/*----------------------------
Read one unsigned char from ISP/IAP/EEPROM area
Input: addr (ISP/IAP/EEPROM address)
Output:Flash data
----------------------------*/
unsigned char IapReadByte(unsigned int addr)
{
unsigned int dat1; //Data buffer
IAP_CONTR = ENABLE_IAP; //Open IAP function, and set wait time
IAP_CMD = CMD_READ; //Set ISP/IAP/EEPROM READ command
IAP_ADDRL = addr; //Set ISP/IAP/EEPROM address low
IAP_ADDRH = addr >> 8; //Set ISP/IAP/EEPROM address high
IAP_TRIG = 0x5a; //Send trigger command1 (0x5a)
IAP_TRIG = 0xa5; //Send trigger command2 (0xa5)
_nop_(); //MCU will hold here until ISP/IAP/EEPROM
//operation complete
dat1 = IAP_DATA; //Read ISP/IAP/EEPROM data
IapIdle(); //Close ISP/IAP/EEPROM function
return dat1; //Return Flash data
}
/*----------------------------
Program one unsigned char to ISP/IAP/EEPROM area
Input: addr (ISP/IAP/EEPROM address)
dat (ISP/IAP/EEPROM data)
Output: void
----------------------------*/
void IapProgramByte(unsigned int addr, unsigned char dat2)
{
IAP_CONTR = ENABLE_IAP; //Open IAP function, and set wait time
IAP_CMD = CMD_PROGRAM; //Set ISP/IAP/EEPROM PROGRAM command
IAP_ADDRL = addr; //Set ISP/IAP/EEPROM address low
IAP_ADDRH = addr >> 8; //Set ISP/IAP/EEPROM address high
IAP_DATA = dat2; //Write ISP/IAP/EEPROM data
IAP_TRIG = 0x5a; //Send trigger command1 (0x5a)
IAP_TRIG = 0xa5; //Send trigger command2 (0xa5)
_nop_(); //MCU will hold here until ISP/IAP/EEPROM
//operation complete
IapIdle();
}
/*----------------------------
Erase one sector area
Input: addr (ISP/IAP/EEPROM address)
Output:void
----------------------------*/
void IapEraseSector(unsigned int addr)
{
IAP_CONTR = ENABLE_IAP; //Open IAP function, and set wait time
IAP_CMD = CMD_ERASE; //Set ISP/IAP/EEPROM ERASE command
IAP_ADDRL = addr; //Set ISP/IAP/EEPROM address low
IAP_ADDRH = addr >> 8; //Set ISP/IAP/EEPROM address high
IAP_TRIG = 0x5a; //Send trigger command1 (0x5a)
IAP_TRIG = 0xa5; //Send trigger command2 (0xa5)
_nop_(); //MCU will hold here until ISP/IAP/EEPROM
//operation complete
IapIdle();
}
/*----------------------------
CRC sector area
Input: *p len
Output:CRC
----------------------------*/
unsigned char CRC8(unsigned char *ptr,unsigned char len)
{
unsigned char crc=0;
while(len--!=0)
{
for(i=0x80;i!=0;i=i>>1)
{
if((crc&0x80)!=0)
{
crc=crc<<1;
crc^=0x5E;
} /* 余式CRC 乘以2 再求CRC */
else crc=crc<<1;
if((*ptr&i)!=0)crc^=0x5E; /* 再加上本位的CRC */
}
ptr++;
}
return crc;
}
/*---------------------------------------------
Reboot Function
Reboot the system
Input void
Output void
---------------------------------------------*/
void Reboot(void)
{
P2=0x40;
D1=D3=D5=D2=D4=0;
Delay(2);
IAP_CTRL=REBOOT_WAY;
}
/*---------------------------------------------
Read AD Status Function
Read Status for ICL7135, then write to Dat[]
Input unsigned char
Output void
---------------------------------------------*/
void ReadAD(bit yy)
{
if (yy)
{
Dat[0]=POL;
if(BSY)Dat[6]=Dat[6]|0x01;
else Dat[6]=Dat[6]&0xFE;
if(OVR) //Over Range
{
Dat[6]=Dat[6]|0x10;
DatSend[1]|=0xE0;
dispmod=2;
}
else
{
Dat[6]=Dat[6]&0xEF;
DatSend[1]&=0x0F;
dispmod=0;
}
if(UNR)Dat[6]=Dat[6]|0x20; //Under Range
else Dat[6]=Dat[6]&0xDF;
if(!RH)Dat[6]=Dat[6]|0x02; //Run/Hold
else Dat[6]=Dat[6]&0xFD;
}
}
/*---------------------------------------------
Data Convert Function
Convert ICL7135 output to an int number
Directly use Dat[]
Input void
Output int
---------------------------------------------*/
void DataConvt(void)
{
DatSend[1]=Dat[0]<<4;
DatSend[1]=DatSend[1]+Dat[1]+0x0E;
if(OVR)DatSend[1]|=0xE0; //Over Range
DatSend[2]=Dat[2]<<4;
DatSend[2]=DatSend[2]+Dat[3];
DatSend[3]=Dat[4]<<4;
DatSend[3]=DatSend[3]+Dat[5];
DatSend[4]=CRC8(&DatSend[0],4);
}
/*---------------------------------------------
ICL7135 Clock Set Function
MCU should run at 6MHz
Input unsigned char
Output void
---------------------------------------------*/
void AD_Clock(unsigned char clk)
{
AUXR&=0xEF;//Stop the Independent Baud Rate Generator
AUXR|=0x04;//SysCLK divide by 1
switch (clk)
{
case 1://4kHz
{
AUXR&=0xF3;//SysCLK divide by 12
BRT=0xFA;//250
}break;
case 2://10kHz
{
AUXR&=0xFB;//SysCLK divide by 12
BRT=0xE7;//231
}break;
case 3:BRT=0xC4;break;// 50kHz 196
case 4:BRT=0xE2;break;// 100kHz 226
case 5:BRT=0xE7;break;// 120kHz 231
case 6:BRT=0xE8;break;// 125kHz 232
case 7:BRT=0xEC;break;// 150kHz 236
case 8:BRT=0xF4;break;// 250kHz 244
case 9:BRT=0xF6;break;// 300kHz 246
case 10:BRT=0xFA;break;// 500kHz 250
case 11:BRT=0xFB;break;// 600kHz 251
case 12:BRT=0xFD;break;//1,000kHz 253
case 13:BRT=0xFE;break;//1,500kHz 254
}
AUXR|=0x10;//Run the Independent Baud Rate Generator
}
/*---------------------------------------------
Display Function
Dynamic scanning of the digital
Input char display mode
Output void
---------------------------------------------*/
void Display(char k)
{
D5=D4=D3=D2=D1=LED=1;
switch (k)
{
case 0://Normal display
{
P2=Led_Dsp[Dat[dispcnt]];
switch (dispcnt)
{
case 0:
{
P2=Dat[6];//LED
LED=0;
}break;
case 1:
{
if(!Dat[1])P2=0x00;//The Left Digit
if(!Dat[0])P2=P2+0x40;
D5=0;
}break;
case 2:D4=0;break;
case 3:D3=0;break;
case 4:D2=0;break;
case 5:D1=0;break;
case 6:
{
P2=0x80; //Decimal point
switch (Dp)
{
case 0:D5=0;break;
case 1:D4=0;break;
case 2:D3=0;break;
case 3:D2=0;break;
case 4:D1=0;break;
}
}break;
}
}break;
case 1://Menu display
{
if(countdwn0>80)Reboot();//Quite Menu if timeout
P2=Led_Dsp[Dat[dispcnt]];
if(!dispcnt)P2=Dat[0];
switch (dispcnt)
{
case 0:LED=0;break;
case 1:D5=0;break;
case 2:D4=0;break;
case 3:D3=0;break;
case 4:D2=0;break;
case 5:D1=0;break;
case 6:
{
P2=0x80; //Decimal point
switch (Keyjud)
{
case 1:D2=0;break;
case 2:D4=0;break;
case 3:D4=0;break;
case 4:D4=0;break;
case 5:D5=0;break;
case 6:D2=0;break;
case 7:D1=0;break;
case 0xF3:
{
switch (Dp)
{
case 0:D5=0;break;
case 1:D4=0;break;
case 2:D3=0;break;
case 3:D2=0;break;
case 4:D1=0;break;
}
}break;
case 0xF4:D5=0;break;
}
}break;
}
}break;
case 2://O.L. display
{
switch(dispcnt)
{
case 1:
{
P2=Dat[6];
LED=0;
}break;
case 2:
{
P2=Led_Dsp[0]+0x80;
D2=0;
}break;
case 3:
{
P2=Led_Dsp[22]+0x80;
D1=0;
dispcnt=0;
}break;
}
}break;
}
Delay(1);
dispcnt++;
if(dispcnt>6)dispcnt=0;
}
/*---------------------------------------------
Display Menu Function
Write Menu display data to Dat[]
Input void
Output void
---------------------------------------------*/
void DispMenu(void)
{
if(Keyjud>0&&Keyjud<0x10)for(i=0;i<7;i++)Dat[i]=MenuDat[Keyjud][i];//For Display
else
{
switch (Keyjud)
{
case 0xF1://Send or not
{
for(i=0;i<7;i++)
{
if(sndctldsp)Dat[i]=MenuDat[9][i];
else Dat[i]=MenuDat[8][i];
}
}break;
case 0xF2:;break;//S1.Set Func is reserved for future use
case 0xF3://Dp position
{
for(i=0;i<7;i++)Dat[i]=33;
Dat[Dp+1]=35;
Dat[0]=MenuDat[10][Dp];
}break;
case 0xF4:for(i=0;i<7;i++)Dat[i]=MenuDat[ADCLK+10][i];break;//CLK
}
}
}
/*---------------------------------------------
Serial communication Function
Send One Byte Data using UART
Input unsigned char
Output void
---------------------------------------------*/
void SendOneByte(unsigned char xx)
{
SBUF=xx;
while(!TI);
TI=0;
}
/*---------------------------------------------
Data Send Function
Send AD Data using UART
Input void
Output void
---------------------------------------------*/
void SendData(bit y)
{
if(y)
{
if(!BSY&&sendjud)
{
DataConvt();
SendOneByte(DatSend[sendjud-1]);
sendjud++; //send only one byte per scan
if(sendjud>6)sendjud=0;
}
if(BSY)sendjud=1;
if(!RH&&!dispcnt)SendOneByte(0xF0);
}
}
/*---------------------------------------------
Reset Settings Function
Just reset the settings in EEPROM
Input unsigned char MenuDat[?][]
Output void
---------------------------------------------*/
void Reset(unsigned char y)
{
countdwn0=0;
IapEraseSector(0x0800);
DatRom[0]=0x01;//Default not Send data, S1Func reserved for future use
DatRom[1]=0x04;//Default decimal point at the most significant digit
//ICL7135 default run at 100kHz
DatRom[2]=CRC8(&DatRom[0],2);
for(i=0;i<4;i++)IapProgramByte(0x0800+i,DatRom[i]);
for(i=0;i<7;i++)Dat[i]=MenuDat[y][i];
Keyjud=7;
while(countdwn0<20)
{
Display(1);
}
Reboot();
}
/*---------------------------------------------
Settings Function
Read, check, Save or reset settings
or reboot(Quit Menu) the System
Input unsigned char
Output void
---------------------------------------------*/
void Settings(unsigned char yy)
{
switch (yy)
{
case 0://Check settings while Init
{
for(i=0;i<3;i++)DatRom[i]=IapReadByte(0x0800+i);
if(DatRom[2]!=CRC8(&DatRom[0],2))
{
Reset(25);
}
else
{
S1Func=DatRom[0]&0x0F;
sendctrl=DatRom[0]>>4;
ADCLK=DatRom[1]&0x0F;
Dp=DatRom[1]>>4;
}
}break;
case 1://Save settings
{
countdwn0=0;
IapEraseSector(0x0800);
if(sndctldsp)DatRom[0]=0x10;
else DatRom[0]=0x00;
DatRom[0]|=S1Func;
DatRom[1]=Dp<<4;
DatRom[1]|=ADCLK;
DatRom[2]=CRC8(&DatRom[0],2);
for(i=0;i<4;i++)IapProgramByte(0x0800+i,DatRom[i]);
for(i=0;i<7;i++)Dat[i]=MenuDat[24][i];
Keyjud=7;
while(countdwn0<20)
{
Display(1);
}
Reboot();
}break;
case 2://Quit(Reboot Sysytem)
{
Reboot();
}break;
case 3://Reset settings
{
Reset(24);
}break;
}
}
/*---------------------------------------------
Key Scan Function
Input void
Output void
---------------------------------------------*/
void KeyScan(void)
{
if(!S1)
{
Delay(0);
if(!S1) //>2s Long time
{
if(!KeyScanjud)
{
countdwn0=0;
KeyScanjud=1;
}
}
if(countdwn0>12) //Light a LED
{
switch (dispmod)
{
case 0:Dat[6]=0xFF;break;
case 1:Dat[0]=0xFF;break;
}
}
}
else //<2S Short time
{
if(KeyScanjud)
{
if(countdwn0>12)KeyLong=1;
else KeyShort=1;
KeyScanjud=0;
}
}
}
/*---------------------------------------------
Key Function
Input void
Output void
---------------------------------------------*/
void KeyFunc(void)
{
if(KeyLong) //For Long Key
{
if(!Keyjud)
{
Keyjud=1;
EX0=0;//STOP read data from AD
readadctrl=0;//Stop read status from AD
dispmod=1;//Change Display Mode to Menu
sndctldsp=sendctrl;
sendctrl=0;
}
else
{
if(Keyjud<5)Keyjud|=0xF0;
else if(Keyjud>0xF0){if(Keyjud<0xF5)Keyjud&=0x0F;}
else if(Keyjud<0x10)Settings(Keyjud-4);
if(Keyjud==0xF2)Keyjud=0x02;//S1.Set Func is reserved for future use
}
DispMenu();
KeyLong=0;
}
if(KeyShort) //For Short Key
{
if(!Keyjud)RH=!RH;
else if(Keyjud<0x10)
{
Keyjud++;
if(Keyjud>7)Keyjud=1;
}
else if(Keyjud>0xF0)
{
switch (Keyjud)
{
case 0xF1:sndctldsp=!sndctldsp;break;//Send dat or not
case 0xF2:;break;//S1.Set Func is reserved for future use
case 0xF3:{Dp++;if(Dp>4)Dp=0;}break;//Dp position
case 0xF4:{ADCLK++;if(ADCLK>13)ADCLK=1;}break;//AD CLK
}
}
DispMenu();
KeyShort=0;
}
}
/*---------------------------------------------
Initialization Function
Input void
Output void
---------------------------------------------*/
void Init(void)
{
CLK_DIV=0x00;//System run at 6MHz
WAKE_CLKO=0x04;//Set the P1.0 pin as the independent Baud Rate Generator clock output
P4SW =0x70;//Set P4.4 P4.5 P4.6 to IO Prot
P0M1 =0xFF;//Set P0 Prot to HZ input
P0M0 =0x00;
P1M1 =0XF6;//Set P1.0 P1.3 to IO, P1.6-P1.7 to Open Drain, others to HZ
P1M0 =0XC0;
P2M1 =0x00;//Set P2 Port to Pull Push Output
P2M0 =0xFF;
P3M1 =0xF4;//Set P3.4-P3.7 to Open Drain, P3.2 to HZ, others to IO
P3M0 =0xF0;
P4M1 =0xE6;//Set P1.0 P4.3 P4.4 Prot to IO, others to HZ
……………………
…………限于本文篇幅余下代碼請從51黑下載附件…………

復制代碼

久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费