@@ -1,3 +1,6 @@ +-- AUTHOR: Yehuda Katz +-- MODIFIED: Geoffrey Grosenbach http://peepcode.com + set windowWidth to 1000 set windowHeight to 600 delay 0.1 @@ -6,9 +9,8 @@ set AppleScript's text item delimiters to "x" -- Uncomment to see dialog -- set res to text returned of (display dialog "Enter the width x height:" default answer ((windowWidth & windowHeight) as text)) - -- HACK Manually set target window size -set res to "1000x600" +set res to "" & windowWidth & "x" & windowHeight if res is "" then display dialog "You need to enter a correct response" center.applescript @@ -1,3 +1,6 @@ +-- AUTHOR: Yehuda Katz +-- MODIFIED: Geoffrey Grosenbach http://peepcode.com + set windowWidth to 800 set windowHeight to 600 delay 0.1 @@ -6,9 +9,8 @@ set AppleScript's text item delimiters to "x" -- Uncomment to see dialog -- set res to text returned of (display dialog "Enter the width x height:" default answer ((windowWidth & windowHeight) as text)) - -- HACK Manually set target window size -set res to "800x600" +set res to "" & windowWidth & "x" & windowHeight if res is "" then display dialog "You need to enter a correct response" center800.applescript @@ -1,3 +1,5 @@ +-- AUTHOR: Geoffrey Grosenbach http://peepcode.com + -- Put frontmost window on left half -- Works with most setups @@ -13,7 +15,7 @@ end tell tell application "System Events" - set myFrontMost to name of first item of (processes whose frontmost is true) + set myFrontMost to name of first item of (processes whose frontmost is true) tell process myFrontMost set size of window 1 to {(screen_width/2), screen_height} front-half-left.applescript @@ -1,3 +1,5 @@ +-- AUTHOR: Geoffrey Grosenbach http://peepcode.com + -- Put frontmost window on right half -- Works with most setups @@ -13,7 +15,7 @@ end tell tell application "System Events" - set myFrontMost to name of first item of (processes whose frontmost is true) + set myFrontMost to name of first item of (processes whose frontmost is true) tell process myFrontMost set size of window 1 to {(screen_width/2), screen_height} front-half-right.applescript @@ -1,3 +1,5 @@ +-- AUTHOR: Geoffrey Grosenbach http://peepcode.com + -- Put frontmost window on left side -- Works with most setups @@ -13,7 +15,7 @@ end tell tell application "System Events" - set myFrontMost to name of first item of (processes whose frontmost is true) + set myFrontMost to name of first item of (processes whose frontmost is true) tell process myFrontMost set size of window 1 to {1040, screen_height} front-natural-left.applescript @@ -1,3 +1,7 @@ +-- Maximize frontmost window. +-- +-- AUTHOR: Geoffrey Grosenbach http://peepcode.com + -- Works with most setups tell application "Finder" set {screen_left, screen_top, screen_width, screen_height} to bounds of window of desktop @@ -33,4 +37,4 @@ tell application "System Events" set position of window 1 to {0, 0} set size of window 1 to {screen_width - w, screen_height} end tell -end tell \ No newline at end of file +end tell maximize.applescript @@ -1,4 +1,4 @@ --- Take a folder and show the total duration of all the movie files in it. +-- DESCRIPTION: Takes a folder and shows the total duration of all the movie files in it. -- -- AUTHOR: Geoffrey Grosenbach http://topfunky.com -- August 29, 2008 @@ -7,37 +7,37 @@ on open (args) set myFolder to (the first item of args) - tell application "Finder" - set movFiles to (files of folder myFolder whose name contains ".mov") - end + tell application "Finder" + set movFiles to (files of folder myFolder whose name contains ".mov") + end - tell application "QuickTime Player" - set totalDuration to 0 + tell application "QuickTime Player" + set totalDuration to 0 - repeat with movFile in movFiles - - open movFile - set movProperties to the properties of the front document - set movDuration to the duration of movProperties - - set totalDuration to totalDuration + movDuration - close the front document - - end repeat - - end tell - - set totalDurationSeconds to totalDuration / 1000 - set totalDurationMinutes to (totalDurationSeconds / 60) as integer + repeat with movFile in movFiles + + open movFile + set movProperties to the properties of the front document + set movDuration to the duration of movProperties + + set totalDuration to totalDuration + movDuration + close the front document + + end repeat + + end tell + + set totalDurationSeconds to totalDuration / 1000 + set totalDurationMinutes to (totalDurationSeconds / 60) as integer set totalDurationSecondRemainder to (totalDurationSeconds mod 60) as integer tell application "FastScripts" - display message "Duration: " & totalDurationMinutes & ":" & totalDurationSecondRemainder dismissing after delay 10 - end - - on error errmsg - --should anything go wrong let the user know + display message "Duration: " & totalDurationMinutes & ":" & totalDurationSecondRemainder dismissing after delay 10 + end + + on error errmsg + -- should anything go wrong let the user know display dialog errmsg end try -end open \ No newline at end of file +end open movie-duration-sum.applescript bdd-2up-swap.applescript bdd-2up.applescript center-up.applescript left-screen.applescript zip.applescript 21f0b7e735d50f2fc1f9893b2fae2cdc9a83b62f Geoffrey Grosenbach boss@topfunky.com http://github.com/topfunky/osx-window-sizing/commit/22294a23c79db5d845d311db49143aa003f14c10 22294a23c79db5d845d311db49143aa003f14c10 2009-03-09T13:40:13-07:00 2009-03-09T13:40:13-07:00 Cleanup and removal of unused scripts. dab07f071e07aa1612769e91e90df72ed4365325 Geoffrey Grosenbach boss@topfunky.com