Trying to make auto sorting macro

[Gintaras]

Macro Macro1018

Code:

Copy      Help

str folder="Q:\test\photos"
ARRAY(str) a
GetFilesInFolder a folder "IMG_????????_??????.jpg"
if(a.len=0) out "no files"; ret
a.sort(8) ;;out a

int i
for i 0 a.len
,str& path=a[i]
,str monthN.get(path folder.len+9 2) ;;out monthN
,str month.gett("January February March April May June July August September October November December" val(monthN)-1) ;;out month
,str monthFolder=F"{folder}\{month}"
,mkdir monthFolder
,ren path monthFolder