tutorials » geom

building.C

Go to the documentation of this file.
00001 #include "TGeoManager.h"
00002    
00003 void building() 
00004 {
00005   // Drawing a building where Dept. of Physics is, using ROOT geometry class.
00006   //
00007   // Author: Hyung Ju Lee (laccalus@nate.com), Dept. of Physics, Univ. of Seoul
00008   // Reviewed by Sunman Kim (sunman98@hanmail.net)
00009   // Supervisor: Prof. Inkyu Park (icpark@physics.uos.ac.kr)
00010   // 
00011   // How to run: .x building.C in ROOT terminal, then use OpenGL
00012   //
00013   // This macro was created for the evaluation of Computational Physics course in 2006.
00014   // We thank to Prof. Inkyu Park for his special lecture on ROOT and to all of ROOT team
00015   //
00016 
00017    TGeoManager *geom = new TGeoManager("geom","My First 3D Geometry");
00018 
00019 // Materials
00020    TGeoMaterial *Vacuum = new TGeoMaterial("vacuum",0,0,0);
00021    TGeoMaterial *Fe = new TGeoMaterial("Fe",55.845,26,7.87);
00022 
00023 // Media
00024    TGeoMedium *Air = new TGeoMedium("Air",0,Vacuum);
00025    TGeoMedium *Iron = new TGeoMedium("Iron",0,Fe);
00026 
00027 // Volume
00028    TGeoVolume *Phy_Building = geom->MakeBox("top",Air,150,150,150);
00029    geom->SetTopVolume(Phy_Building);
00030    geom->SetTopVisible(0);
00031    // If you want to see the boundary, please input the number, 1 instead of 0.
00032    // Like this, geom->SetTopVisible(1); 
00033 
00034 
00035    TGeoVolume *mBlocks;
00036 
00037 
00038 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
00039 ////////////////////////////////         Front-Building        ///////////////////////////////
00040 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
00041 
00042    int i = 0;
00043    int F = 0;           // Floor
00044    int N = 0;           // Block_no
00045    int nW = 8;          // Number of windows
00046    int nF = 3;          // Number of Floor
00047    char no_Block[100];  // Name of Block
00048    double  sP = 0;      // Starting Phi of Tubs
00049    double  hP = 21;     // Height of Tubs from Ground
00050 
00051    while (F<nF){
00052       N = 0; i = 0; sP = 0;
00053 
00054 /////////////////////////// Front of Building
00055    while (i<nW){      
00056       i++;
00057       sprintf(no_Block, "B1_F%d_%d", F, ++N);                  // Windows (6.25)
00058       mBlocks = geom->MakeTubs(no_Block,Iron,21,29,1.8,sP,sP+6.25);
00059       mBlocks->SetLineColor(12);
00060       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP+(8*F)));
00061 
00062       if (i < nW) {
00063          sprintf(no_Block, "B1_F%d_%d", F, ++N);               // Walls (8)
00064          mBlocks = geom->MakeTubs(no_Block,Iron,21,30,1.8,sP,sP+2.5);
00065          mBlocks->SetLineColor(2);
00066          Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP+(8*F)));
00067 
00068          sprintf(no_Block, "B1_F%d_%d", F, ++N);               
00069          mBlocks = geom->MakeTubs(no_Block,Iron,21,31,1.8,sP,sP+1);
00070          mBlocks->SetLineColor(2);
00071          Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP+(8*F)));
00072 
00073          sprintf(no_Block, "B1_F%d_%d", F, ++N);               
00074          mBlocks = geom->MakeTubs(no_Block,Iron,21,30,1.8,sP,sP+1);
00075          mBlocks->SetLineColor(2);
00076          Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP+(8*F)));
00077 
00078          sprintf(no_Block, "B1_F%d_%d", F, ++N);               
00079          mBlocks = geom->MakeTubs(no_Block,Iron,21,31,1.8,sP,sP+1);
00080          mBlocks->SetLineColor(2);
00081          Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP+(8*F)));
00082 
00083          sprintf(no_Block, "B1_F%d_%d", F, ++N);               
00084          mBlocks = geom->MakeTubs(no_Block,Iron,21,30,1.8,sP,sP+2.5);
00085          mBlocks->SetLineColor(2);
00086          Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP+(8*F)));
00087       }
00088 
00089       if (i>=nW) {
00090          sprintf(no_Block, "B1_F%d_%d", F, ++N);               // Walls
00091          mBlocks = geom->MakeTubs(no_Block,Iron,21,30,1.8,sP,103);
00092          mBlocks->SetLineColor(2);
00093          Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP+(8*F)));
00094 
00095       }
00096    }
00097 
00098    sprintf(no_Block, "B1_F%d", ++F);                  // No Windows Floor
00099    mBlocks = geom->MakeTubs(no_Block,Iron,21,30,2.2,0,103);
00100    mBlocks->SetLineColor(2);
00101    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-12+(8*F)));
00102 
00103 ///////////////////////////////////////// Back of Building
00104    sprintf(no_Block, "B1_F%d_%d", F, ++N);                  
00105    mBlocks = geom->MakeTubs(no_Block,Iron,18.5,21,0.8,92,101);
00106    mBlocks->SetLineColor(12);
00107    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-9.4+(8*F)));
00108 
00109    if(F<nF){
00110       sprintf(no_Block, "B1_F%d_%d", F, ++N);
00111       mBlocks = geom->MakeTubs(no_Block,Iron,18.5,21,3.2,92,102);
00112       mBlocks->SetLineColor(2);
00113       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-5.4+(8*F)));
00114                   
00115    }
00116    }
00117 
00118    sprintf(no_Block, "B1_F%d_%d", F, ++N);               // Walls
00119    mBlocks = geom->MakeTubs(no_Block,Iron,18.5,21,2,92,102);
00120    mBlocks->SetLineColor(2);
00121    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-4));
00122    sprintf(no_Block, "B1_F%d_%d", F, ++N);                  
00123    mBlocks = geom->MakeTubs(no_Block,Iron,18.5,21,3.2,92,102);
00124    mBlocks->SetLineColor(2);
00125    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-5.4+(8*F)));
00126 
00127    sprintf(no_Block, "B1_F%d_%d", F, ++N);                  
00128    mBlocks = geom->MakeTubs(no_Block,Iron,21,30,2,0,103);
00129    mBlocks->SetLineColor(2);
00130    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-4.2+(8*F)));   
00131 
00132    sprintf(no_Block, "B1_F%d_%d", F, ++N);                  
00133    mBlocks = geom->MakeTubs(no_Block,Iron,18,21,2,0,102);
00134    mBlocks->SetLineColor(2);
00135    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-4.2+(8*F)));
00136 
00137    sprintf(no_Block, "B1_F%d_%d", F, ++N);                  
00138    mBlocks = geom->MakeTubs(no_Block,Iron,18,18.5,14,92,103);
00139    mBlocks->SetLineColor(2);
00140    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,29));
00141 
00142 //////////////////////// Front of Building
00143    sprintf(no_Block, "B1_F%d_%d", F, ++N);                  
00144    mBlocks = geom->MakeTubs(no_Block,Iron,21,29,2,0,97);
00145    mBlocks->SetLineColor(12);
00146    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,13));
00147 
00148    sprintf(no_Block, "B1_F%d_%d", F, ++N);                  
00149    mBlocks = geom->MakeTubs(no_Block,Iron,21,32,2,37,97);
00150    mBlocks->SetLineColor(18);
00151    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,9));
00152 
00153    sprintf(no_Block, "B1_F%d_%d", F, ++N);                  
00154    mBlocks = geom->MakeTubs(no_Block,Iron,21,29,1.95,0,37);
00155    mBlocks->SetLineColor(30);
00156    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,9.05));
00157    sprintf(no_Block, "B1_F%d_%d", F, ++N);                  
00158    mBlocks = geom->MakeTubs(no_Block,Iron,21,29,0.05,0,37);
00159    mBlocks->SetLineColor(18);
00160    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,7.05));
00161 
00162 
00163 //////////////////////// Rooftop
00164    sprintf(no_Block, "B1_RT%d", N = 0);                  
00165    mBlocks = geom->MakeTubs(no_Block,Iron,21,29.5,0.2,0,102);         
00166    mBlocks->SetLineColor(18);
00167    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-2+(8*F)));   
00168    sprintf(no_Block, "B1_RT%d", ++N);                  
00169    mBlocks = geom->MakeTubs(no_Block,Iron,18.5,21,0.2,0,101);         
00170    mBlocks->SetLineColor(18);
00171    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-2+(8*F)));   
00172 
00173    sprintf(no_Block, "B1_RT%d", ++N);                  
00174    mBlocks = geom->MakeTubs(no_Block,Iron,21,30,0.7,102.9,103);         
00175    mBlocks->SetLineColor(2);
00176    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-1.8+(8*F)));   
00177    sprintf(no_Block, "B1_RT%d", ++N);                  
00178    mBlocks = geom->MakeTubs(no_Block,Iron,21.1,29.9,0.7,102,102.9);         
00179    mBlocks->SetLineColor(18);
00180    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-1.8+(8*F)));   
00181 
00182    sprintf(no_Block, "B1_RT%d", ++N);                  
00183    mBlocks = geom->MakeTubs(no_Block,Iron,21.1,21.5,0.5,98,102.9);
00184    mBlocks->SetLineColor(18);
00185    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-1.8+(8*F)));   
00186    sprintf(no_Block, "B1_RT%d", ++N);                  
00187    mBlocks = geom->MakeTubs(no_Block,Iron,21,21.1,0.7,98,103);
00188    mBlocks->SetLineColor(2);
00189    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-1.8+(8*F)));   
00190 
00191    sprintf(no_Block, "B1_RT%d", ++N);                  
00192    mBlocks = geom->MakeTubs(no_Block,Iron,18.6,21,0.7,101.9,102);         
00193    mBlocks->SetLineColor(2);
00194    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-1.8+(8*F)));   
00195    sprintf(no_Block, "B1_RT%d", ++N);                  
00196    mBlocks = geom->MakeTubs(no_Block,Iron,18.6,21,0.7,101,101.9);         
00197    mBlocks->SetLineColor(18);
00198    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-1.8+(8*F)));   
00199 
00200    sprintf(no_Block, "B1_RT%d", ++N);                  
00201    mBlocks = geom->MakeTubs(no_Block,Iron,29.5,29.9,0.5,0,102);
00202    mBlocks->SetLineColor(18);
00203    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-1.7+(8*F)));   
00204    sprintf(no_Block, "B1_RT%d", ++N);                  
00205    mBlocks = geom->MakeTubs(no_Block,Iron,29.9,30,0.5,0,103);
00206    mBlocks->SetLineColor(2);
00207    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-1.7+(8*F)));   
00208 
00209    sprintf(no_Block, "B1_RT%d", ++N);                  
00210    mBlocks = geom->MakeTubs(no_Block,Iron,18.1,18.5,0.5,-1,101.9);
00211    mBlocks->SetLineColor(18);
00212    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-1.7+(8*F)));   
00213    sprintf(no_Block, "B1_RT%d", ++N);                  
00214    mBlocks = geom->MakeTubs(no_Block,Iron,18,18.1,0.5,-0.5,102);
00215    mBlocks->SetLineColor(2);
00216    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-1.7+(8*F)));   
00217 
00218    sprintf(no_Block, "B1_RT%d", ++N);                  
00219    mBlocks = geom->MakeTubs(no_Block,Iron,18.1,18.4,0.5,101.9,102.9);
00220    mBlocks->SetLineColor(18);
00221    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-1.7+(8*F)));   
00222    sprintf(no_Block, "B1_RT%d", ++N);                  
00223    mBlocks = geom->MakeTubs(no_Block,Iron,18,18.1,0.5,102,103);
00224    mBlocks->SetLineColor(2);
00225    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-1.7+(8*F)));   
00226    sprintf(no_Block, "B1_RT%d", ++N);                  
00227    mBlocks = geom->MakeTubs(no_Block,Iron,18.4,18.5,0.5,102,103);
00228    mBlocks->SetLineColor(2);
00229    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-1.7+(8*F)));   
00230    sprintf(no_Block, "B1_RT%d", ++N);                  
00231    mBlocks = geom->MakeTubs(no_Block,Iron,18,18.5,0.5,102.9,103);
00232    mBlocks->SetLineColor(2);
00233    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,hP-1.7+(8*F)));   
00234 
00235 
00236 /////////////////////////////// White Wall
00237    sprintf(no_Block, "B1_WW%d", N = 0);                  
00238    mBlocks = geom->MakeTubs(no_Block,Iron,20.8,31,19.5,sP,sP+1);
00239    mBlocks->SetLineColor(10);
00240    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,26));
00241 
00242    sprintf(no_Block, "B1_WW%d", ++N);
00243    mBlocks = geom->MakeTubs(no_Block,Iron,26.8,31,5,sP,sP+1);
00244    mBlocks->SetLineColor(10);
00245    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,2));
00246 
00247    sprintf(no_Block, "B1_WW%d", ++N);
00248    mBlocks = geom->MakeTubs(no_Block,Iron,23,24.3,5,sP,sP+1);
00249    mBlocks->SetLineColor(10);
00250    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,2));
00251 
00252    sprintf(no_Block, "B1_WW%d", ++N);
00253    mBlocks = geom->MakeTubs(no_Block,Iron,20.8,21.3,5,sP,sP+1);
00254    mBlocks->SetLineColor(10);
00255    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,2));
00256 
00257 
00258 
00259 ////////////////////////// Zero Floor1
00260    sprintf(no_Block, "B1_ZF%d",N=0);                     
00261    mBlocks = geom->MakeTubs(no_Block,Iron,0,21,9,0,92);
00262    mBlocks->SetLineColor(12);
00263    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,6));
00264 
00265    sprintf(no_Block, "B1_ZF%d",++N);               
00266    mBlocks = geom->MakeTubs(no_Block,Iron,18,21,7.5,0,92);
00267    mBlocks->SetLineColor(12);
00268    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,31.5));
00269 
00270    sprintf(no_Block, "B1_ZF%d",++N);               
00271    mBlocks = geom->MakeTubs(no_Block,Iron,18,21,4.5,0,92);
00272    mBlocks->SetLineColor(2);
00273    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,19.5));
00274 
00275    sprintf(no_Block, "B1_ZF%d",++N);               
00276    mBlocks = geom->MakeTubs(no_Block,Iron,0,18,0.2,0,101); 
00277    mBlocks->SetLineColor(18);
00278    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,18.6));
00279    sprintf(no_Block, "B1_ZF%d",++N);               
00280    mBlocks = geom->MakeTubs(no_Block,Iron,0,18,1.7,0,100);
00281    mBlocks->SetLineColor(12);
00282    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,16.7));
00283    sprintf(no_Block, "B1_ZF%d",++N);               
00284    mBlocks = geom->MakeTubs(no_Block,Iron,0,18,1.2,101,101.9);
00285    mBlocks->SetLineColor(18);
00286    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,19.6));
00287    sprintf(no_Block, "B1_ZF%d",++N);               
00288    mBlocks = geom->MakeTubs(no_Block,Iron,0,18,1.2,101.9,102);
00289    mBlocks->SetLineColor(2);
00290    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,19.6));
00291 
00292 
00293 ////////////////////////// Zero Floor2
00294    sprintf(no_Block, "B1_ZF%d", ++N);                   
00295    mBlocks = geom->MakeBox(no_Block,Iron,6.5,7,2.5);
00296    mBlocks->SetLineColor(18);
00297    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7,10.75,13));
00298 
00299    sprintf(no_Block, "B1_ZF%d", ++N);                   
00300    mBlocks = geom->MakeBox(no_Block,Iron,6.5,7,3);
00301    mBlocks->SetLineColor(12);
00302    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7,10.75,7.5));
00303 
00304    sprintf(no_Block, "B1_ZF%d", ++N);                   
00305    mBlocks = geom->MakeBox(no_Block,Iron,7,0.05,10);
00306    mBlocks->SetLineColor(2);
00307    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7,17.95,7));
00308    sprintf(no_Block, "B1_ZF%d", ++N);                   
00309    mBlocks = geom->MakeBox(no_Block,Iron,6.9,0.20,10);
00310    mBlocks->SetLineColor(18);
00311    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7,17.70,7));
00312    sprintf(no_Block, "B1_ZF%d", ++N);                   
00313    mBlocks = geom->MakeBox(no_Block,Iron,0.1,0.20,10);
00314    mBlocks->SetLineColor(2);
00315    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-13.9,17.70,7));
00316 
00317    sprintf(no_Block, "B1_ZF%d", ++N);                   
00318    mBlocks = geom->MakeBox(no_Block,Iron,0.05,7,3.5);
00319    mBlocks->SetLineColor(2);
00320    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-13.95,10.5,13.5));
00321    sprintf(no_Block, "B1_ZF%d", ++N);                   
00322    mBlocks = geom->MakeBox(no_Block,Iron,0.20,6.9,3.5);
00323    mBlocks->SetLineColor(18);
00324    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-13.70,10.5,13.5));
00325 
00326    sprintf(no_Block, "B1_ZF%d", ++N);                   
00327    mBlocks = geom->MakeBox(no_Block,Iron,0.25,7,4);
00328    mBlocks->SetLineColor(2);
00329    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-13.75,10.5,1));
00330 
00331    sprintf(no_Block, "B1_ZF%d", ++N);                   
00332    mBlocks = geom->MakeBox(no_Block,Iron,7,0.05,10);
00333    mBlocks->SetLineColor(2);
00334    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7,3.55,7));
00335    sprintf(no_Block, "B1_ZF%d", ++N);                   
00336    mBlocks = geom->MakeBox(no_Block,Iron,6.9,0.20,10);
00337    mBlocks->SetLineColor(18);
00338    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7,3.8,7));
00339    sprintf(no_Block, "B1_ZF%d", ++N);                   
00340    mBlocks = geom->MakeBox(no_Block,Iron,0.1,0.20,10);
00341    mBlocks->SetLineColor(2);
00342    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-13.9,3.8,7));
00343 
00344 
00345 ////////////////////////// Zero Floor2
00346    sprintf(no_Block, "B1_ZF%d", ++N);                   
00347    mBlocks = geom->MakeBox(no_Block,Iron,5,5,1);
00348    mBlocks->SetLineColor(10);
00349    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-5,23,-2));
00350 
00351    sprintf(no_Block, "B1_ZF%d", ++N);                   
00352    mBlocks = geom->MakeBox(no_Block,Iron,5,0.25,1.5);
00353    mBlocks->SetLineColor(2);
00354    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-5,28.25,-1.5));
00355 
00356    sprintf(no_Block, "B1_ZF%d", ++N);                   
00357    mBlocks = geom->MakeBox(no_Block,Iron,0.25,5.5,1.5);
00358    mBlocks->SetLineColor(2);
00359    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-10.25,23,-1.5));
00360 
00361    sprintf(no_Block, "B1_ZF%d", ++N);                   
00362    mBlocks = geom->MakeBox(no_Block,Iron,5.5,3.5,5);
00363    mBlocks->SetLineColor(20);
00364    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-12.5,0,-4));
00365 
00366 
00367 ////////////////////////// Ground
00368    sprintf(no_Block, "B1_GRD%d",N=0);
00369    mBlocks = geom->MakeTubs(no_Block,Iron,0,29,1,0,36.75);
00370    mBlocks->SetLineColor(10);
00371    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,-2));
00372 
00373    sprintf(no_Block, "B1_GRD%d",++N);
00374    mBlocks = geom->MakeTubs(no_Block,Iron,0,30.4,0.4,36.75,77.25);
00375    mBlocks->SetLineColor(10);
00376    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,-2.7));
00377 
00378    sprintf(no_Block, "B1_GRD%d",++N);
00379    mBlocks = geom->MakeTubs(no_Block,Iron,0,29.7,0.3,36.75,77.25);
00380    mBlocks->SetLineColor(10);
00381    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,-2));
00382 
00383    sprintf(no_Block, "B1_GRD%d",++N);
00384    mBlocks = geom->MakeTubs(no_Block,Iron,0,29,0.3,36.75,77.25);
00385    mBlocks->SetLineColor(10);
00386    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,-1.3));
00387 
00388    sprintf(no_Block, "B1_GRD%d",++N);
00389    mBlocks = geom->MakeTubs(no_Block,Iron,0,29,1,77.25,97);
00390    mBlocks->SetLineColor(10);
00391    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,-2));
00392 
00393 
00394 ///////////////////////////// Pillars & fences
00395    sprintf(no_Block, "B1_PF%d", N = 0);                  
00396    mBlocks = geom->MakeBox(no_Block,Iron,1.2,1.5,9);
00397    mBlocks->SetLineColor(2);
00398    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(29,4.2,6, new TGeoRotation("r1",8.25,0,0)));
00399 
00400    sprintf(no_Block, "B1_PF%d", ++N);                   
00401    mBlocks = geom->MakeBox(no_Block,Iron,1.2,1.5,9);      
00402    mBlocks->SetLineColor(2);
00403    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(24.2,16.5,6, new TGeoRotation("r1",34.25,0,0)));
00404 
00405    sprintf(no_Block, "B1_PF%d", ++N);                   
00406    mBlocks = geom->MakeBox(no_Block,Iron,1.2,1.5,9);
00407    mBlocks->SetLineColor(2);
00408    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(14.5,25.4,6, new TGeoRotation("r1",60.25,0,0)));
00409 
00410    sprintf(no_Block, "B1_PF%d", ++N);                   
00411    mBlocks = geom->MakeBox(no_Block,Iron,1.2,1.5,9);
00412    mBlocks->SetLineColor(2);
00413    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(1.9,29.2,6, new TGeoRotation("r1",86.25,0,0)));
00414 
00415    sprintf(no_Block, "B1_PF%d",++N);
00416    mBlocks = geom->MakeTubs(no_Block,Iron,29,30,2,0,36.75);
00417    mBlocks->SetLineColor(2);
00418    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,0,-1));
00419 
00420    sprintf(no_Block, "B1_PF%d", ++N);                   
00421    mBlocks = geom->MakeBox(no_Block,Iron,3,2,2);
00422    mBlocks->SetLineColor(2);
00423    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-0.75,29.3,-1));
00424 
00425    sprintf(no_Block, "B1_PF%d", ++N);      //장애인용             
00426    mBlocks = geom->MakeBox(no_Block,Iron,0.25,4.3,1.5);
00427    mBlocks->SetLineColor(2);
00428    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(6.5,30.6,-1.5));
00429 
00430    sprintf(no_Block, "B1_PF%d", ++N);                   
00431    mBlocks = geom->MakeBox(no_Block,Iron,5.25,4.3,0.4);
00432    mBlocks->SetLineColor(10);
00433    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(1.125,30.6,-2.7));
00434 
00435    sprintf(no_Block, "B1_PF%d", ++N);                   
00436    mBlocks = geom->MakeBox(no_Block,Iron,5.5,0.25,0.75);
00437    mBlocks->SetLineColor(2);
00438    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(1.125,34.9,-2.25));
00439 
00440    sprintf(no_Block, "B1_PF%d", ++N);                   
00441    mBlocks = geom->MakeTrd1(no_Block,Iron,1.5,0,0.25,5.5);
00442    mBlocks->SetLineColor(2);
00443    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(1.125,34.9,-1.5, new TGeoRotation("r1",90,-90,90)));
00444 
00445 
00446 
00447 
00448 
00449 
00450 
00451 
00452 
00453 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
00454 //////////////////////////////// Second Part of Front-Building ///////////////////////////////
00455 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
00456 
00457    F=0;
00458    while (F<nF){
00459       N = 0; i = 0; nW = 7;
00460 
00461    while (i<nW){      
00462       sprintf(no_Block, "B12_F%d_B%d",F, ++N);      // Wall                
00463       mBlocks = geom->MakeBox(no_Block,Iron,3.8,0.35,1.8);
00464       mBlocks->SetLineColor(2);
00465       Phy_Building->AddNodeOverlap(mBlocks,1,
00466          new TGeoCombiTrans(23.38 + (21.65-6*i)*0.13,-21.2 + (21.65-6*i)*0.99,hP+(8*F), 
00467          new TGeoRotation("r1",-7.5,0,0)));
00468       sprintf(no_Block, "B12_F%d_B%d",F, ++N);                   
00469       mBlocks = geom->MakeBox(no_Block,Iron,4.8,0.3,1.8);
00470       mBlocks->SetLineColor(2);
00471       Phy_Building->AddNodeOverlap(mBlocks,1,
00472          new TGeoCombiTrans(23.38 + (21.0-6*i)*0.13,-21.2 + (21-6*i)*0.99,hP+(8*F), 
00473          new TGeoRotation("r1",-7.5,0,0)));
00474       sprintf(no_Block, "B12_F%d_B%d",F, ++N);                   
00475       mBlocks = geom->MakeBox(no_Block,Iron,3.8,0.3,1.8);
00476       mBlocks->SetLineColor(2);
00477       Phy_Building->AddNodeOverlap(mBlocks,1,
00478          new TGeoCombiTrans(23.38 + (20.4-6*i)*0.13,-21.2 + (20.4-6*i)*0.99,hP+(8*F), 
00479          new TGeoRotation("r1",-7.5,0,0)));
00480       sprintf(no_Block, "B12_F%d_B%d",F, ++N);                   
00481       mBlocks = geom->MakeBox(no_Block,Iron,4.8,0.3,1.8);
00482       mBlocks->SetLineColor(2);
00483       Phy_Building->AddNodeOverlap(mBlocks,1,
00484          new TGeoCombiTrans(23.38 + (19.7-6*i)*0.13,-21.2 + (19.7-6*i)*0.99,hP+(8*F), 
00485          new TGeoRotation("r1",-7.5,0,0)));
00486       sprintf(no_Block, "B12_F%d_B%d",F, ++N);                   
00487       mBlocks = geom->MakeBox(no_Block,Iron,3.8,0.35,1.8);
00488       mBlocks->SetLineColor(2);
00489       Phy_Building->AddNodeOverlap(mBlocks,1,
00490          new TGeoCombiTrans(23.38 + (19.05-6*i)*0.13,-21.2 + (19.05-6*i)*0.99,hP+(8*F), 
00491          new TGeoRotation("r1",-7.5,0,0)));
00492 
00493 
00494       sprintf(no_Block, "B12_F%d_B%d",F, ++N);      // Windows                
00495       mBlocks = geom->MakeBox(no_Block,Iron,3,1.4,1.8);
00496       mBlocks->SetLineColor(12);
00497       Phy_Building->AddNodeOverlap(mBlocks,1,
00498          new TGeoCombiTrans(23.38 + (17.4-6*i)*0.13,-21.2 + (17.4-6*i)*0.99,hP+(8*F), 
00499          new TGeoRotation("r1",-7.5,0,0)));
00500       i++;
00501       if( i >= nW){
00502       sprintf(no_Block, "B12_F%d_B%d",F, ++N);      // Wall.
00503       mBlocks = geom->MakeBox(no_Block,Iron,5.8,1,1.8);
00504       mBlocks->SetLineColor(2);
00505       Phy_Building->AddNodeOverlap(mBlocks,1,
00506          new TGeoCombiTrans(21.4 + (-21)*0.13,-21 + (-21)*0.99,hP+(8*F), 
00507          new TGeoRotation("r1",-7.5,0,0)));
00508       }
00509    }
00510 
00511       sprintf(no_Block, "B12_F%d_B%d",++F, ++N);                   
00512       mBlocks = geom->MakeBox(no_Block,Iron,5.8,22,2.2);
00513       mBlocks->SetLineColor(2);
00514       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(21.4,-21,hP-12+(8*F), new TGeoRotation("r1",-7.5,0,0)));
00515 
00516    }
00517    sprintf(no_Block, "B12_F%d_%d", F, ++N);                  
00518    mBlocks = geom->MakeBox(no_Block,Iron,5.8,22,2);
00519    mBlocks->SetLineColor(2);
00520    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(21.4,-21,hP-4.2+(8*F), new TGeoRotation("r1",-7.5,0,0)));
00521 
00522    sprintf(no_Block, "B12_F%d_%d", F, ++N);                  
00523    mBlocks = geom->MakeBox(no_Block,Iron,2.8,22,14);
00524    mBlocks->SetLineColor(2);
00525    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(18.43,-20.61,29, new TGeoRotation("r1",-7.5,0,0)));
00526 
00527 
00528 ////////////////////// RoofTop
00529    sprintf(no_Block, "B12_RT%d_%d", F, N=0);                  
00530    mBlocks = geom->MakeBox(no_Block,Iron,5.5,21.75,0.2);
00531    mBlocks->SetLineColor(18);
00532    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(21.43,-20.75,hP-2+(8*F), new TGeoRotation("r1",-7.5,0,0)));
00533 
00534    sprintf(no_Block, "B12_RT%d_%d", F, ++N);                  
00535    mBlocks = geom->MakeBox(no_Block,Iron,0.23,21.95,0.5);
00536    mBlocks->SetLineColor(18);
00537    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(26.9,-21.72,hP-1.7+(8*F), new TGeoRotation("r1",-7.5,0,0)));
00538    sprintf(no_Block, "B12_RT%d_%d", F, ++N);                  
00539    mBlocks = geom->MakeBox(no_Block,Iron,0.1,22,0.5);
00540    mBlocks->SetLineColor(2);
00541    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(27.1,-21.75,hP-1.7+(8*F), new TGeoRotation("r1",-7.5,0,0)));
00542 
00543 
00544    sprintf(no_Block, "B12_RT%d_%d", F, ++N);                  
00545    mBlocks = geom->MakeBox(no_Block,Iron,0.23,3.6,0.5);
00546    mBlocks->SetLineColor(18);
00547    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(13.65,-38.03,hP-1.7+(8*F), new TGeoRotation("r1",-7.5,0,0)));
00548 
00549    sprintf(no_Block, "B12_RT%d_%d", F, ++N);                  
00550    mBlocks = geom->MakeBox(no_Block,Iron,0.02,3.8,0.5);
00551    mBlocks->SetLineColor(2);
00552    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(13.3,-38.39,hP-1.7+(8*F), new TGeoRotation("r1",-7.5,0,0)));
00553 
00554 
00555 
00556    sprintf(no_Block, "B12_RT%d_%d", F, ++N);                  
00557    mBlocks = geom->MakeBox(no_Block,Iron,5.7,0.23,0.5);
00558    mBlocks->SetLineColor(18);
00559    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(18.57,-42.48,hP-1.7+(8*F), new TGeoRotation("r1",-7.5,0,0)));
00560    sprintf(no_Block, "B12_RT%d_%d", F, ++N);                  
00561    mBlocks = geom->MakeBox(no_Block,Iron,5.8,0.1,0.5);
00562    mBlocks->SetLineColor(2);
00563    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(18.54,-42.71,hP-1.7+(8*F), new TGeoRotation("r1",-7.5,0,0)));
00564 
00565 
00566 //////////////////////// Pillars & fences
00567    sprintf(no_Block, "B12_PF%d", N = 0);                  
00568    mBlocks = geom->MakeBox(no_Block,Iron,1.2,1.5,9);
00569    mBlocks->SetLineColor(2);
00570    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(28.32,-7.44,6, new TGeoRotation("r1",-7.5,0,0)));
00571 
00572    sprintf(no_Block, "B12_PF%d", ++N);                  
00573    mBlocks = geom->MakeBox(no_Block,Iron,1.2,1.5,9);
00574    mBlocks->SetLineColor(2);
00575    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(26.75,-19.33,6, new TGeoRotation("r1",-7.5,0,0)));
00576 
00577    sprintf(no_Block, "B12_PF%d", ++N);                  
00578    mBlocks = geom->MakeBox(no_Block,Iron,1.2,1.5,9);
00579    mBlocks->SetLineColor(2);
00580    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(25.19,-31.23,6, new TGeoRotation("r1",-7.5,0,0)));
00581 
00582    sprintf(no_Block, "B12_PF%d", ++N);                  
00583    mBlocks = geom->MakeBox(no_Block,Iron,1.2,1.5,11);
00584    mBlocks->SetLineColor(2);
00585    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(23.75,-42.14,4, new TGeoRotation("r1",-7.5,0,0)));
00586 
00587    sprintf(no_Block, "B12_PF%d", ++N);                  
00588    mBlocks = geom->MakeBox(no_Block,Iron,1.2,1.5,11);
00589    mBlocks->SetLineColor(2);
00590    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(13.84,-40.83,4, new TGeoRotation("r1",-7.5,0,0)));
00591 
00592 
00593 
00594    sprintf(no_Block, "B12_PF%d", ++N);                  
00595    mBlocks = geom->MakeBox(no_Block,Iron,0.5,15.75,2);
00596    mBlocks->SetLineColor(2);
00597    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(27.42,-15.48,-1, new TGeoRotation("r1",-7.5,0,0)));
00598 
00599    sprintf(no_Block, "B12_PF%d", ++N);                  
00600    mBlocks = geom->MakeBox(no_Block,Iron,0.5,2,4);
00601    mBlocks->SetLineColor(2);
00602    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(24.28,-39.27,-3, new TGeoRotation("r1",-7.5,0,0)));
00603 
00604    sprintf(no_Block, "B12_PF%d", ++N);                  
00605    mBlocks = geom->MakeBox(no_Block,Iron,1.5,15.75,2);
00606    mBlocks->SetLineColor(2);
00607    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(28.91,-15.68,-4, new TGeoRotation("r1",-7.5,0,0)));
00608 
00609    sprintf(no_Block, "B12_RT%d_%d", F, ++N);                  
00610    mBlocks = geom->MakeBox(no_Block,Iron,5.8,0.5,4);
00611    mBlocks->SetLineColor(2);
00612    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(18.8,-40.73,-3, new TGeoRotation("r1",-7.5,0,0)));
00613 
00614 
00615 /////////////////////// Stair
00616    sprintf(no_Block, "B12_PF%d", ++N);                  
00617    mBlocks = geom->MakeBox(no_Block,Iron,3,0.5,3.25);
00618    mBlocks->SetLineColor(2);
00619    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(28.33,-31.49,-2.75, new TGeoRotation("r1",-7.5,0,0)));
00620 
00621    sprintf(no_Block, "B12_PF%d", ++N);                  
00622    mBlocks = geom->MakeBox(no_Block,Iron,0.5,6.25,1.625);
00623    mBlocks->SetLineColor(2);
00624    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(30.56,-37.58,-4.375, new TGeoRotation("r1",-7.5,0,0)));
00625    sprintf(no_Block, "B1_PF%d", ++N);                   
00626    mBlocks = geom->MakeTrd1(no_Block,Iron,3.25,0,0.5,6.25);
00627    mBlocks->SetLineColor(2);
00628    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(30.56,-37.58,-2.75, new TGeoRotation("r1",-7.5,90,90)));
00629 
00630 
00631    sprintf(no_Block, "B12_PF%d", ++N);                  
00632    mBlocks = geom->MakeBox(no_Block,Iron,3,3,0.5);
00633    mBlocks->SetLineColor(18);
00634    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(27.37,-34.89,-2.5, new TGeoRotation("r1",-7.5,0,0)));
00635    sprintf(no_Block, "B12_PF%d", ++N);                  
00636    mBlocks = geom->MakeBox(no_Block,Iron,2.5,3,0.5);
00637    mBlocks->SetLineColor(18);
00638    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(27.74,-35.95,-3.5, new TGeoRotation("r1",-7.5,0,0)));
00639    sprintf(no_Block, "B12_PF%d", ++N);                  
00640    mBlocks = geom->MakeBox(no_Block,Iron,2.5,3,0.5);
00641    mBlocks->SetLineColor(18);
00642    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(27.61,-36.94,-4.5, new TGeoRotation("r1",-7.5,0,0)));
00643    sprintf(no_Block, "B12_PF%d", ++N);                  
00644    mBlocks = geom->MakeBox(no_Block,Iron,2.5,3,0.5);
00645    mBlocks->SetLineColor(18);
00646    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(27.48,-37.93,-5.5, new TGeoRotation("r1",-7.5,0,0)));
00647 
00648 
00649 
00650 //////////////////////// Ground
00651    sprintf(no_Block, "B12_GR%d", N=0);                  
00652    mBlocks = geom->MakeBox(no_Block,Iron,4.8,21,1);
00653    mBlocks->SetLineColor(18);
00654    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(21.53,-20.1,-2, new TGeoRotation("r1",-7.5,0,0)));
00655 
00656    sprintf(no_Block, "B12_GR%d", ++N);   
00657    mBlocks = geom->MakeBox(no_Block,Iron,5.8,18,9);
00658    mBlocks->SetLineColor(12);
00659    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(12.86,-16.62,6, new TGeoRotation("r1",-7.5,0,0)));
00660 
00661    sprintf(no_Block, "B12_GR%d", ++N);   
00662    mBlocks = geom->MakeBox(no_Block,Iron,4.8,22,2);
00663    mBlocks->SetLineColor(12);
00664    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(21.4,-21,13, new TGeoRotation("r1",-7.5,0,0)));
00665 
00666    sprintf(no_Block, "B12_GR%d_%d", F, ++N);                  
00667    mBlocks = geom->MakeBox(no_Block,Iron,4.8,22,1.95);
00668    mBlocks->SetLineColor(30);
00669    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(21.4,-21,9.05, new TGeoRotation("r1",-7.5,0,0)));
00670    sprintf(no_Block, "B12_GR%d_%d", F, ++N);                  
00671    mBlocks = geom->MakeBox(no_Block,Iron,4.8,22,0.05);
00672    mBlocks->SetLineColor(18);
00673    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoCombiTrans(21.4,-21,7.05, new TGeoRotation("r1",-7.5,0,0)));
00674 
00675 
00676 
00677 
00678 
00679 
00680 
00681 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
00682 ////////////////////////////////         Bridge-Building       ///////////////////////////////
00683 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
00684    F=1; N = 0; nF = 4;
00685 
00686 
00687    sprintf(no_Block, "B2_F%d", 6);   
00688    mBlocks = geom->MakeBox(no_Block,Iron,7,17.5,2);
00689    mBlocks->SetLineColor(2);
00690    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(12,-17.5,41));
00691 
00692    while(F++ <= nF){
00693 //////////////////////// Front
00694       sprintf(no_Block, "B2_F%d_%d",F, ++N);   
00695       mBlocks = geom->MakeBox(no_Block,Iron,0.8,4,4);
00696       mBlocks->SetLineColor(2);
00697       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(10,-4,-5 +(F*8)));
00698 
00699       sprintf(no_Block, "B2_F%d_%d",F, ++N);   
00700       mBlocks = geom->MakeBox(no_Block,Iron,1.1,3.5,1);
00701       mBlocks->SetLineColor(12);
00702       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(11.9,-4,-2 +(F*8)));
00703       sprintf(no_Block, "B2_F%d_%d",F, ++N);   
00704       mBlocks = geom->MakeBox(no_Block,Iron,1.1,4.5,0.2);
00705       mBlocks->SetLineColor(18);
00706       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(11.9,-4,-3.2+(F*8)));
00707       sprintf(no_Block, "B2_F%d_%d",F, ++N);   
00708       mBlocks = geom->MakeBox(no_Block,Iron,1.1,4,2.8);
00709       mBlocks->SetLineColor(2);
00710       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(11.9,-4,-6.2+(F*8)));
00711 
00712       sprintf(no_Block, "B2_F%d_%d",F, ++N);   
00713       mBlocks = geom->MakeBox(no_Block,Iron,0.7,4,4);
00714       mBlocks->SetLineColor(2);
00715       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(13.6,-4,-5 +(F*8)));
00716 
00717       sprintf(no_Block, "B2_F%d_%d",F, ++N);   
00718       mBlocks = geom->MakeBox(no_Block,Iron,1.1,3.5,1);
00719       mBlocks->SetLineColor(12);
00720       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(15.4,-4,-2 +(F*8)));
00721       sprintf(no_Block, "B2_F%d_%d",F, ++N);   
00722       mBlocks = geom->MakeBox(no_Block,Iron,1.1,4.5,0.2);
00723       mBlocks->SetLineColor(18);
00724       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(15.4,-4,-3.2+(F*8)));
00725       sprintf(no_Block, "B2_F%d_%d",F, ++N);   
00726       mBlocks = geom->MakeBox(no_Block,Iron,1.1,4,2.8);
00727       mBlocks->SetLineColor(2);
00728       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(15.4,-4,-6.2+(F*8)));
00729 
00730       sprintf(no_Block, "B2_F%d_%d",F, ++N);   
00731       mBlocks = geom->MakeBox(no_Block,Iron,0.7,4,4);
00732       mBlocks->SetLineColor(2);
00733       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(17.1,-4,-5 +(F*8)));
00734 
00735 
00736 //////////////////////////// Back
00737       sprintf(no_Block, "B2_F%d_%d",F, ++N);   
00738       mBlocks = geom->MakeBox(no_Block,Iron,1.3,13.5,1.5);
00739       mBlocks->SetLineColor(2);
00740       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(6.8,-21.5,-2.5 +(F*8)));
00741       sprintf(no_Block, "B2_F%d_%d",F, ++N);   
00742       mBlocks = geom->MakeBox(no_Block,Iron,1.3,14,0.2);
00743       mBlocks->SetLineColor(18);
00744       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(6.8,-21.5,-4.2+(F*8)));
00745       sprintf(no_Block, "B2_F%d_%d",F, ++N);   
00746       mBlocks = geom->MakeBox(no_Block,Iron,1.3,13.5,2.3);
00747       mBlocks->SetLineColor(2);
00748       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(6.8,-21.5,-6.8+(F*8)));
00749 
00750 
00751 
00752       sprintf(no_Block, "B2_F%d_%d",F, ++N);   
00753       mBlocks = geom->MakeBox(no_Block,Iron,3.7,13,1.5);
00754       mBlocks->SetLineColor(12);
00755       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(11.8,-21.5,-2.5 +(F*8)));
00756       sprintf(no_Block, "B2_F%d_%d",F, ++N);   
00757       mBlocks = geom->MakeBox(no_Block,Iron,3.7,14,0.2);
00758       mBlocks->SetLineColor(18);
00759       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(11.8,-21.5,-4.2+(F*8)));
00760       sprintf(no_Block, "B2_F%d_%d",F, ++N);   
00761       mBlocks = geom->MakeBox(no_Block,Iron,3.7,13.5,2.3);
00762       mBlocks->SetLineColor(2);
00763       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(11.8,-21.5,-6.8+(F*8)));
00764       
00765       
00766    }
00767 
00768 
00769    sprintf(no_Block, "B2_F%d_%d", 0,1);   
00770    mBlocks = geom->MakeBox(no_Block,Iron,5,13.5,6);
00771    mBlocks->SetLineColor(30);
00772 //   Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(10,-21.5,-15));
00773    sprintf(no_Block, "B2_F%d_%d", 0,2);   
00774    mBlocks = geom->MakeBox(no_Block,Iron,5,13.5,4);
00775    mBlocks->SetLineColor(2);
00776    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(10,-21.5,-5));
00777    sprintf(no_Block, "B2_F%d_%d", 0,3);   
00778    mBlocks = geom->MakeBox(no_Block,Iron,5,13.5,4);
00779    mBlocks->SetLineColor(12);
00780    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(10,-21.5,3));
00781 
00782 
00783 
00784 /////////////////////////// RoofTop
00785    sprintf(no_Block, "B2_F%d", ++N);   
00786    mBlocks = geom->MakeBox(no_Block,Iron,7,17.4,0.1);
00787    mBlocks->SetLineColor(18);
00788    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(12,-17.5,43.1));
00789 
00790    sprintf(no_Block, "B2_F%d", ++N);   
00791    mBlocks = geom->MakeBox(no_Block,Iron,4.5,0.2,0.5);
00792    mBlocks->SetLineColor(18);
00793    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(9.5,-34.7,43.5));
00794    sprintf(no_Block, "B2_F%d", ++N);   
00795    mBlocks = geom->MakeBox(no_Block,Iron,4.5,0.05,0.5);
00796    mBlocks->SetLineColor(2);
00797    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(9.5,-34.95,43.5));
00798 
00799    sprintf(no_Block, "B2_F%d", ++N);   
00800    mBlocks = geom->MakeBox(no_Block,Iron,4.75,0.2,0.5);
00801    mBlocks->SetLineColor(18);
00802    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(13.75,-0.3,43.5));
00803    sprintf(no_Block, "B2_F%d", ++N);   
00804    mBlocks = geom->MakeBox(no_Block,Iron,4.55,0.05,0.5);
00805    mBlocks->SetLineColor(2);
00806    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(13.55,-0.05,43.5));
00807 
00808    
00809 
00810 
00811 
00812 
00813 
00814 
00815 
00816 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
00817 ////////////////////////////////         Building 3            ///////////////////////////////
00818 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
00819    F=0; N = 0; nF = 4; nW = 6;
00820 
00821 
00822    sprintf(no_Block, "B3_F0%d", 7);   
00823    mBlocks = geom->MakeBox(no_Block,Iron,3,36,2);
00824    mBlocks->SetLineColor(2);
00825    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(2.4,-48,49));
00826 
00827    while (F++ < nF){
00828       i=0; N=0;
00829 
00830       sprintf(no_Block, "B3_F%d_%d",F, ++N);   
00831       mBlocks = geom->MakeBox(no_Block,Iron,4,36,0.2);
00832       mBlocks->SetLineColor(18);
00833       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(2.4,-48,14.7 +(F*8)));
00834 
00835       while (i++ <nW){
00836          sprintf(no_Block, "B3_F%d_%d",F, ++N);   
00837          mBlocks = geom->MakeBox(no_Block,Iron,2.5,5,1.8);
00838          mBlocks->SetLineColor(12);
00839          Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(2.4,-6 -(i*12),12.8 +(F*8)));
00840 
00841          sprintf(no_Block, "B3_F%d_%d",F, ++N);   
00842          mBlocks = geom->MakeBox(no_Block,Iron,2.8,1,1.8);
00843          mBlocks->SetLineColor(18);
00844          Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(2.4,-12 -(i*12),12.8 +(F*8)));
00845 
00846       }
00847 
00848       sprintf(no_Block, "B3_F%d_%d",F, ++N);   
00849       mBlocks = geom->MakeBox(no_Block,Iron,3,36,2);
00850       mBlocks->SetLineColor(2);
00851       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(2.4,-48,9.2 +(F*8)));
00852 
00853    }
00854 
00855    sprintf(no_Block, "B3_F0%d", 1);   
00856    mBlocks = geom->MakeBox(no_Block,Iron,2.8,36,2);
00857    mBlocks->SetLineColor(12);
00858    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(2.4,-48,13));
00859    sprintf(no_Block, "B3_F0%d", 2);   
00860    mBlocks = geom->MakeBox(no_Block,Iron,2.8,36,2);
00861    mBlocks->SetLineColor(30);
00862    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(2.4,-48,9));
00863 
00864    sprintf(no_Block, "B3_F0%d", 3);   
00865    mBlocks = geom->MakeBox(no_Block,Iron,2.8,36,4);
00866    mBlocks->SetLineColor(12);
00867    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(2.4,-48,3));
00868 
00869    sprintf(no_Block, "B3_F0%d", 4);   
00870    mBlocks = geom->MakeBox(no_Block,Iron,2.8,36,4);
00871    mBlocks->SetLineColor(2);
00872    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(2.4,-48,-5));
00873 
00874 /*   sprintf(no_Block, "B3_F0%d", 5);   
00875    mBlocks = geom->MakeBox(no_Block,Iron,2.8,36,6);
00876    mBlocks->SetLineColor(30);
00877    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(2.4,-48,-15));
00878 */
00879    sprintf(no_Block, "B3_F0%d", 61);   
00880    mBlocks = geom->MakeBox(no_Block,Iron,3,8,2);
00881    mBlocks->SetLineColor(2);
00882    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(2.4,-88,49));
00883 
00884    sprintf(no_Block, "B3_F0%d", 62);   
00885    mBlocks = geom->MakeBox(no_Block,Iron,0.5,8,24);
00886    mBlocks->SetLineColor(2);
00887    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(4.9,-88,23));
00888    sprintf(no_Block, "B3_F0%d", 63);   
00889    mBlocks = geom->MakeBox(no_Block,Iron,2,7,24);
00890    mBlocks->SetLineColor(12);
00891    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(2.4,-88,23));
00892    sprintf(no_Block, "B3_F0%d", 64);   
00893    mBlocks = geom->MakeBox(no_Block,Iron,0.5,8,24);
00894    mBlocks->SetLineColor(2);
00895    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-0.1,-88,23));
00896 
00897    sprintf(no_Block, "B3_F0%d", 65);   
00898    mBlocks = geom->MakeBox(no_Block,Iron,3,8,4);
00899    mBlocks->SetLineColor(2);
00900    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(2.4,-88,-5));
00901 
00902 /////////////////////////////// Left-Side
00903    nF = 6;nW = 6;
00904 
00905    sprintf(no_Block, "B3_F2%d",7);   
00906    mBlocks = geom->MakeBox(no_Block,Iron,7,40.5,2);
00907    mBlocks->SetLineColor(2);
00908    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.4,-43.5,49));
00909 
00910    for (F=0 ; F<nF ; F++){ N=0;
00911       for (i = 0 ; i<nW ; i++){
00912          sprintf(no_Block, "B3_F2%d_%d",F,++N);   
00913          mBlocks = geom->MakeBox(no_Block,Iron,6,2.35,2);
00914          mBlocks->SetLineColor(12);
00915          Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.4,-14.35-(12*i),5 + (8*F)));
00916          sprintf(no_Block, "B3_F2%d_%d",F,++N);   
00917          mBlocks = geom->MakeBox(no_Block,Iron,6.5,0.3,2);
00918          mBlocks->SetLineColor(18);
00919          Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.4,-17-(12*i),5 + (8*F)));
00920          sprintf(no_Block, "B3_F2%d_%d",F,++N);   
00921          mBlocks = geom->MakeBox(no_Block,Iron,6,2.35,2);
00922          mBlocks->SetLineColor(12);
00923          Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.4,-19.65-(12*i),5 + (8*F)));
00924 
00925          sprintf(no_Block, "B3_F2%d_%d",F,++N);   
00926          mBlocks = geom->MakeBox(no_Block,Iron,7,1,2);
00927          mBlocks->SetLineColor(2);
00928          Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.4,-23-(12*i),5 + (8*F)));
00929       }
00930 
00931       sprintf(no_Block, "B3_F2%d_%d",F,++N);   
00932       mBlocks = geom->MakeBox(no_Block,Iron,6.8,36,0.3);
00933       mBlocks->SetLineColor(18);
00934       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.4,-48,3.3 + (8*F)));
00935 
00936       sprintf(no_Block, "B3_F2%d_%d",F,++N);   
00937       mBlocks = geom->MakeBox(no_Block,Iron,7,36,2);
00938       mBlocks->SetLineColor(2);
00939       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.4,-48,1 + (8*F)));
00940 
00941       for(int i=0;i<4;i++){
00942          sprintf(no_Block, "B3_F2%d_%d",F,++N);   
00943          mBlocks = geom->MakeBox(no_Block,Iron,7,0.5,1.4);
00944          mBlocks->SetLineColor(2);
00945          Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.4,-3.5,5.6 + (8*F)));
00946 
00947          sprintf(no_Block, "B3_F2%d_%d",F,++N);   
00948          mBlocks = geom->MakeBox(no_Block,Iron,6,0.7,1.4);
00949          mBlocks->SetLineColor(12);
00950          Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.4,-4.7,5.6 + (8*F)));
00951 
00952          sprintf(no_Block, "B3_F2%d_%d",F,++N);   
00953          mBlocks = geom->MakeBox(no_Block,Iron,7,1.6,1.4);
00954          mBlocks->SetLineColor(2);
00955          Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.4,-7,5.6 + (8*F)));
00956 
00957          sprintf(no_Block, "B3_F2%d_%d",F,++N);   
00958          mBlocks = geom->MakeBox(no_Block,Iron,6,0.7,1.4);
00959          mBlocks->SetLineColor(12);
00960          Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.4,-9.3,5.6 + (8*F)));
00961       }
00962 
00963       sprintf(no_Block, "B3_F2%d_%d",F,++N);   
00964       mBlocks = geom->MakeBox(no_Block,Iron,7,3.5,2.6);
00965       mBlocks->SetLineColor(2);
00966       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.4,-6.5,1.6 + (8*F)));
00967    }
00968 
00969    sprintf(no_Block, "B3_F2%d",71);   
00970    mBlocks = geom->MakeBox(no_Block,Iron,7,40.5,4);
00971    mBlocks->SetLineColor(2);
00972    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.4,-43.5,-5));
00973 
00974    sprintf(no_Block, "B3_F2%d",72);   
00975    mBlocks = geom->MakeBox(no_Block,Iron,7,2,30);
00976    mBlocks->SetLineColor(2);
00977    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.4,-86,21));
00978 
00979    sprintf(no_Block, "B3_F2%d",73);   
00980    mBlocks = geom->MakeBox(no_Block,Iron,7,1,30);
00981    mBlocks->SetLineColor(2);
00982    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.4,-11,21));
00983 
00984 
00985 
00986 //////////////////////////////////// Rooftop
00987    sprintf(no_Block, "B3_RT%d",N = 0);   
00988    mBlocks = geom->MakeBox(no_Block,Iron,7,42.25,0.1);
00989    mBlocks->SetLineColor(18);
00990    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.15,-45.5,51.1));
00991    sprintf(no_Block, "B3_RT%d", ++N);   
00992    mBlocks = geom->MakeBox(no_Block,Iron,2.75,41.75,0.1);
00993    mBlocks->SetLineColor(18);
00994    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(2.4,-54,51.1));
00995 
00996    sprintf(no_Block, "B3_RT%d", ++N);   
00997    mBlocks = geom->MakeBox(no_Block,Iron,0.24,41.99,0.5);
00998    mBlocks->SetLineColor(18);
00999    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(5.15,-53.99,51.5));
01000    sprintf(no_Block, "B3_RT%d", ++N);   
01001    mBlocks = geom->MakeBox(no_Block,Iron,0.01,42,0.5);
01002    mBlocks->SetLineColor(2);
01003    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(5.4,-54,51.5));
01004 
01005    sprintf(no_Block, "B3_RT%d", ++N);   
01006    mBlocks = geom->MakeBox(no_Block,Iron,0.24,3.99,0.5);
01007    mBlocks->SetLineColor(18);
01008    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-0.35,-92,51.5));
01009    sprintf(no_Block, "B3_RT%d", ++N);   
01010    mBlocks = geom->MakeBox(no_Block,Iron,0.01,4,0.5);
01011    mBlocks->SetLineColor(2);
01012    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-0.6,-92,51.5));
01013 
01014    sprintf(no_Block, "B3_RT%d", ++N);   
01015    mBlocks = geom->MakeBox(no_Block,Iron,2.99,0.24,0.5);
01016    mBlocks->SetLineColor(18);
01017    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(2.4,-95.79,51.5));
01018    sprintf(no_Block, "B3_RT%d", ++N);   
01019    mBlocks = geom->MakeBox(no_Block,Iron,3,0.01,0.5);
01020    mBlocks->SetLineColor(2);
01021    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(2.4,-96.04,51.5));
01022 
01023    sprintf(no_Block, "B3_RT%d",++N);   
01024    mBlocks = geom->MakeBox(no_Block,Iron,0.24,42.49,0.5);
01025    mBlocks->SetLineColor(18);
01026    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-14.14,-45.5,51.5));
01027    sprintf(no_Block, "B3_RT%d",++N);   
01028    mBlocks = geom->MakeBox(no_Block,Iron,0.01,42.5,0.5);
01029    mBlocks->SetLineColor(2);
01030    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-14.39,-45.5,51.5));
01031 
01032 
01033 /////////////////////// Stair
01034    sprintf(no_Block, "B3_RT%d",++N);   
01035    mBlocks = geom->MakeBox(no_Block,Iron,6.99,0.24,0.5);
01036    mBlocks->SetLineColor(18);
01037    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.15,-3.25,51.5));
01038    sprintf(no_Block, "B3_RT%d",++N);   
01039    mBlocks = geom->MakeBox(no_Block,Iron,7,0.01,0.5);
01040    mBlocks->SetLineColor(2);
01041    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.15,-3,51.5));
01042 
01043    sprintf(no_Block, "B3_RT%d",++N);   
01044    mBlocks = geom->MakeBox(no_Block,Iron,7,0.25,0.5);
01045    mBlocks->SetLineColor(18);
01046    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.15,-87.74,51.5));
01047    sprintf(no_Block, "B3_RT%d",++N);   
01048    mBlocks = geom->MakeBox(no_Block,Iron,7,0.01,0.5);
01049    mBlocks->SetLineColor(2);
01050    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-7.15,-87.99,51.5));
01051 
01052 
01053 
01054 /////////////////////////////// Pillars
01055    N=0;   
01056    for (i=0 ; i<6; i++) { 
01057       sprintf(no_Block, "B3_PF%d", ++N);                  
01058       mBlocks = geom->MakeBox(no_Block,Iron,1.2,1.5,12);
01059       mBlocks->SetLineColor(2);
01060       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(4.6,-12-(12*i),3));
01061    }
01062    sprintf(no_Block, "B3_PF%d", ++N);
01063    mBlocks = geom->MakeBox(no_Block,Iron,1.5,40,2);
01064    mBlocks->SetLineColor(2);
01065    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(7,-56,-5));
01066 
01067 
01068 ////////////////////////////// Stair
01069    sprintf(no_Block, "B3_ST%d",N=0);   
01070    mBlocks = geom->MakeBox(no_Block,Iron,0.5,7,5);
01071    mBlocks->SetLineColor(18);
01072    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-6.5,-88,-2));
01073 
01074    for(int i=0;i<5;i++){
01075       sprintf(no_Block, "B3_ST%d",++N);   
01076       mBlocks = geom->MakeBox(no_Block,Iron,3,5,0.5);
01077       mBlocks->SetLineColor(18);
01078       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-3,-86-(0.7*i),-2-(1*i)));
01079    }
01080 
01081 
01082 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
01083 ////////////////////////////////           Mid-Building         ///////////////////////////////
01084 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
01085 
01086 ////////////////////////////////////// Left-Side
01087    
01088    for(int F=0;F<5;F++){ N=0;
01089       sprintf(no_Block, "B4_LF%d_%d",F,++N);   
01090       mBlocks = geom->MakeBox(no_Block,Iron,5.5,12.5,2.3);
01091       mBlocks->SetLineColor(2);
01092       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-3.5,-7.5,9.6+(8*F)));
01093 
01094       sprintf(no_Block, "B4_LF%d_%d",F,++N);   
01095       mBlocks = geom->MakeBox(no_Block,Iron,5.5,2,1.7);
01096       mBlocks->SetLineColor(2);
01097       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-3.5,3,13.6+(8*F)));
01098 
01099       sprintf(no_Block, "B4_LF%d_%d",F,++N);   
01100       mBlocks = geom->MakeBox(no_Block,Iron,5,10.5,1.7);
01101       mBlocks->SetLineColor(12);
01102       Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-3.5,-9.5,13.6+(8*F)));
01103    }
01104 
01105    sprintf(no_Block, "B4_LF%d_%d",9,N=0);   
01106    mBlocks = geom->MakeBox(no_Block,Iron,5.5,12.5,6);
01107    mBlocks->SetLineColor(2);
01108    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-3.5,-7.5,53));
01109 
01110    sprintf(no_Block, "B4_LF%d_%d",9,++N);   
01111    mBlocks = geom->MakeBox(no_Block,Iron,5.5,2,4.5);
01112    mBlocks->SetLineColor(2);
01113    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-3.5,3,3));
01114    sprintf(no_Block, "B4_LF%d_%d",9,++N);   
01115    mBlocks = geom->MakeBox(no_Block,Iron,5,10.5,4.5);
01116    mBlocks->SetLineColor(12);
01117    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-3.5,-9.5,3));
01118 
01119    sprintf(no_Block, "B4_LF%d_%d",9,++N);   
01120    mBlocks = geom->MakeBox(no_Block,Iron,5.5,12.5,5);
01121    mBlocks->SetLineColor(2);
01122    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-3.5,-7.5,-3));
01123 
01124 
01125 
01126 
01127 ///////////////////////////////////// Right-Side
01128    sprintf(no_Block, "B4_RS%d",++N);   
01129    mBlocks = geom->MakeBox(no_Block,Iron,4.25,11,24);
01130    mBlocks->SetLineColor(12);
01131    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(4.25,-9,19));
01132    sprintf(no_Block, "B4_RS%d",++N);   
01133    mBlocks = geom->MakeBox(no_Block,Iron,0.25,4,32);
01134    mBlocks->SetLineColor(2);
01135    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(8.75,2,27));
01136 
01137 
01138    sprintf(no_Block, "B4_RS%d",++N);   
01139    mBlocks = geom->MakeBox(no_Block,Iron,4.5,2,1.8);
01140    mBlocks->SetLineColor(2);
01141    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(4.5,0,44.8));
01142    sprintf(no_Block, "B4_RS%d",++N);      
01143    mBlocks = geom->MakeBox(no_Block,Iron,5.5,3.5,5);
01144    mBlocks->SetLineColor(20);
01145    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-12.5,0,-4));
01146    sprintf(no_Block, "B4_RS%d",++N);      
01147    mBlocks = geom->MakeBox(no_Block,Iron,6,2,0.3);
01148    mBlocks->SetLineColor(18);
01149    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(4.5,-4,46.3));
01150    sprintf(no_Block, "B4_RS%d",++N);   
01151    mBlocks = geom->MakeBox(no_Block,Iron,4,2,1.5);
01152    mBlocks->SetLineColor(12);
01153    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(4.5,-4,44.5));
01154    sprintf(no_Block, "B4_RS%d",++N);   
01155    mBlocks = geom->MakeBox(no_Block,Iron,4.5,7,1.8);
01156    mBlocks->SetLineColor(2);
01157    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(4.5,-13,44.8));
01158 
01159    sprintf(no_Block, "B4_RS%d",++N);   
01160    mBlocks = geom->MakeBox(no_Block,Iron,4.5,11,1.8);
01161    mBlocks->SetLineColor(2);
01162    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(4.5,-9,48.4));
01163 
01164    sprintf(no_Block, "B4_RS%d",++N);   
01165    mBlocks = geom->MakeBox(no_Block,Iron,4.25,1.5,2);
01166    mBlocks->SetLineColor(12);
01167    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(4.5,-0,52.2));
01168    sprintf(no_Block, "B4_RS%d",++N);   
01169    mBlocks = geom->MakeBox(no_Block,Iron,4,2,2);
01170    mBlocks->SetLineColor(12);
01171    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(4.5,-4,52.2));
01172    sprintf(no_Block, "B4_RS%d",++N);   
01173    mBlocks = geom->MakeBox(no_Block,Iron,4.5,7,2);
01174    mBlocks->SetLineColor(2);
01175    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(4.5,-13,52.2));
01176 
01177 
01178    sprintf(no_Block, "B4_RS%d",++N);   
01179    mBlocks = geom->MakeBox(no_Block,Iron,4.5,11,2.4);
01180    mBlocks->SetLineColor(2);
01181    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(4.5,-9,56.6));   
01182 
01183 ///////////////////////////////// RoofTop
01184    sprintf(no_Block, "B4_RT%d",N=0);   
01185    mBlocks = geom->MakeBox(no_Block,Iron,4.25,10.9,0.2);
01186    mBlocks->SetLineColor(18);
01187    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(4.5,-9,59));   
01188    sprintf(no_Block, "B4_RT%d",++N);   
01189    mBlocks = geom->MakeBox(no_Block,Iron,5.25,12.4,0.2);
01190    mBlocks->SetLineColor(18);
01191    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-3.5,-7.5,59));
01192 
01193    sprintf(no_Block, "B4_RT%d",++N);   
01194    mBlocks = geom->MakeBox(no_Block,Iron,0.24,12.4,0.5);
01195    mBlocks->SetLineColor(18);
01196    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-8.79,-7.5,59.3));
01197    sprintf(no_Block, "B4_RT%d",++N);   
01198    mBlocks = geom->MakeBox(no_Block,Iron,0.01,12.4,0.5);
01199    mBlocks->SetLineColor(2);
01200    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-9.06,-7.5,59.3));
01201 
01202    sprintf(no_Block, "B4_RT%d",++N);
01203    mBlocks = geom->MakeBox(no_Block,Iron,0.24,13,0.5);
01204    mBlocks->SetLineColor(18);
01205    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(8.75,-7,59.3));
01206    sprintf(no_Block, "B4_RT%d",++N);   
01207    mBlocks = geom->MakeBox(no_Block,Iron,0.01,13,0.5);
01208    mBlocks->SetLineColor(2);
01209    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(9,-7,59.3));
01210 
01211    sprintf(no_Block, "B4_RT%d",++N);   
01212    mBlocks = geom->MakeBox(no_Block,Iron,8.75,0.24,0.5);
01213    mBlocks->SetLineColor(18);
01214    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,-19.75,59.3));
01215    sprintf(no_Block, "B4_RT%d",++N);   
01216    mBlocks = geom->MakeBox(no_Block,Iron,8.75,0.01,0.5);
01217    mBlocks->SetLineColor(2);
01218    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(0,-20.01,59.3));
01219 
01220    sprintf(no_Block, "B4_RT%d",++N);   
01221    mBlocks = geom->MakeBox(no_Block,Iron,5.25,0.24,0.5);
01222    mBlocks->SetLineColor(18);
01223    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-3.5,4.55,59.3));
01224    sprintf(no_Block, "B4_RT%d",++N);   
01225    mBlocks = geom->MakeBox(no_Block,Iron,5.5,0.01,0.5);
01226    mBlocks->SetLineColor(2);
01227    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(-3.75,5.1,59.3));
01228 
01229    sprintf(no_Block, "B4_RT%d",++N);   
01230    mBlocks = geom->MakeBox(no_Block,Iron,3.5,0.24,0.5);
01231    mBlocks->SetLineColor(18);
01232    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(5,1.55,59.3));
01233    sprintf(no_Block, "B4_RT%d",++N);   
01234    mBlocks = geom->MakeBox(no_Block,Iron,3.5,0.01,0.5);
01235    mBlocks->SetLineColor(2);
01236    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(5,2.1,59.3));
01237 
01238 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
01239 ////////////////////////////////             GROUND             ///////////////////////////////
01240 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
01241 
01242    sprintf(no_Block, "GRD%d",++N);   
01243    mBlocks = geom->MakeBox(no_Block,Iron,40,90,2);
01244    mBlocks->SetLineColor(30);
01245    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(5,-20,-9));
01246 
01247    sprintf(no_Block, "GRD%d",++N);   
01248    mBlocks = geom->MakeBox(no_Block,Iron,30,30,2);
01249    mBlocks->SetLineColor(41);
01250    Phy_Building->AddNodeOverlap(mBlocks,1,new TGeoTranslation(5,30,-5));
01251    geom->CloseGeometry();
01252 
01253 
01254 
01255 
01256 ////////////////////////// Draw
01257    Phy_Building->SetVisibility(0);
01258    Phy_Building->Draw("ogl");
01259 
01260 
01261 }
Generated on Tue Jul 5 15:44:12 2011 for ROOT_528-00b_version by  doxygen 1.5.1