bbtk/bbs/boxes/FreePlane.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.5 BBS BlackBox Script (Complex Box)
   3 # - /Users/davila/Creatis/C23/creatools_source/creaMaracasVisu/bbtk/bbs/boxes/FreePlane.bbs
   4 # ----------------------------------
   5
   6 include std
   7 include itkvtk
   8 include vtk
   9 include wx
  10 include creaMaracasVisu
  11 include creaVtk
  12 include std
  13
  14 define FreePlane creaMaracasVisu
  15
  16 author "Author ??"
  17 description "Description ??"
  18
  19 category "<VOID>"
  20
  21 new vtk:ImageVtkProperties Box00
  22
  23 new wx:LayoutLine Box01
  24   set Box01.Orientation "V"
  25   set Box01.WinTitle "Free plane"
  26
  27 new creaMaracasVisu:SliceImage Box02
  28   set Box02.InterpolationMode "1"
  29   set Box02.Slice "0"
  30   set Box02.TypeOrientation "3"
  31   set Box02.Z "0"
  32
  33 new creaVtk:TransformVector Box03
  34   set Box03.InX "1  0  0"
  35   set Box03.InY "0 1   0"
  36   set Box03.InZ "0 0 1"
  37
  38 new creaMaracasVisu:ImageActor Box04
  39   set Box04.InterpolationMode "1"
  40   set Box04.Opacity "1"
  41
  42 new vtk:Transform Box06
  43
  44 new creaVtk:ConcatTransform Box07
  45
  46 new std:ConcatStrings Box08
  47
  48 new std:ConcatStrings Box09
  49   set Box09.In2 "  "
  50   set Box09.In4 "  "
  51
  52 new creaVtk:ScalarsToColors Box10
  53   set Box10.BelowAboveRangeTransparence "false"
  54   set Box10.Type "101"
  55
  56 new vtk:vtkImageDataPointerRelay Box11
  57
  58 new std:MagicBox Box12
  59
  60 new creaMaracasVisu:wxVtkBaseView_Info Box13
  61   set Box13.InteractionType "12"
  62
  63 new wx:CheckBox Box14
  64   set Box14.Title "Pivot plane"
  65
  66 new creaMaracasVisu:DrawAxisTree3D Box15
  67   set Box15.Colour "1 0 0    1 1 0    0 0 1"
  68   set Box15.ColourLaw "2"
  69   set Box15.LineWidth "2"
  70   set Box15.lstIndexs "2 2 2"
  71   set Box15.lstPointX "0 20       0 0           0 0"
  72   set Box15.lstPointY "0 0         0  80       0 0"
  73   set Box15.lstPointZ "0 0         0  0         0 20"
  74
  75 new creaMaracasVisu:TransformWidget2 Box16
  76   set Box16.Type "1"
  77
  78 new std:MathOperationVector Box17
  79   set Box17.Type "2"
  80
  81 new vtk:UpdateRender Box19
  82   set Box19.Active "true"
  83
  84 new std:MultipleInputs Box20
  85
  86
  87 connect Box02.Out Box04.In
  88 connect Box08.Out Box02.AxisOrigin
  89 connect Box06.Out Box07.In3
  90 connect Box07.Out Box04.Transform
  91 connect Box03.OutX Box09.In1
  92 connect Box03.OutY Box09.In3
  93 connect Box03.OutZ Box09.In5
  94 connect Box09.Out Box02.ResliceAxesDirectionCosines
  95 connect Box10.LookupTable Box04.LookupTable
  96 connect Box11.Out Box02.In
  97 connect Box11.Out Box00.In
  98 connect Box12.Out Box04.Renderer
  99 connect Box13.WindowColorLevel Box10.WindowColorLevel
 100 connect Box13.BoxChange Box10.BoxExecute
 101 connect Box07.Out Box15.Transform
 102 connect Box12.Out Box15.Renderer
 103 connect Box16.Out Box03.Transform
 104 connect Box16.Out Box07.In1
 105 connect Box16.Widget Box01.Widget2
 106 connect Box08.Out Box17.In0
 107 connect Box00.Spacing Box17.In1
 108 connect Box17.Out Box06.Translate
 109 connect Box16.ActualPoint Box08.In1
 110 connect Box14.Out Box15.Active
 111 connect Box16.BoxChange Box15.BoxExecute
 112 connect Box13.Image Box11.In
 113 connect Box14.Out Box04.Active
 114 connect Box12.Out Box19.Renderer
 115 connect Box14.Widget Box01.Widget1
 116 connect Box04.BoxChange Box20.In1
 117 connect Box15.BoxChange Box20.In2
 118 connect Box20.BoxChange Box19.BoxExecute
 119 connect Box14.BoxChange Box20.In4
 120 connect Box14.Out Box19.Active
 121
 122 # Complex input ports
 123 input possiblePoint Box16.PossiblePoint " "
 124 input wxvtkbaseview1 Box13.wxVtkBaseView " "
 125 input wxvtkbaseview2 Box13.wxVtkBaseView2 " "
 126 input render Box12.In " "
 127 input wxvtkbaseview3 Box13.wxVtkBaseView3 " "
 128
 129 # Complex output ports
 130 output widgetOut Box01.Widget " "
 131
 132
 133 endefine