17 lines
179 B
Text
17 lines
179 B
Text
let loop=1
|
|
sub delay:
|
|
for i=1 to 10000
|
|
next
|
|
cls 1
|
|
return
|
|
while loop=1
|
|
print 1 "l"
|
|
gosub delay:
|
|
print 1 "/"
|
|
gosub delay:
|
|
print 1 "-"
|
|
gosub delay:
|
|
print 1 "\"
|
|
gosub delay:
|
|
wend
|
|
end
|