bbtk_creaVtk_PKG/bbs/appli/exampleStripper.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.4 BBS BlackBox Script
   3 # - /home/davila/Creatis/C11/creatools_source/creaVtk/bbtk_creaVtk_PKG/bbs/appli/exampleStripper.bbs
   4 # ----------------------------------
   5
   6 # BBTK GEditor Script
   7 # ----------------------
   8
   9 include std
  10 include itkvtk
  11 include creaVtk
  12 include creaMaracasVisu
  13 include vtk
  14 include wx
  15 include std
  16
  17 author "Author ??"
  18 description "Description ??"
  19 category "<VOID>"
  20
  21 new creaVtk:Stripper Box03
  22
  23 new creaMaracasVisu:ViewerNV Box05
  24
  25 new vtk:LoadHola Box06
  26
  27 new creaVtk:OutputWindow Box08
  28
  29 new wx:LayoutSplit Box09
  30   set Box09.Orientation "H"
  31
  32 new vtk:PolyDataToActor Box11
  33   set Box11.Representation "2"
  34
  35 new vtk:UpdateRender Box12
  36   set Box12.Active "true"
  37
  38 new vtk:SphereSource Box13
  39   set Box13.PhiResolution "20"
  40   set Box13.Radius "40"
  41   set Box13.ThetaResolution "20"
  42
  43 new creaVtk:MeshCutByAxis Box14
  44   set Box14.InsideVol "false"
  45   set Box14.Point "0 0 0"
  46
  47 new vtk:PolyDataToActor Box16
  48   set Box16.Colour "1 0 0"
  49   set Box16.Representation "1"
  50
  51 new wx:Slider Box17
  52   set Box17.In "30"
  53   set Box17.Label "true"
  54   set Box17.Max "100"
  55   set Box17.ReactiveOnTrack "true"
  56   set Box17.Title "Surface"
  57
  58 new std:Div Box18
  59   set Box18.In2 "100"
  60
  61 new wx:LayoutLine Box19
  62
  63 new wx:Slider Box20
  64   set Box20.In "30"
  65   set Box20.Label "true"
  66   set Box20.Max "100"
  67   set Box20.ReactiveOnTrack "true"
  68   set Box20.Title "Surface + cutter"
  69
  70 new std:Div Box21
  71   set Box21.In2 "100"
  72
  73 new std:MultipleInputs Box22
  74
  75 new creaVtk:Cutter Box24
  76
  77 new creaVtk:Plane Box25
  78   set Box25.Origin "0 0 10"
  79
  80 new vtk:PolyDataToActor Box26
  81   set Box26.Colour "0 1 1"
  82   set Box26.Representation "1"
  83
  84 new wx:Slider Box27
  85   set Box27.In "30"
  86   set Box27.Label "true"
  87   set Box27.Max "100"
  88   set Box27.ReactiveOnTrack "true"
  89   set Box27.Title "Surface + cutter + stripper"
  90
  91 new std:Div Box28
  92   set Box28.In2 "100"
  93
  94
  95 connect Box06.Out Box05.In
  96
  97 connect Box05.Widget Box09.Widget2
  98
  99 connect Box05.Renderer1 Box11.Renderer
 100
 101 connect Box05.Renderer1 Box12.Renderer
 102
 103 connect Box13.Out Box14.In
 104
 105 connect Box14.Out Box11.In
 106
 107 connect Box05.Renderer1 Box16.Renderer
 108
 109 connect Box11.BoxChange Box16.BoxExecute
 110
 111 connect Box17.Out Box18.In1
 112
 113 connect Box17.Widget Box19.Widget1
 114
 115 connect Box18.Out Box11.Opacity
 116
 117 connect Box20.Out Box21.In1
 118
 119 connect Box20.Widget Box19.Widget3
 120
 121 connect Box19.Widget Box09.Widget1
 122
 123 connect Box21.Out Box16.Opacity
 124
 125 connect Box20.BoxChange Box22.In2
 126
 127 connect Box17.BoxChange Box22.In1
 128
 129 connect Box22.BoxChange Box11.BoxExecute
 130
 131 connect Box14.Out Box24.In
 132
 133 connect Box25.Out Box24.ImplicitFunction
 134
 135 connect Box24.Out Box16.In
 136
 137 connect Box24.Out Box03.In
 138
 139 connect Box05.Renderer1 Box26.Renderer
 140
 141 connect Box03.Out Box26.In
 142
 143 connect Box16.BoxChange Box26.BoxExecute
 144
 145 connect Box26.BoxChange Box12.BoxExecute
 146
 147 connect Box27.Out Box28.In1
 148
 149 connect Box27.Widget Box19.Widget6
 150
 151 connect Box27.BoxChange Box22.In6
 152
 153 connect Box28.Out Box26.Opacity
 154
 155
 156
 157 # Complex input ports
 158 exec Box08
 159 exec Box09