8 lines
148 B
Text
8 lines
148 B
Text
chars = "|/\[Dash]\\";
|
|
pos = 1;
|
|
Dynamic[c]
|
|
While[True,
|
|
pos = Mod[pos + 1, StringLength[chars], 1];
|
|
c = StringTake[chars, {pos}];
|
|
Pause[0.25];
|
|
]
|