Subversion-Projekte lars-tiefland.php_share

Revision

Blame | Letzte Änderung | Log anzeigen | RSS feed 

<code><font color="#000000">
<font color="#0000BB">&lt;?php<br /></font><font color="#FF8000">//&nbsp;A&nbsp;simple&nbsp;Polar&nbsp;graph,<br /><br /></font><font color="#007700">include&nbsp;</font><font color="#DD0000">"../jpgraph.php"</font><font color="#007700">;<br />include&nbsp;</font><font color="#DD0000">"../jpgraph_polar.php"</font><font color="#007700">;<br /><br /><br /></font><font color="#0000BB">$data&nbsp;</font><font color="#007700">=&nbsp;array(</font><font color="#0000BB">0</font><font color="#007700">,</font><font color="#0000BB">1</font><font color="#007700">,</font><font color="#0000BB">30</font><font color="#007700">,</font><font color="#0000BB">2</font><font color="#007700">,</font><font color="#0000BB">30</font><font color="#007700">,</font><font color="#0000BB">25</font><font color="#007700">,</font><font color="#0000BB">40</font><font color="#007700">,</font><font color="#0000BB">60</font><font color="#007700">,<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</font><font color="#0000BB">50</font><font color="#007700">,</font><font color="#0000BB">110</font><font color="#007700">,</font><font color="#0000BB">60</font><font color="#007700">,</font><font color="#0000BB">160</font><font color="#007700">,</font><font color="#0000BB">70</font><font color="#007700">,</font><font color="#0000BB">210</font><font color="#007700">,</font><font color="#0000BB">75</font><font color="#007700">,</font><font color="#0000BB">230</font><font color="#007700">,</font><font color="#0000BB">80</font><font color="#007700">,</font><font color="#0000BB">260</font><font color="#007700">,</font><font color="#0000BB">85</font><font color="#007700">,</font><font color="#0000BB">370</font><font color="#007700">,<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</font><font color="#0000BB">90</font><font color="#007700">,</font><font color="#0000BB">480</font><font color="#007700">,<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</font><font color="#0000BB">95</font><font color="#007700">,</font><font color="#0000BB">370</font><font color="#007700">,</font><font color="#0000BB">100</font><font color="#007700">,</font><font color="#0000BB">260</font><font color="#007700">,</font><font color="#0000BB">105</font><font color="#007700">,</font><font color="#0000BB">230</font><font color="#007700">,<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</font><font color="#0000BB">110</font><font color="#007700">,</font><font color="#0000BB">210</font><font color="#007700">,</font><font color="#0000BB">120</font><font color="#007700">,</font><font color="#0000BB">160</font><font color="#007700">,</font><font color="#0000BB">130</font><font color="#007700">,</font><font color="#0000BB">110</font><font color="#007700">,</font><font color="#0000BB">140</font><font color="#007700">,</font><font color="#0000BB">60</font><font color="#007700">,<br />&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</font><font color="#0000BB">150</font><font color="#007700">,</font><font color="#0000BB">25</font><font color="#007700">,</font><font color="#0000BB">150</font><font color="#007700">,</font><font color="#0000BB">2</font><font color="#007700">,</font><font color="#0000BB">180</font><font color="#007700">,</font><font color="#0000BB">1</font><font color="#007700">);<br /><br /></font><font color="#0000BB">$n&nbsp;</font><font color="#007700">=&nbsp;</font><font color="#0000BB">count</font><font color="#007700">(</font><font color="#0000BB">$data</font><font color="#007700">);<br />for(</font><font color="#0000BB">$i</font><font color="#007700">=</font><font color="#0000BB">0</font><font color="#007700">;&nbsp;</font><font color="#0000BB">$i&nbsp;</font><font color="#007700">&lt;&nbsp;</font><font color="#0000BB">$n</font><font color="#007700">;&nbsp;</font><font color="#0000BB">$i</font><font color="#007700">+=</font><font color="#0000BB">2&nbsp;</font><font color="#007700">)&nbsp;{<br />&nbsp;&nbsp;&nbsp;&nbsp;</font><font color="#0000BB">$data</font><font color="#007700">[</font><font color="#0000BB">$n</font><font color="#007700">+</font><font color="#0000BB">$i</font><font color="#007700">]&nbsp;=&nbsp;</font><font color="#0000BB">360</font><font color="#007700">-</font><font color="#0000BB">$data</font><font color="#007700">[</font><font color="#0000BB">$i</font><font color="#007700">];<br />&nbsp;&nbsp;&nbsp;&nbsp;</font><font color="#0000BB">$data</font><font color="#007700">[</font><font color="#0000BB">$n</font><font color="#007700">+</font><font color="#0000BB">$i</font><font color="#007700">+</font><font color="#0000BB">1</font><font color="#007700">]&nbsp;=&nbsp;</font><font color="#0000BB">$data</font><font color="#007700">[</font><font color="#0000BB">$i</font><font color="#007700">+</font><font color="#0000BB">1</font><font color="#007700">];<br />}<br /><br /><br /></font><font color="#0000BB">$graph&nbsp;</font><font color="#007700">=&nbsp;new&nbsp;</font><font color="#0000BB">PolarGraph</font><font color="#007700">(</font><font color="#0000BB">300</font><font color="#007700">,</font><font color="#0000BB">400</font><font color="#007700">);<br /></font><font color="#0000BB">$graph</font><font color="#007700">-&gt;</font><font color="#0000BB">SetScale</font><font color="#007700">(</font><font color="#DD0000">'log'</font><font color="#007700">,</font><font color="#0000BB">100</font><font color="#007700">);<br /></font><font color="#0000BB">$graph</font><font color="#007700">-&gt;</font><font color="#0000BB">SetType</font><font color="#007700">(</font><font color="#0000BB">POLAR_360</font><font color="#007700">);<br /></font><font color="#0000BB">$graph</font><font color="#007700">-&gt;</font><font color="#0000BB">SetPlotSize</font><font color="#007700">(</font><font color="#0000BB">220</font><font color="#007700">,</font><font color="#0000BB">300</font><font color="#007700">);<br /><br /></font><font color="#FF8000">//&nbsp;Hide&nbsp;frame&nbsp;around&nbsp;graph&nbsp;(by&nbsp;setting&nbsp;width=0)<br /></font><font color="#0000BB">$graph</font><font color="#007700">-&gt;</font><font color="#0000BB">SetFrame</font><font color="#007700">(</font><font color="#0000BB">true</font><font color="#007700">,</font><font color="#DD0000">'white'</font><font color="#007700">,</font><font color="#0000BB">1</font><font color="#007700">);<br /><br /></font><font color="#0000BB">$graph</font><font color="#007700">-&gt;</font><font color="#0000BB">SetBackgroundGradient</font><font color="#007700">(</font><font color="#DD0000">'blue:1.3'</font><font color="#007700">,</font><font color="#DD0000">'brown:1.4'</font><font color="#007700">,</font><font color="#0000BB">GRAD_MIDHOR</font><font color="#007700">,</font><font color="#0000BB">BGRAD_PLOT</font><font color="#007700">);<br /><br /></font><font color="#FF8000">//&nbsp;Set&nbsp;color&nbsp;for&nbsp;gradient&nbsp;lines<br /></font><font color="#0000BB">$graph</font><font color="#007700">-&gt;</font><font color="#0000BB">axis</font><font color="#007700">-&gt;</font><font color="#0000BB">SetGridColor</font><font color="#007700">(</font><font color="#DD0000">'gray'</font><font color="#007700">,</font><font color="#DD0000">'gray'</font><font color="#007700">,</font><font color="#DD0000">'gray'</font><font color="#007700">);<br /><br /></font><font color="#0000BB">$graph</font><font color="#007700">-&gt;</font><font color="#0000BB">title</font><font color="#007700">-&gt;</font><font color="#0000BB">Set</font><font color="#007700">(</font><font color="#DD0000">'Polar&nbsp;plot&nbsp;#7-2'</font><font color="#007700">);<br /></font><font color="#0000BB">$graph</font><font color="#007700">-&gt;</font><font color="#0000BB">title</font><font color="#007700">-&gt;</font><font color="#0000BB">SetFont</font><font color="#007700">(</font><font color="#0000BB">FF_ARIAL</font><font color="#007700">,</font><font color="#0000BB">FS_BOLD</font><font color="#007700">,</font><font color="#0000BB">16</font><font color="#007700">);<br /></font><font color="#0000BB">$graph</font><font color="#007700">-&gt;</font><font color="#0000BB">title</font><font color="#007700">-&gt;</font><font color="#0000BB">SetColor</font><font color="#007700">(</font><font color="#DD0000">'navy'</font><font color="#007700">);<br /><br /></font><font color="#FF8000">//&nbsp;Adjust&nbsp;legen&nbsp;box&nbsp;position&nbsp;and&nbsp;color<br /></font><font color="#0000BB">$graph</font><font color="#007700">-&gt;</font><font color="#0000BB">legend</font><font color="#007700">-&gt;</font><font color="#0000BB">SetColor</font><font color="#007700">(</font><font color="#DD0000">'navy'</font><font color="#007700">,</font><font color="#DD0000">'darkgray'</font><font color="#007700">);<br /></font><font color="#0000BB">$graph</font><font color="#007700">-&gt;</font><font color="#0000BB">legend</font><font color="#007700">-&gt;</font><font color="#0000BB">SetFillColor</font><font color="#007700">(</font><font color="#DD0000">'white'</font><font color="#007700">);<br /></font><font color="#0000BB">$graph</font><font color="#007700">-&gt;</font><font color="#0000BB">legend</font><font color="#007700">-&gt;</font><font color="#0000BB">SetShadow</font><font color="#007700">(</font><font color="#DD0000">'darkgray@0.5'</font><font color="#007700">,</font><font color="#0000BB">5</font><font color="#007700">);<br /><br /></font><font color="#0000BB">$p&nbsp;</font><font color="#007700">=&nbsp;new&nbsp;</font><font color="#0000BB">PolarPlot</font><font color="#007700">(</font><font color="#0000BB">$data</font><font color="#007700">);<br /></font><font color="#0000BB">$p</font><font color="#007700">-&gt;</font><font color="#0000BB">SetFillColor</font><font color="#007700">(</font><font color="#DD0000">'yellow@0.6'</font><font color="#007700">);<br /></font><font color="#0000BB">$p</font><font color="#007700">-&gt;</font><font color="#0000BB">mark</font><font color="#007700">-&gt;</font><font color="#0000BB">SetType</font><font color="#007700">(</font><font color="#0000BB">MARK_SQUARE</font><font color="#007700">);<br /></font><font color="#0000BB">$p</font><font color="#007700">-&gt;</font><font color="#0000BB">SetLegend</font><font color="#007700">(</font><font color="#DD0000">"Mirophone&nbsp;#1\n(No&nbsp;amps)"</font><font color="#007700">);<br /><br /></font><font color="#0000BB">$graph</font><font color="#007700">-&gt;</font><font color="#0000BB">Add</font><font color="#007700">(</font><font color="#0000BB">$p</font><font color="#007700">);<br /><br /></font><font color="#0000BB">$graph</font><font color="#007700">-&gt;</font><font color="#0000BB">Stroke</font><font color="#007700">();<br /><br /></font><font color="#0000BB">?&gt;<br /></font>
</font>
</code>