Warning: You are not logged in. Your IP address will be publicly visible if you make any edits. If you
log in or
create an account, your edits will be attributed to your username, along with other benefits.
The edit can be undone.
Please check the comparison below to verify that this is what you want to do, and then publish the changes below to finish undoing the edit.
Latest revision |
Your text |
Line 1: |
Line 1: |
| | |
| | == Octave fun scripts == |
| | |
| Writing programs (not only in Octave) is often seen as a boring activity. | | Writing programs (not only in Octave) is often seen as a boring activity. |
| To see this is not true one can look at the samples below: | | To see this is not true one can look at the samples below: |
|
| |
|
| == Octave tree ==
| | Source code: [[Media:octavetee.m]] |
| | |
| [[File:OctaveTree.gif|frame|Output of {{Path|OctaveTree.m}}.]] | |
| | |
| {{File|OctaveTree.m|<syntaxhighlight lang="octave">
| |
| N = 25; # Height
| |
| H = 7; # Trunk height
| |
| g = 0.2; # Density of decoration (0 <= g <= 1).
| |
| | |
| for i = 1:N
| |
| for j = 1:N-i
| |
| printf (" ");
| |
| endfor
| |
| for j = 1:2*i-1
| |
| z = rand ();
| |
| if (z < g)
| |
| printf ("@");
| |
| else
| |
| printf ("*");
| |
| endif
| |
| endfor
| |
| printf ("\n");
| |
| endfor
| |
| for i = 1:H
| |
| for j = 1:N-2
| |
| printf (" ");
| |
| endfor
| |
| printf ("***\n");
| |
| endfor
| |
| i = 0;
| |
| printf ("2019");
| |
| while (true)
| |
| i = mod (i, 2*N);
| |
| for j = 1:i
| |
| printf (" ");
| |
| endfor
| |
| if (i < 2*N-2)
| |
| printf ("mmmDDD");
| |
| else
| |
| printf (" 2020");
| |
| endif
| |
| pause (0.1)
| |
| printf ("\r2019");
| |
| i++;
| |
| endwhile
| |
| </syntaxhighlight>}}
| |
|
| |
|
| [[Category:Examples]] | | Octave tree: [[File:OctaveTree.png|500px]] |