RosettaCodeData/Task/Reverse-a-string/Vedit-macro-language/reverse-a-string-2.vedit

BOL
while (!At_EOL) {
    Block_Copy(EOL_pos-1, EOL_pos, DELETE)
}