Automatisches umsortieren von Bildern?

function makechdk(path)
% makechdk('D:\Temp\CHDK1_4\')

format compact
counter=0;

SOURCE_Scripts      = [path 'SCRIPTS\']
SOURCE_Data         = [path 'DATA\']


for i=1:5


  if i == 1 
    Move_Path = [path 'G1X\CHDK\SCRIPTS\']
    DESTINATION_Scripts = [path 'G1X\CHDK\SCRIPTS\']
    DESTINATION_Data    = [path 'G1X\CHDK\DATA\']
    DESTINATION_CFG     = [path 'G1X\CHDK\']
    SOURCE_CFG          = [path 'CFG_G1X\']
  elseif i == 2
    Move_Path = [path 'SX230\CHDK\SCRIPTS\']
    DESTINATION_Scripts = [path 'SX230\CHDK\SCRIPTS\']
    DESTINATION_Data    = [path 'SX230\CHDK\DATA\']  
    DESTINATION_CFG     = [path 'SX230\CHDK\']
    SOURCE_CFG          = [path 'CFG_SX230\']
  end


  % Move current scripts to test folder
  str1=sprintf('!move %s*.lua   %stest \n',Move_Path,Move_Path)
  eval(str1)
  str1=sprintf('!move %s*.bas   %stest \n',Move_Path,Move_Path)
  eval(str1)

  % Copy my scripts to CHDK folder
  [SUCCESS,MESSAGE,MESSAGEID] = copyfile(SOURCE_Scripts,DESTINATION_Scripts,'f')
  % Copy my data to CHDK folder
  [SUCCESS,MESSAGE,MESSAGEID] = copyfile(SOURCE_Data,DESTINATION_Data,'f')
  % Copy my configuration to CHDK folder
  [SUCCESS,MESSAGE,MESSAGEID] = copyfile(SOURCE_CFG,DESTINATION_CFG,'f')

end

str1=sprintf('!move %s*.bas   %stest \n',path,path)

eval(sprintf('delete ''%s'' ',cur_file_name));                            
  
disp(sprintf('move %s*.lua   %stest\ \n',path,path));
eval(sprintf('move ''%s''*.lua   ''%''stest\ \n',path,path));