]>
Commit | Line | Data |
---|---|---|
3aff0c2e | 1 | void geom_gentle_tpc(Bool_t register_as_global=kTRUE) |
2 | { | |
3 | TFile f("$ALICE_ROOT/EVE/alice-data/gentle_geo.root"); | |
4 | TEveGeoShapeExtract* gse = (TEveGeoShapeExtract*) f.Get("Gentle"); | |
5 | TEveGeoShape* gsre1 = TEveGeoShape::ImportShapeExtract(gse); | |
6 | f.Close(); | |
7 | ||
8 | if (register_as_global) | |
9 | { | |
10 | gEve->AddGlobalElement(gsre1); | |
11 | ||
12 | } | |
13 | ||
14 | // Fix visibility, color and transparency | |
15 | ||
16 | gsre1->SetRnrSelf(kFALSE); | |
17 | TEveElement::List_i i = gsre1->BeginChildren(); | |
18 | ||
19 | //ITS | |
20 | ||
21 | TEveGeoShape* lvl1 = (TEveGeoShape*) *i; | |
22 | lvl1->SetRnrSelf(kFALSE); | |
23 | TEveElement::List_i j = lvl1->BeginChildren(); | |
24 | ||
25 | TEveGeoShape* lvl2 = (TEveGeoShape*) *j; | |
26 | lvl2->SetRnrSelf(kFALSE); | |
27 | TEveElement::List_i k = lvl2->BeginChildren(); | |
28 | ||
29 | TEveGeoShape* its1 = (TEveGeoShape*) *k; | |
30 | its1->SetRnrSelf(kTRUE); | |
31 | its1->SetMainColor(kRed); | |
32 | k++; | |
33 | ||
34 | TEveGeoShape* its2 = (TEveGeoShape*) *k; | |
35 | its2->SetRnrSelf(kTRUE); | |
36 | its2->SetMainColor(kRed+2); | |
37 | k++; | |
38 | ||
39 | TEveGeoShape* its3 = (TEveGeoShape*) *k; | |
40 | its3->SetRnrSelf(kTRUE); | |
41 | its3->SetMainColor(kRed+4); | |
42 | ||
43 | //TPC | |
44 | ||
45 | i++; | |
46 | ||
47 | TEveGeoShape* lvl1 = (TEveGeoShape*) *i; | |
48 | lvl1->SetRnrSelf(kFALSE); | |
49 | TEveElement::List_i j = lvl1->BeginChildren(); | |
50 | ||
51 | TEveGeoShape* lvl2 = (TEveGeoShape*) *j; | |
52 | lvl2->SetRnrSelf(kFALSE); | |
53 | TEveElement::List_i k = lvl2->BeginChildren(); | |
54 | ||
55 | TEveGeoShape* lvl3 = (TEveGeoShape*) *k; | |
56 | lvl3->SetRnrSelf(kTRUE); | |
57 | lvl3->SetMainColor(kBlue); | |
58 | TEveElement::List_i l = lvl3->BeginChildren(); | |
59 | ||
60 | TEveGeoShape* lvl4 = (TEveGeoShape*) *l; | |
61 | lvl4->SetRnrSelf(kFALSE); | |
62 | TEveElement::List_i m = lvl4->BeginChildren(); | |
63 | ||
64 | TEveGeoShape* tpc1 = (TEveGeoShape*) *m; | |
65 | tpc1->SetRnrSelf(kTRUE); | |
66 | tpc1->SetMainColor(kGray); | |
67 | m++; | |
68 | ||
69 | TEveGeoShape* tpc2 = (TEveGeoShape*) *m; | |
70 | tpc2->SetRnrSelf(kTRUE); | |
71 | tpc2->SetMainColor(kGray); | |
72 | m++; | |
73 | ||
74 | TEveGeoShape* tpc3 = (TEveGeoShape*) *m; | |
75 | tpc3->SetRnrSelf(kTRUE); | |
76 | tpc3->SetMainColor(kGray); | |
77 | m++; | |
78 | ||
79 | //TRD+TOF | |
80 | ||
81 | i++; | |
82 | ||
83 | TEveGeoShape* lvl1 = (TEveGeoShape*) *i; | |
84 | lvl1->SetRnrSelf(kFALSE); | |
85 | ||
86 | for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++) | |
87 | { | |
88 | TEveGeoShape* lvl2 = (TEveGeoShape*) *j; | |
89 | lvl2->SetRnrSelf(kFALSE); | |
90 | ||
91 | } | |
92 | ||
93 | //PHOS | |
94 | ||
95 | i++; | |
96 | ||
97 | TEveGeoShape* lvl1 = (TEveGeoShape*) *i; | |
98 | lvl1->SetRnrSelf(kFALSE); | |
99 | ||
100 | for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++) | |
101 | { | |
102 | TEveGeoShape* lvl2 = (TEveGeoShape*) *j; | |
103 | lvl2->SetRnrSelf(kFALSE); | |
104 | } | |
105 | ||
106 | //HMPID | |
107 | ||
108 | i++; | |
109 | ||
110 | TEveGeoShape* lvl1 = (TEveGeoShape*) *i; | |
111 | lvl1->SetRnrSelf(kFALSE); | |
112 | ||
113 | for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++) | |
114 | { | |
115 | TEveGeoShape* lvl2 = (TEveGeoShape*) *j; | |
116 | lvl2->SetRnrSelf(kFALSE); | |
117 | } | |
118 | ||
119 | ||
120 | TFile f("$ALICE_ROOT/EVE/alice-data/gentle_rphi_geo.root"); | |
121 | TEveGeoShapeExtract* gse = (TEveGeoShapeExtract*) f.Get("Gentle"); | |
122 | TEveGeoShape* gsre2 = TEveGeoShape::ImportShapeExtract(gse); | |
123 | f.Close(); | |
124 | ||
125 | // Fix visibility, color and transparency | |
126 | ||
127 | gsre2->SetRnrSelf(kFALSE); | |
128 | TEveElement::List_i i = gsre2->BeginChildren(); | |
129 | ||
130 | //ITS | |
131 | ||
132 | TEveGeoShape* lvl1 = (TEveGeoShape*) *i; | |
133 | lvl1->SetRnrSelf(kFALSE); | |
134 | TEveElement::List_i j = lvl1->BeginChildren(); | |
135 | ||
136 | TEveGeoShape* lvl2 = (TEveGeoShape*) *j; | |
137 | lvl2->SetRnrSelf(kFALSE); | |
138 | TEveElement::List_i k = lvl2->BeginChildren(); | |
139 | ||
140 | TEveGeoShape* its1 = (TEveGeoShape*) *k; | |
141 | its1->SetRnrSelf(kTRUE); | |
142 | its1->SetMainColor(kRed); | |
143 | k++; | |
144 | ||
145 | TEveGeoShape* its2 = (TEveGeoShape*) *k; | |
146 | its2->SetRnrSelf(kTRUE); | |
147 | its2->SetMainColor(kRed+2); | |
148 | k++; | |
149 | ||
150 | TEveGeoShape* its3 = (TEveGeoShape*) *k; | |
151 | its3->SetRnrSelf(kTRUE); | |
152 | its3->SetMainColor(kRed+4); | |
153 | ||
154 | //TPC | |
155 | ||
156 | i++; | |
157 | i++; | |
158 | ||
159 | TEveGeoShape* lvl1 = (TEveGeoShape*) *i; | |
160 | lvl1->SetRnrSelf(kFALSE); | |
161 | ||
162 | for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++) | |
163 | { | |
164 | TEveGeoShape* lvl2 = (TEveGeoShape*) *j; | |
165 | lvl2->SetRnrSelf(kFALSE); | |
166 | ||
167 | } | |
168 | ||
169 | //PHOS | |
170 | ||
171 | i++; | |
172 | ||
173 | TEveGeoShape* lvl1 = (TEveGeoShape*) *i; | |
174 | lvl1->SetRnrSelf(kFALSE); | |
175 | ||
176 | for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++) | |
177 | { | |
178 | TEveGeoShape* lvl2 = (TEveGeoShape*) *j; | |
179 | lvl2->SetRnrSelf(kFALSE); | |
180 | } | |
181 | ||
182 | //HMPID | |
183 | ||
184 | i++; | |
185 | ||
186 | TEveGeoShape* lvl1 = (TEveGeoShape*) *i; | |
187 | lvl1->SetRnrSelf(kFALSE); | |
188 | ||
189 | for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++) | |
190 | { | |
191 | TEveGeoShape* lvl2 = (TEveGeoShape*) *j; | |
192 | lvl2->SetRnrSelf(kFALSE); | |
193 | } | |
194 | ||
195 | TFile f("$ALICE_ROOT/EVE/alice-data/gentle_rhoz_geo.root"); | |
196 | TEveGeoShapeExtract* gse = (TEveGeoShapeExtract*) f.Get("Gentle"); | |
197 | TEveGeoShape* gsre3 = TEveGeoShape::ImportShapeExtract(gse); | |
198 | f.Close(); | |
199 | ||
200 | // Fix visibility, color and transparency | |
201 | ||
202 | gsre3->SetRnrSelf(kFALSE); | |
203 | TEveElement::List_i i = gsre3->BeginChildren(); | |
204 | ||
205 | //ITS | |
206 | ||
207 | TEveGeoShape* lvl1 = (TEveGeoShape*) *i; | |
208 | lvl1->SetRnrSelf(kFALSE); | |
209 | TEveElement::List_i j = lvl1->BeginChildren(); | |
210 | ||
211 | TEveGeoShape* lvl2 = (TEveGeoShape*) *j; | |
212 | lvl2->SetRnrSelf(kFALSE); | |
213 | TEveElement::List_i k = lvl2->BeginChildren(); | |
214 | ||
215 | TEveGeoShape* its1 = (TEveGeoShape*) *k; | |
216 | its1->SetRnrSelf(kTRUE); | |
217 | its1->SetMainColor(kRed); | |
218 | k++; | |
219 | ||
220 | TEveGeoShape* its2 = (TEveGeoShape*) *k; | |
221 | its2->SetRnrSelf(kTRUE); | |
222 | its2->SetMainColor(kRed+2); | |
223 | k++; | |
224 | ||
225 | TEveGeoShape* its3 = (TEveGeoShape*) *k; | |
226 | its3->SetRnrSelf(kTRUE); | |
227 | its3->SetMainColor(kRed+4); | |
228 | ||
229 | //TPC | |
230 | ||
231 | i++; | |
232 | i++; | |
233 | ||
234 | TEveGeoShape* lvl1 = (TEveGeoShape*) *i; | |
235 | lvl1->SetRnrSelf(kFALSE); | |
236 | ||
237 | for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++) | |
238 | { | |
239 | TEveGeoShape* lvl2 = (TEveGeoShape*) *j; | |
240 | lvl2->SetRnrSelf(kFALSE); | |
241 | ||
242 | } | |
243 | ||
244 | //PHOS | |
245 | ||
246 | i++; | |
247 | ||
248 | TEveGeoShape* lvl1 = (TEveGeoShape*) *i; | |
249 | lvl1->SetRnrSelf(kFALSE); | |
250 | ||
251 | for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++) | |
252 | { | |
253 | TEveGeoShape* lvl2 = (TEveGeoShape*) *j; | |
254 | lvl2->SetRnrSelf(kFALSE); | |
255 | } | |
256 | ||
257 | //HMPID | |
258 | ||
259 | i++; | |
260 | ||
261 | TEveGeoShape* lvl1 = (TEveGeoShape*) *i; | |
262 | lvl1->SetRnrSelf(kFALSE); | |
263 | ||
264 | for (TEveElement::List_i j = lvl1->BeginChildren(); j != lvl1->EndChildren(); j++) | |
265 | { | |
266 | TEveGeoShape* lvl2 = (TEveGeoShape*) *j; | |
267 | lvl2->SetRnrSelf(kFALSE); | |
268 | } | |
269 | ||
270 | ||
271 | TEveElement* top = gEve->GetCurrentEvent(); | |
272 | ||
273 | AliEveMultiView *mv = AliEveMultiView::Instance(); | |
274 | ||
275 | mv->InitGeomGentle(gsre1, gsre2, gsre3); | |
276 | ||
277 | gEve->FullRedraw3D(kTRUE, kTRUE); | |
278 | ||
279 | } |