# wmobd2msd.awk
# Script zur Erzeugung einer Liste mit Stationsbasisdaten
# aus der allumfassenden Stationsdatendatei der WMO
# (c) Dr. Guido Scholz, Stand 16.08.2003
#
# Dies Auswahl der Region erfolg durch den ersten Zahlenwert in der
# Textzeile (6: Europa, 4: Nord- und Zentralamerika etc.)
# Aufruf mit:
#   awk -f wmobd2msd.awk Pub9volA030805.flatfile > europa.msd

BEGIN {FS="\t"}
/^6/ && $25 ~ /R/ {
  split($9,breite," ")
  split($10,laenge," ")
  if (!gsub(/E$/,"",laenge[2])) {gsub(/W$/,"",laenge[2]); laenge[1]*=-1}
  if (!gsub(/N$/,"",breite[2])) {gsub(/S$/,"",breite[2]); breite[1]*=-1}
  printf("%s\n%s\n%d\n%d.%d\n%d.%d\n", $6,$8,$11,laenge[1], laenge[2], breite[1], breite[2])
}