Combining RTF in Clipboards

Here is a solution for combining plain text and rich text on a clipboard using AppleScript: