1 # ----------------------------------
2 # - BBTKGEditor v 1.4 BBS BlackBox Script
3 # - /tmpEED/creaTools/creatools_source/creaVtk/bbtk_creaVtk_PKG/bbs/appli/exampleGetCameraInfo.bbs
4 # ----------------------------------
7 # ----------------------
11 include creaMaracasVisu
17 description "Description ??"
20 new creaMaracasVisu:ViewerNV Box00
22 new wx:LayoutSplit Box01
23 set Box01.Orientation "H"
25 new wx:LayoutLine Box02
27 new wx:OutputText Box03
28 set Box03.Title "FocalPoint"
30 new creaVtk:GetCameraInfo Box04
32 new wx:OutputText Box05
33 set Box05.Title "Position"
35 new wx:OutputText Box06
36 set Box06.Title "ViewUp"
38 new vtk:LoadHola Box07
40 new wx:CommandButton Box08
41 set Box08.In "Refresh"
44 connect Box00.Widget Box01.Widget2
46 connect Box02.Widget Box01.Widget1
48 connect Box06.Widget Box02.Widget3
50 connect Box05.Widget Box02.Widget2
52 connect Box03.Widget Box02.Widget1
54 connect Box00.Renderer1 Box04.vtkRenderer
56 connect Box04.FocalPoint Box03.In
58 connect Box04.Position Box05.In
60 connect Box04.ViewUp Box06.In
62 connect Box07.Out Box00.In
64 connect Box08.Widget Box02.Widget4
66 connect Box08.BoxChange Box03.BoxExecute
68 connect Box08.BoxChange Box05.BoxExecute
70 connect Box08.BoxChange Box06.BoxExecute
72 connect Box08.BoxChange Box04.BoxExecute