bbtk/bbs/appli/ExampleSliceImage-3DVisu.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.4 BBS BlackBox Script
   3 # - /home/davila/Creatis/C11/creatools_source/creaMaracasVisu/bbtk/bbs/appli/ExampleSliceImage-3DVisu.bbs
   4 # ----------------------------------
   5
   6 # BBTK GEditor Script
   7 # ----------------------
   8
   9 include std
  10 include itkvtk
  11 include creaMaracasVisu
  12 include vtk
  13 include wx
  14 include creaVtk
  15 include std
  16
  17 author "Author ??"
  18 description "Description ??"
  19 category "<VOID>"
  20
  21 new creaMaracasVisu:SliceImage-3DVisu Box00
  22   set Box00.ColorBorder "0 0 0"
  23   set Box00.Direction "0"
  24   set Box00.SliceOpacity "50"
  25   set Box00.WindowColorLevel "2500 1000"
  26
  27 new vtk:LoadHola Box01
  28
  29 new creaMaracasVisu:ViewerNV Box02
  30
  31 new wx:Slider Box03
  32   set Box03.Label "true"
  33   set Box03.ReactiveOnTrack "true"
  34   set Box03.Title "Slice Y"
  35
  36 new creaVtk:OutputWindow Box05
  37
  38 new wx:LayoutSplit Box06
  39   set Box06.Orientation "H"
  40
  41 new wx:LayoutLine Box07
  42
  43 new vtk:UpdateRender Box08
  44   set Box08.Active "true"
  45
  46 new wx:Slider Box10
  47   set Box10.In "100"
  48   set Box10.Label "true"
  49   set Box10.Max "100"
  50   set Box10.ReactiveOnTrack "true"
  51   set Box10.Title "Opacity"
  52
  53 new std:Div Box11
  54   set Box11.In2 "100"
  55
  56 new std:MultipleInputs Box13
  57
  58 new creaMaracasVisu:SliceImage-3DVisu Box14
  59   set Box14.ColorBorder "0 0 0"
  60   set Box14.Direction "0"
  61   set Box14.SliceOpacity "50"
  62   set Box14.WindowColorLevel "2500 1000"
  63
  64 new wx:Slider Box15
  65   set Box15.Label "true"
  66   set Box15.ReactiveOnTrack "true"
  67   set Box15.Title "Slice Z"
  68
  69 new wx:Slider Box16
  70   set Box16.Label "true"
  71   set Box16.ReactiveOnTrack "true"
  72   set Box16.Title "Slice X"
  73
  74 new creaMaracasVisu:SliceImage-3DVisu Box17
  75   set Box17.ColorBorder "0 0 0"
  76   set Box17.Direction "0"
  77   set Box17.SliceOpacity "50"
  78   set Box17.WindowColorLevel "2500 1000"
  79
  80 new wx:RadioButton Box18
  81   set Box18.In0 "XY"
  82   set Box18.In1 "YZ"
  83   set Box18.In2 "XZ"
  84
  85
  86 connect Box01.Out Box02.In
  87
  88 connect Box02.Renderer1 Box00.Render
  89
  90 connect Box02.Widget Box06.Widget2
  91
  92 connect Box07.Widget Box06.Widget1
  93
  94 connect Box03.Out Box00.SliceDeep
  95
  96 connect Box02.Renderer1 Box08.Renderer
  97
  98 connect Box10.Out Box11.In1
  99
 100 connect Box11.Out Box00.SliceOpacity
 101
 102 connect Box01.Out Box00.Image
 103
 104 connect Box15.Out Box14.SliceDeep
 105
 106 connect Box11.Out Box14.SliceOpacity
 107
 108 connect Box10.Widget Box07.Widget8
 109
 110 connect Box03.Widget Box07.Widget4
 111
 112 connect Box01.Out Box14.Image
 113
 114 connect Box14.BoxChangeImageSlice Box13.In1
 115
 116 connect Box00.BoxChangeImageSlice Box13.In3
 117
 118 connect Box17.BoxChangeImageSlice Box13.In5
 119
 120 connect Box01.Out Box17.Image
 121
 122 connect Box16.Out Box17.SliceDeep
 123
 124 connect Box11.Out Box17.SliceOpacity
 125
 126 connect Box02.Renderer1 Box14.Render
 127
 128 connect Box02.Renderer1 Box17.Render
 129
 130 connect Box13.BoxChange Box08.BoxExecute
 131
 132 connect Box15.Widget Box07.Widget6
 133
 134 connect Box18.Out Box14.Direction
 135
 136 connect Box18.Out Box00.Direction
 137
 138 connect Box18.Out Box17.Direction
 139
 140 connect Box16.Widget Box07.Widget2
 141
 142 connect Box18.Widget Box07.Widget1
 143
 144
 145
 146 # Complex input ports
 147 exec Box05
 148 exec Box06