ZealOS/docs/Demo/Graphics/PredatorPrey.CC.html
TomAwezome 1b75d91002 Fix Mount AHCI Port selection.
Add arg to SATARep to specify drive types to show.
Add checks in AHCIPortInit to verify port signatures, add helper method to get signatures from port.
2021-08-02 16:40:05 -04:00

116 lines
9.3 KiB
HTML
Executable file

<!DOCTYPE HTML>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html;charset=US-ASCII">
<meta name="generator" content="ZealOS V0.13">
<style type="text/css">
body {background-color:#fef1f0;}
.cF0{color:#000000;background-color:#fef1f0;}
.cF1{color:#0148a4;background-color:#fef1f0;}
.cF2{color:#3b7901;background-color:#fef1f0;}
.cF3{color:#057c7e;background-color:#fef1f0;}
.cF4{color:#bb2020;background-color:#fef1f0;}
.cF5{color:#9e42ae;background-color:#fef1f0;}
.cF6{color:#b57901;background-color:#fef1f0;}
.cF7{color:#b2b6af;background-color:#fef1f0;}
.cF8{color:#555753;background-color:#fef1f0;}
.cF9{color:#678fbb;background-color:#fef1f0;}
.cFA{color:#82bc49;background-color:#fef1f0;}
.cFB{color:#0097a2;background-color:#fef1f0;}
.cFC{color:#e26a6a;background-color:#fef1f0;}
.cFD{color:#c671bc;background-color:#fef1f0;}
.cFE{color:#c7ab00;background-color:#fef1f0;}
.cFF{color:#fef1f0;background-color:#fef1f0;}
</style>
</head>
<body>
<pre style="font-family:monospace;font-size:12pt">
<a name="l1"></a><span class=cF2>//Classic 2nd order nonlinear ordinary differential equation</span><span class=cF0>
<a name="l2"></a>
<a name="l3"></a></span><span class=cF9>I64</span><span class=cF0> mp_not_done_flags;
<a name="l4"></a>
<a name="l5"></a>#</span><span class=cF1>define</span><span class=cF0> OX </span><span class=cFE>10</span><span class=cF0>
<a name="l6"></a>#</span><span class=cF1>define</span><span class=cF0> OY </span><span class=cF3>GR_HEIGHT</span><span class=cF0> / </span><span class=cFE>2</span><span class=cF0> - </span><span class=cF3>FONT_HEIGHT</span><span class=cF0>
<a name="l7"></a>
<a name="l8"></a>#</span><span class=cF1>define</span><span class=cF0> MICRO_STEP </span><span class=cFE>0</span><span class=cF0>.</span><span class=cFE>000001</span><span class=cF0>
<a name="l9"></a>
<a name="l10"></a></span><span class=cF1>class</span><span class=cF0> State
<a name="l11"></a>{
<a name="l12"></a> </span><span class=cF1>F64</span><span class=cF0> wabbits, hawks, d_wabbits, d_hawks; </span><span class=cF2>//Technically, these are not part of the state.</span><span class=cF0>
<a name="l13"></a>};
<a name="l14"></a>
<a name="l15"></a></span><span class=cF1>U0</span><span class=cF0> Steps(State *s)
<a name="l16"></a>{
<a name="l17"></a> </span><span class=cF9>I64</span><span class=cF0> i;
<a name="l18"></a>
<a name="l19"></a> </span><span class=cF1>for</span><span class=cF0> (i = </span><span class=cFE>0</span><span class=cF0>; i &lt; </span><span class=cFE>10000</span><span class=cF0>; i++)
<a name="l20"></a> </span><span class=cF7>{</span><span class=cF0>
<a name="l21"></a> s-&gt;d_wabbits = s-&gt;wabbits * (</span><span class=cFE>1</span><span class=cF0>.</span><span class=cFE>0</span><span class=cF0> - </span><span class=cFE>0</span><span class=cF0>.</span><span class=cFE>10</span><span class=cF0> * s-&gt;hawks);
<a name="l22"></a> s-&gt;d_hawks = -s-&gt;hawks * (</span><span class=cFE>1</span><span class=cF0>.</span><span class=cFE>0</span><span class=cF0> - </span><span class=cFE>0</span><span class=cF0>.</span><span class=cFE>01</span><span class=cF0> * s-&gt;wabbits);
<a name="l23"></a> s-&gt;hawks += s-&gt;d_hawks * MICRO_STEP;
<a name="l24"></a> s-&gt;wabbits += s-&gt;d_wabbits * MICRO_STEP;
<a name="l25"></a> </span><span class=cF7>}</span><span class=cF0>
<a name="l26"></a>}
<a name="l27"></a>
<a name="l28"></a></span><span class=cF1>U0</span><span class=cF0> PlotTrajectory(</span><span class=cF9>CTask</span><span class=cF0> *parent)
<a name="l29"></a>{
<a name="l30"></a> </span><span class=cF9>I64</span><span class=cF0> i;
<a name="l31"></a> </span><span class=cF9>CDC</span><span class=cF0> *dc = </span><span class=cF5>DCAlias</span><span class=cF0>(, parent);
<a name="l32"></a> State s;
<a name="l33"></a>
<a name="l34"></a> </span><span class=cF5>MemSet</span><span class=cF0>(&amp;s, </span><span class=cFE>0</span><span class=cF0>, </span><span class=cF1>sizeof</span><span class=cF7>(</span><span class=cF0>State</span><span class=cF7>)</span><span class=cF0>);
<a name="l35"></a> s.wabbits = </span><span class=cF5>RandU16</span><span class=cF0> % </span><span class=cFE>100</span><span class=cF0> + </span><span class=cFE>10</span><span class=cF0>;
<a name="l36"></a> s.hawks = </span><span class=cF5>RandU16</span><span class=cF0> % </span><span class=cFE>10</span><span class=cF0> + </span><span class=cFE>1</span><span class=cF0>;
<a name="l37"></a>
<a name="l38"></a> </span><span class=cF1>for</span><span class=cF0> (i = </span><span class=cFE>0</span><span class=cF0>; i &lt; </span><span class=cFE>1000</span><span class=cF0>; i++)
<a name="l39"></a> </span><span class=cF7>{</span><span class=cF0>
<a name="l40"></a> dc-&gt;color = </span><span class=cF3>LTGREEN</span><span class=cF0>;
<a name="l41"></a> </span><span class=cF5>GrPlot</span><span class=cF0>(dc, s.wabbits + OX, OY - s.d_wabbits);
<a name="l42"></a> dc-&gt;color=</span><span class=cF3>LTRED</span><span class=cF0>;
<a name="l43"></a> </span><span class=cF5>GrPlot</span><span class=cF0>(dc, s.hawks + OX, OY - s.d_hawks);
<a name="l44"></a> Steps(&amp;s);
<a name="l45"></a> </span><span class=cF7>}</span><span class=cF0>
<a name="l46"></a> </span><span class=cF5>DCDel</span><span class=cF0>(dc);
<a name="l47"></a> </span><span class=cF5>LBtr</span><span class=cF0>(&amp;mp_not_done_flags, </span><span class=cF5>Gs</span><span class=cF0>-&gt;num);
<a name="l48"></a>}
<a name="l49"></a>
<a name="l50"></a></span><span class=cF1>U0</span><span class=cF0> PredatorPrey()
<a name="l51"></a>{
<a name="l52"></a> </span><span class=cF9>I64</span><span class=cF0> i;
<a name="l53"></a> </span><span class=cF9>CDC</span><span class=cF0> *dc = </span><span class=cF5>DCAlias</span><span class=cF0>;
<a name="l54"></a>
<a name="l55"></a> </span><span class=cF5>PopUpOk</span><span class=cF0>(</span><span class=cF6>&quot;This will plot multiple predator-prey\n&quot;</span><span class=cF0>
<a name="l56"></a> </span><span class=cF6>&quot;trajectories. It restarts many times\n&quot;</span><span class=cF0>
<a name="l57"></a> </span><span class=cF6>&quot;with different, random, initial populations.\n&quot;</span><span class=cF0>);
<a name="l58"></a> </span><span class=cF5>SettingsPush</span><span class=cF0>; </span><span class=cF2>//See </span><a href="https://zeal-operating-system.github.io/ZealOS/System/TaskSettings.CC.html#l3"><span class=cF4>SettingsPush</span></a><span class=cF0>
<a name="l59"></a> </span><span class=cF1>try</span><span class=cF0>
<a name="l60"></a> </span><span class=cF7>{</span><span class=cF0>
<a name="l61"></a> </span><span class=cF5>AutoComplete</span><span class=cF0>;
<a name="l62"></a> </span><span class=cF5>WinBorder</span><span class=cF0>;
<a name="l63"></a> </span><span class=cF5>WinMax</span><span class=cF0>;
<a name="l64"></a> </span><span class=cF5>DocClear</span><span class=cF0>;
<a name="l65"></a> </span><span class=cF5>Refresh</span><span class=cF0>;
<a name="l66"></a>
<a name="l67"></a> dc-&gt;color = </span><span class=cF3>BLACK</span><span class=cF0>;
<a name="l68"></a> </span><span class=cF5>GrLine</span><span class=cF0>(dc, OX, </span><span class=cFE>0</span><span class=cF0>, OX, </span><span class=cF3>GR_HEIGHT</span><span class=cF0> - </span><span class=cF3>FONT_HEIGHT</span><span class=cF0> - </span><span class=cFE>1</span><span class=cF0>);
<a name="l69"></a> </span><span class=cF5>GrLine</span><span class=cF0>(dc, </span><span class=cFE>0</span><span class=cF0>, OY, </span><span class=cF3>GR_WIDTH</span><span class=cF0> - </span><span class=cFE>1</span><span class=cF0>, OY);
<a name="l70"></a> </span><span class=cF1>while</span><span class=cF0> (!</span><span class=cF5>CharScan</span><span class=cF0>)
<a name="l71"></a> {
<a name="l72"></a> mp_not_done_flags = </span><span class=cFE>1</span><span class=cF0> &lt;&lt; </span><span class=cFB>mp_count</span><span class=cF0> - </span><span class=cFE>1</span><span class=cF0>;
<a name="l73"></a> </span><span class=cF1>for</span><span class=cF0> (i = </span><span class=cFE>0</span><span class=cF0>; i &lt; </span><span class=cFB>mp_count</span><span class=cF0>; i++)
<a name="l74"></a> </span><span class=cF5>JobQueue</span><span class=cF0>(&amp;PlotTrajectory, </span><span class=cF5>Fs</span><span class=cF0>, i);
<a name="l75"></a>
<a name="l76"></a> </span><span class=cF1>do</span><span class=cF0> </span><span class=cF5>Yield</span><span class=cF0>;
<a name="l77"></a> </span><span class=cF1>while</span><span class=cF0> (mp_not_done_flags);
<a name="l78"></a> }
<a name="l79"></a> </span><span class=cF7>}</span><span class=cF0>
<a name="l80"></a> </span><span class=cF1>catch</span><span class=cF0>
<a name="l81"></a> </span><span class=cF5>PutExcept</span><span class=cF0>;
<a name="l82"></a> </span><span class=cF5>SettingsPop</span><span class=cF0>;
<a name="l83"></a> </span><span class=cF5>DCFill</span><span class=cF0>(dc);
<a name="l84"></a> </span><span class=cF5>DCDel</span><span class=cF0>(dc);
<a name="l85"></a>}
<a name="l86"></a>
<a name="l87"></a>PredatorPrey;
</span></pre></body>
</html>