Spinning rod animation/Text: Difference between revisions
Spinning rod animation/Text in BASIC-256
(Spinning rod animation/Text in True BASIC) |
(Spinning rod animation/Text in BASIC-256) |
||
Line 143:
done</syntaxhighlight>
(Added an indent in the printf to better see the spinning rod).
=={{header|BASIC256}}==
<syntaxhighlight lang="freebasic">spinning$ = "|/-" + chr(92)
c = 1
while key = ""
cls
print chr(10) + " hit any key to end program "; mid(spinning$,c,1)
c += 1
pause .250 # in milliseconds
if c = 4 then c = 1
end while</syntaxhighlight>
=={{header|C}}==
| |||