(form "00806" (size 70  18)
  (heading "DRAPE IMAGE OVER A DTM or TRISOLATION")

  (label (position 2 3) (text "Registration file"))
  (field "registration_file_name" (position 20 3)
    (display_length 16) (input allowed) (max_length 256)
    (translate lower) (file output (extension "*.rgf"))
    (null allowed)
  )

  (label (position 2 4) (text "Add image file"))
  (field "image_file" (position 20 4)
    (display_length 16) (input allowed) (max_length 256)
  )

  (label (position 2 6) (text "Image draping method"))
  (field "drape_method" (position 20 6)
    (display_length 16) (input allowed) (max_length 32)
    (value_in "register with new points" "edit registration points" "tiling" "mirror tiling"
    )
    (translate lower)
    (null disallowed)
  )

  (label (position 2 7) (text "Define registration points by"))
  (field "registration_method" (position 20 7)
    (display_length 16) (input allowed) (max_length 256)
    (translate lower)
    (default "graphics")
    (value_in "graphics" "keyboard"
    )
    (null disallowed)
  )

  (label (position 2 7) (text "Transmission colour"))
  (field "transmission_colour" (position 20 7)
    (display_length 16) (input allowed) (max_length 256)
    (translate lower) (format colour)
    (null allowed)
    )


  (label (position 2 7) (text "Ambient colour"))
  (field "ambient_colour" (position 20 7)
    (display_length 16) (input allowed) (max_length 256)
    (translate lower) (format colour) 
    (null allowed)
    )


  (label (position 2 7) (text "Image colour filter"))
  (field "filter_colour" (position 20 7) 
    (display_length 16) (input allowed) (max_length 256)
    (translate lower) (format colour) 
    (null allowed)
  )


  (label (position 45 3) (text "Define the tiling pattern size"))
  (label (position 45 4) (text "X size"))
  (field "x_size" (position 55 4)
    (display_length 10) (input allowed) (max_length 10)
    (format real_8) (default "5") (low_bound 0.1)
  )


  (label (position 45 5) (text "Y size"))
  (field "y_size" (position 55 5)
    (display_length 10) (input allowed) (max_length 10)
    (format real_8) (default "5") (low_bound 0.1)
  )


  (label (position 2 9) 
    (text "Image and Real World coordinates for registration points"))

  (scroll_block "registration_points" (position 2 11) (size 62 5)
    (extra 0 1) (scroll_size 62 100) 
    (repeat interactive (grow 0 1) (instances 0 (min 0) (max 100)))
    (top
      (label (position 1 0) (text "X Image"))
      (label (position 13 0) (text "Y Image"))
      (label (position 25 0) (text "X Data"))
      (label (position 37 0) (text "Y Data"))
      (label (position 50 0) (text "Z Data"))
    )

    (main
      (field "ximage" (position 1 0)
        (display_length 10) (input allowed) (max_length 10)
        (format real_8) (decimals 0) (null disallowed)
        )
      (field "yimage" (position 13 0)
        (display_length 10) (input allowed) (max_length 10)
        (format real_8) (decimals 0) (null disallowed)
        )
      (field "xdata" (position 25 0)
        (display_length 10) (input allowed) (max_length 16)
        (format real_8) (decimals 3) (null disallowed)
        )
      (field "ydata" (position 37 0)
        (display_length 10) (input allowed) (max_length 16)
        (format real_8) (decimals 3) (null disallowed)
        )
      (field "zdata" (position 50 0)
        (display_length 10) (input allowed) (max_length 16)
        (format real_8) (decimals 3) (null disallowed)
        )

    )
  )

  (default_buttons)
)