ra8835.c

SSD1963.zip

        LCDText(Gas[Gc.Inj[Gc.SelInj].Pkd.PkdSet.Carrier],9,7);   
        sprintf(Buffer,"%3d",Gc.Inj[Gc.SelInj].Pkd.PkdAct.Flow);
        LCDText(Buffer,9,32);
        break;  
        
        case NONE:
        default:
        break;      
      }

      sprintf(Buffer,"%d",Gc.SelDet+1);    
      LCDText(Buffer,12,5);            
      LCDText(DetType[Gc.Det[Gc.SelDet].Type],12,7);	      
      switch(Gc.Det[Gc.SelDet].Type)
      {  
        case FID:
        sprintf(Buffer,"%ld",Gc.Det[Gc.SelDet].Fid.FidAnaAct.Temp);
        LCDText(Buffer,12,18);
        sprintf(Buffer,"%ld",Gc.Det[Gc.SelDet].Fid.FidDigAct.Signal);
        LCDText(Buffer,12,32);
        sprintf(Buffer,"%d",Gc.Det[Gc.SelDet].Fid.FidDigSet.Attn);    
        LCDText(Buffer,14,32);           
        sprintf(Buffer,"%d",Gc.Det[Gc.SelDet].Fid.FidDigSet.Range);    
        LCDText(Buffer,16,35);
        LCDText(Status[Gc.Det[Gc.SelDet].Fid.FidDigAct.FlameSts],18,32);      
  
        LCDText(Gas[Gc.Det[Gc.SelDet].Fid.FidAnaSet.MkpType],14,6);
        sprintf(Buffer,"%3d",Gc.Det[Gc.SelDet].Fid.FidAnaAct.MkpFlow);    
        LCDText(Buffer,14,10);    
        sprintf(Buffer,"%3d",Gc.Det[Gc.SelDet].Fid.FidAnaAct.AirFlow);    
        LCDText(Buffer,16,10);    
        sprintf(Buffer,"%3d",Gc.Det[Gc.SelDet].Fid.FidAnaAct.H2Flow);    
        LCDText(Buffer,18,10);        
        break;
        
        case ECD:
        sprintf(Buffer,"%ld",Gc.Det[Gc.SelDet].Ecd.EcdAnaAct.Temp);
        LCDText(Buffer,12,18);
        sprintf(Buffer,"%ld",Gc.Det[Gc.SelDet].Ecd.EcdDigAct.Signal); 
        LCDText(Buffer,12,32);           
        sprintf(Buffer,"%d",Gc.Det[Gc.SelDet].Ecd.EcdDigSet.Attn);          
        LCDText(Buffer,14,32);
        sprintf(Buffer,"%d",Gc.Det[Gc.SelDet].Ecd.EcdDigAct.Current);    
        LCDText(Buffer,16,32);
  
        LCDText(Gas[Gc.Det[Gc.SelDet].Ecd.EcdAnaSet.MkpType],14,6);
        sprintf(Buffer,"%3d",Gc.Det[Gc.SelDet].Ecd.EcdAnaAct.MkpFlow);    
        LCDText(Buffer,14,10);    
        break; 
        
        case TCD:
        sprintf(Buffer,"%ld",Gc.Det[Gc.SelDet].Tcd.TcdAnaAct.Temp);
        LCDText(Buffer,12,18);
        sprintf(Buffer,"%ld",Gc.Det[Gc.SelDet].Tcd.TcdDigAct.Signal);
        LCDText(Buffer,12,32);           
        sprintf(Buffer,"%d",Gc.Det[Gc.SelDet].Tcd.TcdDigSet.Attn);    
        LCDText(Buffer,14,32);
        sprintf(Buffer,"%d",Gc.Det[Gc.SelDet].Tcd.TcdDigSet.Range);    
        LCDText(Buffer,16,35);
        sprintf(Buffer,"%ld",Gc.Det[Gc.SelDet].Tcd.TcdDigAct.Current);
        LCDText(Buffer,18,32);    
  
        LCDText(Gas[Gc.Det[Gc.SelDet].Tcd.TcdAnaSet.Mkp1Type],14,6);
        sprintf(Buffer,"%3d",Gc.Det[Gc.SelDet].Tcd.TcdAnaAct.Mkp1Flow);    
        LCDText(Buffer,14,10);    
        LCDText(Gas[Gc.Det[Gc.SelDet].Tcd.TcdAnaSet.Mkp2Type],16,6);
        sprintf(Buffer,"%3d",Gc.Det[Gc.SelDet].Tcd.TcdAnaAct.Mkp2Flow);    
        LCDText(Buffer,16,10);    
        sprintf(Buffer,"%d",Gc.Det[Gc.SelDet].Tcd.TcdDigAct.BridgeVolt);    
        LCDText(Buffer,18,10);      
        break; 
        
        case NPD:
        sprintf(Buffer,"%ld",Gc.Det[Gc.SelDet].Npd.NpdAnaAct.Temp);
        LCDText(Buffer,12,18);
        sprintf(Buffer,"%ld",Gc.Det[Gc.SelDet].Npd.NpdDigAct.Signal);
        LCDText(Buffer,12,32);           
        sprintf(Buffer,"%d",Gc.Det[Gc.SelDet].Npd.NpdDigSet.Attn);    
        LCDText(Buffer,14,32);
        sprintf(Buffer,"%d",Gc.Det[Gc.SelDet].Npd.NpdDigSet.Range);    
        LCDText(Buffer,16,35);
  
        LCDText(Gas[Gc.Det[Gc.SelDet].Npd.NpdAnaSet.MkpType],14,6);
        sprintf(Buffer,"%3d",Gc.Det[Gc.SelDet].Npd.NpdAnaAct.MkpFlow);    
        LCDText(Buffer,14,10);    
        sprintf(Buffer,"%3d",Gc.Det[Gc.SelDet].Npd.NpdAnaAct.Air1Flow);    
        LCDText(Buffer,16,10);    
        sprintf(Buffer,"%3d",Gc.Det[Gc.SelDet].Npd.NpdAnaAct.H2Flow);    
        LCDText(Buffer,18,10);        
        break;  
        
        case NONE:
        default:
        break;      
      }    
      LCDText(GcStatus[Gc.Sts],23,21);	
      sprintf(Buffer,"%02d:%02d:%02d",Gc.RunTime.hours,Gc.RunTime.minutes,Gc.RunTime.seconds);    
      LCDText(Buffer,25,21);
      break;
      //--------------------------------------------------------------------------
      case SCREENCHRONO:      
      sprintf(Buffer,"%02d:%02d:%02d",Chrono.Time.hours,Chrono.Time.minutes,Chrono.Time.seconds);    
      LCDText(Buffer,14,24);     
      sprintf(Buffer,"%.2f   ",Chrono.Flow);
      LCDText(Buffer,16,24);          
      break;
      //--------------------------------------------------------------------------    
      case SCREENADMIN:    
      LCDText(Status[Gc.Diagnosis],10,23);    
      LCDText(Status[Gc.Sequence],13,24);    
      LCDText(Status[Gc.Oven.OvenSet.CryoSwitch],19,29);
      break;      
      //--------------------------------------------------------------------------
      case SCREENSEQUENCE:
      sprintf(Buffer,"%02d",Gc.CurrMeth+1);  
      LCDText(Buffer,3,26);    
      sprintf(Buffer,"%02d",Step+1);  
      LCDText(Buffer,13,29);        
      sprintf(Buffer,"%02d",Gc.MethSeq.Method[Step]);  
      LCDText(Buffer,15,29);            
      sprintf(Buffer,"%02d",Gc.MethSeq.Repeats[Step]);  
      LCDText(Buffer,17,29);     
      break;
      //--------------------------------------------------------------------------
      case SCREENCONFIGURE:
      LCDText(InjType[Gc.Inj[0].Type],6,6);
      LCDText(InjType[Gc.Inj[1].Type],8,6);
      LCDText(InjType[Gc.Inj[2].Type],10,6);
      LCDText(InjType[Gc.Inj[3].Type],12,6);
    
      LCDText(DetType[Gc.Det[0].Type],18,6);
      LCDText(DetType[Gc.Det[1].Type],20,6);
      LCDText(DetType[Gc.Det[2].Type],22,6);
      LCDText(DetType[Gc.Det[3].Type],24,6);
      
      LCDText(Epc[0].Str,6,21);
      LCDText(Epc[1].Str,8,21);
      LCDText(Epc[2].Str,10,21);
      LCDText(Epc[3].Str,12,21);
      LCDText(Epc[4].Str,14,21);
      LCDText(Epc[5].Str,16,21);
      LCDText(Epc[6].Str,18,21);
      LCDText(Epc[7].Str,20,21);
      LCDText(Epc[8].Str,22,21);
      LCDText(Epc[9].Str,24,21);
      break;
      //--------------------------------------------------------------------------
      case SCREENCLOCK:
      sprintf(Buffer,"%02d:%02d:%02d%02d",Gc.SetDate.day,Gc.SetDate.month,Gc.SetDate.century,Gc.SetDate.year);
      LCDText(Buffer,8,22);
      
      LCDText(Day[Gc.SetDate.weekday-1],11, 22);    
  
      sprintf(Buffer,"%02d:%02d:%02d",Gc.SetTime.hours,Gc.SetTime.minutes,Gc.SetTime.seconds);
      LCDText(Buffer,14,22);
      
      LCDText(AmPm[Gc.SetTime.milliseconds],17,22);      
      break;
        
      //--------------------------------------------------------------------------
      case SCREENREADYCOND:      
      
      LCDText(Status[Gc.ReadyCond[0]],6,22);
      LCDText(Status[Gc.ReadyCond[1]],8,22);
      LCDText(Status[Gc.ReadyCond[2]],10,22);
      LCDText(Status[Gc.ReadyCond[3]],12,22);    
      LCDText(Status[Gc.ReadyCond[4]],14,22);
      LCDText(Status[Gc.ReadyCond[5]],16,22);
      LCDText(Status[Gc.ReadyCond[6]],18,22);
      LCDText(Status[Gc.ReadyCond[7]],20,22);
      LCDText(Units[Gc.PresUnit],22,22);
      break;    
      //--------------------------------------------------------------------------
      case SCREENMETHOD:         
      sprintf(Buffer,"%02d",Gc.CurrMeth+1);  
      LCDText(Buffer,4,31);
      break;
      //--------------------------------------------------------------------------
      case SCREENOVEN:    
      sprintf(Buffer,"%3d",Gc.Oven.OvenAct.Temp);  
      LCDText(Buffer,3,12);
      
      LCDText(GcStatus[Gc.Sts],3,32);
      
      sprintf(Buffer,"%1d",RampNo+1);
      LCDText(Buffer,5,10);
      LCDText(Buffer,7,10);
      LCDText(Buffer,9,10);
      
      sprintf(Buffer,"%3d",Gc.Oven.OvenSet.RTemp.Ramp.Value[RampNo]);      
      LCDText(Buffer,5,12);
      sprintf(Buffer,"%3d.%02d  ",Gc.Oven.OvenSet.RTemp.Ramp.Time[RampNo]/60,Gc.Oven.OvenSet.RTemp.Ramp.Time[RampNo]%60);
      LCDText(Buffer,7,12);
      sprintf(Buffer,"%3d.%1d   ",Gc.Oven.OvenSet.RTemp.Ramp.Rate[RampNo]/10,Gc.Oven.OvenSet.RTemp.Ramp.Rate[RampNo]%10);    
      LCDText(Buffer,9,12);
      sprintf(Buffer,"%3d.%02d  ",Gc.Oven.OvenSet.TotalTime/60,Gc.Oven.OvenSet.TotalTime%60);    
      LCDText(Buffer,11,12);
      sprintf(Buffer,"%3d",Gc.Oven.OvenSet.MaxTemp);                  
      LCDText(Buffer,5,32);
      LCDText(Status[Gc.Oven.OvenSet.CryoSwitch],7,32);
      LCDText(Status[Gc.Oven.OvenAct.FanSts],9,32);  
      break;    
      //--------------------------------------------------------------------------
      case SCREENINJECTOR:
      switch(Gc.Inj[Gc.SelInj].Type)
      {
        case NONE: //None
        break;
        
        case SSL: //Ssl
        LCDText(Gas[Gc.Inj[Gc.SelInj].Ssl.SslSet.Carrier],5,15);
  
        sprintf(Buffer,"%.2f",(Gc.Inj[Gc.SelInj].Ssl.SslSet.Length/100.0));    
        LCDText(Buffer,7,15);
        
        sprintf(Buffer,"%.3f",(Gc.Inj[Gc.SelInj].Ssl.SslSet.Dia/1000.0));    
        LCDText(Buffer,9,15);
  
        sprintf(Buffer,"%3d",Gc.Inj[Gc.SelInj].Ssl.SslSet.Temp);    
        LCDText(Buffer,13,15);            
        sprintf(Buffer,"%3d",Gc.Inj[Gc.SelInj].Ssl.SslAct.Temp);    
        LCDText(Buffer,13,28);                  
      
        sprintf(Buffer,"%.1f   ",(Gc.Inj[Gc.SelInj].Ssl.SslSet.Flow/10.0));    
        LCDText(Buffer,15,15);            
        sprintf(Buffer,"%.1f   ",(Gc.Inj[Gc.SelInj].Ssl.SslAct.Flow/10.0));    
        LCDText(Buffer,15,28);                  
  

        if(Gc.PresUnit == 0)
          sprintf(Buffer,"%.2f",(Gc.Inj[Gc.SelInj].Ssl.SslSet.Pres/100.0));    
        else if(Gc.PresUnit == 1)
          sprintf(Buffer,"%.1f  ",(Gc.Inj[Gc.SelInj].Ssl.SslSet.Pres/10.0));    
        else if(Gc.PresUnit == 2)
          sprintf(Buffer,"%d    ",Gc.Inj[Gc.SelInj].Ssl.SslSet.Pres);            
        LCDText(Buffer,17,15);            
        
        if(Gc.PresUnit == 0)
          sprintf(Buffer,"%.2f",(Gc.Inj[Gc.SelInj].Ssl.SslAct.Pres/100.0));    
        else if(Gc.PresUnit == 1)
          sprintf(Buffer,"%.1f  ",(Gc.Inj[Gc.SelInj].Ssl.SslAct.Pres/10.0));    
        else if(Gc.PresUnit == 2)
          sprintf(Buffer,"%d    ",Gc.Inj[Gc.SelInj].Ssl.SslAct.Pres);            
        LCDText(Buffer,17,28);            
        
        LCDText(InjCntrl[Gc.Inj[Gc.SelInj].Ssl.SslSet.CntrlMode],19,15);  
        switch(Gc.Inj[Gc.SelInj].Ssl.SslSet.CntrlMode)
        {   
          case 0:
          LCDText("PRES",21,13);  
          sprintf(Buffer,"%1d",RampNo+1);
          LCDText(Buffer,21,17);
          LCDText(Buffer,23,17);
          LCDText(Buffer,25,17);

          if(Gc.PresUnit == 0)
            sprintf(Buffer,"%.2f  ",(Gc.Inj[Gc.SelInj].Ssl.SslSet.RPressure.Ramp.Value[RampNo]/100.0));    
          else if(Gc.PresUnit == 1)
            sprintf(Buffer,"%.1f  ",(Gc.Inj[Gc.SelInj].Ssl.SslSet.RPressure.Ramp.Value[RampNo]/10.0));    
          else if(Gc.PresUnit == 2)
            sprintf(Buffer,"%d    ",Gc.Inj[Gc.SelInj].Ssl.SslSet.RPressure.Ramp.Value[RampNo]);    
          
          LCDText(Buffer,21,20);                  
          
          sprintf(Buffer,"%d.%02d    ",Gc.Inj[Gc.SelInj].Ssl.SslSet.RPressure.Ramp.Time[RampNo]/60,Gc.Inj[Gc.SelInj].Ssl.SslSet.RPressure.Ramp.Time[RampNo]%60);    
          LCDText(Buffer,23,20);                        
    
          if(Gc.PresUnit == 0)
            sprintf(Buffer,"%.2f  ",(Gc.Inj[Gc.SelInj].Ssl.SslSet.RPressure.Ramp.Rate[RampNo]/100.0));    
          else if(Gc.PresUnit == 1)
            sprintf(Buffer,"%.1f  ",(Gc.Inj[Gc.SelInj].Ssl.SslSet.RPressure.Ramp.Rate[RampNo]/10.0));    
          else if(Gc.PresUnit == 2)
            sprintf(Buffer,"%d    ",Gc.Inj[Gc.SelInj].Ssl.SslSet.RPressure.Ramp.Rate[RampNo]);    
          LCDText(Buffer,25,20);                        
          break;
          
          case 1:
          LCDText("FLOW",21,13);  
          sprintf(Buffer,"%1d",RampNo+1);
          LCDText(Buffer,21,17);
          LCDText(Buffer,23,17);
          LCDText(Buffer,25,17);          
          sprintf(Buffer,"%.1f    ",(Gc.Inj[Gc.SelInj].Ssl.SslSet.RFlow.Ramp.Value[RampNo]/10.0));    
          LCDText(Buffer,21,20);                  
          
          sprintf(Buffer,"%d.%02d    ",Gc.Inj[Gc.SelInj].Ssl.SslSet.RFlow.Ramp.Time[RampNo]/60,Gc.Inj[Gc.SelInj].Ssl.SslSet.RFlow.Ramp.Time[RampNo]%60);    
          LCDText(Buffer,23,20);                        
    
          sprintf(Buffer,"%.1f  ",(Gc.Inj[Gc.SelInj].Ssl.SslSet.RFlow.Ramp.Rate[RampNo]/10.0));    
          LCDText(Buffer,25,20);                        
          break;            
        }            
        break;
        
        case PTV: //Ptv
        LCDText(Gas[Gc.Inj[Gc.SelInj].Ptv.PtvSet.Carrier],5,15);
  
        sprintf(Buffer,"%.2f",(Gc.Inj[Gc.SelInj].Ptv.PtvSet.Length/100.0));    
        LCDText(Buffer,7,15);
        
        sprintf(Buffer,"%.3f",(Gc.Inj[Gc.SelInj].Ptv.PtvSet.Dia/1000.0));    
        LCDText(Buffer,9,15);
  
        sprintf(Buffer,"%3d",Gc.Inj[Gc.SelInj].Ptv.PtvSet.Temp);    
        LCDText(Buffer,13,15);            
        sprintf(Buffer,"%3d",Gc.Inj[Gc.SelInj].Ptv.PtvAct.Temp);    
        LCDText(Buffer,13,28);                  
      
        sprintf(Buffer,"%.1f   ",(Gc.Inj[Gc.SelInj].Ptv.PtvSet.Flow/10.0));    
        LCDText(Buffer,15,15);            
        sprintf(Buffer,"%.1f   ",(Gc.Inj[Gc.SelInj].Ptv.PtvAct.Flow/10.0));    
        LCDText(Buffer,15,28);                  
  

        if(Gc.PresUnit == 0)
          sprintf(Buffer,"%.2f",(Gc.Inj[Gc.SelInj].Ptv.PtvSet.Pres/100.0));    
        else if(Gc.PresUnit == 1)
          sprintf(Buffer,"%.1f  ",(Gc.Inj[Gc.SelInj].Ptv.PtvSet.Pres/10.0));    
        else if(Gc.PresUnit == 2)
          sprintf(Buffer,"%d    ",Gc.Inj[Gc.SelInj].Ptv.PtvSet.Pres);            
        LCDText(Buffer,17,15);            
        
        if(Gc.PresUnit == 0)
          sprintf(Buffer,"%.2f",(Gc.Inj[Gc.SelInj].Ptv.PtvAct.Pres/100.0));    
        else if(Gc.PresUnit == 1)
          sprintf(Buffer,"%.1f  ",(Gc.Inj[Gc.SelInj].Ptv.PtvAct.Pres/10.0));    
        else if(Gc.PresUnit == 2)
          sprintf(Buffer,"%d    ",Gc.Inj[Gc.SelInj].Ptv.PtvAct.Pres);            
        LCDText(Buffer,17,28);            
        
        LCDText(InjCntrl[Gc.Inj[Gc.SelInj].Ptv.PtvSet.CntrlMode],19,15);  
        switch(Gc.Inj[Gc.SelInj].Ptv.PtvSet.CntrlMode)
        {   
          case 0: //Pressure 
          LCDText("PRES",21,13);  
          sprintf(Buffer,"%1d",RampNo+1);
          LCDText(Buffer,21,17);
          LCDText(Buffer,23,17);
          LCDText(Buffer,25,17);

          if(Gc.PresUnit == 0)
            sprintf(Buffer,"%.2f  ",(Gc.Inj[Gc.SelInj].Ptv.PtvSet.RPressure.Ramp.Value[RampNo]/100.0));    
          else if(Gc.PresUnit == 1)
            sprintf(Buffer,"%.1f  ",(Gc.Inj[Gc.SelInj].Ptv.PtvSet.RPressure.Ramp.Value[RampNo]/10.0));    
          else if(Gc.PresUnit == 2)
            sprintf(Buffer,"%d    ",Gc.Inj[Gc.SelInj].Ptv.PtvSet.RPressure.Ramp.Value[RampNo]);    
          
          LCDText(Buffer,21,20);                  
          
          sprintf(Buffer,"%d.%02d    ",Gc.Inj[Gc.SelInj].Ptv.PtvSet.RPressure.Ramp.Time[RampNo]/60,Gc.Inj[Gc.SelInj].Ptv.PtvSet.RPressure.Ramp.Time[RampNo]%60);    
          LCDText(Buffer,23,20);                        
    
          if(Gc.PresUnit == 0)
            sprintf(Buffer,"%.2f  ",(Gc.Inj[Gc.SelInj].Ptv.PtvSet.RPressure.Ramp.Rate[RampNo]/100.0));    
          else if(Gc.PresUnit == 1)
            sprintf(Buffer,"%.1f  ",(Gc.Inj[Gc.SelInj].Ptv.PtvSet.RPressure.Ramp.Rate[RampNo]/10.0));    
          else if(Gc.PresUnit == 2)
            sprintf(Buffer,"%d    ",Gc.Inj[Gc.SelInj].Ptv.PtvSet.RPressure.Ramp.Rate[RampNo]);    
          LCDText(Buffer,25,20);                        
          break;
          
          case 1:   //Flow
          LCDText("FLOW",21,13);  
          sprintf(Buffer,"%1d",RampNo+1);
          LCDText(Buffer,21,17);
          LCDText(Buffer,23,17);
          LCDText(Buffer,25,17);