I was experimenting with this code I found in help docs.
1) execute the program
2) after it ends, right click an empty spot in your editor and select paste
AND BEHOLD!
Code: text$ = "The five boxing wizards jump quickly"+CHR$13+CHR$10
SYS "GlobalAlloc", &2000, LEN(text$)+1 TO hdata%
SYS "GlobalLock", hdata% TO tmp%
$$tmp% = text$
SYS "GlobalUnlock", hdata%
SYS "OpenClipboard", @hwnd%
SYS "EmptyClipboard"
SYS "SetClipboardData", 1, hdata%
SYS "CloseClipboard"
QUIT
REM SYS "IsClipboardFormatAvailable", 1 TO res%
REM SYS "OpenClipboard", @hwnd%
REM SYS "GetClipboardData", 1 TO hdata%
REM IF hdata% THEN
REM SYS "GlobalLock", hdata% TO tmp%
REM text$ = $$tmp%
REM SYS "GlobalUnlock", hdata%
REM PRINT text$
REM ENDIF
REM SYS "CloseClipboard"
Logged