1 # ----------------------------------
2 # - BBTKGEditor v 1.5 BBS BlackBox Script (Complex Box)
3 # - /home/garzon/Creatis/C23/creatools_source/creaMaracasVisu/bbtk/bbs/boxes/Mesh_tool_ApplyCut.bbs
4 # ----------------------------------
8 include creaMaracasVisu
14 define Mesh_tool_ApplyCut creaMaracasVisu
16 author "info-dev@creatis.insa-lyon.fr"
17 description "Show N Points"
21 new creaMaracasVisu:ShowNPoints showNpoints
22 set showNpoints.Radio "2"
23 set showNpoints.Type "4"
24 set showNpoints.WinTitle "1.1 Splines"
26 new creaVtk:CreateMeshFromPoints Box04
27 set Box04.CloseSurface "true"
29 new creaMaracasVisu:ManualContourModel_Box Box06
30 set Box06.DoubleContour "1"
31 set Box06.NbPoints "100"
32 set Box06.OpenClose "true"
33 set Box06.OpenClose2 "false"
35 new wx:LayoutLine Box08
37 new vtk:UpdateRender Box11
38 set Box11.Active "true"
40 new creaMaracasVisu:DrawAxisTree3D Box30
41 set Box30.Colour "0 0 1"
42 set Box30.LineWidth "2"
44 new std:MultipleInputs Box31
46 new creaMaracasVisu:ManualContourModel_Box Box29
47 set Box29.NbPoints "40"
48 set Box29.OpenClose "true"
49 set Box29.OpenClose2 "false"
51 new creaMaracasVisu:wxPopupMenu Box57
52 set Box57.WithCtrlKey "true"
54 new std:AddStringToVector Box58
55 set Box58.In0 "+ Add point"
56 set Box58.In1 "(+) Insert point"
57 set Box58.In2 "Track point"
58 set Box58.In3 "Set Nearest point"
59 set Box58.In4 "- Erase point"
60 set Box58.In5 "-- Delete all points"
61 set Box58.In6 "----------------------"
62 set Box58.In7 "+> Insert group after"
63 set Box58.In8 "- Delete group"
64 set Box58.In9 "Tool - Inverse Normals"
66 new creaMaracasVisu:ShowNPoints_Tools Box60
68 new vtk:ImageVtkProperties Box68
70 new std:VectorFilterDouble Box70
73 new creaVtk:BooleanOperationPolyDataFilter Box77
74 set Box77.BoxProcessMode "Manual"
75 set Box77.ReorientDifferenceCells "false"
78 set Box78.In "Union Intersection Difference"
80 new wx:LayoutLine Box79
81 set Box79.Orientation "H"
82 set Box79.WinTitle "New Surface ( Magenta = Red+Yellow )"
84 new wx:CommandButton Box80
85 set Box80.Label "Refresh"
87 new std:MagicBox Box66
89 new std:MagicBox Box67
91 new creaMaracasVisu:PolyDataToActor_Widget Box48
93 new vtk:vtkImageDataPointerRelay Box35
97 set Box34.Label "true"
100 set Box34.ReactiveOnTrack "true"
101 set Box34.Title "Splines Opacity"
106 new creaMaracasVisu:PolyDataToActor_Widget Box37
107 set Box37.color "0 1 1"
108 set Box37.meshOpacity "100"
110 new wx:LayoutLine Box38
111 set Box38.Orientation "H"
112 set Box38.WinTitle "Interpolated Surface (Yellow)"
114 new wx:LayoutTab Box39
116 new wx:LayoutTab Box40
118 new wx:CommandButton Box42
119 set Box42.Label "Apply (Magenta->To Red)"
121 new wx:CommandButton Box43
122 set Box43.Label "Reset Tool"
124 new wx:LayoutLine Box44
125 set Box44.Orientation "V"
126 set Box44.WinTitle "1.2 Mesh Action"
128 new creaVtk:MeshManager_tool Box45
131 new std:MagicBox Box46
133 new wx:ComboBox Box49
134 set Box49.In "25 50 100 150"
135 set Box49.Selection "1"
136 set Box49.Title "Number of Points"
138 new wx:LayoutLine Box50
139 set Box50.Orientation "V"
140 set Box50.WinTitle "Config"
142 new std:MultipleInputs Box51
144 new creaMaracasVisu:ShowNPoints_Tools Box52
147 new std:MultipleInputs Box53
149 new std:MultipleInputs Box55
151 new creaMaracasVisu:MeshContours_Widget Box62
152 set Box62.colorMesh "1 1 0"
154 new std:MagicBox Box63
156 new std:MagicBox Box64
158 new std:MagicBox Box65
160 new std:MagicBox Box69
162 new std:MagicBox Box71
164 new creaMaracasVisu:MeshContours_Widget Box72
165 set Box72.colorMesh "0 1 1"
167 new wx:LayoutLine Box81
168 set Box81.WinTitle "Step 1. Surface"
170 new wx:LayoutTab Box82
172 new wx:OutputText Box84
174 new wx:LayoutTab Box86
176 new creaVtk:MeshManager Box92
178 new creaVtk:MeshManager_tool Box93
181 new std:MagicBox Box94
183 new creaMaracasVisu:wxVtkBaseView_Info Box96
185 new creaVtk:PolyDataNormals Box97
187 new wx:LayoutLine Box98
188 set Box98.Orientation "H"
190 new std:AddStringToVector Box99
191 set Box99.In0 "Auto Add Points (Start/Stop)"
193 new std:VectorFilterString Box100
194 set Box100.In0 "0 1 2 3 4 5 6 7 8 9 10"
195 set Box100.In1 "1 5 10 20 30 40 50 0 100 110 210"
198 new std:ConcatStrings Box101
200 new wx:CheckBox Box103
201 set Box103.In "false"
202 set Box103.ReactiveOnKeystroke "true"
203 set Box103.Title "Show Normals"
205 new creaVtk:GlyphPolyDataNormals Box104
206 set Box104.MaskRatio "2"
207 set Box104.Opacity "1"
210 new creaVtk:PolyDataNormals Box105
212 new std:AddStringToVector Box113
214 new std:ConcatStrings Box114
217 new std:ConcatStrings Box115
220 new wx:CommandButton Box116
223 new wx:CommandButton Box117
226 new creaMaracasVisu:ShowNPoints_Tools Box118
227 set Box118.BoxProcessMode "Manual"
228 set Box118.Type "320"
230 new creaMaracasVisu:ShowNPoints_Tools Box119
231 set Box119.BoxProcessMode "Manual"
232 set Box119.Type "320"
234 new wx:LayoutLine Box120
235 set Box120.Orientation "H"
237 new std:GetVectorDoubleSubVector Box121
238 set Box121.ErrorValue "0"
242 new std:ConcatStrings Box123
245 new std:ConcatStrings Box124
248 new wx:CommandButton Box125
251 new wx:CommandButton Box126
254 new creaMaracasVisu:ShowNPoints_Tools Box127
255 set Box127.BoxProcessMode "Manual"
256 set Box127.Type "330"
258 new creaMaracasVisu:ShowNPoints_Tools Box128
259 set Box128.BoxProcessMode "Manual"
260 set Box128.Type "330"
262 new std:GetVectorDoubleSubVector Box130
263 set Box130.ErrorValue "0"
267 new wx:LayoutLine Box131
268 set Box131.Orientation "H"
270 new wx:OutputText Box132
271 set Box132.In "Expand area"
273 new wx:OutputText Box133
274 set Box133.In "Widen"
276 new wx:LayoutLine Box135
277 set Box135.WinTitle "Flat surface"
279 new wx:CommandButton Box136
280 set Box136.Label "Execute"
282 new wx:OutputText Box138
283 set Box138.In "Expand"
285 new std:ConcatStrings Box139
288 new std:ConcatStrings Box140
291 new wx:CommandButton Box141
294 new wx:CommandButton Box142
297 new creaMaracasVisu:ShowNPoints_Tools Box143
298 set Box143.BoxProcessMode "Manual"
299 set Box143.Type "320"
301 new creaMaracasVisu:ShowNPoints_Tools Box144
302 set Box144.BoxProcessMode "Manual"
303 set Box144.Type "320"
305 new wx:LayoutLine Box145
306 set Box145.Orientation "H"
308 new std:GetVectorDoubleSubVector Box146
309 set Box146.ErrorValue "0"
313 new creaMaracasVisu:ShowNPoints_Tools Box147
315 new wx:LayoutLine Box148
316 set Box148.WinTitle "Volume"
318 new wx:CommandButton Box149
319 set Box149.Label "Execute"
321 new creaMaracasVisu:ShowNPoints_Tools Box159
322 set Box159.Type "310"
324 new wx:OutputText Box161
325 set Box161.In "Increase width"
327 new std:ConcatStrings Box162
330 new std:ConcatStrings Box163
333 new wx:CommandButton Box164
336 new wx:CommandButton Box165
339 new creaMaracasVisu:ShowNPoints_Tools Box166
340 set Box166.BoxProcessMode "Manual"
341 set Box166.Type "330"
343 new creaMaracasVisu:ShowNPoints_Tools Box167
344 set Box167.BoxProcessMode "Manual"
345 set Box167.Type "330"
347 new wx:LayoutLine Box168
348 set Box168.Orientation "H"
350 new std:GetVectorDoubleSubVector Box169
351 set Box169.ErrorValue "0"
355 new wx:LayoutTab Box184
356 set Box184.WinTitle "Tool"
358 new std:StringSelect Box185
359 set Box185.In0 "true"
360 set Box185.In1 "true"
361 set Box185.In2 "false"
363 new wx:LayoutLine Box187
364 set Box187.WinTitle "Patch"
366 new wx:OutputText Box188
367 set Box188.In "Move center point"
369 new std:ConcatStrings Box189
372 new std:ConcatStrings Box190
375 new wx:CommandButton Box191
378 new wx:CommandButton Box192
381 new creaMaracasVisu:ShowNPoints_Tools Box193
382 set Box193.BoxProcessMode "Manual"
383 set Box193.Type "220"
385 new creaMaracasVisu:ShowNPoints_Tools Box194
386 set Box194.BoxProcessMode "Manual"
387 set Box194.Type "220"
389 new wx:LayoutLine Box195
390 set Box195.Orientation "H"
392 new std:GetVectorDoubleSubVector Box197
393 set Box197.ErrorValue "0"
397 new wx:OutputText Box198
398 set Box198.In "Expand"
400 new std:ConcatStrings Box199
403 new std:ConcatStrings Box200
406 new wx:CommandButton Box201
409 new wx:CommandButton Box202
412 new creaMaracasVisu:ShowNPoints_Tools Box203
413 set Box203.BoxProcessMode "Manual"
414 set Box203.Type "340"
416 new creaMaracasVisu:ShowNPoints_Tools Box204
417 set Box204.BoxProcessMode "Manual"
418 set Box204.Type "340"
420 new wx:LayoutLine Box205
421 set Box205.Orientation "H"
423 new std:GetVectorDoubleSubVector Box206
424 set Box206.ErrorValue "0"
428 new wx:CommandButton Box207
429 set Box207.Label "Execute"
431 new creaMaracasVisu:ShowNPoints_Tools Box208
432 set Box208.Type "200"
434 new wx:OutputText Box210
435 set Box210.In "Expand"
437 new std:ConcatStrings Box211
440 new std:ConcatStrings Box212
443 new wx:CommandButton Box213
446 new wx:CommandButton Box214
449 new creaMaracasVisu:ShowNPoints_Tools Box215
450 set Box215.BoxProcessMode "Manual"
451 set Box215.Type "320"
453 new creaMaracasVisu:ShowNPoints_Tools Box216
454 set Box216.BoxProcessMode "Manual"
455 set Box216.Type "320"
457 new wx:LayoutLine Box217
458 set Box217.Orientation "H"
460 new std:GetVectorDoubleSubVector Box218
461 set Box218.ErrorValue "0"
465 new std:ConcatStrings Box227
469 connect Box06.LstContourPointsX Box04.LstX
470 connect showNpoints.lstIndexs Box06.LstIndexsIn
471 connect Box06.LstContourPointsY Box04.LstY
472 connect Box06.LstContourPointsZ Box04.LstZ
473 connect Box06.LstIndexsOut Box04.LstIndexs
474 connect Box30.BoxChange Box31.In4
475 connect showNpoints.lstIndexs Box29.LstIndexsIn
476 connect Box29.LstContourPointsX Box30.lstPointX
477 connect Box29.LstContourPointsY Box30.lstPointY
478 connect Box29.LstContourPointsZ Box30.lstPointZ
479 connect Box29.LstIndexsOut Box30.lstIndexs
480 connect Box31.BoxChange Box11.BoxExecute
481 connect showNpoints.WidgetShowNPoints Box60.WidgetShowNPoints
482 connect Box57.BoxChange Box60.BoxExecute
483 connect Box68.Spacing Box60.Spacing
484 connect showNpoints.lstPointsX Box70.In0
485 connect showNpoints.lstPointsY Box70.In1
486 connect showNpoints.lstPointsZ Box70.In2
487 connect Box70.Out0 Box06.LstControlPointsX
488 connect Box70.Out1 Box06.LstControlPointsY
489 connect Box70.Out2 Box06.LstControlPointsZ
490 connect Box70.Out0 Box29.LstControlPointsX
491 connect Box70.Out1 Box29.LstControlPointsY
492 connect Box70.Out2 Box29.LstControlPointsZ
493 connect Box78.Out Box77.Operation
494 connect Box66.Out Box11.Renderer
495 connect Box66.Out Box30.Renderer
496 connect Box66.Out showNpoints.Renderer
497 connect Box67.Out Box77.In1
498 connect Box04.Out Box48.polydata
499 connect Box66.Out Box48.render
500 connect showNpoints.BoxChange Box31.BoxExecute
501 connect Box48.boxchange Box31.In1
502 connect Box35.Out Box68.In
503 connect Box68.Spacing Box70.k1
504 connect Box35.Out showNpoints.Image
505 connect Box34.Out Box36.In1
506 connect Box36.Out Box30.Opacity
507 connect Box34.BoxChange Box31.In2
508 connect Box66.Out Box37.render
509 connect Box38.Widget Box39.Widget2
510 connect Box79.Widget Box40.Widget2
511 connect Box46.Out Box45.MeshManagerModel
512 connect Box49.OutString Box06.NbPoints
513 connect Box42.BoxChange Box51.BoxExecute
514 connect Box45.BoxChange Box51.In2
515 connect Box52.BoxChange Box51.In4
516 connect showNpoints.WidgetShowNPoints Box52.WidgetShowNPoints
517 connect Box80.BoxChange Box53.In2
518 connect Box53.BoxChange Box77.BoxExecute
519 connect Box42.BoxChange Box53.In3
520 connect Box43.BoxChange Box55.BoxExecute
521 connect Box52.BoxChange Box55.In2
522 connect Box43.BoxChange Box53.In6
523 connect Box63.BoxChange showNpoints.BoxExecute
524 connect Box63.BoxChange Box62._execute
525 connect Box64.Out Box57.wxVtkBaseView2
526 connect Box64.Out Box62._wxvtkbaseview2D1
527 connect Box65.Out Box57.wxVtkBaseView3
528 connect Box65.Out Box62._wxvtkbaseview2D2
529 connect Box69.Out Box57.wxVtkBaseView4
530 connect Box69.Out Box62._wxvtkbaseview2D3
531 connect Box71.Out Box57.wxVtkBaseView
532 connect Box71.Out Box62._wxvtkbaseview3D1
533 connect Box04.Out Box62._polydata
534 connect Box71.Out Box72._wxvtkbaseview3D1
535 connect Box64.Out Box72._wxvtkbaseview2D1
536 connect Box65.Out Box72._wxvtkbaseview2D2
537 connect Box69.Out Box72._wxvtkbaseview2D3
538 connect Box72._widget Box79.Widget6
539 connect Box62._widget Box38.Widget7
540 connect Box39.Widget Box81.Widget2
541 connect Box40.Widget Box81.Widget4
542 connect Box44.Widget Box82.Widget2
543 connect Box82.Widget Box79.Widget2
544 connect Box84.Widget Box44.Widget9
545 connect Box86.Widget Box38.Widget2
546 connect Box50.Widget Box86.Widget4
547 connect showNpoints.Widget Box86.Widget2
548 connect Box49.Widget Box50.Widget2
549 connect Box34.Widget Box50.Widget4
550 connect Box57.BoxChange Box08.BoxExecute
551 connect Box92.MeshManagerModel Box93.MeshManagerModel
552 connect Box92.MeshBase Box72._polydata
553 connect Box92.MeshBase Box37.polydata
554 connect Box37.boxchange Box72._execute
555 connect Box81.Widget Box08.Widget2
556 connect Box42.Widget Box44.Widget6
557 connect Box94.BoxChange Box37.boxexecute
558 connect Box77.BoxChange Box94.BoxExecute
559 connect Box71.Out Box96.wxVtkBaseView
560 connect Box96.vtkRenderer Box66.In
561 connect Box37.widget Box79.Widget7
562 connect Box48.widget Box38.Widget8
563 connect Box77.Out Box97.In
564 connect Box43.Widget Box44.Widget1
565 connect Box78.Widget Box98.Widget2
566 connect Box80.Widget Box98.Widget4
567 connect Box98.Widget Box44.Widget3
568 connect Box99.Out Box58.StringVector
569 connect Box100.Out1 Box101.In1
570 connect Box101.Out Box60.Type
571 connect Box57.Out Box100.sk1
572 connect Box103.Out Box104.Active
573 connect Box66.Out Box104.Renderer
574 connect Box103.BoxChange Box104.BoxExecute
575 connect Box104.BoxChange Box31.In6
576 connect Box04.Out Box105.In
577 connect Box105.Out Box104.In
578 connect Box58.Out Box113.StringVector
579 connect Box113.Out Box57.In
580 connect Box67.Out Box60.Mesh
581 connect Box117.BoxChange Box119.BoxExecute
582 connect Box116.BoxChange Box118.BoxExecute
583 connect Box114.Out Box118.Params
584 connect Box115.Out Box119.Params
585 connect showNpoints.WidgetShowNPoints Box119.WidgetShowNPoints
586 connect showNpoints.WidgetShowNPoints Box118.WidgetShowNPoints
587 connect Box116.Widget Box120.Widget1
588 connect Box117.Widget Box120.Widget3
589 connect Box121.Out Box114.In1
590 connect Box121.Out Box115.In1
591 connect Box126.BoxChange Box128.BoxExecute
592 connect Box125.BoxChange Box127.BoxExecute
593 connect Box123.Out Box127.Params
594 connect Box124.Out Box128.Params
595 connect Box130.Out Box123.In1
596 connect Box130.Out Box124.In1
597 connect showNpoints.WidgetShowNPoints Box128.WidgetShowNPoints
598 connect showNpoints.WidgetShowNPoints Box127.WidgetShowNPoints
599 connect Box125.Widget Box131.Widget1
600 connect Box126.Widget Box131.Widget3
601 connect Box103.Widget Box50.Widget5
602 connect Box60.Out Box130.In
603 connect Box60.Out Box121.In
604 connect Box77.Out Box93.Mesh
605 connect Box77.BoxChange Box93.BoxExecute
606 connect Box105.Out Box77.In2
607 connect Box77.Out Box45.Mesh
608 connect Box138.Widget Box135.Widget4
609 connect Box142.BoxChange Box144.BoxExecute
610 connect Box141.BoxChange Box143.BoxExecute
611 connect Box139.Out Box143.Params
612 connect Box140.Out Box144.Params
613 connect Box146.Out Box139.In1
614 connect Box146.Out Box140.In1
615 connect Box145.Widget Box135.Widget6
616 connect Box136.BoxChange Box147.BoxExecute
617 connect showNpoints.WidgetShowNPoints Box147.WidgetShowNPoints
618 connect Box68.Spacing Box147.Spacing
619 connect Box67.Out Box147.Mesh
620 connect showNpoints.WidgetShowNPoints Box144.WidgetShowNPoints
621 connect showNpoints.WidgetShowNPoints Box143.WidgetShowNPoints
622 connect Box149.BoxChange Box159.BoxExecute
623 connect Box68.Spacing Box159.Spacing
624 connect Box165.BoxChange Box167.BoxExecute
625 connect Box164.BoxChange Box166.BoxExecute
626 connect Box162.Out Box166.Params
627 connect Box163.Out Box167.Params
628 connect Box169.Out Box162.In1
629 connect Box169.Out Box163.In1
630 connect showNpoints.WidgetShowNPoints Box159.WidgetShowNPoints
631 connect showNpoints.WidgetShowNPoints Box166.WidgetShowNPoints
632 connect showNpoints.WidgetShowNPoints Box167.WidgetShowNPoints
633 connect Box168.Widget Box148.Widget8
634 connect Box161.Widget Box148.Widget7
635 connect Box141.Widget Box145.Widget3
636 connect Box142.Widget Box145.Widget4
637 connect Box164.Widget Box168.Widget3
638 connect Box165.Widget Box168.Widget4
639 connect Box136.Widget Box135.Widget2
640 connect Box135.Widget Box184.Widget2
641 connect Box148.Widget Box184.Widget4
642 connect Box184.Widget Box86.Widget6
643 connect Box184.Selection Box185.In
644 connect Box185.Out Box04.CloseSurface
645 connect Box185.Out Box06.OpenClose
646 connect Box147.Out Box146.In
647 connect Box192.BoxChange Box194.BoxExecute
648 connect Box191.BoxChange Box193.BoxExecute
649 connect Box189.Out Box193.Params
650 connect Box190.Out Box194.Params
651 connect Box195.Widget Box187.Widget8
652 connect Box188.Widget Box187.Widget7
653 connect Box191.Widget Box195.Widget3
654 connect Box192.Widget Box195.Widget4
655 connect Box187.Widget Box184.Widget6
656 connect showNpoints.WidgetShowNPoints Box194.WidgetShowNPoints
657 connect showNpoints.WidgetShowNPoints Box193.WidgetShowNPoints
658 connect Box197.Out Box189.In1
659 connect Box197.Out Box190.In1
660 connect Box202.BoxChange Box204.BoxExecute
661 connect Box201.BoxChange Box203.BoxExecute
662 connect Box199.Out Box203.Params
663 connect Box200.Out Box204.Params
664 connect Box201.Widget Box205.Widget3
665 connect Box202.Widget Box205.Widget4
666 connect Box206.Out Box199.In1
667 connect Box206.Out Box200.In1
668 connect Box205.Widget Box187.Widget5
669 connect Box198.Widget Box187.Widget4
670 connect showNpoints.WidgetShowNPoints Box204.WidgetShowNPoints
671 connect showNpoints.WidgetShowNPoints Box203.WidgetShowNPoints
672 connect Box149.Widget Box148.Widget1
673 connect Box159.Out Box169.In
674 connect Box207.BoxChange Box208.BoxExecute
675 connect Box208.Out Box197.In
676 connect Box208.Out Box206.In
677 connect Box214.BoxChange Box216.BoxExecute
678 connect Box213.BoxChange Box215.BoxExecute
679 connect Box211.Out Box215.Params
680 connect Box212.Out Box216.Params
681 connect Box218.Out Box211.In1
682 connect Box218.Out Box212.In1
683 connect Box213.Widget Box217.Widget3
684 connect Box214.Widget Box217.Widget4
685 connect Box159.Out Box218.In
686 connect Box217.Widget Box148.Widget5
687 connect Box210.Widget Box148.Widget4
688 connect showNpoints.WidgetShowNPoints Box215.WidgetShowNPoints
689 connect showNpoints.WidgetShowNPoints Box216.WidgetShowNPoints
690 connect showNpoints.WidgetShowNPoints Box208.WidgetShowNPoints
691 connect Box207.Widget Box187.Widget1
692 connect Box67.Out Box208.Mesh
693 connect Box68.Spacing Box208.Spacing
694 connect Box67.Out Box159.Mesh
695 connect Box227.Out Box147.Type
696 connect Box136.BoxChange Box227.BoxExecute
698 # Complex input ports
699 input point showNpoints.In " "
700 input mesh Box67.In " "
701 input image Box35.In " "
702 input title Box08.WinTitle " "
703 input meshmanagermodel Box46.In " "
704 input boxChange Box63.In " "
705 input wxvtkbaseview2 Box64.In " "
706 input wxvtkbaseview3 Box65.In " "
707 input wxvtkbaseview4 Box69.In " "
708 input wxvtkbaseview1 Box71.In " "
710 # Complex output ports
711 output widget Box08.Widget " "
712 output interactorStyleMaracas Box57.InteractorStyleMaracas " "
713 output interactorStyleMaracas3 Box57.InteractorStyleMaracas3 " "
714 output interactorStyleMaracas4 Box57.InteractorStyleMaracas4 " "
715 output interactorStyleMaracas2 Box57.InteractorStyleMaracas2 " "