Macro to move current line up and down

Macro to move current line up and down.
You can map the up macro to Alt-Shift-Up, and map the down macro to Alt-Shift-Down.
The caret status and the data on the clipboard before the macro is executed are saved and restored after that.