Messages - skrommel [ switch to compact view ]

Pages: prev • 1 ... 5 6 7 8 9 [10] 11 12 13 14 15 ... 187 • next
46
Finished Programs / Re: FINISHED: Hourly chime software (like Cuckoo for Mac)
« on: July 08, 2017, 12:38 PM »
:) Chime plays a sound file or tells the time on the hour and every x minutes.

Chime.jpg

Chime is portable, it saves it's settings to Chime.ini, just copy the file to the folder you put the script in on your other computers.

Download and install AutoHotkey to run the script.
Save the script as Chime.ahk and doubleclick to run.

17.07.2017: Added code to the Browse button. @stisev
18.07.2017: Added option to chime multiple times on the hour. @nogojoe
18.07.2017: The program checks for files 0.wav, 1. wav... 23.wav to be played on the hour. @mouser
21.07.2017: Added volume bar. @orbis. Removed a bug affecting playing individual hour files. @nogojoe
16.08.2017: Changed timing
21.10.2017: Added checkbox to ignore the volume

Skrommel

47
Post New Requests Here / Re: Folder Sorter by IMDB genre / ratings
« on: July 08, 2017, 04:42 AM »
SortMoviesByGenre creates links to movies, placing them in folders of genre, based on parts of their filename. :)

SortMoviesByGenre.jpg

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.  
  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:
  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:
  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.  
  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.   {
  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.  

48
Skrommel's Software / Re: MoveOut: License? I want to extend it
« on: April 25, 2015, 03:16 PM »
Feel free, danielo515! :)

Skrommel

49
Living Room / Re: 10th Anniversary - long time member check-in thread
« on: March 18, 2015, 03:20 PM »
Happy anniversary, mouser! :)

I'm late to join this thread, and I must have been late joining DoncationCoder, too, 'cause no way it's been 10 years!  :tellme:

DonationCoder was my 40 year crisis, 8) together with buying a piano, and I must say it was a fun time, completing a Coding Snack just about every other night! I still have the DonationCredits, but I'll probably bankrupt DonationCoder if I withdraw them? :o

But three kids and a wife soon took their fair share of attention, :-* and now I run my little five man computer firm, selling computers, hosting servers, developing web pages and of course programming helpful tools for local businesses, so I still use AutoHotkey pretty much every day!  :Thmbsup:

In the evenings I run the town news web page, and dream of finding the time to complete my groundbreaking software project and retire at 50! :)

So thank you DonationCoder, for all the praise, and for giving my life direction!

I'll be back full time when that retirement is secured, mouser! :P

Skrommel

50
Post New Requests Here / Re: IDEA: Dynamic date and time stamping of a document when it is printed
« on: December 05, 2014, 10:57 PM »
Try PDF Creator in combination with Coherent PDF!  :)

http://www.pdfforge.org/pdfcreator
http://community.coherentpdf.com

PDF Creator installs a printer. Anything printed to it creates a PDF file, and the process of saving, stamping and finally printing to a real printer can be automated! Use Coherent PDF to add text to every page.

To make it work I also had to use AutoHotkey, PDF Creator wouldn't send the proper variables to Coherent PDF.

http://www.autohotkey.com

Install all three tools, save the script below as Stamp.ahk and pont to it in PDF Creator's Actions - Run script. Also configure Auto-Save and Actions - Print Document and you'll be datestamping every page you print in no time!

[Select]
;Stamp.ahk
; Adds timestamp to the the top of every page of a PDF file
;Skrommel @ 2014

RunWait,cpdf.exe -topleft 10 -font Courier -add-text "%A_Now%" "%1%" -o "%1%"

Pages: prev • 1 ... 5 6 7 8 9 [10] 11 12 13 14 15 ... 187 • next
Go to full version