appli/template_creaPatientsSystem/scripts/00010_Menu.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.4 BBS BlackBox Script
   3 # - /Users/davila/CreatisWork/tmpCharly/creaBrainGrayMatter/appli/Appli_creaGM/scripts/00010_Menu.bbs
   4 # ----------------------------------
   5
   6 # BBTK GEditor Script
   7 # ----------------------
   8
   9 include std
  10 include itkvtk
  11 include wx
  12 include std
  13
  14 author "Author ??"
  15 description "Description ??"
  16 category "<VOID>"
  17
  18 new wx:LayoutLine Box00
  19   set Box00.WinTitle "B. Segmentation"
  20
  21 new wx:CommandButton Box01
  22   set Box01.Label "Step 2.   Initial Parameters"
  23
  24 new wx:ComboBox Box03
  25   set Box03.In "void"
  26   set Box03.Selection "0"
  27   set Box03.Title "Patient"
  28
  29 new std:FilesFromDirectory Box05
  30   set Box05.Recursive "false"
  31   set Box05.Type "1"
  32
  33 new std:ConcatStrings Box06
  34   set Box06.In2 "/results"
  35
  36 new std:ExecSystemCommand Box07
  37
  38 new std:ExecSystemCommand Box09
  39
  40 new std:ConcatStrings Box10
  41   set Box10.In2 "results"
  42
  43 new std:ConcatStrings Box11
  44
  45 new std:ConcatStrings Box12
  46   set Box12.In1 "mkdir "
  47
  48 new wx:CommandButton Box18
  49   set Box18.Label "Step 5. Validation"
  50
  51 new std:ExecSystemCommand Box19
  52
  53 new std:ConcatStrings Box20
  54   set Box20.In1 "bbi 00500_Validate.bbs  "
  55   set Box20.In6 " &"
  56
  57 new wx:CommandButton Box21
  58   set Box21.Label "Step 3.  Filter"
  59
  60 new std:ExecSystemCommand Box22
  61
  62 new wx:CommandButton Box26
  63   set Box26.Label "Report"
  64
  65 new std:ExecSystemCommand Box27
  66
  67 new std:ConcatStrings Box28
  68   set Box28.In1 "bbi Report.bbs  "
  69   set Box28.In2 "BaseDir="
  70   set Box28.In4 "  &"
  71
  72 new wx:CommandButton Box29
  73   set Box29.Label "Comments"
  74
  75 new std:ExecSystemCommand Box30
  76
  77 new std:ConcatStrings Box31
  78   set Box31.In1 "bbi Comments.bbs  "
  79   set Box31.In6 " &"
  80
  81 new wx:LayoutLine Box32
  82   set Box32.WinTitle "C. Summary"
  83
  84 new wx:LayoutTab Box33
  85   set Box33.WinTitle "B. Segmentation"
  86
  87 new wx:OutputText Box35
  88
  89 new wx:CommandButton Box39
  90   set Box39.Label "Step 4.   Correction"
  91
  92 new std:ExecSystemCommand Box43
  93
  94 new std:StringSelect Box45
  95   set Box45.In1 "hola"
  96
  97 new std:Configuration Box47
  98
  99 new std:StringSelect Box50
 100
 101 new std:ConcatStrings Box51
 102   set Box51.In1 "start /b  "
 103
 104 new std:ConcatStrings Box52
 105   set Box52.In1 "start /b  "
 106
 107 new std:StringSelect Box53
 108
 109 new std:ConcatStrings Box54
 110   set Box54.In1 "start /b  "
 111
 112 new std:StringSelect Box55
 113
 114 new std:ConcatStrings Box56
 115   set Box56.In1 "start /b  "
 116
 117 new std:StringSelect Box57
 118
 119 new std:ConcatStrings Box58
 120   set Box58.In1 "start /b  "
 121
 122 new std:StringSelect Box61
 123
 124 new std:ConcatStrings Box62
 125   set Box62.In1 "start /b  "
 126
 127 new wx:CommandButton Box63
 128   set Box63.Label "Reset Patient"
 129
 130 new std:ExecSystemCommand Box64
 131
 132 new std:ConcatStrings Box65
 133   set Box65.In1 "bbi ResetPatient.bbs  "
 134   set Box65.In6 " &"
 135
 136 new std:StringSelect Box66
 137
 138 new std:ConcatStrings Box67
 139   set Box67.In1 "start /b  "
 140
 141 new std:ConcatStrings Box73
 142   set Box73.In1 "<VOID>"
 143   set Box73.In2 "  "
 144
 145 new wx:CommandButton Box84
 146   set Box84.Label "6. Push DB"
 147
 148 new std:ExecSystemCommand Box85
 149
 150 new std:ConcatStrings Box86
 151   set Box86.In1 "bbi 00600_PushData.bbs  "
 152   set Box86.In4 "  Hospital="
 153   set Box86.In6 " &"
 154
 155 new std:StringSelect Box87
 156
 157 new std:ConcatStrings Box88
 158   set Box88.In1 "start /b  "
 159
 160 new wx:LayoutLine Box89
 161   set Box89.Orientation "H"
 162
 163 new wx:ComboBox Box90
 164   set Box90.In "void"
 165   set Box90.Selection "0"
 166   set Box90.Title "Core"
 167
 168 new wx:CommandButton Box91
 169   set Box91.Label "Step 1.  Insert Data"
 170
 171 new std:ExecSystemCommand Box92
 172
 173 new std:ConcatStrings Box93
 174   set Box93.In1 "bbi  "
 175   set Box93.In2 "00100_InsertDataA.bbs "
 176   set Box93.In4 " ProjectDir="
 177   set Box93.In9 " & "
 178
 179 new std:StringSelect Box94
 180
 181 new std:ConcatStrings Box95
 182   set Box95.In1 "start /b  "
 183
 184 new wx:LayoutTab Box97
 185
 186 new wx:LayoutTab Box98
 187
 188 new wx:LayoutLine Box99
 189   set Box99.WinHeight "550"
 190   set Box99.WinTitle "A. InputData"
 191   set Box99.WinWidth "450"
 192
 193 new wx:CommandButton Box102
 194   set Box102.Label "Myriad Girder DB"
 195
 196 new std:ExecSystemCommand Box103
 197
 198 new std:StringSelect Box105
 199
 200 new wx:OutputText Box108
 201
 202 new std:GetVectorStringElement Box112
 203
 204 new std:FilesFromDirectory Box113
 205   set Box113.Type "1"
 206
 207 new std:ConcatStrings Box114
 208   set Box114.In1 "<VOID>"
 209   set Box114.In2 "  "
 210
 211 new wx:CommandButton Box115
 212   set Box115.Label "Refresh"
 213
 214 new std:ConcatStrings Box116
 215   set Box116.In1 "BaseDir="
 216   set Box116.In3 "  "
 217
 218 new std:ConcatStrings Box117
 219   set Box117.In1 "PatientID="
 220   set Box117.In4 "  "
 221
 222 new std:ConcatStrings Box118
 223   set Box118.In2 "   "
 224
 225 new std:ConcatStrings Box119
 226   set Box119.In1 "bbi  "
 227   set Box119.In2 "00200_InitialParameters.bbs   "
 228   set Box119.In9 " & "
 229
 230 new std:MultipleInputs Box120
 231
 232 new std:ConcatStrings Box121
 233   set Box121.In1 "bbi  "
 234   set Box121.In2 "00300_Filter.bbs    "
 235   set Box121.In9 " & "
 236
 237 new std:ConcatStrings Box122
 238   set Box122.In1 "bbi  "
 239   set Box122.In2 "00400_Correction.bbs  "
 240   set Box122.In9 " & "
 241
 242 new wx:CommandButton Box124
 243   set Box124.Label "Results Dir"
 244
 245 new std:ExecSystemCommand Box125
 246
 247 new std:StringSelect Box126
 248
 249 new std:ConcatStrings Box127
 250   set Box127.In1 "xdg-open  "
 251   set Box127.In3 "  &"
 252
 253 new std:ConcatStrings Box128
 254   set Box128.In2 "/results/"
 255
 256 new std:ConcatStrings Box129
 257   set Box129.In1 "start  /b  "
 258
 259 new std:ReplaceCleanString Box130
 260   set Box130.Search "<VOID>"
 261
 262 new std:ReplaceCleanString Box131
 263   set Box131.Replace "\"
 264   set Box131.Search "/"
 265
 266 new std:Configuration Box133
 267
 268 new std:Configuration Box139
 269
 270 new wx:StaticBox Box135
 271
 272 new wx:StaticBox Box136
 273
 274 new wx:StaticBox Box137
 275
 276 new std:ConcatStrings Box138
 277   set Box138.In1 "../"
 278
 279 new std:ConcatStrings Box140
 280   set Box140.In1 "/Users/davila/CreatisWork/tmpCharly/"
 281
 282 new std:ConcatStrings Box141
 283   set Box141.In1 "VOID"
 284   set Box141.In2 "  "
 285
 286 new std:ConcatStrings Box142
 287   set Box142.In2 "/davila/00100_OriginalImages/Test_01"
 288
 289 new std:ConcatStrings Box143
 290   set Box143.In1 "CoreID="
 291   set Box143.In3 "  "
 292
 293 new std:ConcatStrings Box146
 294   set Box146.In1 "open  "
 295   set Box146.In3 "  &"
 296
 297 new std:ConcatStrings Box145
 298   set Box145.In1 "/<CORE>/davila/<ALGO>/Test_01/<PATIENT>/Condition_01"
 299
 300 new std:ReplaceString Box147
 301   set Box147.Search "<CORE>"
 302
 303 new std:ReplaceString Box148
 304   set Box148.Search "<PATIENT>"
 305
 306 new std:ReplaceString Box149
 307   set Box149.Replace "00100_OriginalImages"
 308   set Box149.Search "<ALGO>"
 309
 310 new wx:LayoutLine Box150
 311   set Box150.Orientation "H"
 312   set Box150.WinHeight "600"
 313   set Box150.WinWidth "900"
 314
 315 new std:ConcatStrings Box151
 316
 317 new std:ConcatStrings Box152
 318   set Box152.In1 "00010_menu.bbg  (v.1)"
 319   set Box152.In2 "    User:"
 320
 321 new std:ConcatStrings Box153
 322   set Box153.In1 "https://myriad.creatis.insa-lyon.fr/#collection/5accbe71e1820a13d7993c19/folder/6186286034933039d3c8edb8"
 323
 324 new std:ConcatStrings Box154
 325   set Box154.In1 "xdg-open"
 326   set Box154.In2 "  "
 327
 328 new std:ConcatStrings Box155
 329   set Box155.In1 "start"
 330   set Box155.In2 "  "
 331
 332 new std:ConcatStrings Box156
 333   set Box156.In1 "open"
 334   set Box156.In2 "  "
 335
 336
 337 connect Box06.Out Box05.In
 338
 339 connect Box11.Out Box06.In1
 340
 341 connect Box11.Out Box10.In1
 342
 343 connect Box10.Out Box12.In2
 344
 345 connect Box12.Out Box09.In
 346
 347 connect Box18.BoxChange Box19.BoxExecute
 348
 349 connect Box21.BoxChange Box22.BoxExecute
 350
 351 connect Box26.BoxChange Box27.BoxExecute
 352
 353 connect Box11.Out Box28.In3
 354
 355 connect Box29.BoxChange Box30.BoxExecute
 356
 357 connect Box00.Widget Box33.Widget1
 358
 359 connect Box26.Widget Box32.Widget3
 360
 361 connect Box35.Widget Box32.Widget1
 362
 363 connect Box39.BoxChange Box43.BoxExecute
 364
 365 connect Box45.Out Box22.In
 366
 367 connect Box47.SystemType Box45.In
 368
 369 connect Box47.SystemType Box50.In
 370
 371 connect Box51.Out Box50.In1
 372
 373 connect Box50.Out Box07.In
 374
 375 connect Box52.Out Box45.In1
 376
 377 connect Box53.Out Box43.In
 378
 379 connect Box54.Out Box53.In1
 380
 381 connect Box56.Out Box55.In1
 382
 383 connect Box20.Out Box55.In0
 384
 385 connect Box55.Out Box19.In
 386
 387 connect Box20.Out Box56.In2
 388
 389 connect Box47.SystemType Box55.In
 390
 391 connect Box47.SystemType Box53.In
 392
 393 connect Box58.Out Box57.In1
 394
 395 connect Box31.Out Box57.In0
 396
 397 connect Box57.Out Box30.In
 398
 399 connect Box31.Out Box58.In2
 400
 401 connect Box47.SystemType Box57.In
 402
 403 connect Box62.Out Box61.In1
 404
 405 connect Box61.Out Box27.In
 406
 407 connect Box28.Out Box62.In2
 408
 409 connect Box28.Out Box61.In0
 410
 411 connect Box47.SystemType Box61.In
 412
 413 connect Box63.BoxChange Box64.BoxExecute
 414
 415 connect Box67.Out Box66.In1
 416
 417 connect Box65.Out Box66.In0
 418
 419 connect Box66.Out Box64.In
 420
 421 connect Box65.Out Box67.In2
 422
 423 connect Box47.SystemType Box66.In
 424
 425 connect Box05.OutSimple Box73.In3
 426
 427 connect Box84.BoxChange Box85.BoxExecute
 428
 429 connect Box88.Out Box87.In1
 430
 431 connect Box86.Out Box87.In0
 432
 433 connect Box87.Out Box85.In
 434
 435 connect Box86.Out Box88.In2
 436
 437 connect Box29.Widget Box89.Widget1
 438
 439 connect Box63.Widget Box89.Widget2
 440
 441 connect Box21.Widget Box00.Widget5
 442
 443 connect Box01.Widget Box00.Widget4
 444
 445 connect Box91.BoxChange Box92.BoxExecute
 446
 447 connect Box93.Out Box94.In0
 448
 449 connect Box93.Out Box95.In2
 450
 451 connect Box95.Out Box94.In1
 452
 453 connect Box99.Widget Box97.Widget1
 454
 455 connect Box32.Widget Box98.Widget1
 456
 457 connect Box102.BoxChange Box103.BoxExecute
 458
 459 connect Box105.Out Box103.In
 460
 461 connect Box03.Widget Box00.Widget3
 462
 463 connect Box90.Widget Box00.Widget2
 464
 465 connect Box91.Widget Box99.Widget3
 466
 467 connect Box108.Widget Box99.Widget1
 468
 469 connect Box11.Out Box93.In5
 470
 471 connect Box73.Out Box90.In
 472
 473 connect Box90.Out Box112.I
 474
 475 connect Box113.OutSimple Box114.In3
 476
 477 connect Box114.Out Box03.In
 478
 479 connect Box115.Widget Box00.Widget1
 480
 481 connect Box115.BoxChange Box05.BoxExecute
 482
 483 connect Box115.BoxChange Box90.BoxExecute
 484
 485 connect Box11.Out Box116.In2
 486
 487 connect Box03.OutString Box117.In3
 488
 489 connect Box117.Out Box118.In3
 490
 491 connect Box118.Out Box119.In3
 492
 493 connect Box119.Out Box50.In0
 494
 495 connect Box119.Out Box51.In2
 496
 497 connect Box01.BoxChange Box07.BoxExecute
 498
 499 connect Box116.Out Box118.In1
 500
 501 connect Box90.BoxChange Box120.BoxExecute
 502
 503 connect Box112.BoxChange Box120.In1
 504
 505 connect Box113.BoxChange Box120.In2
 506
 507 connect Box03.BoxChange Box120.In3
 508
 509 connect Box50.BoxChange Box120.In5
 510
 511 connect Box118.Out Box121.In3
 512
 513 connect Box121.Out Box52.In2
 514
 515 connect Box121.Out Box45.In0
 516
 517 connect Box122.Out Box54.In2
 518
 519 connect Box122.Out Box53.In0
 520
 521 connect Box118.Out Box122.In3
 522
 523 connect Box118.Out Box20.In3
 524
 525 connect Box118.Out Box31.In3
 526
 527 connect Box118.Out Box65.In3
 528
 529 connect Box118.Out Box86.In3
 530
 531 connect Box47.SystemType Box105.In
 532
 533 connect Box90.OutString Box86.In5
 534
 535 connect Box124.BoxChange Box125.BoxExecute
 536
 537 connect Box102.Widget Box32.Widget6
 538
 539 connect Box124.Widget Box32.Widget4
 540
 541 connect Box127.Out Box126.In0
 542
 543 connect Box11.Out Box128.In1
 544
 545 connect Box129.Out Box126.In1
 546
 547 connect Box47.SystemType Box126.In
 548
 549 connect Box130.Out Box131.In
 550
 551 connect Box128.Out Box130.In
 552
 553 connect Box131.Out Box129.In2
 554
 555 connect Box131.Out Box127.In2
 556
 557 connect Box133.FileSeparator Box131.Replace
 558
 559 connect Box126.Out Box125.In
 560
 561 connect Box139.SystemType Box94.In
 562
 563 connect Box94.Out Box92.In
 564
 565 connect Box97.Widget Box135.BoxContent
 566
 567 connect Box33.Widget Box136.BoxContent
 568
 569 connect Box98.Widget Box137.BoxContent
 570
 571 connect Box140.Out Box11.In1
 572
 573 connect Box05.Out Box141.In3
 574
 575 connect Box141.Out Box112.In
 576
 577 connect Box112.Out Box142.In1
 578
 579 connect Box142.Out Box113.In
 580
 581 connect Box143.Out Box118.In2
 582
 583 connect Box90.OutString Box143.In2
 584
 585 connect Box146.Out Box126.In2
 586
 587 connect Box131.Out Box146.In2
 588
 589 connect Box119.Out Box50.In2
 590
 591 connect Box121.Out Box45.In2
 592
 593 connect Box93.Out Box94.In2
 594
 595 connect Box145.Out Box147.In
 596
 597 connect Box90.OutString Box147.Replace
 598
 599 connect Box147.Out Box148.In
 600
 601 connect Box03.OutString Box148.Replace
 602
 603 connect Box148.Out Box149.In
 604
 605 connect Box149.Out Box128.In3
 606
 607 connect Box39.Widget Box00.Widget6
 608
 609 connect Box18.Widget Box00.Widget7
 610
 611 connect Box122.Out Box53.In2
 612
 613 connect Box20.Out Box55.In2
 614
 615 connect Box135.Widget Box150.Widget2
 616
 617 connect Box136.Widget Box150.Widget4
 618
 619 connect Box137.Widget Box150.Widget6
 620
 621
 622 connect Box152.Out Box150.WinTitle
 623
 624 connect Box151.Out Box152.In3
 625
 626 connect Box65.Out Box66.In2
 627
 628 connect Box31.Out Box57.In2
 629
 630 connect Box89.Widget Box00.Widget9
 631
 632 connect Box84.Widget Box00.Widget8
 633
 634 connect Box153.Out Box154.In3
 635
 636 connect Box153.Out Box155.In3
 637
 638 connect Box153.Out Box156.In3
 639
 640 connect Box154.Out Box105.In0
 641
 642 connect Box155.Out Box105.In1
 643
 644 connect Box156.Out Box105.In2
 645
 646 connect Box28.Out Box61.In2
 647
 648
 649
 650 # Complex input ports
 651 input creaUser Box151.In1 " "
 652 exec Box09
 653 exec Box150