program_51_cs5460a_源码

#include <stdio.h> #include <reg51.h> #include <main.h> #include <interrupt.h> #include <spi.h> #include <dlt645.h> #include <memory.h> #include <rs485.h> #define uchar unsigned char #define uint unsigned int //#define MAX_CMD_LEN 53 #define INIT_FLAG_ADDR 0x10 #define INIT_FLAG_LEN 5 #define DEVICE_ID_ADDR 0x15 #define DEVICE_ID_LEN 6 uchar code init_flag[INIT_FLAG_LEN]={0x19,0x98,0x09,0x30,0x04}; //uchar code table_calibrate_cmd[9]={0xc8,0xc4,0xc0,0xd8,0xd4,0xd0,0xe0,0xe8,0xe4}; uchar code table_bit[8]={1,2,4,8,0x10,0x20,0x40,0x80}; extern uchar count_level; uchar pointer_buf485,rs485_timeout; uchar pointer_send,send_len; uchar oper_len,send_offset,chk_sum,send_i; uchar device_id[DEVICE_ID_LEN]; uchar count_1s; uint count_10s; uchar rs485_buf[MAX_485_LEN]; uchar chksum; uchar idata spi_buf[MAX_SPI_LEN]; uchar bdata flag_byte1; sbit flag_key=flag_byte1^0; sbit flag_data_ok=flag_byte1^1; sbit flag_send_data=flag_byte1^2; sbit flag_level=flag_byte1^3; sbit flag_rs485=flag_byte1^4; sbit flag_key_detect=flag_byte1^5; sbit flag_rd_measure_module=flag_byte1^6; sbit flag_drdy=flag_byte1^7; typedef union { uint dptr; uchar byte[2]; }un; sbit LED_A=P2^5; sbit LED_B=P2^6; sbit LED_C=P2^7; sbit Sub_Rst=P1^0; sbit MOTOR_L=P2^1; sbit MOTOR_COM=P2^2; sbit MOTOR_R=P2^3; extern code struct TRead_Write_Attribute irregular_cmd_table[IRREGULAR_CMD_NUM]; //uchar ij; //uint kj; //bit flag_motor_l; main() { Delay_10us(250); P0=0xff; P1=0xff; P2=0x0f; P3=0xff; Sub_Rst=0; Delay_10us(250); Sub_Rst=1; for(count_1s=0;count_1s<3;count_1s++) { if(!Judge_Device_Init_Flag()) break; else Delay_10us(250); } if(count_1s==3) { device_id[0]=device_id[1]=device_id[2]=device_id[3]=device_id[4]=device_id[5]=0; spi_buf[0]=init_flag[0]; spi_buf[1]=init_flag[1]; spi_buf[2]=init_flag[2]; spi_buf[3]=init_flag[3]; spi_buf[4]=init_flag[4]; Write_To_Memory(spi_buf,INIT_FLAG_ADDR,INIT_FLAG_LEN); Write_To_Memory(device_id,DEVICE_ID_ADDR,DEVICE_ID_LEN); } pointer_buf485=0; flag_byte1=0x0; count_1s=0; Init_8051(); while(1) { flag_byte1|=0x70; if(flag_rs485) Rs485_Process(); if(flag_key_detect) Task_Key_Detect(); if(flag_rd_measure_module) Read_Measure_Module_Data(); } } void Rs485_Process(void) { if(pointer_buf485<10) return; if(pointer_buf485<rs485_buf[9]+12) return; rs485_timeout=0; pointer_buf485--; if((rs485_buf[7]!=0x68) || (rs485_buf[pointer_buf485]!=0x16) ) { pointer_buf485=0; return; } pointer_buf485--; if(Get_Chksum(rs485_buf,rs485_buf[9]+10)!=rs485_buf[pointer_buf485]) { pointer_buf485=0; return; } if(Compare_Device_ID()) { pointer_buf485=0; return; } ES=0; //forbid rs485 interrupt pointer_buf485=0; if(rs485_buf[8]==0x01) Read_Data_From_Spi(); //read data from measure board else if(rs485_buf[8]==0x04 || rs485_buf[8]==0x1e) Write_Data_To_Spi(); //write data to measure board else if(rs485_buf[8]==0x0a) Write_Device_Addr(); //write device id to EEPROM else if(rs485_buf[8]==0x1d) Erect_Device_Connect(); //contact with Personal Computer } void Task_Key_Detect(void) { uchar i; if(flag_key) //key is pressed { KEY_BIT=1; if(!KEY_BIT) return; else { for(i=0;i<3;i++); if(KEY_BIT) { flag_key=0; P2=0xff; return; } } } else { if(KEY_BIT) return; else { for(i=0;i<3;i++); if(!KEY_BIT) { flag_key=1; // count_2min=12000; //T=1200*10ms=120000ms=120s=2min P2=0x0f; /* for test */ /* rs485_buf[0]=0x68; rs485_buf[1]=device_id[0]; rs485_buf[2]=device_id[1]; rs485_buf[3]=device_id[2]; rs485_buf[4]=device_id[3]; rs485_buf[5]=device_id[4]; rs485_buf[6]=device_id[5]; rs485_buf[7]=0x68; rs485_buf[8]=0x1d; rs485_buf[9]=0x01; rs485_buf[10]=0x55; // Get_Send_Frame_Package(1); Send_Frame_To_485(1,0); */ return; } } } } void Read_Measure_Module_Data(void) { uchar temp; /* SPI_DRDY=HIGH; if(count_1s) return; flag_data_ok=0; if(SPI_DRDY || flag_send_data) return; count_1s=100; */ if((!flag_drdy) || flag_send_data) return; flag_drdy=0; if(Read_From_Measure(0x08,spi_buf,MAX_SPI_LEN)) //128 return; /* temp=chksum; if(Read_From_Measure(0x07,&rs485_buf[MAX_485_LEN-2],1)) return; if(temp!=chksum) { // LED_A=~LED_A; return; } */ LED_A=~LED_A; flag_data_ok=1; count_1s=250; } void Read_Data_From_Spi(void) { uchar item,cmd_type; // uchar len,property; un un0; un0.byte[0]=rs485_buf[11]; un0.byte[1]=rs485_buf[10]; item=Get_Iregular_Cmd_Atrib(un0.dptr); if(item==0xff) { ES=1; return; } cmd_type=irregular_cmd_table[item].cmd_spi_read; // send_offset=irregular_cmd_table[item].offset; // oper_len=irregular_cmd_table[item].oper_len; if(cmd_type==0x60) //read eeprom { flag_data_ok=0; if(Read_From_Measure(0x60,spi_buf,MAX_SPI_LEN)) //128 { ES=1; return; } } else { if(!flag_data_ok) { ES=1; return; } } Send_Frame_To_485(2+irregular_cmd_table[item].oper_len,irregular_cmd_table[item].offset); } void Write_Data_To_Spi(void) { uchar item,phase,cmd_type,property; un un0; un0.byte[0]=rs485_buf[11]; un0.byte[1]=rs485_buf[10]; item=Get_Iregular_Cmd_Atrib(un0.dptr); if(item==0xff) { ES=1; return; } phase=rs485_buf[10] & 0x0f; //phase=1,2,3(,4,5,6) // i=rs485_buf[10] >>4; //i=1,2,3,4,5,6,7,8,9 cmd_type=irregular_cmd_table[item].cmd_spi_write; property=irregular_cmd_table[item].property; if((property & 0x01)==0) { ES=1; return; } SET_ALL_LED_OFF; if(phase<4) SET_LED_ON(phase+4); //p2.5 p2.6 p2.7 else SET_LED_ON(phase+1); if(property & 0x02) //case1: calibration { if(Write_To_Measure(cmd_type,&spi_buf[0],0)) { ES=1; SET_ALL_LED_OFF; return; } count_10s=1000; //1000*10ms=10s SPI_DRDY=HIGH; do { if(count_10s==0) { SET_ALL_LED_OFF; ES=1; return; } }while(SPI_DRDY); //wait drdy to low do { if(count_10s==0) { SET_ALL_LED_OFF; ES=1; return; } }while(!SPI_DRDY); //wait drdy to high } else if(property & 0x04) //case2: soft modify { if(property & 0x10) //phase modify { if(property & 0x08) rs485_buf[16]=0x87; else rs485_buf[16]=0x01; } else { rs485_buf[16]=rs485_buf[12]; if(property & 0x08) rs485_buf[16]|=0x80; } for(item=0;item<3;item++) { if(Write_To_Measure(cmd_type,&rs485_buf[16],1)==0) break; } if(item!=3) { for(phase=0;phase<30;phase++) for(item=0;item<255;item++); } } else //case3:other { item=irregular_cmd_table[item].oper_