Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- dim as string strings = "hello world"
- do
- color 6
- for i as long = -9 to 8
- if i=0 then color 4
- locate 1,abs(i)+1,0
- print " "+strings+" ";
- sleep 100
- next i
- loop
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement