bbtk_package_creaMiniTools/bbs/appli/crop.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.2 BBS BlackBox Script
   3 # - /Users/davila/Creatis/All3/creatools_source/creaMiniTools/bbtk_package_creaMiniTools/bbs/appli/crop.bbs
   4 # ----------------------------------
   5
   6 # BBTK GEditor Script
   7 # ----------------------
   8
   9 include std
  10 include itkvtk
  11 include creaMaracasVisu
  12 include wx
  13 include creaImageIO
  14 include vtk
  15 include toolsbbtk
  16
  17 author "Author ??"
  18 description "Description ??"
  19 category "<VOID>"
  20
  21 new ViewerNV Box03
  22   set Box03.nTypeView "6 1 2 -1"
  23
  24 new ContourVOI Box05
  25
  26 new LayoutSplit Box06
  27   set Box06.Proportion 15
  28
  29 new LayoutLine Box07
  30
  31 new CommandButton Box08
  32   set Box08.Label "Run Crop"
  33
  34 new ViewerNV Box09
  35
  36 new ImageChangeInformation Box10
  37
  38 new LayoutSplit Box11
  39   set Box11.Proportion 15
  40
  41 new ImagesChooserDialogBox Box13
  42
  43 new OutputText Box14
  44   set Box14.Title "Index"
  45
  46 new OutputText Box15
  47   set Box15.Title "Size"
  48
  49 new LayoutLine Box16
  50
  51 new ExtractVtkImageFilter Box25
  52
  53 new SaveMHD_infoCrop-Button Box26
  54
  55
  56 connect Box03.Widget Box06.Widget2
  57 connect Box05.Widget Box07.Widget1
  58 connect Box08.Widget Box07.Widget2
  59 connect Box07.Widget Box06.Widget1
  60 connect Box08.BoxChange Box05.BoxExecute
  61 connect Box10.Out Box09.In
  62 connect Box09.Widget Box11.Widget2
  63 connect Box08.BoxChange Box11.BoxExecute
  64 connect Box13.Out Box05.In
  65 connect Box13.Out Box03.In
  66 connect Box03.wxVtkBaseView4 Box05.wxVtkBaseView
  67 connect Box05.Index Box14.In
  68 connect Box05.Size Box15.In
  69 connect Box14.Widget Box16.Widget1
  70 connect Box15.Widget Box16.Widget2
  71 connect Box16.Widget Box11.Widget1
  72 connect Box05.Index Box25.Index
  73 connect Box05.Size Box25.Size
  74 connect Box13.Out Box25.In
  75 connect Box25.Out Box10.In
  76 connect Box08.BoxChange Box25.BoxExecute
  77 connect Box10.Out Box26.In
  78 connect Box05.Size Box26.Size
  79 connect Box05.Index Box26.Index
  80 connect Box26.Widget Box16.Widget3
  81
  82 exec Box06