appli/template_creaPatientsSystem/scripts/00010_Menu.bbs

   1 # ----------------------------------
   2 # - BBTKGEditor v 1.4 BBS BlackBox Script
   3 # - /Users/davila/Creatis/C11/creatools_source/creaMiniTools/appli/template_creaPatientsSystem/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   set Box11.In1 "../"
  45
  46 new std:ConcatStrings Box12
  47   set Box12.In1 "mkdir "
  48
  49 new wx:CommandButton Box18
  50   set Box18.Label "Step 5. Validation"
  51
  52 new std:ExecSystemCommand Box19
  53
  54 new std:ConcatStrings Box20
  55   set Box20.In1 "bbi 00500_Validate.bbs  "
  56   set Box20.In6 " &"
  57
  58 new wx:CommandButton Box21
  59   set Box21.Label "Step 3.  Filter"
  60
  61 new std:ExecSystemCommand Box22
  62
  63 new wx:CommandButton Box26
  64   set Box26.Label "Report"
  65
  66 new std:ExecSystemCommand Box27
  67
  68 new std:ConcatStrings Box28
  69   set Box28.In1 "bbi Report.bbs  "
  70   set Box28.In9 "  &"
  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.In6 "  "
 178   set Box93.In9 " & "
 179
 180 new std:StringSelect Box94
 181
 182 new std:ConcatStrings Box95
 183   set Box95.In1 "start /b  "
 184
 185 new wx:LayoutTab Box97
 186
 187 new wx:LayoutTab Box98
 188
 189 new wx:LayoutLine Box99
 190   set Box99.WinHeight "550"
 191   set Box99.WinTitle "A. InputData"
 192   set Box99.WinWidth "450"
 193
 194 new wx:CommandButton Box102
 195   set Box102.Label "Myriad Girder DB"
 196
 197 new std:ExecSystemCommand Box103
 198
 199 new std:StringSelect Box105
 200
 201 new wx:OutputText Box108
 202
 203 new std:GetVectorStringElement Box112
 204
 205 new std:FilesFromDirectory Box113
 206   set Box113.Type "1"
 207
 208 new std:ConcatStrings Box114
 209   set Box114.In1 "<VOID>"
 210   set Box114.In2 "  "
 211
 212 new wx:CommandButton Box115
 213   set Box115.Label "Refresh"
 214
 215 new std:ConcatStrings Box116
 216   set Box116.In1 "BaseDir="
 217   set Box116.In3 "  "
 218
 219 new std:ConcatStrings Box117
 220   set Box117.In1 "PatientID="
 221   set Box117.In4 "  "
 222
 223 new std:ConcatStrings Box118
 224   set Box118.In2 "   "
 225
 226 new std:ConcatStrings Box119
 227   set Box119.In1 "bbi  "
 228   set Box119.In2 "00200_InitialParameters.bbs   "
 229   set Box119.In9 " & "
 230
 231 new std:MultipleInputs Box120
 232
 233 new std:ConcatStrings Box121
 234   set Box121.In1 "bbi  "
 235   set Box121.In2 "00300_Filter.bbs    "
 236   set Box121.In9 " & "
 237
 238 new std:ConcatStrings Box122
 239   set Box122.In1 "bbi  "
 240   set Box122.In2 "00400_Correction.bbs  "
 241   set Box122.In9 " & "
 242
 243 new wx:CommandButton Box124
 244   set Box124.Label "Results Dir"
 245
 246 new std:ExecSystemCommand Box125
 247
 248 new std:StringSelect Box126
 249
 250 new std:ConcatStrings Box127
 251   set Box127.In1 "xdg-open  "
 252   set Box127.In3 "  &"
 253
 254 new std:ConcatStrings Box128
 255   set Box128.In2 "/results/"
 256
 257 new std:ConcatStrings Box129
 258   set Box129.In1 "start  /b  "
 259
 260 new std:ReplaceCleanString Box130
 261   set Box130.Search "<VOID>"
 262
 263 new std:ReplaceCleanString Box131
 264   set Box131.Replace "\"
 265   set Box131.Search "/"
 266
 267 new std:Configuration Box133
 268
 269 new std:Configuration Box139
 270
 271 new wx:StaticBox Box135
 272
 273 new wx:StaticBox Box136
 274
 275 new wx:StaticBox Box137
 276
 277 new std:ConcatStrings Box141
 278   set Box141.In1 "VOID"
 279   set Box141.In2 "  "
 280
 281 new std:ConcatStrings Box142
 282   set Box142.In2 "/davila/00100_OriginalImages/Test_01"
 283
 284 new std:ConcatStrings Box143
 285   set Box143.In1 "CoreID="
 286   set Box143.In3 "  "
 287
 288 new std:ConcatStrings Box146
 289   set Box146.In1 "open  "
 290   set Box146.In3 "  &"
 291
 292 new std:ConcatStrings Box145
 293   set Box145.In1 "/<CORE>/davila/<ALGO>/Test_01/<PATIENT>/Condition_01"
 294
 295 new std:ReplaceString Box147
 296   set Box147.Search "<CORE>"
 297
 298 new std:ReplaceString Box148
 299   set Box148.Search "<PATIENT>"
 300
 301 new std:ReplaceString Box149
 302   set Box149.Replace "00100_OriginalImages"
 303   set Box149.Search "<ALGO>"
 304
 305 new wx:LayoutLine Box150
 306   set Box150.Orientation "H"
 307   set Box150.WinTitle "Menu"
 308
 309 new std:ConcatStrings Box151
 310
 311 new std:ConcatStrings Box152
 312   set Box152.In1 "00010_menu.bbg  (v.1)"
 313   set Box152.In2 "    User:"
 314
 315 new std:ConcatStrings Box153
 316   set Box153.In1 "https://myriad.creatis.insa-lyon.fr/#collection/5accbe71e1820a13d7993c19/folder/6186286034933039d3c8edb8"
 317
 318 new std:ConcatStrings Box154
 319   set Box154.In1 "xdg-open"
 320   set Box154.In2 "  "
 321
 322 new std:ConcatStrings Box155
 323   set Box155.In1 "start"
 324   set Box155.In2 "  "
 325
 326 new std:ConcatStrings Box156
 327   set Box156.In1 "open"
 328   set Box156.In2 "  "
 329
 330 new std:ConcatStrings Box157
 331   set Box157.In1 "creaUser="
 332   set Box157.In3 "  "
 333
 334 new wx:LayoutLine Box158
 335   set Box158.WinHeight "600"
 336   set Box158.WinWidth "900"
 337
 338 new wx:LayoutTab Box159
 339
 340 new wx:LayoutLine Box160
 341   set Box160.WinTitle "Config"
 342
 343 new wx:InputText Box161
 344   set Box161.Title "BaseDir:"
 345
 346 new wx:OutputText Box162
 347
 348 new wx:OutputText Box163
 349   set Box163.Title "User"
 350
 351 new std:ConcatStrings Box164
 352   set Box164.In2 "/"
 353
 354 new std:ConcatStrings Box165
 355
 356
 357 connect Box06.Out Box05.In
 358
 359 connect Box11.Out Box06.In1
 360
 361 connect Box11.Out Box10.In1
 362
 363 connect Box10.Out Box12.In2
 364
 365 connect Box12.Out Box09.In
 366
 367 connect Box18.BoxChange Box19.BoxExecute
 368
 369 connect Box21.BoxChange Box22.BoxExecute
 370
 371 connect Box26.BoxChange Box27.BoxExecute
 372
 373 connect Box29.BoxChange Box30.BoxExecute
 374
 375 connect Box00.Widget Box33.Widget1
 376
 377 connect Box26.Widget Box32.Widget3
 378
 379 connect Box35.Widget Box32.Widget1
 380
 381 connect Box39.BoxChange Box43.BoxExecute
 382
 383 connect Box45.Out Box22.In
 384
 385 connect Box47.SystemType Box45.In
 386
 387 connect Box47.SystemType Box50.In
 388
 389 connect Box51.Out Box50.In1
 390
 391 connect Box50.Out Box07.In
 392
 393 connect Box52.Out Box45.In1
 394
 395 connect Box53.Out Box43.In
 396
 397 connect Box54.Out Box53.In1
 398
 399 connect Box56.Out Box55.In1
 400
 401 connect Box20.Out Box55.In0
 402
 403 connect Box55.Out Box19.In
 404
 405 connect Box20.Out Box56.In2
 406
 407 connect Box47.SystemType Box55.In
 408
 409 connect Box47.SystemType Box53.In
 410
 411 connect Box58.Out Box57.In1
 412
 413 connect Box31.Out Box57.In0
 414
 415 connect Box57.Out Box30.In
 416
 417 connect Box31.Out Box58.In2
 418
 419 connect Box47.SystemType Box57.In
 420
 421 connect Box62.Out Box61.In1
 422
 423 connect Box61.Out Box27.In
 424
 425 connect Box28.Out Box62.In2
 426
 427 connect Box28.Out Box61.In0
 428
 429 connect Box47.SystemType Box61.In
 430
 431 connect Box63.BoxChange Box64.BoxExecute
 432
 433 connect Box67.Out Box66.In1
 434
 435 connect Box65.Out Box66.In0
 436
 437 connect Box66.Out Box64.In
 438
 439 connect Box65.Out Box67.In2
 440
 441 connect Box47.SystemType Box66.In
 442
 443 connect Box05.OutSimple Box73.In3
 444
 445 connect Box84.BoxChange Box85.BoxExecute
 446
 447 connect Box88.Out Box87.In1
 448
 449 connect Box86.Out Box87.In0
 450
 451 connect Box87.Out Box85.In
 452
 453 connect Box86.Out Box88.In2
 454
 455 connect Box29.Widget Box89.Widget1
 456
 457 connect Box63.Widget Box89.Widget2
 458
 459 connect Box21.Widget Box00.Widget5
 460
 461 connect Box01.Widget Box00.Widget4
 462
 463 connect Box91.BoxChange Box92.BoxExecute
 464
 465 connect Box93.Out Box94.In0
 466
 467 connect Box93.Out Box95.In2
 468
 469 connect Box95.Out Box94.In1
 470
 471 connect Box99.Widget Box97.Widget1
 472
 473 connect Box32.Widget Box98.Widget1
 474
 475 connect Box102.BoxChange Box103.BoxExecute
 476
 477 connect Box105.Out Box103.In
 478
 479 connect Box03.Widget Box00.Widget3
 480
 481 connect Box90.Widget Box00.Widget2
 482
 483 connect Box91.Widget Box99.Widget3
 484
 485 connect Box108.Widget Box99.Widget1
 486
 487 connect Box11.Out Box93.In5
 488
 489 connect Box90.Out Box112.I
 490
 491 connect Box113.OutSimple Box114.In3
 492
 493 connect Box114.Out Box03.In
 494
 495 connect Box115.Widget Box00.Widget1
 496
 497 connect Box115.BoxChange Box05.BoxExecute
 498
 499 connect Box115.BoxChange Box90.BoxExecute
 500
 501 connect Box11.Out Box116.In2
 502
 503 connect Box03.OutString Box117.In3
 504
 505 connect Box117.Out Box118.In3
 506
 507 connect Box118.Out Box119.In3
 508
 509 connect Box119.Out Box50.In0
 510
 511 connect Box119.Out Box51.In2
 512
 513 connect Box01.BoxChange Box07.BoxExecute
 514
 515 connect Box116.Out Box118.In1
 516
 517 connect Box90.BoxChange Box120.BoxExecute
 518
 519 connect Box112.BoxChange Box120.In1
 520
 521 connect Box113.BoxChange Box120.In2
 522
 523 connect Box03.BoxChange Box120.In3
 524
 525 connect Box50.BoxChange Box120.In5
 526
 527 connect Box118.Out Box121.In3
 528
 529 connect Box121.Out Box52.In2
 530
 531 connect Box121.Out Box45.In0
 532
 533 connect Box122.Out Box54.In2
 534
 535 connect Box122.Out Box53.In0
 536
 537 connect Box118.Out Box122.In3
 538
 539 connect Box118.Out Box20.In3
 540
 541 connect Box118.Out Box31.In3
 542
 543 connect Box118.Out Box65.In3
 544
 545 connect Box118.Out Box86.In3
 546
 547 connect Box47.SystemType Box105.In
 548
 549 connect Box90.OutString Box86.In5
 550
 551 connect Box124.BoxChange Box125.BoxExecute
 552
 553 connect Box102.Widget Box32.Widget6
 554
 555 connect Box124.Widget Box32.Widget4
 556
 557 connect Box127.Out Box126.In0
 558
 559 connect Box11.Out Box128.In1
 560
 561 connect Box129.Out Box126.In1
 562
 563 connect Box47.SystemType Box126.In
 564
 565 connect Box130.Out Box131.In
 566
 567 connect Box128.Out Box130.In
 568
 569 connect Box131.Out Box129.In2
 570
 571 connect Box131.Out Box127.In2
 572
 573 connect Box133.FileSeparator Box131.Replace
 574
 575 connect Box126.Out Box125.In
 576
 577 connect Box139.SystemType Box94.In
 578
 579 connect Box94.Out Box92.In
 580
 581 connect Box97.Widget Box135.BoxContent
 582
 583 connect Box33.Widget Box136.BoxContent
 584
 585 connect Box98.Widget Box137.BoxContent
 586
 587 connect Box05.Out Box141.In3
 588
 589 connect Box141.Out Box112.In
 590
 591 connect Box112.Out Box142.In1
 592
 593 connect Box142.Out Box113.In
 594
 595 connect Box143.Out Box118.In2
 596
 597 connect Box146.Out Box126.In2
 598
 599 connect Box131.Out Box146.In2
 600
 601 connect Box119.Out Box50.In2
 602
 603 connect Box121.Out Box45.In2
 604
 605 connect Box93.Out Box94.In2
 606
 607 connect Box145.Out Box147.In
 608
 609 connect Box90.OutString Box147.Replace
 610
 611 connect Box147.Out Box148.In
 612
 613 connect Box03.OutString Box148.Replace
 614
 615 connect Box148.Out Box149.In
 616
 617 connect Box149.Out Box128.In3
 618
 619 connect Box39.Widget Box00.Widget6
 620
 621 connect Box18.Widget Box00.Widget7
 622
 623 connect Box122.Out Box53.In2
 624
 625 connect Box20.Out Box55.In2
 626
 627 connect Box135.Widget Box150.Widget2
 628
 629 connect Box136.Widget Box150.Widget4
 630
 631 connect Box137.Widget Box150.Widget6
 632
 633
 634 connect Box151.Out Box152.In3
 635
 636 connect Box65.Out Box66.In2
 637
 638 connect Box31.Out Box57.In2
 639
 640 connect Box89.Widget Box00.Widget9
 641
 642 connect Box84.Widget Box00.Widget8
 643
 644 connect Box153.Out Box154.In3
 645
 646 connect Box153.Out Box155.In3
 647
 648 connect Box153.Out Box156.In3
 649
 650 connect Box154.Out Box105.In0
 651
 652 connect Box155.Out Box105.In1
 653
 654 connect Box156.Out Box105.In2
 655
 656 connect Box28.Out Box61.In2
 657
 658 connect Box151.Out Box157.In2
 659
 660 connect Box157.Out Box118.In4
 661
 662 connect Box157.Out Box93.In7
 663
 664 connect Box116.Out Box28.In2
 665
 666 connect Box73.Out Box90.In
 667
 668 connect Box143.Out Box28.In3
 669
 670 connect Box90.OutString Box143.In2
 671
 672 connect Box152.Out Box158.WinTitle
 673
 674 connect Box150.Widget Box159.Widget1
 675
 676 connect Box161.Widget Box160.Widget2
 677
 678 connect Box162.Widget Box160.Widget1
 679
 680 connect Box159.Widget Box158.Widget2
 681
 682 connect Box160.Widget Box159.Widget2
 683
 684 connect Box163.Widget Box160.Widget3
 685
 686 connect Box151.Out Box163.In
 687
 688 connect Box161.Out Box11.In1
 689
 690 connect Box164.Out Box161.In
 691
 692
 693 connect Box165.Out Box164.In1
 694
 695
 696
 697 # Complex input ports
 698 input creaUser Box151.In1 " "
 699 input BaseDir Box165.In1 " "
 700 exec Box09
 701 exec Box158