PackRecalage/bbs/appli/ExampleRecalage3D2Points.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.2 BBS BlackBox Script
   3 # - /Users/davila/Creatis/All5/creatools_source/creaRigidRegistration/PackRecalage/bbs/appli/ExampleRecalage3D2Points.bbs
   4 # ----------------------------------
   5
   6 # BBTK GEditor Script
   7 # ----------------------
   8
   9 include std
  10 include itkvtk
  11 include creaMaracasVisu
  12 include PackRecalage
  13 include wx
  14 include creaImageIO
  15 include vtk
  16
  17 author "info-dev@creatis.insa-lyon.fr"
  18 description "Recalage3D 2-point"
  19 category "example"
  20
  21 new ViewerNV viewer
  22   set viewer.nTypeView "5"
  23
  24 new ShowNPoints showNpoints
  25   set showNpoints.Radio "10"
  26
  27 new ViewerNV viewer2
  28   set viewer2.nTypeView "5"
  29
  30 new ShowNPoints showNpoints2
  31   set showNpoints2.Radio "10"
  32
  33 new Transform3D2PointsBox transform
  34
  35 new ReSlicerBox reslice1
  36   set reslice1.Origin "0,0,0"
  37
  38 new ViewerNV viewer3
  39   set viewer3.nTypeView "5 0"
  40
  41 new CommandButton butExec
  42   set butExec.Label "Execute"
  43
  44 new Slider angle
  45   set angle.In "0"
  46   set angle.Max "180"
  47   set angle.Min "-180"
  48
  49 new LayoutSplit tab1
  50   set tab1.Orientation "H"
  51
  52 new LayoutSplit hello
  53   set hello.Orientation "V"
  54
  55 new LayoutSplit hello2
  56
  57 new LayoutSplit tab2
  58   set tab2.Orientation "H"
  59
  60 new LayoutTab main
  61   set main.Orientation "H"
  62
  63 new ImagesChooserDialogBox Box18
  64
  65 new ImagesChooserDialogBox Box19
  66
  67 new vtkImageDataPointerRelay Box20
  68
  69 new vtkImageDataPointerRelay Box21
  70
  71
  72 connect viewer.Renderer1 showNpoints.Renderer
  73 connect viewer.Point showNpoints.In
  74 connect viewer.BoxChange showNpoints.BoxExecute
  75 connect viewer2.Renderer1 showNpoints2.Renderer
  76 connect viewer2.Point showNpoints2.In
  77 connect viewer2.BoxChange showNpoints2.BoxExecute
  78 connect showNpoints.lstPointsX transform.InX1
  79 connect showNpoints2.lstPointsX transform.InX2
  80 connect showNpoints.lstPointsY transform.InY1
  81 connect showNpoints2.lstPointsY transform.InY2
  82 connect showNpoints.lstPointsZ transform.InZ1
  83 connect showNpoints2.lstPointsZ transform.InZ2
  84 connect showNpoints.lstLabels transform.Labels1
  85 connect showNpoints2.lstLabels transform.Labels2
  86 connect transform.Out reslice1.Transform
  87 connect reslice1.Out viewer3.In
  88 connect angle.Out transform.SecondAngle
  89 connect showNpoints.Widget hello.Widget1
  90 connect butExec.Widget hello2.Widget1
  91 connect angle.Widget hello2.Widget2
  92 connect hello2.Widget hello.Widget2
  93 connect hello.Widget tab1.Widget1
  94 connect viewer.Widget tab1.Widget2
  95 connect showNpoints2.Widget tab2.Widget1
  96 connect viewer2.Widget tab2.Widget2
  97 connect butExec.BoxChange transform.BoxExecute
  98 connect butExec.BoxChange reslice1.BoxExecute
  99 connect butExec.BoxChange viewer3.BoxExecute
 100 connect tab1.Widget main.Widget1
 101 connect tab2.Widget main.Widget2
 102 connect Box18.Out Box20.In
 103 connect Box20.Out reslice1.In
 104 connect Box20.Out viewer2.In
 105 connect Box19.Out Box21.In
 106 connect Box21.Out showNpoints.Image
 107 connect Box21.Out viewer.In
 108
 109 exec main