bbtk/bbs/boxes/Mesh_tool_ApplyRegionGrowing.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.6 BBS BlackBox Script (Complex Box)
   3 # - /Users/davila/Creatis/C23/creatools_source/creaMaracasVisu/bbtk/bbs/boxes/Mesh_tool_ApplyRegionGrowing.bbs
   4 # ----------------------------------
   5
   6 include std
   7 include itkvtk
   8 include creaMaracasVisu
   9 include wx
  10 include std
  11 include vtk
  12 include creaVtk
  13 include toolsbbtk
  14
  15 define Mesh_tool_ApplyRegionGrowing creaMaracasVisu
  16
  17 author "info-dev@creatis.insa-lyon.fr"
  18 description "Show N Points"
  19
  20 category "demo"
  21
  22 new creaMaracasVisu:ShowNPoints showNpoints
  23   set showNpoints.Radio "6"
  24   set showNpoints.Type "3"
  25   set showNpoints.WinTitle "1.1 Points"
  26
  27 new wx:LayoutLine Box08
  28
  29 new creaMaracasVisu:wxPopupMenu Box57
  30   set Box57.WithCtrlKey "true"
  31
  32 new std:AddStringToVector Box58
  33   set Box58.In0 "+  Add point"
  34   set Box58.In1 "(+)  Insert point"
  35   set Box58.In2 "Track point"
  36   set Box58.In3 "Set Nearest point"
  37   set Box58.In4 "-  Erase point"
  38   set Box58.In5 "--  Delete all points"
  39   set Box58.In6 "----------------------"
  40   set Box58.In7 "+>  Insert group after"
  41   set Box58.In8 "- Delete group"
  42   set Box58.In9 "Tool - Inverse Normals"
  43
  44 new creaMaracasVisu:ShowNPoints_Tools Box60
  45
  46 new vtk:ImageVtkProperties Box68
  47
  48 new wx:ComboBox Box78
  49   set Box78.In "Union Intersection Difference Replace"
  50
  51 new wx:LayoutLine Box79
  52   set Box79.Orientation "H"
  53   set Box79.WinTitle "New Surface ( Magenta  =  Red+Yellow )"
  54
  55 new wx:CommandButton Box80
  56   set Box80.Label "Run"
  57
  58 new std:MagicBox Box66
  59
  60 new std:MagicBox Box67
  61
  62 new creaMaracasVisu:PolyDataToActor_Widget Box48
  63   set Box48.meshOpacity "50"
  64
  65 new vtk:vtkImageDataPointerRelay Box35
  66
  67 new creaMaracasVisu:PolyDataToActor_Widget Box37
  68   set Box37.color "0 1 1"
  69   set Box37.meshOpacity "100"
  70
  71 new wx:LayoutLine Box38
  72   set Box38.Orientation "H"
  73   set Box38.WinTitle "Threshold Surface (Yellow)"
  74
  75 new wx:LayoutTab Box39
  76
  77 new wx:LayoutTab Box40
  78
  79 new wx:CommandButton Box42
  80   set Box42.Label "Apply  (Magenta->To Red)"
  81
  82 new wx:CommandButton Box43
  83   set Box43.Label "Reset Tool"
  84
  85 new wx:LayoutLine Box44
  86   set Box44.Orientation "V"
  87   set Box44.WinTitle "1.3   Mesh Action"
  88
  89 new creaVtk:MeshManager_tool Box45
  90   set Box45.Tool "30"
  91
  92 new std:MagicBox Box46
  93
  94 new std:MultipleInputs Box51
  95
  96 new creaMaracasVisu:ShowNPoints_Tools Box52
  97   set Box52.Type "120"
  98
  99 new std:MultipleInputs Box53
 100
 101 new std:MultipleInputs Box55
 102
 103 new creaMaracasVisu:MeshContours_Widget Box62
 104   set Box62.colorMesh "1 1 0"
 105
 106 new std:MagicBox Box64
 107
 108 new std:MagicBox Box65
 109
 110 new std:MagicBox Box69
 111
 112 new std:MagicBox Box71
 113
 114 new creaMaracasVisu:MeshContours_Widget Box72
 115   set Box72.colorMesh "0 1 1"
 116
 117 new wx:LayoutLine Box81
 118   set Box81.WinTitle "Step 1.   Surface"
 119
 120 new wx:LayoutTab Box82
 121
 122 new wx:OutputText Box84
 123
 124 new wx:LayoutTab Box86
 125
 126 new creaVtk:MeshManager Box92
 127
 128 new creaVtk:MeshManager_tool Box93
 129   set Box93.Tool "35"
 130
 131 new creaMaracasVisu:wxVtkBaseView_Info Box96
 132
 133 new wx:LayoutLine Box98
 134   set Box98.Orientation "H"
 135
 136 new std:AddStringToVector Box99
 137   set Box99.In0 "Auto Add Points (Start/Stop)"
 138
 139 new std:VectorFilterString Box100
 140   set Box100.In0 "0  1  2   3   4   5   6   7   8      9       10 "
 141   set Box100.In1 "1  5 10 20 30 40 50 0  100   110   210"
 142   set Box100.Type "2"
 143
 144 new std:ConcatStrings Box101
 145
 146 new creaVtk:ImageThresholdConnectivity Box102
 147   set Box102.Border "50"
 148
 149 new wx:LayoutLine Box105
 150   set Box105.WinTitle "1.2 Surface"
 151
 152 new creaMaracasVisu:SliderMinMax Box106
 153   set Box106.InMax "2000"
 154   set Box106.InMaxShow "-500"
 155   set Box106.InMin "-1100"
 156   set Box106.InMinShow "-1100"
 157   set Box106.ShowActual "false"
 158
 159 new wx:Slider Box107
 160   set Box107.In "15"
 161   set Box107.Label "true"
 162   set Box107.Max "40"
 163   set Box107.Min "0"
 164   set Box107.ReactiveOnTrack "true"
 165   set Box107.Title "Border size"
 166
 167 new wx:CommandButton Box108
 168   set Box108.Label "Refresh"
 169
 170 new std:ConcatStrings Box110
 171   set Box110.In2 "   "
 172
 173 new std:MultipleInputs Box111
 174
 175 new std:MultipleInputs Box112
 176
 177 new creaVtk:MarchingCubes2 Box113
 178   set Box113.BoxProcessMode "Manual"
 179   set Box113.Value "128"
 180
 181 new creaVtk:ImageGaussianSmooth2 Box114
 182   set Box114.StdDevX "1"
 183   set Box114.StdDevY "1"
 184   set Box114.StdDevZ "1"
 185
 186 new std:MultipleInputs Box118
 187
 188 new std:MagicBox Box120
 189
 190 new creaMaracasVisu:ColorLayerImageView Box122
 191   set Box122.ColorBarPosition "-1000 -1000"
 192   set Box122.TypeControlsInterface "2"
 193   set Box122.lstTransparenceBoundaries "0"
 194
 195 new wx:LayoutLine Box124
 196   set Box124.Orientation "V"
 197   set Box124.WinTitle "1.4   Apply Changes"
 198
 199 new wx:LayoutTab Box125
 200
 201 new creaVtk:PolyDataToImageData Box127
 202   set Box127.BoxProcessMode "Manual"
 203
 204 new vtk:CreateImage Box128
 205
 206 new vtk:BinaryOperations Box129
 207
 208 new creaVtk:ImageThreshold Box130
 209   set Box130.InValue "255"
 210   set Box130.OutValue "0"
 211   set Box130.Upper "10000"
 212
 213 new creaVtk:MarchingCubes2 Box131
 214   set Box131.Value "128"
 215
 216 new creaVtk:ImageGaussianSmooth2 Box132
 217   set Box132.StdDevX "1"
 218   set Box132.StdDevY "1"
 219   set Box132.StdDevZ "1"
 220
 221 new creaVtk:PolyDataNormals Box133
 222   set Box133.BoxProcessMode "Manual"
 223
 224 new std:StringSelect Box134
 225   set Box134.In0 "0  128"
 226   set Box134.In1 "0  500"
 227   set Box134.In2 "1  128"
 228   set Box134.In3 "7  128"
 229
 230 new std:GetVectorStringElement Box135
 231   set Box135.I "0"
 232
 233 new std:GetVectorStringElement Box136
 234   set Box136.I "1"
 235
 236 new vtk:AddImageToVector Box137
 237
 238 new vtk:GetVectorVtkImageDataElement Box138
 239   set Box138.I "0"
 240
 241 new vtk:CreateImage Box139
 242
 243 new toolsbbtk:ImageVtkPropertiesWidget Box140
 244
 245 new wx:LayoutLine Box141
 246   set Box141.Orientation "V"
 247   set Box141.WinTitle "Visu"
 248
 249 new wx:LayoutTab Box142
 250
 251 new wx:LayoutLine Box143
 252   set Box143.Orientation "V"
 253   set Box143.WinTitle "Visu"
 254
 255 new wx:LayoutLine Box144
 256   set Box144.Orientation "V"
 257   set Box144.WinTitle "conf"
 258
 259 new wx:LayoutTab Box145
 260
 261 new wx:LayoutLine Box146
 262   set Box146.Orientation "V"
 263   set Box146.WinTitle "conf"
 264
 265 new wx:LayoutTab Box147
 266
 267 new wx:OutputText Box148
 268
 269 new wx:OutputText Box149
 270
 271 new wx:OutputText Box150
 272
 273 new wx:OutputText Box151
 274
 275 new std:ConcatStrings Box152
 276
 277 new std:ConcatStrings Box153
 278
 279 new std:ConcatStrings_tool Box154
 280
 281 new std:StringSelect Box155
 282   set Box155.In0 "0"
 283   set Box155.In1 "2"
 284
 285 new std:MagicBox Box156
 286
 287 new creaMaracasVisu:InteractorStyleMaracas_Model Box157
 288
 289 new std:MagicBox Box158
 290
 291 new std:MagicBox Box159
 292
 293 new std:MagicBox Box160
 294
 295 new std:MagicBox Box161
 296
 297
 298 connect Box58.Out Box57.In
 299 connect showNpoints.WidgetShowNPoints Box60.WidgetShowNPoints
 300 connect Box57.BoxChange Box60.BoxExecute
 301 connect Box68.Spacing Box60.Spacing
 302 connect Box66.Out showNpoints.Renderer
 303 connect Box66.Out Box48.render
 304 connect Box35.Out Box68.In
 305 connect Box35.Out showNpoints.Image
 306 connect Box66.Out Box37.render
 307 connect Box38.Widget Box39.Widget2
 308 connect Box79.Widget Box40.Widget2
 309 connect Box46.Out Box45.MeshManagerModel
 310 connect Box42.BoxChange Box51.BoxExecute
 311 connect Box45.BoxChange Box51.In2
 312 connect Box52.BoxChange Box51.In4
 313 connect showNpoints.WidgetShowNPoints Box52.WidgetShowNPoints
 314 connect Box42.BoxChange Box53.In3
 315 connect Box52.BoxChange Box55.In2
 316 connect Box64.Out Box57.wxVtkBaseView2
 317 connect Box64.Out Box62._wxvtkbaseview2D1
 318 connect Box65.Out Box57.wxVtkBaseView3
 319 connect Box65.Out Box62._wxvtkbaseview2D2
 320 connect Box69.Out Box57.wxVtkBaseView4
 321 connect Box69.Out Box62._wxvtkbaseview2D3
 322 connect Box71.Out Box57.wxVtkBaseView
 323 connect Box71.Out Box62._wxvtkbaseview3D1
 324 connect Box71.Out Box72._wxvtkbaseview3D1
 325 connect Box64.Out Box72._wxvtkbaseview2D1
 326 connect Box65.Out Box72._wxvtkbaseview2D2
 327 connect Box69.Out Box72._wxvtkbaseview2D3
 328 connect Box39.Widget Box81.Widget2
 329 connect Box40.Widget Box81.Widget4
 330 connect Box44.Widget Box82.Widget2
 331 connect Box82.Widget Box79.Widget2
 332 connect Box84.Widget Box44.Widget9
 333 connect showNpoints.Widget Box86.Widget2
 334 connect Box57.BoxChange Box08.BoxExecute
 335 connect Box92.MeshManagerModel Box93.MeshManagerModel
 336 connect Box92.MeshBase Box72._polydata
 337 connect Box92.MeshBase Box37.polydata
 338 connect Box81.Widget Box08.Widget2
 339 connect Box71.Out Box96.wxVtkBaseView
 340 connect Box96.vtkRenderer Box66.In
 341 connect Box43.Widget Box44.Widget1
 342 connect Box78.Widget Box98.Widget2
 343 connect Box80.Widget Box98.Widget4
 344 connect Box98.Widget Box44.Widget3
 345 connect Box99.Out Box58.StringVector
 346 connect Box100.Out1 Box101.In1
 347 connect Box101.Out Box60.Type
 348 connect Box57.Out Box100.sk1
 349 connect showNpoints.lstPointsX Box102.LstX
 350 connect showNpoints.lstPointsY Box102.LstY
 351 connect showNpoints.lstPointsZ Box102.LstZ
 352 connect Box35.Out Box102.In
 353 connect Box106.Widget Box105.Widget2
 354 connect Box107.Out Box102.Border
 355 connect Box106.OutStart Box110.In1
 356 connect Box106.OutEnd Box110.In3
 357 connect Box110.Out Box102.Threshold
 358 connect Box111.BoxChange Box62._execute
 359 connect Box112.BoxChange Box72._execute
 360 connect Box113.Out Box48.polydata
 361 connect Box113.Out Box62._polydata
 362 connect Box114.Out Box113.In
 363 connect Box118.BoxChange Box113.BoxExecute
 364 connect Box108.BoxChange Box118.In3
 365 connect Box80.BoxChange Box53.In2
 366 connect Box43.BoxChange Box118.In2
 367 connect Box43.BoxChange Box120.BoxExecute
 368 connect Box120.BoxChange Box53.In4
 369 connect Box43.BoxChange Box55.BoxExecute
 370 connect Box42.BoxChange Box118.In4
 371 connect Box64.Out Box122.WxVtkBaseView
 372 connect Box65.Out Box122.WxVtkBaseView1
 373 connect Box69.Out Box122.WxVtkBaseView2
 374 connect Box108.Widget Box105.Widget8
 375 connect Box107.Widget Box105.Widget6
 376 connect Box106.BoxChange Box122.BoxExecute
 377 connect Box122.Widget Box105.Widget7
 378 connect Box102.Out Box122.In
 379 connect Box42.Widget Box124.Widget1
 380 connect Box105.Widget Box125.Widget2
 381 connect Box67.Out Box127.InPolyData
 382 connect Box68.Spacing Box128.Spacing
 383 connect Box68.TypeName Box128.OutputFormat
 384 connect Box68.Size Box128.Dimensions
 385 connect Box128.Out Box127.InImage
 386 connect Box127.Out Box129.In1
 387 connect Box102.Out Box129.In2
 388 connect Box129.Out Box130.In
 389 connect Box132.Out Box131.In
 390 connect Box130.Out Box132.In
 391 connect Box131.Out Box133.In
 392 connect Box53.BoxChange Box133.BoxExecute
 393 connect Box133.Out Box93.Mesh
 394 connect Box133.Out Box45.Mesh
 395 connect Box133.BoxChange Box93.BoxExecute
 396 connect Box78.Out Box134.In
 397 connect Box134.Out Box135.In
 398 connect Box135.Out Box129.Operation
 399 connect Box134.Out Box136.In
 400 connect Box136.Out Box130.Lower
 401 connect Box102.Out Box137.In0
 402 connect Box137.Out Box138.In
 403 connect Box68.TypeName Box139.OutputFormat
 404 connect Box68.Spacing Box139.Spacing
 405 connect Box68.Size Box139.Dimensions
 406 connect Box139.Out Box138.ErrorValue
 407 connect Box138.Out Box114.In
 408 connect Box53.BoxChange Box127.BoxExecute
 409 connect Box35.Out Box140.in
 410 connect Box140.widget Box125.Widget3
 411 connect Box124.Widget Box142.Widget2
 412 connect Box142.Widget Box79.Widget4
 413 connect Box86.Widget Box38.Widget2
 414 connect Box125.Widget Box38.Widget4
 415 connect Box72._widgetA Box141.Widget2
 416 connect Box37.widgetA Box141.Widget4
 417 connect Box72._widgetB Box144.Widget2
 418 connect Box37.widgetB Box144.Widget4
 419 connect Box141.Widget Box145.Widget2
 420 connect Box144.Widget Box145.Widget4
 421 connect Box145.Widget Box79.Widget6
 422 connect Box62._widgetA Box143.Widget2
 423 connect Box48.widgetA Box143.Widget4
 424 connect Box62._widgetB Box146.Widget2
 425 connect Box48.widgetB Box146.Widget4
 426 connect Box143.Widget Box147.Widget2
 427 connect Box146.Widget Box147.Widget4
 428 connect Box147.Widget Box38.Widget6
 429 connect Box148.Widget Box143.Widget9
 430 connect Box149.Widget Box146.Widget9
 431 connect Box151.Widget Box144.Widget9
 432 connect Box150.Widget Box141.Widget9
 433 connect Box152.Out showNpoints.In
 434 connect Box156.Out Box154.In1
 435 connect Box155.Out Box154.Type
 436 connect Box153.Out Box155.In
 437 connect Box152.Box_ConcatStrings Box154.Box_ConcatString
 438 connect Box57.InteractorStyleMaracas Box157.InteractorStyleMaracas
 439 connect Box57.InteractorStyleMaracas2 Box157.InteractorStyleMaracas2
 440 connect Box57.InteractorStyleMaracas3 Box157.InteractorStyleMaracas3
 441 connect Box57.InteractorStyleMaracas4 Box157.InteractorStyleMaracas4
 442 connect Box153.Out Box157.Active
 443 connect Box153.BoxChange Box157.BoxExecute
 444 connect Box158.BoxChange Box154.BoxExecute
 445 connect Box158.BoxChange Box111.In1
 446 connect Box118.BoxChange Box48.boxexecute
 447 connect Box118.BoxChange Box111.In2
 448 connect Box133.BoxChange Box112.In3
 449 connect Box111.BoxChange Box112.In2
 450 connect Box159.BoxChange Box72.Freeplane_boxexecute
 451 connect Box159.BoxChange Box62.Freeplane_boxexecute
 452 connect Box160.Out Box72.Freeplane_point
 453 connect Box161.Out Box72.Freeplane_transform
 454 connect Box160.Out Box62.Freeplane_point
 455 connect Box161.Out Box62.Freeplane_transform
 456 connect Box153.Out Box62.active_widget
 457 connect Box153.Out Box72.active_widget
 458
 459 # Complex input ports
 460 input mesh Box67.In " "
 461 input image Box35.In " "
 462 input title Box08.WinTitle " "
 463 input meshmanagermodel Box46.In " "
 464 input wxvtkbaseview2 Box64.In " "
 465 input wxvtkbaseview3 Box65.In " "
 466 input wxvtkbaseview4 Box69.In " "
 467 input wxvtkbaseview1 Box71.In " "
 468 input point Box156.In " "
 469 input boxChange Box158.In " "
 470 input freeplane_boxexecute Box159.In " "
 471 input freeplane_point Box160.In " "
 472 input freeplane_transform Box161.In " "
 473
 474 # Complex output ports
 475 output widget Box08.Widget " "
 476 output Active_ConcatString_box Box153.Box_ConcatStrings " "
 477
 478 exec Box55
 479
 480 endefine