1503cs.i

完整的ＴＣＳ控制系统原程序．包含系统检测

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
#line 15 "1503cs.c" /0
 
  
#line 1 "tongxin.h" /0
 
 
 
 
 
 void  sumf(unsigned char *dpp,unsigned char sjgs);
 unsigned char  sums(unsigned char *dpp);
 bit txsjcxsj1(void);
 bit txsjcxsj2(void);
 bit txsjcxsj3(void); 
 bit cssjcx(void) ;
 
 
 void serial_0(void) interrupt 4 using 2{ 
 
 if(TI){ 
 TI=0;
 if(fjsq>0){
 SBUF=*(fsj++);
 fjsq--; 
 }
 else sjyfs=1;
 }
 
 if(RI){
 RI=0; 
  BUFF[0] = BUFF[1];
  BUFF[1] = BUFF[2];
  BUFF[2] = BUFF[3];
  BUFF[3] = BUFF[4];
  BUFF[4] = BUFF[5];
  BUFF[5] = BUFF[6];
  BUFF[6] = BUFF[7];
  BUFF[7] = SBUF ; 
 
 if( BUFF[0] == 0XEB ){ 
 if( BUFF[7] == sums( BUFF )  ) {    
 if( sjyfs ) {  
 switch ( BUFF[1]) {
 
 case  0x01: 
 if ( (BUFF[4] == 0xff )&&(!zbh)){
 ykz = 1 ;
 ykml = 0xA5 ; 
 zjcsml = 0 ; 
 sjyfs = 0 ; fjsq = 8 ; fsj = BUFF ; SBUF = 0XFA ;
 }  
 break ;
 case  0x02: 
 if ( (BUFF[4] == 0xff )&&(!zbh) ){
 ykz = 2;
 ykml = 0xA5 ;
 zjcsml = 0 ; 
 sjyfs = 0  ; fjsq = 8 ; fsj = BUFF ; SBUF = 0XFA ;
 }
 break ;      
 case  0x03: 
 if ( (BUFF[4] == 0xff )&&(!zbh)){
 ykz = 3 ;
 ykml = 0xA5 ;
 zjcsml = 0 ; 
 sjyfs = 0 ; fjsq = 8 ; fsj = BUFF ; SBUF = 0XFA;
 }
 break ;      
 case  0x04:  
 if ( BUFF[4] == 0x00 ){
 zbh = 0 ;
 ykz = 4 ; 
 ykml = 0xA5 ;
 zjcsml = 0 ; 
 sjyfs = 0 ; fjsq = 8 ; fsj = BUFF ; SBUF = 0XFA ;
 }
 break ;  
 
 case  0x05:  
 if( zbh == 0 ){  
 if( BUFF[4] != 0XFF ){ ykz = 5 ; ykz1 = BUFF[4] ; ykml = 0xA5 ; }  
 sjyfs = 0 ; fjsq = 8 ; fsj = BUFF ; SBUF = 0XFA ; 
 } 
 else if( BUFF[4] ==0XFF ){ BUFF[4] = 0XFE ; BUFF[5]  =  csbz  ; sjyfs = 0 ; fjsq = 8 ; fsj = BUFF ; SBUF = 0XFA ;}  
 break;   
 case  0x06:  
 if ( (BUFF[4] == 0xff )&&(!zbh)){
 ykz = 1 ;  
 ykml = 0xA5 ; 
 zjcsml = 1  ; 
 sjyfs = 0 ; fjsq = 8 ; fsj = BUFF ; SBUF = 0XFA;
 }
 break ;  
 
 case  0x07: 
 if( txsjcxsj1() == 0 )  break ; 
 SBUF = 0XFA ; break ;    
 case  0x08:
 if( txsjcxsj2() == 0 ) break ; 
 SBUF = 0XFA ; break ; 
 case  0x09:
 if( txsjcxsj3() == 0 ) break ; 
 SBUF = 0XFA ; break ;
 
 case  0x0A: break ; 
 
 case  0x0B:   
 if(!sjcjbz)  break ;
 if(  cssjcx() == 0 ) break ; 
 SBUF = 0XFA ; break ; 	           
 
 case  0x10:if ( (BUFF[4] == 0xaa)&&(!zbh) ){
 AD_N = BUFF[5] ;
 ykz1 = BUFF[6] ;
 ykz  = 0x10 ; 
 ykml = 0xA5 ;  
 }
 break;
 
 }   
 }
 }
 }
 }
 }
 
 
 
 
 
 void  sumf(unsigned char *dpp,unsigned char  sjgs){
 unsigned char i,temp ;
 unsigned int sum ;
 sum = 0xfa ;
 for(i = 0 ; i<sjgs ;i++)
 {
 temp = *dpp ;
 sum = sum + temp ;
 dpp++ ;
 } 
 *dpp=(char)sum ;   
 }
 
 
 
 unsigned char  sums( unsigned char  *dpp){
 unsigned char i,temp ;
 unsigned int sum ;
 sum = 0;
 for(i=0 ; i<7 ;i++)
 {
 temp = *dpp ;
 sum = sum + temp ;
 dpp++ ;
 }
 return (char)sum ; 
 }   
 
 bit txsjcxsj1(void){    
 unsigned char  i ;
 unsigned char   (*dpp)[32] ; 
 fshc[0] = BUFF[4] ;
 switch ( BUFF[4] ) {
 case 0XA0:  
 case 0XA1: dpp = dyjcsj     ; break ;
 case 0XA2:  
 case 0XA3: dpp = dyjcsj + 1 ; break ;
 case 0XA4:  
 case 0XA5: dpp = dyjcsj + 2 ; break ;
 case 0XA6:  
 case 0XA7: dpp = dyjcsj + 3 ; break ; 
 default  : return 0 ;
 }
 i = ( BUFF[4] & 0x0f ) % 2 ; 
 if( i == 0 ){
 for (i = 0 ; i < 16 ;i++ ) 
 fshc[i+1] = *((*dpp)+i) ;	  
 }
 else {
 for (i = 0 ; i < 16 ;i++ ) 
 fshc[i+1] = *((*dpp)+16+i ) ;
 }
 fshc[17]= 0 ;    
 sumf(fshc,18 );
 sjyfs = 0 ; 
 fjsq = 19 ; 
 fsj = fshc ;
 return 1 ;	    
 }
 
 bit txsjcxsj2(void){    
 unsigned char  i ;
 unsigned char (*dpp)[74] ; 
 fshc[0] = BUFF[4] ;
 switch ( BUFF[4] ) { 
 case 0XFB: dpp = kzjcsj     ; break ;
 case 0XB0: dpp = kzjcsj + 1 ; break ;
 case 0XB1: dpp = kzjcsj + 2 ; break ; 
 case 0XB2: dpp = kzjcsj + 3 ; break ;  
 case 0XB3: dpp = kzjcsj + 4 ; break ;  
 case 0XB4: dpp = kzjcsj + 5 ; break ; 
 case 0XB5: dpp = kzjcsj + 6 ; break ;
 case 0XB6: dpp = kzjcsj + 7 ; break ;
 case 0XB7: dpp = kzjcsj + 8 ; break ; 
 default  : return 0 ;
 } 
 for ( i = 0 ; i < 74 ; i++ ) 
 fshc[i+1] = *((*dpp)+i) ; 	  
 sumf( fshc , 75 );
 sjyfs = 0   ;
 fjsq  = 76   ; 
 fsj   = fshc ;
 return 1; 	    
 } 
 
 bit  txsjcxsj3(void){    
 unsigned char  i ;
 unsigned char  (*dpp)[16] ;	 
 fshc[0]=BUFF[4];
 switch ( BUFF[4] ) { 
 case 0XC0:  dpp = otjcsj  ; break;
 case 0XC1:  dpp = otjcsj+1; break; 
 default  : return 0; 
 }  
 for (i = 0 ; i < 16 ;i++ ) 
 fshc[i+1] = *((*dpp)+i) ; 
 fshc[17]= 0; 
 sumf( fshc , 18 ); 
 sjyfs = 0 ; 
 fjsq=19; 
 fsj=fshc;	
 return 1 ;    
 }
 
 bit cssjcx(void){
 unsigned char  i ,*dpp ; 
 if(BUFF[4] == 0XE0){
 dpp = sssjbuf ;
 fshc[0]=BUFF[4];
 for (i = 0 ; i < 84  ;i ++ ) 
 fshc[i+1] = *(dpp+i) ;   
 sumf( fshc , 85 ); 
 sjyfs = 0 ; 
 fjsq = 86 ; 
 fsj = fshc;	
 return 1 ;    
 }
 return 0 ;   
 
 } 
#line 16 "1503cs.c" /0
 
 
 
 void cdog(void); 
 void H450V(void); 
 void H380V(void);
 void H330V(void);
 void H450V1(void); 
 void H380V1(void);
 void H330V1(void);
 void FDY(void)   ;
 void FDY2(void)  ; 
 unsigned char  DYPD (void) ; 
 
 void KZHZ6(unsigned char DYXZ);
 void KZHZ70(void);  
 void KZHZ10(void);
 
 void KZHLHZ(void);  
 
 void r_2543( unsigned char val ) ; 
 void rd2543(void) ; 
 void rd2543_8(void); 
 void rd2543_1(unsigned char temp); 
 
 void CSTZ(void) ;
 
 
 void INT0int (void) interrupt 0  using 2    
 { 
 cxwbz = 1 ;
 tjs = 0 ;
 txch1 = TH0;
 txcl1 = TL0;
 }
 void INT1int (void) interrupt 2  using 2    
 {
 unsigned char temp ;
 unsigned char txch2,txcl2;
 unsigned int sj1,sj2;	                 
 txch2 = TH0;
 txcl2 = TL0;
 temp = tjs;
 if(cxwbz){
 if( temp < 2 ){
 
 sj1 = txch1<<8 ;
 sj1 += txcl1;
 
 sj2 = txch2<<8 ;
 sj2+= txcl2; 
 
 if( sj2 >= sj1 )  sj2 = sj2 - sj1;
 
 else { sj2 = sj1 - sj2 ; temp--; } 
 
 xczh = ( temp << 12 )|sj2;
 
 }
 else  xczh = 0 ;
 cxwbz = 0 ;        
 }
 } 
 
 void cysj( unsigned char yzz ){
 unsigned  char  temp , sjgs ,*dpp ;
 unsigned  int   temp1 ;  
 if( yzz == 0XBA ){
 dpp = jcsjbuf ; 
 if( t1ms >= 7  ){
 
 temp1  = ad_cy[0] << 8 ; 
 temp1  += ad_cy[1] ;
 temp1  /= 10 ;
 ad_cy[0] = (char)temp1 ;
 
 temp1  = ad_cy[2] << 8 ; 
 temp1  += ad_cy[3] ;
 temp1 /= 10 ;
 ad_cy[1] = (char)temp1 ;
 
 temp1  = ad_cy[4] << 8 ; 
 temp1  += ad_cy[5] ;
 temp1 /= 10 ;
 ad_cy[2] = (char)temp1 ;
 
 temp = (t1ms - 7)*3 + 36 ; 
 
 for ( sjgs = 0 ; sjgs < 3 ; sjgs++ ) 
 *(dpp + temp + sjgs ) = ad_cy[ sjgs ] ;  
 }
 else {	
 temp = (t1ms - 1) * 6 ; 
 for ( sjgs = 0 ; sjgs < 6 ; sjgs++ ) 
 *(dpp + temp + sjgs) = ad_cy[ sjgs ] ;  
 }
 }
 } 
 
 void timer0int (void) interrupt 1  using 1    
 { EA = 0 ;
 TR0=0 ; 
 t50  ++ ; 
 tcy  ++ ;  
 hys  ++ ;
 t1ms ++ ; 
 tjs  ++ ;
 txjs ++ ; 
 TH0=0xFB;  
 TL0=0x33;  
 TR0 = 1 ;  
 if( ((csbxbz == 1 )&& ( ( csbz == 6 ) || ( sdkzbz == 1 ) ))){  
 if ( ( t1ms > 0 ) && ( t1ms < 19 ) ) 
 {
 if( t1ms >= 18 )  csbxbz = 0 ;  
 rd2543_8() ;
 cysj( 0XBA ) ; 
 } 
 }
 EA = 1 ;             
 } 
 
 
 void serial_1(void)interrupt 7    
 {  
  _nop_() ;  









 
 }
























 
 
 
 void delay(unsigned char temp)
 {unsigned char i;
 for(i=0;i<temp;i++);
 } 
 
 
 void cdog(void)
 { if(t50>100)
 {
  XCS=!XCS; 
 GZD = !GZD ; 
 t50=0;
 }
 }
 void clrdog(void){ 
  XCS = !XCS ;
 GZD = !GZD ;  
  _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ;
  XCS = !XCS ;
 }      
 
 void port_int(void){
  P2=0xff;
  P1=0xfe;
  P0=0x00; 
  P3=0xff; 
 }
 
































 
 void Tx_int(void){   
 
 TCON = 0x05; 
 TMOD = 0x21;  
 TH0=0xFB;  
 TL0=0x33; 
 SCON1=0x50;     
 T2CON=0x34;     
 RCAP2H=0xFF;    
 RCAP2L=0x40; 
 
 
 
 
 PCON =0 ;       
 SCON=0x50;      
 TH1 =0xF0;      
 TR0=1;	        
 TR1=1;	        
 TR2=1;          
 }  
 
 void init_devices(void){
 EA = 0; 
  pmr = pmr|0x41;; 
 port_int(); 
 Tx_int(); 
 IE=0x17; 
 IP=0x05; 
 EA=1;
 } 
 
 
 
 void  r_2543( unsigned char val ) 
 {
 unsigned char i , fdata , sdata ,sdata1 ; 
 AD_CS = 0  ;  
 fdata = val ;  
 for ( i = 8 ; i > 0 ; i -- )
 { 
 sdata = sdata << 1 ;
 if( AD_DOUT ){ sdata++ ; }   
 if( fdata & 0x80 ) AD_DIN = 1;
 else  AD_DIN = 0 ;  
 fdata = fdata << 1 ;      
 AD_CLK = 1 ;   
 AD_CLK = 0 ;   
 }  
 for ( i = 4 ; i > 0; i --)
 { 
 sdata1 = sdata1 << 1 ;
 if( AD_DOUT ){ sdata1++ ; } 
 AD_CLK = 1 ;  
 AD_CLK = 0 ;  
 } 
 AD_CS = 1 ; 
 ad_buf[0] = (   sdata >> 4 ) & 0x0f; 
 ad_buf[1] = ( ( sdata << 4 ) & 0xf0 ) | ( sdata1 & 0x0f ) ; 
 }  
 
 
 void rd2543( void ) {  
 unsigned char temp ;	
 if( tcy >= 2 ){   
 tcy = 0 ; 
 r_2543( AD_N << 4 ) ;  
 if(AD_S != 0) { 
 temp = AD_S - 1 ;	    
 ad_cy[temp*2]   = ad_buf[0] ; 
 ad_cy[temp*2+1] = ad_buf[1] ; 	
 } 
 AD_S++ ;     
 switch ( AD_S ){ 
 case 1:CC = 0 ; BB = 0 ; AA = 1 ;  break ; 
 case 2:CC = 0 ; BB = 1 ; AA = 0 ;  break ; 
 case 3:CC = 0 ; BB = 1 ; AA = 1 ;  break ; 
 case 4:CC = 1 ; BB = 0 ; AA = 0 ;  break ; 
 case 5:CC = 1 ; BB = 0 ; AA = 1 ;  break ; 
 case 6:CC = 1 ; BB = 1 ; AA = 0 ;  break ; 
 case 7:CC = 1 ; BB = 1 ; AA = 1 ;  break ; 
 case 8:CC = 0 ; BB = 0 ; AA = 0 ;  break ; 
 case 9:sjcyw = 0 ; AD_S = 0 ; break ; 
 default:CC = 0 ; BB = 0 ; AA = 0 ;AD_S = 0; break ;		 
 }  	       
 }
 }
 
 
 void rd2543_8( void ) {     
 
 AD_N = 3 ;
 switch (cycs){
 case 1:
 case 5:CC = 0 ; BB = 0 ; AA = 0 ;  break ; 
 case 2:
 case 6:CC = 0 ; BB = 1 ; AA = 0 ;  break ; 
 case 3:
 case 7:CC = 1 ; BB = 0 ; AA = 0 ;  break ; 
 case 4:
 case 8:CC = 1 ; BB = 1 ; AA = 0 ;  break ; 
 }        
  _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ; 
 r_2543( AD_N << 4 ) ; 
 
 switch ( cycs ){
 case 1: 
 case 5: CC = 0 ; BB = 0 ; AA = 1 ;  break ; 
 case 2:
 case 6: CC = 0 ; BB = 1 ; AA = 1 ;  break ; 
 case 3:
 case 7: CC = 1 ; BB = 0 ; AA = 1 ;  break ; 
 case 4:
 case 8: CC = 1 ; BB = 1 ; AA = 1 ;  break ; 
 }   
  _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ; 
 r_2543( AD_N << 4 ) ; 
 ad_cy[0] = ad_buf[ 0 ] ; 
 ad_cy[1] = ad_buf[ 1 ] ;
 
 r_2543( AD_N << 4 ) ; 
 ad_cy[2] = ad_buf[ 0 ] ; 
 ad_cy[3] = ad_buf[ 1 ] ; 
 
 AD_N = 0 ; 	      
 switch ( cycs ){ 
 case 1: CC = 1 ; BB = 1 ; AA = 1 ;  break ; 
 case 2: CC = 1 ; BB = 1 ; AA = 0 ;  break ; 
 case 3: CC = 1 ; BB = 0 ; AA = 1 ;  break ; 
 case 4: CC = 1 ; BB = 0 ; AA = 0 ;  break ; 
 
 case 5: CC = 1 ; BB = 0 ; AA = 1 ;  break ; 
 case 6: CC = 1 ; BB = 0 ; AA = 0 ;  break ; 
 case 7: CC = 1 ; BB = 1 ; AA = 1 ;  break ; 
 case 8: CC = 1 ; BB = 1 ; AA = 0 ;  break ; 
 }   
  _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ; 
 r_2543( AD_N << 4 ) ;  
  _nop_() ; _nop_() ; _nop_() ;
 r_2543( AD_N << 4 ) ;  
 ad_cy[ 4 ] = ad_buf[0]; 
 ad_cy[ 5 ] = ad_buf[1]; 
 }  
 
 
 void rd2543_1(unsigned char temp){
 
 switch ( temp ){
 case 1: CC = 0 ; BB = 0 ; AA = 0 ;  break ; 
 case 2: CC = 0 ; BB = 0 ; AA = 1 ;  break ; 
 case 3: CC = 0 ; BB = 1 ; AA = 0 ;  break ; 
 case 4: CC = 0 ; BB = 1 ; AA = 1 ;  break ; 
 case 5: CC = 1 ; BB = 0 ; AA = 0 ;  break ; 
 case 6: CC = 1 ; BB = 0 ; AA = 1 ;  break ; 
 case 7: CC = 1 ; BB = 1 ; AA = 0 ;  break ; 
 case 8: CC = 1 ; BB = 1 ; AA = 1 ;  break ; 
 }  
  _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ; 
 r_2543( AD_N << 4 ) ; 
  _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ; 
 r_2543( AD_N << 4 ) ;           
 } 
 
 
 






































 
 
 
 
 
 void H450V(void) {  
 KZKM = 1 ;  	         	                  
 CS1 = 1 ;  CS2 = 1 ;   CS3 = 1 ;    
   P0 = 0x00 ;
 H450BZ = 1 ;  H380BZ = 0  ;H330BZ  = 0 ; 
  _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ;  
 CS1 = 0 ;
  _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ;
 CS1 = 1 ; 
 }
 
 void H450V1(void) { 
 KZKM = 1 ;
 CS1 = 1 ;  CS2 = 1 ;   CS3 = 1 ;  
   P0 = 0xFC ;
 H450BZ = 1 ;  H380BZ = 0  ;H330BZ  = 0 ; 
  _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ;
 CS1 = 0 ;
  _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ;
 CS1 = 1 ;  
 }
 
 void H380V(void) { 
 KZKM = 1 ;
 CS1 = 1 ;  CS2 = 1 ;   CS3 = 1 ;  
   P0 = 0x01 ;
 H450BZ = 0 ;  H380BZ = 1  ;H330BZ  = 0 ;  
  _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ;
 CS1 = 0; 
  _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ; _nop_() ;
 CS1 = 1 ; 
 
 }
 
 void H380V1(void) {	 
 KZKM = 1 ;
 CS1 = 1 ;  CS2 = 1 ;   CS3 = 1 ;   
   P0 = 0xFD ;