added Hmon window

diff --git a/hmon/hmon_diamond.pl b/hmon/hmon_diamond.pl
index d878861560189e26f72542ba7b34faeb9015c910..1824b23f63d6c37cf4400906d30b5b5788d3687c 100755 (executable)
--- a/hmon/hmon_diamond.pl
+++ b/hmon/hmon_diamond.pl
@@ -33,6 +33,12 @@ $plot2->{ymax}    = 5.5;
 HPlot::PlotInit($plot2);
 
 
+my $str  = Hmon::MakeTitle(9, 10, "Diamond Hit Rate");
+$str .= qq@<img src="%ADDPNG files/DiamondRate.png%" type="image/png"><br>\n@;
+$str .= Hmon::MakeFooter();
+Hmon::WriteFile("DiamondRate",$str);
+
+
 
 # Nino 1:   FPGA 1, connector 1
 # Nino 2:   FPGA 1, connector 2
@@ -128,4 +134,4 @@ while (1) {
   $old = $o;
   $oldtime = time();
   sleep(1);
-  }
\ No newline at end of file
+  }