bbtk_package_creaMiniTools/bbs/boxes/imageToolsMenu.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.4 BBS BlackBox Script (Complex Box)
   3 # - /tmpEED/creaTools/creatools_source/creaMiniTools/bbtk_package_creaMiniTools/bbs/boxes/imageToolsMenu.bbs
   4 # ----------------------------------
   5
   6 include std
   7 include itkvtk
   8 include wx
   9 include std
  10 include creaMiniToolsBase
  11
  12 define ImageToolsMenu creaMiniTools
  13
  14 author "Author ??"
  15 description "Description ??"
  16
  17 category "<VOID>"
  18
  19 new wx:CommandButton Box00
  20   set Box00.Label "Image Writer"
  21
  22 new wx:CommandButton Box02
  23   set Box02.Label "Viewer NV"
  24
  25 new std:ExecSystemCommand Box04
  26
  27 new std:ExecSystemCommand Box06
  28
  29 new std:ExecSystemCommand Box09
  30
  31 new wx:CommandButton Box10
  32   set Box10.Label "Synchronize 2 Images"
  33
  34 new wx:CommandButton Box11
  35   set Box11.Label "Manual paint"
  36
  37 new std:ExecSystemCommand Box12
  38
  39 new wx:CommandButton Box13
  40   set Box13.Label "Extract Planes"
  41
  42 new std:ExecSystemCommand Box14
  43
  44 new wx:LayoutTab Box15
  45   set Box15.WinTitle "Images Tools"
  46
  47 new wx:LayoutLine Box18
  48
  49 new wx:LayoutLine Box19
  50
  51 new creaMiniToolsBase:RegistrationMenu Box20
  52
  53 new wx:CommandButton Box22
  54   set Box22.Label "Resampling Image"
  55
  56 new std:ExecSystemCommand Box23
  57
  58 new wx:CommandButton Box25
  59   set Box25.Label "Crop interactive"
  60
  61 new std:ExecSystemCommand Box26
  62
  63 new wx:LayoutCenter Box27
  64   set Box27.WinTitle "Viewers"
  65
  66 new wx:LayoutCenter Box28
  67   set Box28.WinTitle "Modify image"
  68
  69 new wx:CommandButton Box29
  70   set Box29.Label "Flip Image"
  71
  72 new std:ExecSystemCommand Box30
  73
  74 new wx:CommandButton Box31
  75   set Box31.Label "Viewer NV (Vol. Rendering)"
  76
  77 new std:ExecSystemCommand Box32
  78
  79 new std:Configuration Box33
  80
  81 new std:StringSelect Box34
  82   set Box34.In0 "bbi creaMiniTools/appli/viewerNVwithVolRenExample.bbs &"
  83   set Box34.In1 "start /b bbi creaMiniTools/appli/viewerNVwithVolRenExample.bbs &"
  84
  85 new std:StringSelect Box35
  86   set Box35.In0 "bbi creaMiniTools/appli/viewerNVExample.bbs &"
  87   set Box35.In1 "start /b bbi creaMiniTools/appli/viewerNVExample.bbs &"
  88
  89 new std:StringSelect Box36
  90   set Box36.In0 "bbi creaMiniTools/appli/synchro2ImageExample.bbs &"
  91   set Box36.In1 "start /b bbi creaMiniTools/appli/synchro2ImageExample.bbs &"
  92
  93 new std:StringSelect Box37
  94   set Box37.In0 "bbi creaMiniTools/appli/imageWriterExample.bbs &"
  95   set Box37.In1 "start /b bbi creaMiniTools/appli/imageWriterExample.bbs &"
  96
  97 new std:StringSelect Box38
  98   set Box38.In0 "bbi creaMiniTools/appli/resampling.bbs &"
  99   set Box38.In1 "start /b bbi creaMiniTools/appli/resampling.bbs &"
 100
 101 new std:StringSelect Box39
 102   set Box39.In0 "bbi creaMiniTools/appli/crop.bbs &"
 103   set Box39.In1 "start /b bbi creaMiniTools/appli/crop.bbs &"
 104
 105 new std:StringSelect Box40
 106   set Box40.In0 "bbi creaMiniTools/appli/SaveImagePlanes.bbs &"
 107   set Box40.In1 "start /b bbi creaMiniTools/appli/SaveImagePlanes.bbs &"
 108
 109 new std:StringSelect Box41
 110   set Box41.In0 "bbi creaMiniTools/appli/manualPaint.bbs &"
 111   set Box41.In1 "start /b bbi creaMiniTools/appli/manualPaint.bbs &"
 112
 113 new std:StringSelect Box42
 114   set Box42.In0 "bbi creaMiniTools/appli/flipImageY.bbs &"
 115   set Box42.In1 "start /b bbi creaMiniTools/appli/flipImageY.bbs &"
 116
 117 new wx:CommandButton Box43
 118   set Box43.Label "Viewer Plane MHD"
 119
 120 new std:ExecSystemCommand Box44
 121
 122 new std:StringSelect Box45
 123   set Box45.In0 "bbi creaMiniTools/appli/PlaneViewer-MHD.bbs &"
 124   set Box45.In1 "start /b bbi creaMiniTools/appli/PlaneViewer-MHD.bbs &"
 125
 126 new wx:CommandButton Box46
 127   set Box46.Label "Crop Manuel"
 128
 129 new std:ExecSystemCommand Box47
 130
 131 new std:StringSelect Box48
 132   set Box48.In0 "bbi creaMiniTools/appli/Crop2.bbs &"
 133   set Box48.In1 "start /b bbi creaMiniTools/appli/Crop2.bbs &"
 134
 135 new wx:CommandButton Box49
 136   set Box49.Label "Rescale-Slope"
 137
 138 new std:ExecSystemCommand Box50
 139
 140 new std:StringSelect Box51
 141   set Box51.In0 "bbi creaMiniTools/appli/rescaleSlopeIntercept.bbs &"
 142   set Box51.In1 "start /b bbi creaMiniTools/appli/rescaleSlopeIntercept.bbs &"
 143
 144
 145 connect Box00.BoxChange Box04.BoxExecute
 146 connect Box02.BoxChange Box06.BoxExecute
 147 connect Box10.BoxChange Box09.BoxExecute
 148 connect Box11.BoxChange Box12.BoxExecute
 149 connect Box13.BoxChange Box14.BoxExecute
 150 connect Box02.Widget Box18.Widget1
 151 connect Box11.Widget Box19.Widget2
 152 connect Box00.Widget Box19.Widget1
 153 connect Box20.widget Box15.Widget3
 154 connect Box22.Widget Box19.Widget3
 155 connect Box22.BoxChange Box23.BoxExecute
 156 connect Box25.Widget Box19.Widget4
 157 connect Box25.BoxChange Box26.BoxExecute
 158 connect Box18.Widget Box27.Widget2
 159 connect Box27.Widget Box15.Widget1
 160 connect Box19.Widget Box28.Widget2
 161 connect Box28.Widget Box15.Widget2
 162 connect Box29.BoxChange Box30.BoxExecute
 163 connect Box10.Widget Box18.Widget3
 164 connect Box31.BoxChange Box32.BoxExecute
 165 connect Box31.Widget Box18.Widget2
 166 connect Box33.SystemType Box34.In
 167 connect Box34.Out Box32.In
 168 connect Box33.SystemType Box35.In
 169 connect Box35.Out Box06.In
 170 connect Box36.Out Box09.In
 171 connect Box33.SystemType Box36.In
 172 connect Box37.Out Box04.In
 173 connect Box33.SystemType Box37.In
 174 connect Box38.Out Box23.In
 175 connect Box33.SystemType Box38.In
 176 connect Box33.SystemType Box41.In
 177 connect Box33.SystemType Box39.In
 178 connect Box33.SystemType Box40.In
 179 connect Box33.SystemType Box42.In
 180 connect Box41.Out Box12.In
 181 connect Box39.Out Box26.In
 182 connect Box40.Out Box14.In
 183 connect Box42.Out Box30.In
 184 connect Box43.BoxChange Box44.BoxExecute
 185 connect Box45.Out Box44.In
 186 connect Box33.SystemType Box45.In
 187 connect Box43.Widget Box18.Widget4
 188 connect Box46.BoxChange Box47.BoxExecute
 189 connect Box48.Out Box47.In
 190 connect Box46.Widget Box19.Widget5
 191 connect Box13.Widget Box19.Widget6
 192 connect Box29.Widget Box19.Widget7
 193 connect Box49.BoxChange Box50.BoxExecute
 194 connect Box51.Out Box50.In
 195 connect Box49.Widget Box19.Widget8
 196 connect Box33.SystemType Box51.In
 197
 198 # Complex input ports
 199
 200 # Complex output ports
 201 output widget Box15.Widget " "
 202
 203 message
 204 exec Box15
 205
 206 endefine