RosettaCodeData/Task/Spinning-rod-animation-Text/ZX-Spectrum-Basic/spinning-rod-animation-text.basic

10 LET A$="|/-\"
20 FOR C=1 TO 4
30 PRINT AT 0,0;A$(C)
40 PAUSE 4
50 NEXT C
60 GOTO 20
Initial data commit 2023-07-01 11:58:00 -04:00			`10 LET A$="\|/-\"`
			`20 FOR C=1 TO 4`
			`30 PRINT AT 0,0;A$(C)`
			`40 PAUSE 4`
			`50 NEXT C`
			`60 GOTO 20`