mp3player.C File Reference

Detailed Description

Drawing a mp3 type music player, using ROOT geometry class.

Reviewed by Sunman Kim (sunma.nosp@m.n98@.nosp@m.hanma.nosp@m.il.n.nosp@m.et) Supervisor: Prof. Inkyu Park (icpar.nosp@m.k@ph.nosp@m.ysics.nosp@m..uos.nosp@m..ac.k.nosp@m.r)

How to run: .x mp3player.C in ROOT terminal, then use OpenGL

This macro was created for the evaluation of Computational Physics course in 2006. We thank to Prof. Inkyu Park for his special lecture on ROOT and to all of ROOT team

 
#include "TCanvas.h"
#include "TPaveText.h"
#include "TImage.h"
#include "TLine.h"
#include "TLatex.h"
#include "TButton.h"
#include "TGeoManager.h"
 
void mp3player()
{
 
   TGeoManager *geom = new TGeoManager("geom", "My first 3D geometry");
 
   // materials
   TGeoMaterial *vacuum = new TGeoMaterial("vacuum", 0, 0, 0);
   TGeoMaterial *Fe = new TGeoMaterial("Fe", 55.845, 26, 7.87);
 
   // create media
 
   TGeoMedium *Iron = new TGeoMedium("Iron", 1, Fe);
   TGeoMedium *Air = new TGeoMedium("Vacuum", 0, vacuum);
 
   // create volume
 
   TGeoVolume *top = geom->MakeBox("top", Air, 800, 800, 800);
   geom->SetTopVolume(top);
   geom->SetTopVisible(kFALSE);
   // If you want to see the boundary, please input the number, 1 instead of 0.
   // Like this, geom->SetTopVisible(1);
 
   TGeoVolume *b1 = geom->MakeBox("b1", Iron, 100, 200, 600);
   b1->SetLineColor(2);
 
   TGeoVolume *b2 = geom->MakeTubs("b2", Iron, 0, 50, 200, 0, 90);
   b2->SetLineColor(10);
 
   TGeoVolume *b3 = geom->MakeTubs("b3", Iron, 0, 50, 200, 90, 180);
   b3->SetLineColor(10);
 
   TGeoVolume *b4 = geom->MakeTubs("b4", Iron, 0, 50, 200, 180, 270);
   b4->SetLineColor(10);
 
   TGeoVolume *b5 = geom->MakeTubs("b5", Iron, 0, 50, 200, 270, 360);
   b5->SetLineColor(10);
 
   TGeoVolume *b6 = geom->MakeTubs("b6", Iron, 0, 50, 600, 0, 90);
   b6->SetLineColor(10);
 
   TGeoVolume *b7 = geom->MakeTubs("b7", Iron, 0, 50, 600, 90, 180);
   b7->SetLineColor(10);
 
   TGeoVolume *b8 = geom->MakeTubs("b8", Iron, 0, 50, 600, 180, 270);
   b8->SetLineColor(10);
 
   TGeoVolume *b9 = geom->MakeTubs("b9", Iron, 0, 50, 600, 270, 360);
   b9->SetLineColor(10);
 
   TGeoVolume *b10 = geom->MakeTubs("b10", Iron, 0, 50, 100, 0, 90);
   b10->SetLineColor(10);
 
   TGeoVolume *b11 = geom->MakeTubs("b11", Iron, 0, 50, 100, 90, 180);
   b11->SetLineColor(10);
 
   TGeoVolume *b12 = geom->MakeTubs("b12", Iron, 0, 50, 100, 180, 270);
   b12->SetLineColor(10);
 
   TGeoVolume *b13 = geom->MakeTubs("b13", Iron, 0, 50, 100, 270, 360);
   b13->SetLineColor(10);
 
   TGeoVolume *b14 = geom->MakeBox("b14", Iron, 100, 50, 450);
   b14->SetLineColor(10);
   TGeoVolume *b15 = geom->MakeBox("b15", Iron, 50, 200, 600);
   b15->SetLineColor(10);
 
   TGeoVolume *b16 = geom->MakeSphere("b16", Iron, 0, 50, 0, 90, 0, 90);
   b16->SetLineColor(10);
 
   TGeoVolume *b17 = geom->MakeSphere("b17", Iron, 0, 50, 0, 90, 270, 360);
   b17->SetLineColor(10);
 
   TGeoVolume *b18 = geom->MakeSphere("b18", Iron, 0, 50, 0, 90, 180, 270);
   b18->SetLineColor(10);
 
   TGeoVolume *b19 = geom->MakeSphere("b19", Iron, 0, 50, 0, 90, 90, 180);
   b19->SetLineColor(10);
 
   TGeoVolume *b20 = geom->MakeTube("b20", Iron, 50, 150, 150);
   b20->SetLineColor(17);
 
   TGeoVolume *b21 = geom->MakeSphere("b21", Iron, 0, 50, 90, 180, 0, 90);
   b21->SetLineColor(10);
 
   TGeoVolume *b22 = geom->MakeSphere("b22", Iron, 0, 50, 90, 180, 270, 360);
   b22->SetLineColor(10);
 
   TGeoVolume *b23 = geom->MakeSphere("b23", Iron, 0, 50, 90, 180, 180, 270);
   b23->SetLineColor(10);
 
   TGeoVolume *b24 = geom->MakeSphere("b24", Iron, 0, 50, 90, 180, 90, 180);
   b24->SetLineColor(10);
 
   TGeoVolume *b25 = geom->MakeTube("b25", Iron, 51, 54, 150);
   b25->SetLineColor(17);
   TGeoVolume *b26 = geom->MakeTube("b26", Iron, 56, 59, 150);
   b26->SetLineColor(17);
   TGeoVolume *b27 = geom->MakeTube("b27", Iron, 61, 64, 150);
   b27->SetLineColor(17);
   TGeoVolume *b28 = geom->MakeTube("b28", Iron, 66, 69, 150);
   b28->SetLineColor(17);
   TGeoVolume *b29 = geom->MakeTube("b29", Iron, 71, 74, 150);
   b29->SetLineColor(17);
   TGeoVolume *b30 = geom->MakeTube("b30", Iron, 76, 79, 150);
   b30->SetLineColor(17);
   TGeoVolume *b31 = geom->MakeTube("b31", Iron, 81, 84, 150);
   b31->SetLineColor(17);
   TGeoVolume *b32 = geom->MakeTube("b32", Iron, 86, 89, 150);
   b32->SetLineColor(17);
   TGeoVolume *b33 = geom->MakeTube("b33", Iron, 91, 94, 150);
   b33->SetLineColor(17);
   TGeoVolume *b34 = geom->MakeTube("b34", Iron, 96, 99, 150);
   b34->SetLineColor(17);
   TGeoVolume *b35 = geom->MakeTube("b35", Iron, 101, 104, 150);
   b35->SetLineColor(17);
   TGeoVolume *b36 = geom->MakeTube("b36", Iron, 106, 109, 150);
   b36->SetLineColor(17);
   TGeoVolume *b37 = geom->MakeTube("b37", Iron, 111, 114, 150);
   b37->SetLineColor(17);
   TGeoVolume *b38 = geom->MakeTube("b38", Iron, 116, 119, 150);
   b38->SetLineColor(17);
   TGeoVolume *b39 = geom->MakeTube("b39", Iron, 121, 124, 150);
   b39->SetLineColor(17);
   TGeoVolume *b40 = geom->MakeTube("b40", Iron, 126, 129, 150);
   b40->SetLineColor(17);
   TGeoVolume *b41 = geom->MakeTube("b41", Iron, 131, 134, 150);
   b41->SetLineColor(17);
   TGeoVolume *b42 = geom->MakeTube("b42", Iron, 136, 139, 150);
   b42->SetLineColor(17);
   TGeoVolume *b43 = geom->MakeTube("b43", Iron, 141, 144, 150);
   b43->SetLineColor(17);
   TGeoVolume *b44 = geom->MakeTube("b44", Iron, 146, 149, 150);
   b44->SetLineColor(17);
 
   TGeoVolume *b45 = geom->MakeTube("b45", Iron, 0, 25, 150);
   b45->SetLineColor(10);
 
   TGeoVolume *b46 = geom->MakeTube("b46", Iron, 25, 30, 150);
   b46->SetLineColor(17);
 
   TGeoVolume *b47 = geom->MakeBox("b47", Iron, 140, 194, 504);
   b47->SetLineColor(32);
 
   TGeoVolume *b48 = geom->MakeBox("b48", Iron, 150, 176, 236);
   b48->SetLineColor(37);
 
   TGeoVolume *b49 = geom->MakeBox("b49", Iron, 150, 2, 236);
   b49->SetLineColor(20);
   top->AddNodeOverlap(b49, 49, new TGeoTranslation(-2, 179, -150));
 
   TGeoVolume *b50 = geom->MakeBox("b50", Iron, 150, 2, 236);
   b50->SetLineColor(20);
   top->AddNodeOverlap(b50, 50, new TGeoTranslation(-2, -179, -150));
 
   TGeoVolume *b51 = geom->MakeBox("b51", Iron, 150, 176, 2);
   b51->SetLineColor(20);
   top->AddNodeOverlap(b51, 51, new TGeoTranslation(-2, 0, 89));
 
   TGeoVolume *b52 = geom->MakeBox("b52", Iron, 150, 176, 2);
   b52->SetLineColor(20);
   top->AddNodeOverlap(b52, 52, new TGeoTranslation(-2, 0, -389));
 
   TGeoVolume *b53 = geom->MakeBox("b53", Iron, 150, 200, 90);
   b53->SetLineColor(10);
   top->AddNodeOverlap(b53, 53, new TGeoTranslation(0, 0, -510));
 
   TGeoVolume *b54 = geom->MakeBox("b54", Iron, 15, 254, 600);
   b54->SetLineColor(37);
   top->AddNodeOverlap(b54, 54, new TGeoTranslation(25, 0, 0));
 
   auto r1 = new TGeoRotation("r1", 90, 90, 0);
 
   TGeoVolume *b55 = geom->MakeTubs("b55", Iron, 0, 54, 15, 270, 360);
   b55->SetLineColor(37);
   top->AddNodeOverlap(b55, 55, new TGeoCombiTrans(25, 200, -600, r1));
 
   TGeoVolume *b56 = geom->MakeTubs("b56", Iron, 0, 54, 15, 180, 270);
   b56->SetLineColor(37);
   top->AddNodeOverlap(b56, 56, new TGeoCombiTrans(25, -200, -600, r1));
 
   TGeoVolume *b57 = geom->MakeTubs("b57", Iron, 0, 54, 15, 0, 90);
   b57->SetLineColor(37);
   top->AddNodeOverlap(b57, 57, new TGeoCombiTrans(25, 200, 600, r1));
 
   TGeoVolume *b58 = geom->MakeTubs("b58", Iron, 0, 54, 15, 90, 180);
   b58->SetLineColor(37);
   top->AddNodeOverlap(b58, 58, new TGeoCombiTrans(25, -200, 600, r1));
 
   // TGeoVolume *b59=geom->MakePgon("b59",Iron,100,100,100,100);
   // b59->SetLineColor(37);
   // top->AddNodeOverlap(b59,59,new TGeoCombiTrans(200,200,100,r1));
 
   // IAudid
 
   auto r2 = new TGeoRotation("r2", 90, 90, 30);
 
   TGeoVolume *b61 = geom->MakeBox("b61", Iron, 5, 19, 150);
   b61->SetLineColor(38);
   top->AddNodeOverlap(b61, 61, new TGeoCombiTrans(-4, -87, -495, r2));
 
   TGeoVolume *b62 = geom->MakeBox("b62", Iron, 5, 19, 150);
   b62->SetLineColor(38);
   top->AddNodeOverlap(b62, 62, new TGeoCombiTrans(-4, -65, -495, r2));
   // u
   TGeoVolume *b63 = geom->MakeBox("b63", Iron, 5, 15, 150);
   b63->SetLineColor(38);
   top->AddNodeOverlap(b63, 63, new TGeoCombiTrans(-4, -40, -497, r1));
 
   TGeoVolume *b64 = geom->MakeBox("b64", Iron, 5, 15, 150);
   b64->SetLineColor(38);
   top->AddNodeOverlap(b64, 64, new TGeoCombiTrans(-4, -10, -497, r1));
 
   TGeoVolume *b65 = geom->MakeTubs("b65", Iron, 7, 17, 150, 0, 180);
   b65->SetLineColor(38);
   top->AddNodeOverlap(b65, 65, new TGeoCombiTrans(-4, -25, -490, r1));
 
   // D
 
   TGeoVolume *b66 = geom->MakeBox("b66", Iron, 5, 19, 150);
   b66->SetLineColor(38);
   top->AddNodeOverlap(b66, 66, new TGeoCombiTrans(-4, 10, -495, r1));
 
   TGeoVolume *b67 = geom->MakeTubs("b67", Iron, 10, 20, 150, 230, 480);
   b67->SetLineColor(38);
   top->AddNodeOverlap(b67, 67, new TGeoCombiTrans(-4, 23, -495, r1));
 
   // I
 
   TGeoVolume *b68 = geom->MakeBox("b68", Iron, 5, 20, 150);
   b68->SetLineColor(38);
   top->AddNodeOverlap(b68, 68, new TGeoCombiTrans(-4, 53, -495, r1));
 
   // O
 
   TGeoVolume *b69 = geom->MakeTubs("b69", Iron, 10, 22, 150, 0, 360);
   b69->SetLineColor(38);
   top->AddNodeOverlap(b69, 69, new TGeoCombiTrans(-4, 85, -495, r1));
 
   // I
   TGeoVolume *b60 = geom->MakeTube("b60", Iron, 0, 10, 150);
   b60->SetLineColor(38);
   top->AddNodeOverlap(b60, 60, new TGeoCombiTrans(-4, -120, -550, r1));
 
   TGeoVolume *b70 = geom->MakeBox("b70", Iron, 2, 19, 150);
   b70->SetLineColor(38);
   top->AddNodeOverlap(b70, 70, new TGeoCombiTrans(-4, -114, -495, r1));
 
   TGeoVolume *b71 = geom->MakeBox("b71", Iron, 2, 19, 150);
   b71->SetLineColor(38);
   top->AddNodeOverlap(b71, 71, new TGeoCombiTrans(-4, -126, -495, r1));
 
   TGeoVolume *b72 = geom->MakeBox("b72", Iron, 8, 2, 150);
   b72->SetLineColor(38);
   top->AddNodeOverlap(b72, 72, new TGeoCombiTrans(-4, -120, -515, r1));
 
   TGeoVolume *b73 = geom->MakeBox("b73", Iron, 8, 2, 150);
   b73->SetLineColor(38);
   top->AddNodeOverlap(b73, 73, new TGeoCombiTrans(-4, -120, -475, r1));
 
   // button
 
   auto r0 = nullptr; // new TGeoRotation("r0",0,0,0);
 
   TGeoVolume *b74 = geom->MakeBox("b74", Iron, 35, 250, 70);
   b74->SetLineColor(38);
   top->AddNodeOverlap(b74, 74, new TGeoCombiTrans(-25, 10, -60, r0));
 
   TGeoVolume *b75 = geom->MakeBox("b75", Iron, 35, 250, 35);
   b75->SetLineColor(38);
   top->AddNodeOverlap(b75, 75, new TGeoCombiTrans(-25, 10, -175, r0));
 
   TGeoVolume *b76 = geom->MakeBox("b76", Iron, 35, 250, 35);
   b76->SetLineColor(38);
   top->AddNodeOverlap(b76, 76, new TGeoCombiTrans(-25, 10, 55, r0));
 
   auto r3 = new TGeoRotation("r3", 0, 90, 0);
   TGeoVolume *b77 = geom->MakeTubs("b77", Iron, 0, 70, 250, 180, 270);
   b77->SetLineColor(38);
   top->AddNodeOverlap(b77, 77, new TGeoCombiTrans(10, 10, -210, r3));
 
   TGeoVolume *b78 = geom->MakeTubs("b78", Iron, 0, 70, 250, 90, 180);
   b78->SetLineColor(38);
   top->AddNodeOverlap(b78, 78, new TGeoCombiTrans(10, 10, 90, r3));
 
   // Hold
 
   TGeoVolume *b79 = geom->MakeBox("b79", Iron, 40, 250, 150);
   b79->SetLineColor(10);
   top->AddNodeOverlap(b79, 79, new TGeoCombiTrans(60, 0, 450, r0));
 
   TGeoVolume *b80 = geom->MakeTubs("b80", Iron, 50, 100, 250, 180, 270);
   b80->SetLineColor(10);
   top->AddNodeOverlap(b80, 80, new TGeoCombiTrans(10, 0, 350, r3));
 
   TGeoVolume *b81 = geom->MakeTubs("b81", Iron, 50, 100, 250, 90, 180);
   b81->SetLineColor(10);
   top->AddNodeOverlap(b81, 81, new TGeoCombiTrans(10, 0, 400, r3));
 
   TGeoVolume *b82 = geom->MakeBox("b82", Iron, 30, 250, 150);
   b82->SetLineColor(10);
   top->AddNodeOverlap(b82, 82, new TGeoCombiTrans(-70, 0, 450, r0));
 
   TGeoVolume *b83 = geom->MakeBox("b83", Iron, 30, 250, 60);
   b83->SetLineColor(10);
   top->AddNodeOverlap(b83, 83, new TGeoCombiTrans(-20, 0, 540, r0));
 
   TGeoVolume *b85 = geom->MakeTubs("b85", Iron, 0, 40, 240, 180, 270);
   b85->SetLineColor(38);
   top->AddNodeOverlap(b85, 85, new TGeoCombiTrans(10, 10, 370, r3));
 
   TGeoVolume *b84 = geom->MakeTubs("b84", Iron, 0, 40, 240, 90, 180);
   b84->SetLineColor(38);
   top->AddNodeOverlap(b84, 84, new TGeoCombiTrans(10, 10, 400, r3));
 
   TGeoVolume *b86 = geom->MakeBox("b86", Iron, 20, 240, 20);
   b86->SetLineColor(38);
   top->AddNodeOverlap(b86, 86, new TGeoCombiTrans(-10, 10, 380, r0));
 
   TGeoVolume *b87 = geom->MakeBox("b87", Iron, 20, 250, 10);
   b87->SetLineColor(35);
   top->AddNodeOverlap(b87, 87, new TGeoCombiTrans(-10, 20, 385, r0));
 
   TGeoVolume *b88 = geom->MakeBox("b88", Iron, 100, 220, 600);
   b88->SetLineColor(10);
   top->AddNodeOverlap(b88, 88, new TGeoCombiTrans(0, -30, 0, r0));
 
   TGeoVolume *b89 = geom->MakeTube("b89", Iron, 25, 95, 650);
   b89->SetLineColor(10);
   top->AddNodeOverlap(b89, 89, new TGeoCombiTrans(0, -60, 0, r0));
 
   TGeoVolume *b90 = geom->MakeTube("b90", Iron, 25, 95, 650);
   b90->SetLineColor(10);
   top->AddNodeOverlap(b90, 90, new TGeoCombiTrans(0, 60, 0, r0));
 
   TGeoVolume *b91 = geom->MakeBox("b91", Iron, 40, 200, 650);
   b91->SetLineColor(10);
   top->AddNodeOverlap(b91, 91, new TGeoCombiTrans(70, 0, 0, r0));
 
   TGeoVolume *b92 = geom->MakeBox("b92", Iron, 100, 50, 650);
   b92->SetLineColor(10);
   top->AddNodeOverlap(b92, 92, new TGeoCombiTrans(0, 150, 0, r0));
 
   TGeoVolume *b93 = geom->MakeBox("b93", Iron, 100, 50, 650);
   b93->SetLineColor(10);
   top->AddNodeOverlap(b93, 93, new TGeoCombiTrans(0, -150, 0, r0));
 
   TGeoVolume *b94 = geom->MakeBox("b94", Iron, 40, 200, 650);
   b94->SetLineColor(10);
   top->AddNodeOverlap(b94, 94, new TGeoCombiTrans(-70, 0, 0, r0));
 
   TGeoVolume *b95 = geom->MakeTube("b95", Iron, 25, 35, 650);
   b95->SetLineColor(1);
   top->AddNodeOverlap(b95, 95, new TGeoCombiTrans(0, -60, -10, r0));
 
   TGeoVolume *b96 = geom->MakeTube("b96", Iron, 25, 35, 650);
   b96->SetLineColor(1);
   top->AddNodeOverlap(b96, 96, new TGeoCombiTrans(0, 60, -10, r0));
   // usb
 
   TGeoVolume *b97 = geom->MakeBox("b97", Iron, 70, 70, 600);
   b97->SetLineColor(17);
   top->AddNodeOverlap(b97, 97, new TGeoCombiTrans(0, 0, 57, r0));
 
   TGeoVolume *b98 = geom->MakeTubs("b98", Iron, 0, 50, 600, 0, 90);
   b98->SetLineColor(17);
   top->AddNodeOverlap(b98, 98, new TGeoCombiTrans(20, 60, 57, r0));
 
   TGeoVolume *b99 = geom->MakeTubs("b99", Iron, 0, 50, 600, 180, 270);
   b99->SetLineColor(17);
   top->AddNodeOverlap(b99, 99, new TGeoCombiTrans(-20, -60, 57, r0));
 
   TGeoVolume *b100 = geom->MakeTubs("b100", Iron, 0, 50, 600, 90, 180);
   b100->SetLineColor(17);
   top->AddNodeOverlap(b100, 100, new TGeoCombiTrans(-20, 60, 57, r0));
 
   TGeoVolume *b101 = geom->MakeTubs("b101", Iron, 0, 50, 600, 270, 360);
   b101->SetLineColor(17);
   top->AddNodeOverlap(b101, 101, new TGeoCombiTrans(20, -60, 57, r0));
 
   TGeoVolume *b102 = geom->MakeBox("b102", Iron, 20, 110, 600);
   b102->SetLineColor(17);
   top->AddNodeOverlap(b102, 102, new TGeoCombiTrans(0, 0, 57, r0));
 
   TGeoVolume *b103 = geom->MakeBox("b103", Iron, 15, 200, 600);
   b103->SetLineColor(37);
   top->AddNodeOverlap(b103, 103, new TGeoCombiTrans(25, 0, 57, r0));
   // AddNode
   top->AddNodeOverlap(b1, 1, new TGeoTranslation(0, 0, 0));
   top->AddNodeOverlap(b2, 2, new TGeoCombiTrans(100, 0, 600, r3));
   top->AddNodeOverlap(b3, 3, new TGeoCombiTrans(-100, 0, 600, r3));
   top->AddNodeOverlap(b4, 4, new TGeoCombiTrans(-100, 0, -600, r3));
   top->AddNodeOverlap(b5, 5, new TGeoCombiTrans(100, 0, -600, r3));
   top->AddNodeOverlap(b6, 6, new TGeoCombiTrans(100, 200, 0, r0));
   top->AddNodeOverlap(b7, 7, new TGeoCombiTrans(-100, 200, 0, r0));
   top->AddNodeOverlap(b8, 8, new TGeoCombiTrans(-100, -200, 0, r0));
   top->AddNodeOverlap(b9, 9, new TGeoCombiTrans(100, -200, 0, r0));
 
   top->AddNodeOverlap(b10, 10, new TGeoCombiTrans(0, 200, 600, r1));
   top->AddNodeOverlap(b11, 11, new TGeoCombiTrans(0, -200, 600, r1));
   top->AddNodeOverlap(b12, 12, new TGeoCombiTrans(0, -200, -600, r1));
   top->AddNodeOverlap(b13, 13, new TGeoCombiTrans(0, 200, -600, r1));
   top->AddNodeOverlap(b14, 14, new TGeoTranslation(0, 200, -150));
   top->AddNodeOverlap(b15, 15, new TGeoTranslation(100, 0, 0));
 
   top->AddNodeOverlap(b16, 16, new TGeoCombiTrans(100, 200, 600, r0));
   top->AddNodeOverlap(b17, 17, new TGeoCombiTrans(100, -200, 600, r0));
   top->AddNodeOverlap(b18, 18, new TGeoCombiTrans(-100, -200, 600, r0));
   top->AddNodeOverlap(b19, 19, new TGeoCombiTrans(-100, 200, 600, r0));
   top->AddNodeOverlap(b20, 20, new TGeoCombiTrans(-3, 0, 350, r1));
   top->AddNodeOverlap(b21, 21, new TGeoCombiTrans(100, 200, -600, r0));
   top->AddNodeOverlap(b22, 22, new TGeoCombiTrans(100, -200, -600, r0));
   top->AddNodeOverlap(b23, 23, new TGeoCombiTrans(-100, -200, -600, r0));
   top->AddNodeOverlap(b24, 24, new TGeoCombiTrans(-100, 200, -600, r0));
 
   top->AddNodeOverlap(b25, 25, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b26, 26, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b27, 27, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b28, 28, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b29, 29, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b30, 30, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b31, 31, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b32, 32, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b33, 33, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b34, 34, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b35, 35, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b36, 36, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b37, 37, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b38, 38, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b39, 39, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b40, 40, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b41, 41, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b42, 42, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b43, 43, new TGeoCombiTrans(-9, 0, 350, r1));
   top->AddNodeOverlap(b44, 44, new TGeoCombiTrans(-9, 0, 350, r1));
 
   top->AddNodeOverlap(b45, 45, new TGeoCombiTrans(-20, 0, 350, r1));
   top->AddNodeOverlap(b46, 46, new TGeoCombiTrans(-25, 0, 350, r1));
 
   top->AddNodeOverlap(b47, 47, new TGeoTranslation(5, 0, 85));
   top->AddNodeOverlap(b48, 48, new TGeoTranslation(-2, 0, -150));
   geom->CloseGeometry();
 
   TCanvas *can = new TCanvas("can", "My virtual laboratory", 800, 800);
 
   // Mp3
   TPad *pad1 = new TPad("pad1", "Pad1", 0, 0.5, 0.5, 1);
   pad1->SetFillColor(1);
   pad1->Draw();
   pad1->cd();
   top->Draw();
 
   // Sound
   can->cd();
   TPad *pad2 = new TPad("pad2", "Pad2", 0.5, 0.5, 1, 1);
   pad2->SetFillColor(10);
   pad2->Draw();
   pad2->cd();
 
   TPaveText *pt = new TPaveText(0.4, 0.90, 0.6, 0.95, "br");
   pt->SetFillColor(30);
   pt->AddText(0.5, 0.5, "Musics");
   pt->Draw();
 
   TLatex Tex;
 
   Tex.SetTextSize(0.04);
   Tex.SetTextColor(31);
   Tex.DrawLatex(0.3, 0.81, "Mariah Carey - Shake it off");
 
   Tex.SetTextSize(0.04);
   Tex.SetTextColor(31);
   Tex.DrawLatex(0.3, 0.71, "Alicia keys - If I ain't got you");
 
   Tex.SetTextSize(0.04);
   Tex.SetTextColor(31);
   Tex.DrawLatex(0.3, 0.61, "Michael Jackson - Billie Jean");
 
   Tex.SetTextSize(0.04);
   Tex.SetTextColor(31);
   Tex.DrawLatex(0.3, 0.51, "Christina Milian - Am to Pm");
 
   Tex.SetTextSize(0.04);
   Tex.SetTextColor(31);
   Tex.DrawLatex(0.3, 0.41, "Zapp&Roger - Slow and Easy");
 
   Tex.SetTextSize(0.04);
   Tex.SetTextColor(31);
   Tex.DrawLatex(0.3, 0.31, "Black Eyes Peas - Let's get retarded");
 
   Tex.SetTextSize(0.04);
   Tex.SetTextColor(31);
   Tex.DrawLatex(0.3, 0.21, "Bosson - One in a Millin");
 
   Tex.SetTextSize(0.04);
   Tex.SetTextColor(15);
   Tex.DrawLatex(0.2, 0.11, "Click Button!! You Can Listen to Musics");
   TButton *but1 = new TButton("", "gSystem->Exec(\"cat sound1.wav > /dev/audio\")", 0.2, 0.8, 0.25, 0.85);
   but1->Draw();
   but1->SetFillColor(29);
   TButton *but2 = new TButton("", "gSystem->Exec(\"cat sound2.wav > /dev/audio\")", 0.2, 0.7, 0.25, .75);
   but2->Draw();
   but2->SetFillColor(29);
   TButton *but3 = new TButton("", "gSystem->Exec(\"cat sound3.wav > /dev/audio\")", 0.2, 0.6, 0.25, 0.65);
   but3->Draw();
   but3->SetFillColor(29);
   TButton *but4 = new TButton("", "gSystem->Exec(\"cat sound4.wav > /dev/audio\")", 0.2, 0.5, 0.25, 0.55);
   but4->Draw();
   but4->SetFillColor(29);
   TButton *but5 = new TButton("", "gSystem->Exec(\"cat sound5.wav > /dev/audio\")", 0.2, 0.4, 0.25, 0.45);
   but5->Draw();
   but5->SetFillColor(29);
   TButton *but6 = new TButton("", "gSystem->Exec(\"cat sound6.wav > /dev/audio\")", 0.2, 0.3, 0.25, 0.35);
   but6->Draw();
   but6->SetFillColor(29);
   TButton *but7 = new TButton("", "gSystem->Exec(\"cat sound7.wav > /dev/audio\")", 0.2, 0.2, 0.25, 0.25);
   but7->Draw();
   but7->SetFillColor(29);
 
   // introduction
   can->cd();
   TPad *pad3 = new TPad("pad3", "Pad3", 0, 0, 1, 0.5);
   pad3->SetFillColor(10);
   pad3->Draw();
   pad3->cd();
 
   // TImage *image=TImage::Open("mp3.jpg");
   // image->Draw();
 
   TPad *pad4 = new TPad("pad4", "Pad4", 0.6, 0.1, 0.9, 0.9);
   pad4->SetFillColor(1);
   pad4->Draw();
   pad4->cd();
 
   TLine L;
 
   Tex.SetTextSize(0.08);
   Tex.SetTextColor(10);
   Tex.DrawLatex(0.06, 0.85, "IAudio U3 Mp3 Player");
 
   L.SetLineColor(10);
   L.SetLineWidth(3);
   L.DrawLine(0.05, 0.83, 0.90, 0.83);
 
   Tex.SetTextSize(0.06);
   Tex.SetTextColor(10);
   Tex.DrawLatex(0.06, 0.75, "+ Color LCD");
 
   Tex.SetTextSize(0.06);
   Tex.SetTextColor(10);
   Tex.DrawLatex(0.06, 0.65, "+ 60mW High Generating Power");
 
   Tex.SetTextSize(0.06);
   Tex.SetTextColor(10);
   Tex.DrawLatex(0.06, 0.55, "+ GUI Theme Skin");
 
   Tex.SetTextSize(0.06);
   Tex.SetTextColor(10);
   Tex.DrawLatex(0.06, 0.45, "+ Noble White&Black");
 
   Tex.SetTextSize(0.06);
   Tex.SetTextColor(10);
   Tex.DrawLatex(0.06, 0.35, "+ Text Viewer+Image Viewer");
 
   Tex.SetTextSize(0.06);
   Tex.SetTextColor(10);
   Tex.DrawLatex(0.06, 0.25, "+ 20 Hours Playing");
 
   Tex.SetTextSize(0.06);
   Tex.SetTextColor(10);
   Tex.DrawLatex(0.06, 0.15, "+ The Best Quality of Sound");
 
   pad1->cd();
}

Author

Eun Young Kim, Dept. of Physics, Univ. of Seoul

Definition in file mp3player.C.