--- cup.perl	2013/11/17 20:18:17	1.2
+++ cup.perl	2013/12/26 19:59:00	1.3
@@ -1,5 +1,5 @@
 #! /usr/bin/perl -w
-# $Id: cup.perl,v 1.2 2013/11/17 20:18:17 philip Exp $
+# $Id: cup.perl,v 1.3 2013/12/26 19:59:00 philip Exp $
 use XML::Simple;
 use strict;
 
@@ -15,6 +15,25 @@ open CUP, "> OmLand.cup" or die "Couldn'
 print CUP "name,code,country,lat,lon,elev,style,rwdir,rwlen,freq,desc,userdata,pics\n";
 #"Ahuriri",0002,NZ,4414.000S,16936.000E,756.0m,1,,,,"Mouth of Canyon Creek",,
 
+# Style is 
+# 1 Normal waypoint
+# 2 Airfield grass
+# 3 Outlanding
+# 4 Glider site
+# 5 Airfield sealed
+# 6 Mountain Pass
+# 7 Mountain Top
+# 8 Sender
+# 9 VOR
+# 10 NDB
+# 11 Cooling tower
+# 12 Dam
+# 13 Tunnel
+# 14 Bridge
+# 15 Power plant
+# 16 Castle
+# 17 Intersection
+
 my %strips;
 
 foreach my $stripnum ( keys %{$strips->{strip}} ){