You could either paste a blank image over the text, making sure that this image is the same size as your text area:
sync on
rem grab a blank image
get image 1,0,0,640,19,1
make object cube 1,10
set camera view 20,20,620,460
do
rotate object 1,0,object angle y(1) + 0.1,0
rem erase top line of text
paste image 1,0,0
text 0,0,"tidy text : " + str$(timer())
text 0,461,"untidy text : " + str$(timer())
sync
loop
...or use the Box command to erase the text:
sync on
make object cube 1,10
set camera view 20,20,620,460
do
rotate object 1,0,object angle y(1) + 0.1,0
rem erase top line of text
ink 0,0 : box 0,0,640,19
ink rgb(255,255,255),0
text 0,0,"tidy text : " + str$(timer())
text 0,461,"untidy text : " + str$(timer())
sync
loop
The box method maybe better, at least you can easily change the color if need be.
Hope this helps
Programming anything is an art, and you can't rush art.
Unless your name is Bob Ross, then you can do it in thirty minutes.