Folder Sorter by IMDB genre / ratings

[trxtrx]

Hello,

first of all, hello to all of you!

i am here because i am in need of some tools to help me out in my sorting things...

I need to sort several movies folder names by genre.

the name of the folders are like this.

Jeremy.Clarkson.Thriller.DVDRip.XviD-HAGGiS

so, the app should read the folder name, identify the movie name Jeremy Clarkson Thriller and move or create a symbolic link into a Sorted/Genre folder.

Not sure if i was explicit, feel free to ask.

i may need to add other options into the application.

Feel free to email me or pm me. I am willing to pay for this

thank you

[skrommel]

SortMoviesByGenre creates links to movies, placing them in folders of genre, based on parts of their filename.

Folder Sorter by IMDB genre / ratings

I'm not sure how standardized your foldernames are. I added an option to separate the title and genre from the rest of the folder name by a user defines text, but maybe separating by genre would be better? I could add all the IMDB genres to the file, and use that to split the folder names.

Download and install AutoHotkey to run the script.
Save the script to a text file called SortMoviesByGenre.ahk and double click to run.

Skrommel

Code: Autohotkey [Select]

1. ;SortMoviesByGenre.ahk
2. ; Create links to movies, placing them in folders of genre, based on parts of their filename
3. ;Skrommel @2017
4.  
5. #SingleInstance,Force
6. #NoEnv
7. SetBatchLines,0
8.  
9. IniRead,moviefolder,SortMoviesByGenre.ini,Settings,moviefolder
10. IniRead,sortedfolder,SortMoviesByGenre.ini,Settings,sortedfolder
11. IniRead,separator,SortMoviesByGenre.ini,Settings,separator
12. If moviefolder=ERROR
13.   moviefolder=C:\Movies
14. If sortedfolder=ERROR
15.   sortedfolder=C:\Sorted
16. If separator=ERROR
17.   separator=.DVD,.CAM,.XVID
18.  
19. Gui,Add,Text,xm,Folder with movies
20. Gui,Add,Edit,xm w300 vmoviefolder,% moviefolder
21. Gui,Add,Button,x+5 w50 GBROWSEMOVIE,&Browse
22. Gui,Add,Text,xm,Folder to put links sorted by genre into
23. Gui,Add,Edit,xm w300 vsortedfolder,% sortedfolder
24. Gui,Add,Button,x+5 w50 GBROWSESORTED,B&rowse
25. Gui,Add,Text,xm,Text separating title and genre from the rest of the name.`nUse , between separators
26. Gui,Add,Edit,xm w300 vseparator,% separator
27. Gui,Add,Button,xm w50 GSORT +Default,&Sort
28. Gui,Add,StatusBar,,Skrommel @ 2017
29. Gui,Show,,SortMoviesByGenre
30. Return
31.  
32.  
33. BROWSEMOVIE:
34. Loop
35. {
36.   FileSelectFolder,newmoviefolder,% "*" moviefolder,3,Select folder with movies
37.   If ErrorLevel=1
38.     Return
39.   IfExist,% newmoviefolder
40.     Break
41.   MsgBox,% "The movie folder could not be found!"
42. }
43. GuiControl,,moviefolder,% newmoviefolder
44. Return
45.  
46.  
47. BROWSESORTED:
48. Loop
49. {
50.   FileSelectFolder,newsortedfolder,% "*" sortedfolder,3,Select folder with movies
51.   If ErrorLevel=1
52.     Return
53.   IfExist,% newsortedfolder
54.     Break
55.   MsgBox,% "The sorted folder could not be found!"
56. }
57. GuiControl,,sortedfolder,% newsortedfolder
58. Return
59.  
60.  
61. SORT:
62. Gui,Submit,NoHide
63. IfNotExist,% moviefolder
64. {
65.   MsgBox,% "The movie folder could not be found!"
66.   Return
67. }
68.  
69. IniWrite,% moviefolder,SortMoviesByGenre.ini,Settings,moviefolder
70. IniWrite,% sortedfolder,SortMoviesByGenre.ini,Settings,sortedfolder
71. IniWrite,% separator,SortMoviesByGenre.ini,Settings,separator
72.  
73. SB_SetText("Sorting moivies into " sortedfolder "...")
74. Loop,% moviefolder "\*.*",2,0
75. {
76.   first=999                                           ;Extract title and genre
77.   Loop,Parse,separator,`,
78.   {
79.     StringGetPos,pos,A_LoopFileName,% A_LoopField
80.     If (pos>0 And pos<first)
81.       first:=pos
82.   }
83.   StringLeft,titlegenre,A_LoopFileName,% first
84.  
85.   StringSplit,part_,titlegenre,`.                     ;Extract genre
86.   genre:=part_%part_0%
87.  
88.   title=                                              ;Extract title
89.   Loop,% part_0-1
90.     title:=title part_%A_Index% " "
91.   title=% title
92.  
93.   FileCreateDir,% sortedfolder "\" genre                ;Create link
94.   FileCreateShortcut,% A_LoopFileLongPath,% sortedfolder "\" genre "\" title ".lnk"
95. }
96. SB_SetText("Finished sorting movies into " sortedfolder)
97. Return
98.  
99.  
100. GuiClose:
101. ExitApp

[mouser]

Wait.. what just happened? 

[IainB]

Maybe @skrommel responded to the OP through a wormhole in the space-time continuum, or som'at.
It's a funny old world.

[tomos]

 

[mouser]

This is the moment we've been training all these years for... All DC members who have been certified in level 4 skrommel containment please report to your nearest space-time gate! Suit up and prepare for operation SKROMMEL CAPTURE.

[wraith808]

^ That's cute!

[Deozaan]

The legend returns!

Welcome back Skrommel! We hope you'll stick around a while.

[techidave]

its back Skrommel!