appli/template_creaPatientsSystem/scripts/00000_User.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.4 BBS BlackBox Script
   3 # - /Users/davila/Creatis/C11/creatools_source/creaMiniTools/appli/template_creaPatientsSystem/scripts/00000_User.bbs
   4 # ----------------------------------
   5
   6 # BBTK GEditor Script
   7 # ----------------------
   8
   9 include std
  10 include itkvtk
  11 include wx
  12 include creaVtk
  13 include std
  14
  15 author "Author ??"
  16 description "Description ??"
  17 category "<VOID>"
  18
  19 new wx:LayoutCenter Box02
  20
  21 new wx:LayoutLine Box03
  22
  23 new wx:OutputText Box04
  24
  25 new wx:ComboBox Box05
  26   set Box05.In "VOID Eduardo_Davila User01 User02 User03"
  27   set Box05.Title "User"
  28
  29 new creaVtk:OutputWindow Box06
  30
  31 new wx:LayoutLine Box07
  32   set Box07.WinHeight "400"
  33   set Box07.WinTitle "User"
  34   set Box07.WinWidth "400"
  35
  36 new wx:CommandButton Box08
  37   set Box08.Label "Next"
  38
  39 new std:ExecSystemCommand Box09
  40
  41 new std:ConcatStrings Box10
  42   set Box10.In1 "  creaUser="
  43
  44 new std:ConcatStrings Box11
  45   set Box11.In1 "bbi 00010_Menu.bbs  "
  46   set Box11.In9 "  &"
  47
  48 new std:MultipleInputs Box12
  49
  50 new std:Exit Box13
  51
  52 new std:ConcatStrings Box14
  53   set Box14.In1 "  BaseDir="
  54
  55 new std:ConcatStrings Box15
  56
  57
  58 connect Box04.Widget Box03.Widget2
  59
  60 connect Box05.Widget Box03.Widget4
  61
  62 connect Box02.Widget Box07.Widget3
  63
  64 connect Box03.Widget Box02.Widget2
  65
  66 connect Box08.Widget Box03.Widget6
  67
  68 connect Box05.OutString Box10.In2
  69
  70 connect Box08.BoxChange Box12.BoxExecute
  71
  72 connect Box09.BoxChange Box12.In2
  73
  74 connect Box13.BoxChange Box12.In9
  75
  76 connect Box11.Out Box09.In
  77
  78 connect Box10.Out Box11.In3
  79
  80
  81 connect Box15.Out Box14.In2
  82
  83 connect Box14.Out Box11.In2
  84
  85
  86
  87 # Complex input ports
  88 input BaseDir Box15.In1 " "
  89 exec Box06
  90 exec Box07