wordwrap command wouldn't be too hard.
Here's a little demo I did in a few minutes. If you don't want the word to get chopped up, then you'll have to parse the string and look for spaces, commas, etc... Which could be done with my string tokenizer, found in the codebase.
wText(0,0,"A stupid dog jumped really darn high.",6)
suspend for key
function wText(x, y, s$, length)
set cursor x, y
while len(s$) > length
t$ = left$(s$, length)
s$ = right$(s$,len(s$)-length)
print t$
endwhile
print s$
endfunction
"eureka" - Archimedes
