Commit ffbdb604 authored by Frank Bergmann's avatar Frank Bergmann

- created first dashboard pie chart

parent ef6094e1
<table align="left" cellpadding="3" cellspacing="1" >
<tr><td> <div style='border:2px solid blue; position:relative;top:0px;height:@diagram_properties.height@px;width:@diagram_properties.width@px;'>
<div style='position:relative;top:0px;height:@diagram_properties.height@px;width:@diagram_properties.width@px;float:left;'>
<SCRIPT Language="JavaScript"> <SCRIPT Language="JavaScript">
document.open(); document.open();
var D=new Diagram(); var D=new Diagram();
...@@ -12,37 +13,48 @@ D.Font="color:#000000;font-family:Verdana;font-weight:normal;font-size:7pt;line- ...@@ -12,37 +13,48 @@ D.Font="color:#000000;font-family:Verdana;font-weight:normal;font-size:7pt;line-
D.Draw("", "@diagram_properties.color@", false); D.Draw("", "@diagram_properties.color@", false);
var x=0, y=0; var x=0, y=0;
@diagram_properties.minima@ @diagram_properties.minima@
<noparse>
<multiple name="@diagram_properties.multirow@"> <noparse><multiple name="@diagram_properties.multirow@"></noparse>
</noparse>
<multiple name="elements"> <multiple name="elements">
<% set col [expr "$elements(rownum) % 2"] %> <% set col [expr "$elements(rownum) % 2"] %>
<% set index [expr "int(ceil($elements(rownum)/2))"];%> <% set index [expr "int(ceil($elements(rownum)/2))"]; %>
<if @col@ eq 1> <if @col@ eq 1>
x=D.ScreenX(<if @diagram_properties.x_scale@ eq 1><diagramelement name="@elements.name@"/></if><else>Date.UTC(<diagramelement name="@elements.name@"/>)</else>); x=D.ScreenX(
<if @diagram_properties.x_scale@ eq 1>
<diagramelement name="@elements.name@"/>
</if><else>
Date.UTC(<diagramelement name="@elements.name@"/>)
</else>
);
</if> </if>
<else> <else>
y=D.ScreenY(<if @diagram_properties.y_scale@ eq 1><diagramelement name="@elements.name@"/></if><else>Date.UTC(<diagramelement name="@elements.name@"/>)</else>); y=D.ScreenY(
<if @diagram_properties.y_scale@ eq 1>
<diagramelement name="@elements.name@"/>
</if><else>
Date.UTC(<diagramelement name="@elements.name@"/>)
</else>
);
</else> </else>
<if @col@ eq 0> <if @col@ eq 0>
<if @elements.type@ eq 1>new Dot(x, y, @elements.size@, '@elements.dot_type@', '@elements.color@','');</if> <if @elements.type@ eq 1>new Dot(x, y, @elements.size@, '@elements.dot_type@', '@elements.color@','');</if>
<if @elements.type@ eq 2>new Bar(x-@elements.size@, y, x+@elements.size@,@diagram_properties.y0@, '@elements.color@', '', '', '');</if>
<if @elements.type@ eq 3>new Box(x-@elements.size@, y, x+@elements.size@,@diagram_properties.y0@, '@elements.color@', '@elements.image;noquote@', '', 1, '#000000');</if> <if @elements.type@ eq 2>new Bar(x-@elements.size@, y, x+@elements.size@,@diagram_properties.y0@, '@elements.color@', '', '', '');</if>
<if @elements.type@ eq 4> <if @elements.type@ eq 3>new Box(x-@elements.size@, y, x+@elements.size@,@diagram_properties.y0@, '@elements.color@', '@elements.image;noquote@', '', 1, '#000000');</if>
new Line(x@index@, y@index@, x, y,'@elements.color@',@elements.size@, ''); <if @elements.type@ eq 4>
x@index@=x; new Line(x@index@, y@index@, x, y,'@elements.color@',@elements.size@, '');
y@index@=y; x@index@=x;
</if> y@index@=y;
</if>
</if> </if>
</multiple> </multiple>
<noparse> <noparse></multiple></noparse>
</multiple>
</noparse>
document.close(); document.close();
</SCRIPT> </SCRIPT>
</div>
</td>
<td valign="top">
#diagram.Legend# #diagram.Legend#
<multiple name="elements"> <multiple name="elements">
<% set col [expr "$elements(rownum) % 2"] %> <% set col [expr "$elements(rownum) % 2"] %>
...@@ -51,7 +63,6 @@ document.close(); ...@@ -51,7 +63,6 @@ document.close();
<div style="color: @elements.color@;font-size:7pt;">@elements.label;noquote@</div> <div style="color: @elements.color@;font-size:7pt;">@elements.label;noquote@</div>
</if> </if>
</multiple> </multiple>
</td></tr>
</table>
</div>
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment