Spinning rod animation/Text: Difference between revisions
Content added Content deleted
(Ada version) |
Childishbeat (talk | contribs) m (→{{header|NS-HUBASIC}}: NS-HUBASIC example added) |
||
| Line 371: | Line 371: | ||
end for |
end for |
||
end while</lang> |
end while</lang> |
||
=={{header|NS-HUBASIC}}== |
|||
<lang NS-HUBASIC>10 DIM A(4) |
|||
20 A(1)=236 |
|||
30 A(2)=234 |
|||
40 A(3)=235 |
|||
50 A(4)=233 |
|||
60 FOR I=1 TO 4 |
|||
70 CLS |
|||
80 PRINT CHR$(A(I)) |
|||
90 PAUSE 15 |
|||
100 NEXT |
|||
110 GOTO 60</lang> |
|||
=={{header|Perl}}== |
=={{header|Perl}}== |
||