load wx
load maracasvisu

new ILPDwithImage  ilpdwithimage

new  ImageBrowserReader  imagebrowserreade
  connect ilpdwithimage.Type			imagebrowserreade.Type
  connect ilpdwithimage.LstFileName	imagebrowserreade.LstFileName


new LayoutSplit splitUp
  set splitUp.Orientation V
  connect imagebrowserreade.Widget	splitUp.Widget1
  connect ilpdwithimage.Widget			splitUp.Widget2

new CommandButton commandbutton
  set commandbutton.Label  "Read"

new CommandButton viewimagebutton
  set viewimagebutton.Label  "View Image"

new LayoutLine layoutH
  set layoutH.Orientation H
  connect commandbutton.Widget		layoutH.Widget1
  connect viewimagebutton.Widget		layoutH.Widget2

new LayoutSplit mainsplit
  set mainsplit.Orientation V
  connect splitUp.Widget				mainsplit.Widget1
  connect layoutH.Widget				mainsplit.Widget2

new ImageChangeInformation  ici
new ViewerMPR viewernv
  connect imagebrowserreade.Out  ici.In
  connect ici.Out  viewernv.In

connect commandbutton.BoxChange ilpdwithimage.BoxExecute
connect commandbutton.BoxChange imagebrowserreade.BoxExecute
connect viewimagebutton.BoxChange viewernv.BoxExecute

exec mainsplit