Spinning rod animation/Text: Difference between revisions
no edit summary
m (Added general comment.) |
No edit summary |
||
Line 919:
</lang>
=={{header|Mathematica}} / {{header|Wolfram Language}}==
<lang Mathematica>chars = "|/\[Dash]\\";
pos = 1;
Dynamic[c]
While[True,
pos = Mod[pos + 1, StringLength[chars], 1];
c = StringTake[chars, {pos}];
Pause[0.25];
]</lang>
=={{header|MelonBasic}}==
| |||