bbtk/bbs/boxes/ViewerByPlane.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)
   3 # - /tmpEED/creaTools/creatools_source/creaMaracasVisu/bbtk/bbs/boxes/ViewerByPlane.bbs
   4 # ----------------------------------
   5
   6 include std
   7 include itkvtk
   8 include creaMaracasVisu
   9 include vtk
  10 include creaVtk
  11 include std
  12
  13 define ViewerByPlane creaMaracasVisu
  14
  15 author "Author ??"
  16 description "Description ??"
  17
  18 category "<VOID>"
  19
  20 new creaMaracasVisu:ViewerNV Box01
  21   set Box01.ColorLevel "900"
  22   set Box01.WindowLevel "2000"
  23   set Box01.nTypeView "6 1 2 0"
  24
  25 new vtk:CreateImage Box02
  26   set Box02.InitialValue "500"
  27
  28 new creaVtk:MHDFileInfo Box03
  29
  30 new std:ConcatStrings Box04
  31
  32 new creaVtk:ReadMHDPlane Box05
  33   set Box05.DirectionPlane "XY"
  34   set Box05.Type "1"
  35   set Box05.Width "10"
  36
  37 new std:GetVectorIntElement Box06
  38   set Box06.I "2"
  39
  40 new std:ConcatStrings Box07
  41   set Box07.In1 "0 0 "
  42
  43 new vtk:InversCrop Box08
  44   set Box08.Active "false"
  45   set Box08.Type "1"
  46
  47 new creaVtk:ReadMHDPlane Box12
  48   set Box12.DirectionPlane "ZX"
  49   set Box12.Type "1"
  50   set Box12.Width "10"
  51
  52 new std:GetVectorIntElement Box13
  53   set Box13.I "1"
  54
  55 new vtk:InversCrop Box14
  56   set Box14.Active "false"
  57   set Box14.Type "1"
  58
  59 new std:ConcatStrings Box15
  60   set Box15.In1 "0 "
  61   set Box15.In3 " 0"
  62
  63 new creaVtk:ReadMHDPlane Box18
  64   set Box18.DirectionPlane "YZ"
  65   set Box18.Type "1"
  66   set Box18.Width "10"
  67
  68 new std:GetVectorIntElement Box19
  69   set Box19.I "0"
  70
  71 new vtk:InversCrop Box20
  72   set Box20.Active "false"
  73   set Box20.Type "1"
  74
  75 new std:ConcatStrings Box21
  76   set Box21.In3 " 0 0"
  77
  78 new std:MagicBox Box22
  79
  80 new std:CreateArithmeticSuiteVector Box25
  81   set Box25.Delta "0"
  82   set Box25.FirstValue "1"
  83
  84 new std:GetVectorIntElement Box28
  85   set Box28.I "2"
  86
  87 new std:GetVectorIntPointer Box29
  88
  89 new std:SetElementVectorVectorInt Box30
  90   set Box30.Value "0"
  91
  92 new std:GetVectorIntElement Box31
  93   set Box31.I "2"
  94
  95 new std:SetElementVectorVectorInt Box32
  96   set Box32.I "-1"
  97   set Box32.Value "0"
  98
  99 new std:CreateArithmeticSuiteVector Box33
 100   set Box33.Delta "0"
 101   set Box33.FirstValue "1"
 102
 103 new std:GetVectorIntElement Box34
 104   set Box34.I "1"
 105
 106 new std:GetVectorIntPointer Box35
 107
 108 new std:SetElementVectorVectorInt Box36
 109   set Box36.Value "0"
 110
 111 new std:GetVectorIntElement Box37
 112   set Box37.I "2"
 113
 114 new std:SetElementVectorVectorInt Box38
 115   set Box38.I "-1"
 116   set Box38.Value "0"
 117
 118 new std:CreateArithmeticSuiteVector Box39
 119   set Box39.Delta "0"
 120   set Box39.FirstValue "1"
 121
 122 new std:GetVectorIntElement Box40
 123   set Box40.I "0"
 124
 125 new std:GetVectorIntPointer Box41
 126
 127 new std:SetElementVectorVectorInt Box42
 128   set Box42.Value "0"
 129
 130 new std:GetVectorIntElement Box43
 131   set Box43.I "2"
 132
 133 new std:SetElementVectorVectorInt Box44
 134   set Box44.I "-1"
 135   set Box44.Value "0"
 136
 137 new std:Div Box49
 138   set Box49.In2 "10"
 139
 140 new std:Div Box50
 141   set Box50.In2 "10"
 142
 143 new std:ConcatStrings Box51
 144   set Box51.In1 "10"
 145
 146 new std:Div Box53
 147   set Box53.In2 "10"
 148
 149 new std:Div Box54
 150   set Box54.In2 "10"
 151
 152 new std:Div Box55
 153   set Box55.In2 "10"
 154
 155 new std:Div Box56
 156   set Box56.In2 "10"
 157
 158 new std:ConcatStrings Box57
 159   set Box57.In1 "10"
 160
 161 new std:GetVectorIntElement Box63
 162   set Box63.I "0"
 163
 164 new std:MathOperation Box64
 165   set Box64.Type "2"
 166
 167 new std:ConcatStrings Box65
 168
 169 new std:GetVectorIntElement Box66
 170   set Box66.I "0"
 171
 172 new std:MathOperation Box67
 173   set Box67.Type "2"
 174
 175 new std:ConcatStrings Box68
 176
 177 new std:GetVectorIntElement Box69
 178   set Box69.I "0"
 179
 180 new std:MathOperation Box70
 181   set Box70.Type "2"
 182
 183 new std:ConcatStrings Box71
 184
 185
 186 connect Box02.Out Box01.In
 187 connect Box03.DimSize Box02.Dimensions
 188 connect Box03.ElementSpacing Box02.Spacing
 189 connect Box03.ElementType Box02.OutputFormat
 190 connect Box04.Out Box03.FileName
 191 connect Box04.Out Box05.FileName
 192 connect Box01.Point Box06.In
 193 connect Box07.Out Box08.Origin
 194 connect Box02.Out Box08.ImageFix
 195 connect Box05.Out Box08.ImageMove
 196 connect Box01.BoxChange Box08.BoxExecute
 197 connect Box04.Out Box12.FileName
 198 connect Box01.Point Box13.In
 199 connect Box01.BoxChange Box14.BoxExecute
 200 connect Box02.Out Box14.ImageFix
 201 connect Box15.Out Box14.Origin
 202 connect Box12.Out2 Box14.ImageMove
 203 connect Box21.Out Box20.Origin
 204 connect Box04.Out Box18.FileName
 205 connect Box01.Point Box19.In
 206 connect Box01.BoxChange Box20.BoxExecute
 207 connect Box02.Out Box20.ImageFix
 208 connect Box18.Out2 Box20.ImageMove
 209 connect Box22.Out Box05.Type
 210 connect Box22.Out Box12.Type
 211 connect Box22.Out Box18.Type
 212 connect Box03.DimSize Box28.In
 213 connect Box29.PVec Box30.PVec
 214 connect Box25.ArithmeticSuiteVector Box29.In
 215 connect Box29.PVec Box32.PVec
 216 connect Box32.Vec Box31.In
 217 connect Box08.BoxChange Box30.BoxExecute
 218 connect Box35.PVec Box36.PVec
 219 connect Box33.ArithmeticSuiteVector Box35.In
 220 connect Box35.PVec Box38.PVec
 221 connect Box38.Vec Box37.In
 222 connect Box03.DimSize Box34.In
 223 connect Box14.BoxChange Box36.BoxExecute
 224 connect Box41.PVec Box42.PVec
 225 connect Box39.ArithmeticSuiteVector Box41.In
 226 connect Box41.PVec Box44.PVec
 227 connect Box44.Vec Box43.In
 228 connect Box03.DimSize Box40.In
 229 connect Box20.BoxChange Box42.BoxExecute
 230 connect Box43.Out Box18.Active
 231 connect Box37.Out Box12.Active
 232 connect Box31.Out Box05.Active
 233 connect Box19.BoxChange Box43.BoxExecute
 234 connect Box13.BoxChange Box37.BoxExecute
 235 connect Box06.BoxChange Box31.BoxExecute
 236 connect Box06.BoxChange Box32.BoxExecute
 237 connect Box13.BoxChange Box38.BoxExecute
 238 connect Box19.BoxChange Box44.BoxExecute
 239 connect Box28.Out Box49.In1
 240 connect Box49.Out Box25.Size
 241 connect Box06.Out Box50.In1
 242 connect Box50.Out Box31.I
 243 connect Box51.Out Box49.In2
 244 connect Box51.Out Box50.In2
 245 connect Box51.Out Box05.Width
 246 connect Box50.Out Box30.I
 247 connect Box51.Out Box12.Width
 248 connect Box34.Out Box53.In1
 249 connect Box53.Out Box33.Size
 250 connect Box51.Out Box53.In2
 251 connect Box51.Out Box54.In2
 252 connect Box13.Out Box54.In1
 253 connect Box54.Out Box37.I
 254 connect Box54.Out Box36.I
 255 connect Box40.Out Box56.In1
 256 connect Box56.Out Box39.Size
 257 connect Box55.Out Box43.I
 258 connect Box19.Out Box55.In1
 259 connect Box55.Out Box42.I
 260 connect Box43.Out Box20.Active
 261 connect Box31.Out Box08.Active
 262 connect Box37.Out Box14.Active
 263 connect Box57.Out Box56.In2
 264 connect Box57.Out Box55.In2
 265 connect Box57.Out Box18.Width
 266 connect Box63.Out Box64.In1
 267 connect Box51.Out Box64.In2
 268 connect Box64.Out Box07.In2
 269 connect Box50.Out Box65.In1
 270 connect Box65.Out Box63.In
 271 connect Box64.Out Box05.Slice
 272 connect Box66.Out Box67.In1
 273 connect Box68.Out Box66.In
 274 connect Box54.Out Box68.In1
 275 connect Box51.Out Box67.In2
 276 connect Box67.Out Box15.In2
 277 connect Box67.Out Box12.Slice
 278 connect Box69.Out Box70.In1
 279 connect Box71.Out Box69.In
 280 connect Box70.Out Box21.In1
 281 connect Box70.Out Box18.Slice
 282 connect Box57.Out Box70.In2
 283 connect Box55.Out Box71.In1
 284
 285 # Complex input ports
 286 input FileNale Box04.In1 " "
 287 input typeMHDorSeek Box22.In " "
 288
 289 # Complex output ports
 290 output widget Box01.Widget " "
 291 output wxvtkbaseview1 Box01.wxVtkBaseView1 " "
 292 output render1 Box01.Renderer1 " "
 293 output render2 Box01.Renderer2 " "
 294 output render3 Box01.Renderer3 " "
 295 output render4 Box01.Renderer4 " "
 296 output Image Box02.Out " "
 297 output point Box01.Point " "
 298 output boxchange Box01.BoxChange " "
 299 output wxvtkbaseview2 Box01.wxVtkBaseView2 " "
 300 output wxvtkbaseview3 Box01.wxVtkBaseView3 " "
 301 output wxvtkbaseview4 Box01.wxVtkBaseView4 " "
 302
 303
 304 endefine