"постепенный" вывод текста на экран
- 10 r$=""
- rem это обязательно, иначе в начале текста будет выведено "null"
- 20 input "text",t$
- 30 l%=len(t$)
- 40 for i%=1 to l%
- 50 m$=mid$(t$,i%,1)
- 60 r$=r$+m$
- 70 cls
- 80 drawstring r$,0,0
- 90 repaint
- 100 sleep 500
- rem от этой строчки зависит скорость вывода текста
- 110 next i%
Простой код "постепенного вывода текста на экран".
