.K SPEC,TO/A
.bra {
.ket }
if not exists {TO}
    echo "--- Update Destination directory doesn't exist ---"
    quit
    endif
run mat >RAM:_upd "#?~ #?^" "cd ^Q^D^Q^Bxcopy -u ^F {TO}^|echo ^Qxcopy can't handle '^F'^Q" f {SPEC$#?} +
    x RAM:_upd +
    echo "+++ update done +++"

