device.XBEE.purge()
private string datain
private data
private thetime
private POND_length
Private Counter = 0
private Checksum = 0
while (1)
   try
      datain = device.XBEE.readUntil(asc('x'))     //read serial sentence
         ? datain
         POND_length = getlength(datain)
        
      thetime = systime()
      if (left(datain,5) == "$POND")                  //valid data stream
            ?"POND_LENGTH = " + POND_length
         data = parse(datain,1,",")
            ? data
            data.time = systime()
            P_bar_p.addValue(data)                      //pick out barometric pressure
            
         data = parse(datain,2,",")
            ? data
            data.time = systime()
            P_air_t_f.addValue(data)                    //pick out air temperature
            
         data = parse(datain,3,",")
            ? data
            data.time = systime()
            P_wind_Dir.addValue(data)                    //pick out wind direction
            
			data = parse(datain,4,",")
            ? data
            if((data < P_wind_speed[0] +20) || (data > P_wind_speed[0] -20))           
            data.time = systime()
            P_wind_Speed.addValue(data)                  //pick out wind speed
            ? "WIND = " + data
            endif
         data = parse(datain,5,",")
            ? data
            data.time = systime()
            P_wind_gust.addValue(data)                  //pick out wind gust   
            
         data = parse(datain,6,",") 
            ? data
            data.time = systime()
            if((data < P_RAIN_C[0] +10) || (data > P_RAIN_C[0] -10))    //pick out rain counts       
            data.time = systime()
            P_RAIN_C.addValue(data)                 
            ? "RAIN = " + data  
            endif
            
         data = parse(datain,7,",") 
            ? data
            data.time = systime()
            P_volts.addValue(data)                     //pick out voltage 

         data = parse(datain,8,",") 
            ? data
            data.time = systime()
            P_rel_hum.addValue(data)                   //pick out relative humidity

         data = parse(datain,9,",") 
            ? data
            data.time = systime()
            P_dew_point.addValue(data)                 //pick out dew point
            
         data = parse(datain,10,",") 
            ? data
            data.time = systime()
            P_wind_chill.addValue(data)                //pick out wind chill 
 
         data = parse(datain,11,",") 
            ? data
            data.time = systime()
            P_heat_index.addValue(data)                //pick out heat index   
           
      endif
		 catch()
	  ? strLastError
   endcatch
   delay(0.5)
endwhile