(form "00607" (size 50 20)
  (help "00607_TIP_0")
  (heading "DEFINE DIPMETER DATA")
  (label (position  3  3) (text "Table"))
  (label (position  3  4) (text "Dip field name"))
  (label (position  3  5) (text "Azimuth field name"))
  (label (position  3  6) (text "Quality field name"))
  (label (position  3  8) (text "Dip segment position"))
  (label (position  3  9) (text "Dip segment length"))
  (label (position  3 10) (text "Dip segment offset"))
  (label (position  3 12) (text "Tadpole location"))
  (label (position  3 13) (text "Tadpole tail length"))
  (label (position  3 14) (text "Elevation grid interval"))
  (label (position  3 15) (text "Dip grid interval"))
  (label (position  3 16) (text "Dip scale (deg/plot unit)")) 
  (label (position  3 17) (text "# of dip grid intervals")) 
  (field "diptable" (position  9  3) (display_length 18)
    (background) (input disallowed))
  (field "dipfield" (position 25  4) (display_length  18) (input allowed)
    (max_length 18) (null disallowed)
    (help "00607_TIP_1"))
  (field "azfield" (position 25  5) (display_length  18) (input allowed)
    (max_length 18) (null disallowed)
    (help "00607_TIP_2"))
  (field "qualfield" (position 25  6) (display_length  18) (input allowed)
    (max_length 18) (null disallowed)
    (help "00607_TIP_3"))
  (field "dippos" (position 25  8) (display_length  5) (input allowed)
    (value_in "left" "right")
     (max_length 5)
     (default "left")
     (translate lower) (null disallowed)
     (help "00607_TIP_4"))
  (field "dipsize" (position 25  9) (display_length  8) (input allowed)
     (low_bound 0) (high_bound 99999)
     (translate upper) (format real_8) (null disallowed) (max_length 8)
     (help "00607_TIP_5"))
  (field "offset" (position 25 10) (display_length  8) (input allowed)
     (low_bound 0) (high_bound 99999)
     (translate upper) (format real_8) (null disallowed) (max_length 8)
     (help "00607_TIP_6"))
  (field "tploc" (position 25 12) (display_length 22) (input allowed)
     (translate lower) (null allowed) (max_length 22)
     (file (extension "*.str"))
     (help "00607_TIP_7"))
  (field "tplength" (position 25 13) (display_length 8) (input allowed)
     (low_bound 0) (high_bound 999)
     (translate upper) (format real_8) (null allowed) (max_length 8)
     (help "00607_TIP_8"))
  (field "intyg" (position 25 14) (display_length 8) (input allowed)
     (low_bound 1) (high_bound 999)
     (translate upper) (format integer_4) (null allowed) (max_length 8)
     (help "00607_TIP_9"))
  (field "intxg" (position 25 15) (display_length 8) (input allowed)
     (low_bound 1) (high_bound 999)
     (translate upper) (format integer_4) (null allowed) (max_length 8)
     (help "00607_TIP_10"))
  (field "scalexg" (position 25 16) (display_length 8) (input allowed)
     (low_bound 0.001)
     (translate upper) (format real_8) (null disallowed) (max_length 16)
     (help "00607_TIP_11"))
  (field "ixaxis" (position 25 17) (display_length 8) (input allowed)
     (low_bound 1) (high_bound 999)
     (translate upper) (format integer_4) (null allowed) (max_length 8)
     (help "00607_TIP_12"))
  (default_buttons)
)
