Spinning rod animation/Text: Difference between revisions

Content added Content deleted
Line 181: Line 181:
\\ Print Over: erase line before print. No new line append.
\\ Print Over: erase line before print. No new line append.
Print Over n$()
Print Over n$()
}
}
CheckIt

</lang>

<lang M2000 Interpreter>
Module Checkit {
n=1
a$="|/-\"
Every 250 {
Print Over mid$(a$, n, 1)
n++
if n>4 then n=1
}
}
}
}