New menu for diagnostics.

diff --git a/RICH/Diagnostics.C b/RICH/Diagnostics.C
new file mode 100644 (file)
index 0000000..945c29b
--- /dev/null
+++ b/RICH/Diagnostics.C
@@ -0,0 +1,17 @@
+
+Int_t events;
+
+mrich(Int_t nev=1)
+{ 
+
+  events=nev;
+  
+   TControlBar *menu = new TControlBar("vertical","RICH diagnostics");
+   menu->AddButton("Diagnostics",       ".x RICHpadtest(3,0,events-1","Miscellaneous diagnostics");
+   menu->AddButton("Quit",             ".q","Close session");
+   
+   menu->Show();
+}
+
+
+