-#pragma comment (compiler)
-//#pragma comment (date)
-//#pragma comment (timestamp)
-#pragma pagesize(80)
-
-
#include "Local.h" /* standard header file */
#include "Metar.h" /* standard header file */
void DcdMTRmk( char **, Decoded_METAR * );
-#pragma page(1)
-#pragma subtitle(" ")
-#pragma subtitle("subtitle - Decode METAR report. ")
/********************************************************************/
/* */
/* Title: SaveTokenString */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static char **SaveTokenString ( char *string , char *delimeters )
{
return token;
}
-#pragma page(1)
-#pragma subtitle(" ")
-#pragma subtitle("subtitle - Decode METAR report. ")
/********************************************************************/
/* */
/* Title: freeTokens */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static void freeTokens( char **token )
{
}
return;
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: InitDcdMETAR */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static void InitDcdMETAR( Decoded_METAR *Mptr )
{
return;
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: ResetMETARGroup */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
-static int ResetMETARGroup( int StartGroup,
+/*static int ResetMETARGroup( int StartGroup,
int SaveStartGroup )
{
return (++SaveStartGroup);
}
+*/
-#pragma page(1)
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: CodedHgt2Meters */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static int CodedHgt2Meters( char *token, Decoded_METAR *Mptr )
{
return (hgt*30);
}
-#pragma page(1)
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isPartObscur */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isPartObscur( char **string, Decoded_METAR *Mptr,
int *NDEX )
{
return FALSE;
}
-#pragma page(1)
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isCldLayer */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isCldLayer( char *token )
{
nisdigit((token+3),3)) ? TRUE:FALSE;
}
-#pragma page(1)
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isCAVOK */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isCAVOK( char *token, Decoded_METAR *Mptr, int *NDEX )
{
}
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: parseCldData */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static void parseCldData( char *token, Decoded_METAR *Mptr, int next)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isSkyCond */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isSkyCond( char **skycond, Decoded_METAR *Mptr,
int *NDEX )
{
else
return FALSE;
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: prevailVSBY */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static float prevailVSBY( char *visibility )
{
float Miles_vsby;
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isVisibility */
/* */
/********************************************************************/
-#pragma page(1)
static bool isVisibility( char **visblty, Decoded_METAR *Mptr,
int *NDEX )
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: vrblVsby */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool vrblVsby( char *string1, char *string2,
Decoded_METAR *Mptr, int *NDEX )
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isMinMaxWinDir */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isMinMaxWinDir( char *string, Decoded_METAR *Mptr,
int *NDEX )
{
return FALSE;
}
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isRVR */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isRVR( char *token, Decoded_METAR *Mptr, int *NDEX,
int ndex )
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isAltimStng */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isAltimStng( char *token, Decoded_METAR *Mptr, int *NDEX )
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isTempGroup */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isTempGroup( char *token, Decoded_METAR *Mptr, int *NDEX)
{
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isWxToken */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
-static bool isWxToken( char *token )
+/*static bool isWxToken( char *token )
{
int i;
return FALSE;
}
return TRUE;
-}
+}*/
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isPresentWX */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isPresentWX( char *token, Decoded_METAR *Mptr,
int *NDEX, int *next )
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isStnID */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isStnId( char *stnID, Decoded_METAR *Mptr, int *NDEX)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isCodeName */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isCodeName( char *codename, Decoded_METAR *Mptr, int *NDEX)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isNIL */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isNIL( char *token, Decoded_METAR *Mptr, int *NDEX)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isAUTO */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isAUTO( char *token, Decoded_METAR *Mptr, int *NDEX)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isCOR */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isCOR ( char *token, Decoded_METAR *Mptr, int *NDEX)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isTimeUTC */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isTimeUTC( char *UTC, Decoded_METAR *Mptr, int *NDEX )
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isWindData */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isWindData( char *wind, Decoded_METAR *Mptr, int *NDEX )
{
return FALSE;
}
-#pragma page(1)
-#pragma subtitle(" ")
-#pragma subtitle("subtitle - Decode METAR report. ")
/********************************************************************/
/* */
/* Title: DcdMETAR */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
int DcdMETAR( char *string , Decoded_METAR *Mptr )
#define SKY1_len 50
float fracPart( char * );
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isTS_LOC */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isTS_LOC( char **string, Decoded_METAR *Mptr,
int *NDEX )
return FALSE;
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isDVR */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isDVR( char *token, Decoded_METAR *Mptr, int *NDEX )
{
}
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isTornadicActiv */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isTornadicActiv( char **string, Decoded_METAR *Mptr,
int *NDEX )
}
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isPartObscur */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isPartObscur( char **string, Decoded_METAR *Mptr,
int ndex, int *NDEX )
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isA0indicator */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isA0indicator( char *indicator, Decoded_METAR *Mptr,
int *NDEX )
return FALSE;
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isPeakWind */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isPeakWind( char **string, Decoded_METAR *Mptr,
int *NDEX )
{
else
return FALSE;
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isWindShift */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isWindShift( char **string, Decoded_METAR *Mptr,
int *NDEX)
{
return FALSE;
}
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isTowerVsby */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isTowerVsby( char **token, Decoded_METAR *Mptr, int *NDEX)
{
}
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isSurfaceVsby */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isSurfaceVsby( char **token, Decoded_METAR *Mptr,
int *NDEX)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isVariableVsby */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isVariableVsby( char **string, Decoded_METAR *Mptr,
int *NDEX )
{
}
return FALSE;
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isVsby2ndSite */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isVsby2ndSite( char **token, Decoded_METAR *Mptr,
int *NDEX)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isLTGfreq */
/* */
/* */
/********************************************************************/
-#pragma page(1)
bool static isLTGfreq( char **string, Decoded_METAR *Mptr, int *NDEX )
{
-#pragma comment (compiler)
-//#pragma comment (date)
-//#pragma comment (timestamp)
-#pragma pagesize(80)
-
#include "Metar.h" /* standard header file */
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isRecentWx */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isRecentWX( char **token, Decoded_METAR *Mptr,
int *NDEX )
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isVariableCIG */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isVariableCIG( char **token, Decoded_METAR *Mptr,
int *NDEX )
{
else
return FALSE;
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isCeil2ndSite */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isCIG2ndSite( char **token, Decoded_METAR *Mptr,
int *NDEX)
{
return FALSE;
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isPRESFR */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isPRESFR( char *string, Decoded_METAR *Mptr, int *NDEX)
{
}
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isPRESRR */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isPRESRR( char *string, Decoded_METAR *Mptr, int *NDEX)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isSLP */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isSLP( char **token, Decoded_METAR *Mptr, int *NDEX )
{
}
}
-#pragma page(1)
static bool isSectorVsby( char **string, Decoded_METAR *Mptr,
int *NDEX )
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isGR */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isGR( char **string, Decoded_METAR *Mptr, int *NDEX)
{
char *slash;
}
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isVIRGA */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isVIRGA( char **string, Decoded_METAR *Mptr, int *NDEX)
{
}
-#pragma page(1)
static bool isSfcObscuration( char *string, Decoded_METAR *Mptr,
int *NDEX )
{
}
-#pragma page(1)
static bool isCeiling( char *string, Decoded_METAR *Mptr, int *NDEX )
{
}
}
-#pragma page(1)
static bool isVrbSky( char **string, Decoded_METAR *Mptr, int *NDEX )
{
static char *cldPtr[] = {"FEW", "SCT", "BKN", "OVC", NULL };
}
-#pragma page(1)
static bool isObscurAloft( char **string, Decoded_METAR *Mptr,
int *NDEX )
{
}
}
-#pragma page(1)
static bool isNOSPECI( char *string, Decoded_METAR *Mptr, int *NDEX )
{
return TRUE;
}
}
-#pragma page(1)
static bool isLAST( char *string, Decoded_METAR *Mptr, int *NDEX )
{
return TRUE;
}
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isSynopClouds */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isSynopClouds( char *token, Decoded_METAR *Mptr,
int *NDEX )
{
return FALSE;
}
-#pragma page(1)
static bool isSNINCR( char **string, Decoded_METAR *Mptr, int *NDEX )
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isSnowDepth */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isSnowDepth( char *token, Decoded_METAR *Mptr,
int *NDEX )
{
return FALSE;
}
-#pragma page(1)
static bool isWaterEquivSnow( char *string,
Decoded_METAR *Mptr,
int *NDEX )
}
}
-#pragma page(1)
static bool isSunshineDur( char *string, Decoded_METAR *Mptr,
int *NDEX )
{
return FALSE;
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isHourlyPrecip */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isHourlyPrecip( char **string, Decoded_METAR *Mptr,
int *NDEX)
}
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isP6Precip */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isP6Precip( char *string, Decoded_METAR *Mptr,
int *NDEX )
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isP24Precip */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isP24Precip( char *string, Decoded_METAR *Mptr,
int *NDEX )
return FALSE;
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isTTdTenths */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isTTdTenths( char *token, Decoded_METAR *Mptr, int *NDEX)
{
}
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isMaxTemp */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isMaxTemp(char *string, Decoded_METAR *Mptr, int *NDEX)
{
char buf[ 6 ];
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isMinTemp */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isMinTemp(char *string, Decoded_METAR *Mptr, int *NDEX)
{
char buf[ 6 ];
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isT24MaxMinTemp */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isT24MaxMinTemp( char *string, Decoded_METAR *Mptr,
int *NDEX )
{
return FALSE;
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isPtendency */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isPtendency(char *string, Decoded_METAR *Mptr, int *NDEX)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isPWINO */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isPWINO( char *string, Decoded_METAR *Mptr, int *NDEX)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isPNO */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isPNO( char *string, Decoded_METAR *Mptr, int *NDEX)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isRVRNO */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isRVRNO( char *string, Decoded_METAR *Mptr, int *NDEX)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isCHINO */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isCHINO( char **string, Decoded_METAR *Mptr, int *NDEX)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isVISNO */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isVISNO( char **string, Decoded_METAR *Mptr, int *NDEX)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isFZRANO */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isFZRANO( char *string, Decoded_METAR *Mptr, int *NDEX)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isTSNO */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isTSNO( char *string, Decoded_METAR *Mptr, int *NDEX)
{
}
-#pragma subtitle(" ")
-#pragma page(1)
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: isDollarSign */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
static bool isDollarSign( char *indicator, Decoded_METAR *Mptr,
int *NDEX )
}
}
-#pragma page(1)
-#pragma subtitle(" ")
-#pragma subtitle("subtitle - description ")
/********************************************************************/
/* */
/* Title: DcdMTRmk */
/* None. */
/* */
/********************************************************************/
-#pragma page(1)
void DcdMTRmk( char **token, Decoded_METAR *Mptr )
{