Move Selected Files form Desktop to Another Location

[Firas]

Dear Friends

I looking to write a macro that can move selected files from my desktop to specific location.

I came up with the below code.

Code:

Copy      Help

key Cc
ARRAY(str) a
int i=0
if(GetClipboardFiles(a))
    rep a.len
        cop a[i] "D:\Files\copied"
        del a[i]
        i=i+1
    OnScreenDisplay "Done !!!"

but is't slow and most of the time is not working without any error message.

any help 

Regards