----------------------------------------------------------------------------------------------------------- -- caption.sdlbas -- author: nitrofurano ------------------------------------------------------------------------------------------------------------ setdisplay(320,200,32,1) a$="sdlbasic - setcaption example - " while key(27)=0 a$=right$(a$,len(a$)-1)+left$(a$,1) setcaption(a$) b$=caption:locate(1,5):prints(b$) for i=0 to 3:waitvbl:next wend