diff --git a/ScanScripts/Windows/magazines/0 - Amiga Format.cmd b/ScanScripts/Windows/magazines/0 - Amiga Format.cmd new file mode 100644 index 0000000..5f03def --- /dev/null +++ b/ScanScripts/Windows/magazines/0 - Amiga Format.cmd @@ -0,0 +1,5 @@ +@echo off +mkdir output +for %%i in (*.tif) DO ( +convert %%i -quality 85%% output\%%~ni.jpg +) \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/0 - Default Level (doc-scanner).cmd b/ScanScripts/Windows/magazines/0 - Default Level (doc-scanner).cmd new file mode 100644 index 0000000..d03f18c --- /dev/null +++ b/ScanScripts/Windows/magazines/0 - Default Level (doc-scanner).cmd @@ -0,0 +1,9 @@ +@echo off +mkdir work +cd origs +for %%i in (*.tif) DO ( +convert %%i -level 11%%,86%% ..\work\%%i +) +for %%i in (*.png) DO ( +convert %%i -level 11%%,86%% ..\work\%%i +) \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/2 - Make AudioMedia magazine_(no_last_page).cmd b/ScanScripts/Windows/magazines/2 - Make AudioMedia magazine_(no_last_page).cmd new file mode 100644 index 0000000..547ae5b --- /dev/null +++ b/ScanScripts/Windows/magazines/2 - Make AudioMedia magazine_(no_last_page).cmd @@ -0,0 +1,47 @@ +@echo off +setlocal EnableDelayedExpansion +set folder=%cd% +cd work\out +choice /m "Fix paging " +if %errorlevel%==1 ( +copy D:\Retro-Work\correct_pages.php .\ /y +php -f correct_pages.php +cd newpages +) + +if NOT EXIST output mkdir output +set thumb=1 + +if NOT EXIST audiomedia mkdir audiomedia + + +for %%i in (*.tif) DO ( +if !thumb!==1 ( +convert %%i -resize 240x310^^! -quality 75%% !folder!\thumb.jpg +) +set thumb=2 +convert -units pixelsperinch %%i -resample 150 audiomedia\%%~ni.jpg +convert %%i -quality 95%% output\%%~ni.jpg +) + +rem 300dpi mag +cd output +for %%i in (*.jpg) DO ( +convert %%i %%~ni.pdf +) + +del *.jpg /q +pdftk *.pdf cat output "%folder%\mag.pdf" +del *.pdf /q +cd .. + + +rem Tablet +cd audiomedia +for %%i in (*.jpg) DO ( +convert %%i %%~ni.pdf +) +del *.jpg /q +pdftk *.pdf output "%folder%\audiomedia.pdf" +del *.pdf /q +pause diff --git a/ScanScripts/Windows/magazines/2 - Make manual-IrfanView.cmd b/ScanScripts/Windows/magazines/2 - Make manual-IrfanView.cmd new file mode 100644 index 0000000..67425b4 --- /dev/null +++ b/ScanScripts/Windows/magazines/2 - Make manual-IrfanView.cmd @@ -0,0 +1,44 @@ +@echo off + +setlocal EnableDelayedExpansion +set folder=%cd% +cd work\out + +choice /m "Fix paging " +if %errorlevel%==1 ( +copy D:\Retro-Work\correct_pages.php .\ /y +php -f correct_pages.php +cd newpages +) + +choice /C LSN /m "Use large (L), small (S) or no (N) lastpage " +if %errorlevel%==1 ( +set page=brought_to_you_by.pdf +) else if %errorlevel%==2 ( +set page=brought_to_you_by_[TABLET].pdf +) + +if NOT EXIST output mkdir output +set thumb=1 + +for %%i in (*.tif) DO ( +if !thumb!==1 ( +convert %%i -resize 240x310^^! -quality 80%% "!folder!\thumb.jpg" +) +set thumb=2 +) +"c:\Program Files (x86)\IrfanView\i_view32.exe" .\*.tif /convert=.\output\*.pdf + +cd output +REM for %%i in (*.jpg) DO ( +REM convert %%i %%~ni.pdf +REM ) + +REM del *.jpg /q +pdftk *.pdf "D:\Retro-Work\%page%" cat output "%folder%\_manual.pdf" +pdftk "%folder%\_manual.pdf" update_info D:\Retro-Work\metadata.txt output "%folder%\manual.pdf" +del *.pdf /q +REM del ..\*.* /q +del "%folder%\_manual.pdf" /q + +pause diff --git a/ScanScripts/Windows/magazines/2 - Make normal magazine.cmd b/ScanScripts/Windows/magazines/2 - Make normal magazine.cmd new file mode 100644 index 0000000..5a7728e --- /dev/null +++ b/ScanScripts/Windows/magazines/2 - Make normal magazine.cmd @@ -0,0 +1,57 @@ +@echo off +setlocal EnableDelayedExpansion +set folder=%cd% +cd work\out +choice /m "Fix paging " +if %errorlevel%==1 ( +copy D:\Retro-Work\correct_pages.php .\ /y +php -f correct_pages.php +cd newpages +) + +choice /C LSN /m "Use large (L), small (S) or no (N) lastpage " +if %errorlevel%==1 ( +set page=brought_to_you_by.pdf +) else if %errorlevel%==2 ( +set page=brought_to_you_by_[TABLET].pdf +) + +if NOT EXIST output mkdir output +set thumb=1 + +if NOT EXIST tablet mkdir tablet + + +for %%i in (*.tif) DO ( +if !thumb!==1 ( +convert %%i -resize 240x310^^! -quality 75%% "!folder!\thumb.jpg" +) +set thumb=2 +convert -units pixelsperinch %%i -resample 150 tablet\%%~ni.jpg +convert -units pixelsperinch %%i -resample 300 -quality 95%% output\%%~ni.jpg +) + +rem 300dpi mag +cd output +for %%i in (*.jpg) DO ( +convert %%i %%~ni.pdf +) + +del *.jpg /q +pdftk *.pdf D:\Retro-Work\brought_to_you_by.pdf cat output "!folder!\_mag.pdf" +pdftk "!folder!\_mag.pdf" update_info D:\Retro-Work\metadata.txt output "!folder!\mag.pdf" +del *.pdf /q +del "!folder!\_mag.pdf" +cd .. + + +rem Tablet +cd tablet +for %%i in (*.jpg) DO ( +convert %%i %%~ni.pdf +) +del *.jpg /q +pdftk *.pdf D:\Retro-Work\brought_to_you_by_[TABLET].pdf cat output _tablet.pdf +pdftk _tablet.pdf update_info D:\Retro-Work\metadata.txt output "!folder!\_tablet.pdf" +del *.pdf /q +pause diff --git a/ScanScripts/Windows/magazines/2 - Make tiff magazine.cmd b/ScanScripts/Windows/magazines/2 - Make tiff magazine.cmd new file mode 100644 index 0000000..7767102 --- /dev/null +++ b/ScanScripts/Windows/magazines/2 - Make tiff magazine.cmd @@ -0,0 +1,42 @@ +@echo off + +setlocal EnableDelayedExpansion +set folder=%cd% +cd work\out + +choice /m "Fix paging " +if %errorlevel%==1 ( +copy D:\Retro-Work\correct_pages.php .\ /y +php -f correct_pages.php +cd newpages +) + + +if NOT EXIST output mkdir output +if NOT EXIST tablet mkdir tablet +set thumb=1 + +for %%i in (*.tif) DO ( +if !thumb!==1 ( +convert %%i -resize 240x310^^! -quality 80%% "!folder!\thumb.jpg" +) +set thumb=2 +convert %%i output\%%~ni.pdf +convert -units pixelsperinch %%i -resample 150 tablet\%%~ni.pdf +) + +cd output +pdftk *.pdf "D:\Retro-Work\brought_to_you_by.pdf" cat output "%folder%\_manual.pdf" +cd ..\tablet +pdftk *.pdf "D:\Retro-Work\brought_to_you_by_[TABLET].pdf" cat output "%folder%\_tablet.pdf" +cd .. + +del output\*.pdf /q +del tablet\*.pdf /q +rd output +rd tablet + +cd %folder% +start _manual.pdf +start _tablet.pdf +pause \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/3 - PdfToText.cmd b/ScanScripts/Windows/magazines/3 - PdfToText.cmd new file mode 100644 index 0000000..d894a3e --- /dev/null +++ b/ScanScripts/Windows/magazines/3 - PdfToText.cmd @@ -0,0 +1,28 @@ +@echo off + + +pdftotext manual_recognized.pdf manual2.ocr.txt +pdftotext _manual_recognized.pdf manual2.ocr.txt +pdftotext mag_recognized.pdf manual2.ocr.txt +pdftk "manual_recognized.pdf" update_info D:\Retro-Work\metadata.txt output "manual2.pdf" +pdftk "_manual_recognized.pdf" update_info D:\Retro-Work\metadata.txt output "manual2.pdf" +pdftk "mag_recognized.pdf" update_info D:\Retro-Work\metadata.txt output "[300dpi][ocr].pdf" +pdftk "_manual_recognized.pdf" update_info D:\Retro-Work\metadata.txt output "[600dpi][ocr].pdf" +pdftk "_tablet_recognized.pdf" update_info D:\Retro-Work\metadata.txt output "[150dpi][ocr].pdf" +pdftk "audiomedia_recognized.pdf" update_info D:\Retro-Work\metadata.txt output "Privat_Computer_199x_-_xx.pdf" + +start [600dpi][ocr].pdf +start [150dpi][ocr].pdf + +choice /m "Delete old files?" + +if %ERRORLEVEL% EQU 1 goto delete +goto end + +:delete +del _manual.pdf +del _manual_recognized.pdf +del _tablet.pdf +del _tablet_recognized.pdf + +:end \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/5 - hash_em.cmd b/ScanScripts/Windows/magazines/5 - hash_em.cmd new file mode 100644 index 0000000..1398695 --- /dev/null +++ b/ScanScripts/Windows/magazines/5 - hash_em.cmd @@ -0,0 +1,37 @@ +@echo off + +REM setlocal EnableDelayedExpansion +REM for "%%i" in (*_recognized.pdf) DO ( +REM set file=%%i +REM set output=!file:recognized=ocr! +REM pdftk "%%i" update_info "D:\Retro-Work\metadata.txt" output !output! +REM del "%%i +REM ) +REM endlocal + + + + +for %%i in (*.pdf) DO ( +md5sum "%%i" > "%%i.md5" +sha1sum "%%i" > "%%i.sha1" +) + +for %%j in (*.ocr.txt) DO ( +md5sum "%%j" > "%%j.md5" +echo 2 +sha1sum "%%j" > "%%j.sha1" +) + +for %%k in (*.zip) DO ( +md5sum "%%k" > "%%k.md5" +echo 3 +sha1sum "%%k" > "%%k.sha1" +) + +cd work\out +rd cache /s /q +rd newpages /s /q +rd output /s /q + +pause \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/0 - Default Level (epson).cmd b/ScanScripts/Windows/magazines/Rarely used scripts/0 - Default Level (epson).cmd new file mode 100644 index 0000000..e37026a --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/0 - Default Level (epson).cmd @@ -0,0 +1,7 @@ +@echo off +mkdir work +mkdir origs +for %%i in (*.tif) DO ( +convert %%i -level 11%%,86%% work\%%i +move %%i origs +) \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/0 - resample_audio_media.cmd b/ScanScripts/Windows/magazines/Rarely used scripts/0 - resample_audio_media.cmd new file mode 100644 index 0000000..61803c2 --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/0 - resample_audio_media.cmd @@ -0,0 +1,7 @@ +@echo off +mkdir audiomedia +for %%i in (*.tif) DO ( +convert -units pixelsperinch %%i -resample 150 audiomedia\%%i +) + + diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/2 - resize_to_tablet.cmd b/ScanScripts/Windows/magazines/Rarely used scripts/2 - resize_to_tablet.cmd new file mode 100644 index 0000000..6781409 --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/2 - resize_to_tablet.cmd @@ -0,0 +1,5 @@ +@echo off +mkdir tablet +for %%i in (*.tif) DO ( +convert %%i -resize 1024x4096 -quality 85%% tablet\%%~ni.jpg +) \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/DNC/0 - resample_audio_media.cmd b/ScanScripts/Windows/magazines/Rarely used scripts/DNC/0 - resample_audio_media.cmd new file mode 100644 index 0000000..632b2a3 --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/DNC/0 - resample_audio_media.cmd @@ -0,0 +1,11 @@ +@echo off +mkdir out +for %%i in (*.tif) DO ( +convert -units pixelsperinch %%i -resample 150 out\%%i +) + +for %%i in (*.png) DO ( +convert -units pixelsperinch %%i -resample 150 out\%%i +) + + diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/New folder/COMPuter_Issue_040.jpg b/ScanScripts/Windows/magazines/Rarely used scripts/New folder/COMPuter_Issue_040.jpg new file mode 100644 index 0000000..69f0e72 Binary files /dev/null and b/ScanScripts/Windows/magazines/Rarely used scripts/New folder/COMPuter_Issue_040.jpg differ diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/New folder/COMPuter_Issue_040.txt b/ScanScripts/Windows/magazines/Rarely used scripts/New folder/COMPuter_Issue_040.txt new file mode 100644 index 0000000..293f244 --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/New folder/COMPuter_Issue_040.txt @@ -0,0 +1,4 @@ +url: COMPuter_Issue_003_1985-12.pdf +title: COMputer 09/89 +date: 1989 Sep +resolution: 0 diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/README.txt b/ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/README.txt new file mode 100644 index 0000000..4ab4e32 --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/README.txt @@ -0,0 +1,32 @@ +Scriptet kræver php.exe samt php.dll (medlagt denne zip fil) for at kunne køres. + +Runme.cmd er en fil man kan dobbelt klikke på så man bliver fri for at skulle skrive +kommanoen fra kommando prompten i Windows. + +Scriptet går ud fra at +1. siderne har været scannet ved at føde scanneren med papirsiderne fra et blad hvor +klipsen har været fjernet, dvs for- bagside er scannet til 1 billede, og papiret vendt om så +side 2 og andensidste side er scannet som nr 2 osv. Dette kan gøres fra en almindelig flatbed- +scanner eller fra en dokument scanner. Scannes siderne som de læses, fx side 2,3,4,5 skal +dette script ikke benyttes. + +2. Inputfilerne har været behandlet ved at skære siderne i 2. fx fra ScanTailor. + +3. For- og bagsiderne er de første sider der er scannet ind, midtersiderne er de sidste. +Fx siderne er scannet i dokumentscanneren med forsiden opad. + +[Vejledning] +de 4 filer: correct_pages.php, php.dll, php.exe og runme.cmd lægges i mappen +med filerne der er i uorden. + +Input filerne skal være med fil extension tif, som outputtes fra Scan Tailor programmet. + +Dobbelt klik på "runme.cmd" filen. +Der popper en sort skærm op ved kørsels start, og beder om at trykke en tast når +jobbet er færdigt. + +Der ligger nu en kopi -i sorteret rækkefølge- i en undermappe "newpages". + +Der bliver ikke lavet noget ved input/original filerne. + +Filerne fra newpages mappen kan nu kopieres ind i Adobe Acrobat. \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/correct_pages.php b/ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/correct_pages.php new file mode 100644 index 0000000..8a52c1f --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/correct_pages.php @@ -0,0 +1,65 @@ + $v) +{ + + + if($back === true) + { + + copy($v, $dest . DIRECTORY_SEPARATOR . 'page' . padding($down, $pad) . $ext); + $down--; + if ($again > 2 OR $k == 0) + { + $again = 1; + $back = false; + } + echo "$k => $down \n"; + $again++; + } + else + { + copy($v, $dest . DIRECTORY_SEPARATOR . 'page' . padding($up, $pad) . $ext); + $up++; + if ($again > 2) + { + $again = 1; + $back = true; + } + echo "$k => $up \n"; + $again++; + } +} + + +/** + * Pads a number with zeroes to make a nice even lenghted result + * Author Carsten Jensen + * @param int $int number to be padded + * @param int $length of padding + * @return int padded number +*/ +function padding($int, $length = 2) +{ + return str_pad($int, $length, 0, STR_PAD_LEFT); +} +?> \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/php.exe b/ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/php.exe new file mode 100644 index 0000000..31e861c Binary files /dev/null and b/ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/php.exe differ diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/php5.dll b/ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/php5.dll new file mode 100644 index 0000000..bd51db8 Binary files /dev/null and b/ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/php5.dll differ diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/runme.cmd b/ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/runme.cmd new file mode 100644 index 0000000..35cec2d --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/runme.cmd @@ -0,0 +1,5 @@ +@echo off +php.exe -f correct_pages.php + +echo Job is finished! +pause \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/conv.cmd b/ScanScripts/Windows/magazines/Rarely used scripts/conv.cmd new file mode 100644 index 0000000..5136a2d --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/conv.cmd @@ -0,0 +1,5 @@ +for %%i in (*.tif) DO ( +convert.exe %%i -type Grayscale pages\%%i.png +) +pause +rename pages\*.tif.png pages\*.png \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/conv_png_to_jpg_mag_pages.cmd b/ScanScripts/Windows/magazines/Rarely used scripts/conv_png_to_jpg_mag_pages.cmd new file mode 100644 index 0000000..c22b003 --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/conv_png_to_jpg_mag_pages.cmd @@ -0,0 +1,5 @@ +@echo off +for %%i in (*.png) DO ( +convert "%%i" -quality 85%% "pages\%%~ni.jpg" +) +pause \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/conv_tif_to_jpg_mag_pages.cmd b/ScanScripts/Windows/magazines/Rarely used scripts/conv_tif_to_jpg_mag_pages.cmd new file mode 100644 index 0000000..9a54965 --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/conv_tif_to_jpg_mag_pages.cmd @@ -0,0 +1,6 @@ +@echo off +mkdir pages +for %%i in (*.tif) DO ( +convert "%%i" -quality 85%% "pages\%%~ni.jpg" +) +pause \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/correct_pages.php b/ScanScripts/Windows/magazines/Rarely used scripts/correct_pages.php new file mode 100644 index 0000000..8a52c1f --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/correct_pages.php @@ -0,0 +1,65 @@ + $v) +{ + + + if($back === true) + { + + copy($v, $dest . DIRECTORY_SEPARATOR . 'page' . padding($down, $pad) . $ext); + $down--; + if ($again > 2 OR $k == 0) + { + $again = 1; + $back = false; + } + echo "$k => $down \n"; + $again++; + } + else + { + copy($v, $dest . DIRECTORY_SEPARATOR . 'page' . padding($up, $pad) . $ext); + $up++; + if ($again > 2) + { + $again = 1; + $back = true; + } + echo "$k => $up \n"; + $again++; + } +} + + +/** + * Pads a number with zeroes to make a nice even lenghted result + * Author Carsten Jensen + * @param int $int number to be padded + * @param int $length of padding + * @return int padded number +*/ +function padding($int, $length = 2) +{ + return str_pad($int, $length, 0, STR_PAD_LEFT); +} +?> \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/crop.cmd b/ScanScripts/Windows/magazines/Rarely used scripts/crop.cmd new file mode 100644 index 0000000..a6cb80e --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/crop.cmd @@ -0,0 +1,20 @@ +if not exist cropped mkdir cropped + +setlocal enabledelayedexpansion enableextensions +rem start coords +set /a cy=33 +set /a cx=0 + +rem size +set x=4045 +set y=6865 + +for %%i in (*.tif) DO ( +set /A cy=%cy%-4 +rem convert %%i -crop %x%x%y%+%cx%+!cy! +repage -type Grayscale cropped\%%i.png +convert %%i -crop %x%x%y%+%cx%+!cy! +repage cropped\%%i.png +) + +endlocal + +rem convert *.jpg -crop 1600x2490+213+2450 +repage pages/even/even.jpg \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/pages/crop.cmd b/ScanScripts/Windows/magazines/Rarely used scripts/pages/crop.cmd new file mode 100644 index 0000000..6a788c8 --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/pages/crop.cmd @@ -0,0 +1,20 @@ +if not exist cropped mkdir cropped + +setlocal enabledelayedexpansion enableextensions +rem start coords +set /a cy=0 +set /a cx=0 + +rem size +set x=4473 +set y=6167 + +for %%i in (*.tif) DO ( +rem set /A cy=%cy%-3 +rem convert %%i -crop %x%x%y%+%cx%+!cy! +repage -type Grayscale cropped\%%i.png +convert %%i -crop %x%x%y%+%cx%+!cy! +repage cropped\%%i.png +) + +endlocal + +rem convert *.jpg -crop 1600x2490+213+2450 +repage pages/even/even.jpg \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/pages/cropped/resize.cmd b/ScanScripts/Windows/magazines/Rarely used scripts/pages/cropped/resize.cmd new file mode 100644 index 0000000..bd0e712 --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/pages/cropped/resize.cmd @@ -0,0 +1,3 @@ +for %%i in (*.png) DO ( +convert %%i -resize 4840x3444 small\%%i +) \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/pages/cropped/rotate.cmd b/ScanScripts/Windows/magazines/Rarely used scripts/pages/cropped/rotate.cmd new file mode 100644 index 0000000..73e2234 --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/pages/cropped/rotate.cmd @@ -0,0 +1,4 @@ +if not exist rotated mkdir rotated +for %%i in (*.png) DO ( +convert %%i -rotate 90 rotated\%%i +) \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/php.exe b/ScanScripts/Windows/magazines/Rarely used scripts/php.exe new file mode 100644 index 0000000..31e861c Binary files /dev/null and b/ScanScripts/Windows/magazines/Rarely used scripts/php.exe differ diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/php5.dll b/ScanScripts/Windows/magazines/Rarely used scripts/php5.dll new file mode 100644 index 0000000..bd51db8 Binary files /dev/null and b/ScanScripts/Windows/magazines/Rarely used scripts/php5.dll differ diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/rotate - odd-even.cmd b/ScanScripts/Windows/magazines/Rarely used scripts/rotate - odd-even.cmd new file mode 100644 index 0000000..6d1d5d7 --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/rotate - odd-even.cmd @@ -0,0 +1,18 @@ +@echo off +setlocal enabledelayedexpansion enableextensions +rem 0 = rotate right the first time, then alternate +set left=0 + +IF NOT EXIST pages mkdir pages +for %%i in (*.tif) DO ( +IF !left! equ 1 ( +convert %%i -rotate -90 pages/%%~ni.png +set left=0 +) else ( +convert %%i -rotate 90 pages/%%~ni.png +set left=1 +) +) + + +endlocal \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/rotate.cmd b/ScanScripts/Windows/magazines/Rarely used scripts/rotate.cmd new file mode 100644 index 0000000..946a0ea --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/rotate.cmd @@ -0,0 +1,4 @@ +IF NOT EXIST pages mkdir pages +for %%i in (*.tif) DO ( +convert %%i -rotate -90 pages/%%i.png +) diff --git a/ScanScripts/Windows/magazines/Rarely used scripts/runme.cmd b/ScanScripts/Windows/magazines/Rarely used scripts/runme.cmd new file mode 100644 index 0000000..52c6ff6 --- /dev/null +++ b/ScanScripts/Windows/magazines/Rarely used scripts/runme.cmd @@ -0,0 +1,2 @@ +php.exe -f correct_pages.php +pause \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/old/0 - Level - Newspaper.cmd b/ScanScripts/Windows/magazines/old/0 - Level - Newspaper.cmd new file mode 100644 index 0000000..f0b3494 --- /dev/null +++ b/ScanScripts/Windows/magazines/old/0 - Level - Newspaper.cmd @@ -0,0 +1,9 @@ +@echo off +mkdir work +cd origs +for %%i in (*.tif) DO ( +convert %%i -level 19%%,58%% ..\work\%%i +) +for %%i in (*.png) DO ( +convert %%i -level 19%%,58%% ..\work\%%i +) \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/old/1 - Indexed using ref image.cmd b/ScanScripts/Windows/magazines/old/1 - Indexed using ref image.cmd new file mode 100644 index 0000000..31fd7ce --- /dev/null +++ b/ScanScripts/Windows/magazines/old/1 - Indexed using ref image.cmd @@ -0,0 +1,4 @@ +mkdir indexed +for %%i in (*.tif) DO ( +convert %%i +dither -remap D:\Retro-Work\3col.png indexed\%%~ni.png +) \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/old/1 - grayscale.cmd b/ScanScripts/Windows/magazines/old/1 - grayscale.cmd new file mode 100644 index 0000000..c7a15c7 --- /dev/null +++ b/ScanScripts/Windows/magazines/old/1 - grayscale.cmd @@ -0,0 +1,4 @@ +mkdir pages +for %%i in (*.tif) DO ( +convert %%i -grayscale rec709luma pages\%%i +) \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/old/1 - resample to 400dpi.cmd b/ScanScripts/Windows/magazines/old/1 - resample to 400dpi.cmd new file mode 100644 index 0000000..ee8ec39 --- /dev/null +++ b/ScanScripts/Windows/magazines/old/1 - resample to 400dpi.cmd @@ -0,0 +1,9 @@ +@echo off +cd work/out +mkdir resample +for %%i in (*.tif) DO ( +convert -units PixelsPerInch "%%i" -density 400 "resample\%%i" +) +for %%i in (*.png) DO ( +convert -units PixelsPerInch "%%i" -density 400 "resample\%%i" +) \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/old/1 - resample to 600dpi.cmd b/ScanScripts/Windows/magazines/old/1 - resample to 600dpi.cmd new file mode 100644 index 0000000..da8f27d --- /dev/null +++ b/ScanScripts/Windows/magazines/old/1 - resample to 600dpi.cmd @@ -0,0 +1,9 @@ +@echo off +cd work/out +mkdir resample +for %%i in (*.tif) DO ( +convert -units PixelsPerInch "%%i" -density 600 "resample\%%i" +) +for %%i in (*.png) DO ( +convert -units PixelsPerInch "%%i" -density 600 "resample\%%i" +) \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/old/2 - G4_Compress.cmd b/ScanScripts/Windows/magazines/old/2 - G4_Compress.cmd new file mode 100644 index 0000000..d8e1cba --- /dev/null +++ b/ScanScripts/Windows/magazines/old/2 - G4_Compress.cmd @@ -0,0 +1,4 @@ +@echo off +mkdir work\out\g4compressed +cd work\out +"c:\Program Files (x86)\IrfanView\i_view32.exe" .\*.tif /tifc=4 /convert=.\g4compressed\*.tif diff --git a/ScanScripts/Windows/magazines/old/2 - Make pdf.cmd b/ScanScripts/Windows/magazines/old/2 - Make pdf.cmd new file mode 100644 index 0000000..5cede1d --- /dev/null +++ b/ScanScripts/Windows/magazines/old/2 - Make pdf.cmd @@ -0,0 +1,73 @@ +@echo off +rem ***************************** +rem * 2015 Carsten Jensen / DDHF +rem * Script til behandling af +rem * indscannede sider +rem ***************************** + + +setlocal EnableDelayedExpansion +set folder=%cd% +cd work\out +echo tryk CTRL-C hvis du vil afbryde processen. +choice /m "Ret side orden " +if %errorlevel%==1 ( + +REM Rediger nedenstående stå så den passer med dit setup. +copy ..\correct_pages.php .\ /y +php -f correct_pages.php +cd newpages +) + +if NOT EXIST output mkdir output +set thumb=1 + + +choice /C SF /m "S/H (S) eller Farver (jpg komprimering) (F)" +echo. +echo Arbejder vent venligst... +echo. + +if %errorlevel%==2 ( +REM Opret Farve Dokument (jpg komprimering) +for %%i in (*.tif) DO ( +if !thumb!==1 ( +convert %%i -resize 240x310^^! -quality 75%% "!folder!\thumb.jpg" +) +set thumb=2 +convert %%i -quality 95%% output\%%~ni.jpg +) + +cd output +for %%i in (*.jpg) DO ( +convert %%i %%~ni.pdf +) +del *.jpg /q +) else if %errorlevel%==1 ( +REM Opret S/H Dokument (ingen jpg komprimering) +for %%i in (*.tif) DO ( +if !thumb!==1 ( +convert %%i -resize 240x310^^! -quality 80%% "!folder!\thumb.jpg" +) +set thumb=2 +convert %%i output\%%~ni.pdf +) +cd output +) else goto error + + +pdftk *.pdf cat output %folder%\dokument.pdf +del *.pdf /q + +:success +Echo PDF + Thumb oprettet +goto end + +:error +Echo der opstod en fejl, evt i dit valg. +goto end + + + +:end +pause diff --git a/ScanScripts/Windows/magazines/work/0 - Default Level (doc-scanner).cmd b/ScanScripts/Windows/magazines/work/0 - Default Level (doc-scanner).cmd new file mode 100644 index 0000000..d03f18c --- /dev/null +++ b/ScanScripts/Windows/magazines/work/0 - Default Level (doc-scanner).cmd @@ -0,0 +1,9 @@ +@echo off +mkdir work +cd origs +for %%i in (*.tif) DO ( +convert %%i -level 11%%,86%% ..\work\%%i +) +for %%i in (*.png) DO ( +convert %%i -level 11%%,86%% ..\work\%%i +) \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/work/0_-_Default_Level-doc-scanner.sh b/ScanScripts/Windows/magazines/work/0_-_Default_Level-doc-scanner.sh new file mode 100644 index 0000000..1a1dcf3 --- /dev/null +++ b/ScanScripts/Windows/magazines/work/0_-_Default_Level-doc-scanner.sh @@ -0,0 +1,13 @@ +#!/bin/bash +mkdir work + +cd origs + +for i in *.tif +do + convert $i -level 11%%,86% ../work/$i +done +for i in *.png +do + convert $i -level 11%%,86% ../work/$i +done \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/work/1 - grayscale.cmd b/ScanScripts/Windows/magazines/work/1 - grayscale.cmd new file mode 100644 index 0000000..15810ea --- /dev/null +++ b/ScanScripts/Windows/magazines/work/1 - grayscale.cmd @@ -0,0 +1,7 @@ +mkdir pages +for %%i in (*.tif) DO ( +convert %%i -grayscale rec709luma pages\%%i +) +for %%i in (*.png) DO ( +convert %%i -grayscale rec709luma pages\%%i +) \ No newline at end of file diff --git a/ScanScripts/Windows/magazines/work/1_-_grayscale.sh b/ScanScripts/Windows/magazines/work/1_-_grayscale.sh new file mode 100644 index 0000000..6c23b94 --- /dev/null +++ b/ScanScripts/Windows/magazines/work/1_-_grayscale.sh @@ -0,0 +1,11 @@ +#!/bin/bash + +mkdir pages +for i in *.tif +do + convert $i -grayscale rec709luma pages/$i +done +for i in *.png +do + convert $i -grayscale rec709luma pages/$i +done diff --git a/ScanScripts/Windows/magazines/work/2 - Make AudioMedia magazine.cmd b/ScanScripts/Windows/magazines/work/2 - Make AudioMedia magazine.cmd new file mode 100644 index 0000000..547ae5b --- /dev/null +++ b/ScanScripts/Windows/magazines/work/2 - Make AudioMedia magazine.cmd @@ -0,0 +1,47 @@ +@echo off +setlocal EnableDelayedExpansion +set folder=%cd% +cd work\out +choice /m "Fix paging " +if %errorlevel%==1 ( +copy D:\Retro-Work\correct_pages.php .\ /y +php -f correct_pages.php +cd newpages +) + +if NOT EXIST output mkdir output +set thumb=1 + +if NOT EXIST audiomedia mkdir audiomedia + + +for %%i in (*.tif) DO ( +if !thumb!==1 ( +convert %%i -resize 240x310^^! -quality 75%% !folder!\thumb.jpg +) +set thumb=2 +convert -units pixelsperinch %%i -resample 150 audiomedia\%%~ni.jpg +convert %%i -quality 95%% output\%%~ni.jpg +) + +rem 300dpi mag +cd output +for %%i in (*.jpg) DO ( +convert %%i %%~ni.pdf +) + +del *.jpg /q +pdftk *.pdf cat output "%folder%\mag.pdf" +del *.pdf /q +cd .. + + +rem Tablet +cd audiomedia +for %%i in (*.jpg) DO ( +convert %%i %%~ni.pdf +) +del *.jpg /q +pdftk *.pdf output "%folder%\audiomedia.pdf" +del *.pdf /q +pause diff --git a/ScanScripts/Windows/magazines/work/2 - Make normal magazine.cmd b/ScanScripts/Windows/magazines/work/2 - Make normal magazine.cmd new file mode 100644 index 0000000..bcb3b7a --- /dev/null +++ b/ScanScripts/Windows/magazines/work/2 - Make normal magazine.cmd @@ -0,0 +1,57 @@ +@echo off +setlocal EnableDelayedExpansion +set folder=%cd% +cd work\out +choice /m "Fix paging " +if %errorlevel%==1 ( +copy D:\Retro-Work\correct_pages.php .\ /y +php -f correct_pages.php +cd newpages +) + +choice /C LSN /m "Use large (L), small (S) or no (N) lastpage " +if %errorlevel%==1 ( +set page=brought_to_you_by.pdf +) else if %errorlevel%==2 ( +set page=brought_to_you_by_[TABLET].pdf +) + +if NOT EXIST output mkdir output +set thumb=1 + +if NOT EXIST tablet mkdir tablet + + +for %%i in (*.tif) DO ( +if !thumb!==1 ( +convert %%i -resize 240x310^^! -quality 75%% "!folder!\thumb.jpg" +) +set thumb=2 +convert %%i -resize 1024x4096 -quality 95%% tablet\%%~ni.jpg +convert %%i -quality 95%% output\%%~ni.jpg +) + +rem 300dpi mag +cd output +for %%i in (*.jpg) DO ( +convert %%i %%~ni.pdf +) + +del *.jpg /q +pdftk *.pdf D:\Retro-Work\brought_to_you_by.pdf cat output "!folder!\_mag.pdf" +pdftk "!folder!\_mag.pdf" update_info D:\Retro-Work\metadata.txt output "!folder!\mag.pdf" +del *.pdf /q +del "!folder!\_mag.pdf" +cd .. + + +rem Tablet +cd tablet +for %%i in (*.jpg) DO ( +convert %%i %%~ni.pdf +) +del *.jpg /q +pdftk *.pdf D:\Retro-Work\brought_to_you_by_[TABLET].pdf cat output _tablet.pdf +pdftk _tablet.pdf update_info D:\Retro-Work\metadata.txt output "!folder!\_tablet.pdf" +del *.pdf /q +pause diff --git a/ScanScripts/Windows/magazines/work/2_-_Make_AudioMedia_magazine.sh b/ScanScripts/Windows/magazines/work/2_-_Make_AudioMedia_magazine.sh new file mode 100644 index 0000000..c3432ab --- /dev/null +++ b/ScanScripts/Windows/magazines/work/2_-_Make_AudioMedia_magazine.sh @@ -0,0 +1,37 @@ +#!/bin/sh +cd work/out + +mkdir output +mkdir audiomedia + + +for i in *.tif +do + convert -units pixelsperinch $i -resample 150 audiomedia/$i.jpg + convert $i -quality 95% output/$i.jpg +done + +rem 300dpi mag +cd output +for i in *.jpg +do + convert $i $i.pdf +done + +rm *.jpg +pdftk *.pdf cat output ../../../mag.pdf +rm *.pdf +cd .. + + +rem Tablet +cd audiomedia +for i in *.jpg +do + convert $i $i.pdf +done + +rm *.jpg +pdftk *.pdf output ../../../audiomedia.pdf +rm *.pdf + diff --git a/ScanScripts/Windows/magazines/work/2_-_Make_normal_magazine.sh b/ScanScripts/Windows/magazines/work/2_-_Make_normal_magazine.sh new file mode 100644 index 0000000..bcb3b7a --- /dev/null +++ b/ScanScripts/Windows/magazines/work/2_-_Make_normal_magazine.sh @@ -0,0 +1,57 @@ +@echo off +setlocal EnableDelayedExpansion +set folder=%cd% +cd work\out +choice /m "Fix paging " +if %errorlevel%==1 ( +copy D:\Retro-Work\correct_pages.php .\ /y +php -f correct_pages.php +cd newpages +) + +choice /C LSN /m "Use large (L), small (S) or no (N) lastpage " +if %errorlevel%==1 ( +set page=brought_to_you_by.pdf +) else if %errorlevel%==2 ( +set page=brought_to_you_by_[TABLET].pdf +) + +if NOT EXIST output mkdir output +set thumb=1 + +if NOT EXIST tablet mkdir tablet + + +for %%i in (*.tif) DO ( +if !thumb!==1 ( +convert %%i -resize 240x310^^! -quality 75%% "!folder!\thumb.jpg" +) +set thumb=2 +convert %%i -resize 1024x4096 -quality 95%% tablet\%%~ni.jpg +convert %%i -quality 95%% output\%%~ni.jpg +) + +rem 300dpi mag +cd output +for %%i in (*.jpg) DO ( +convert %%i %%~ni.pdf +) + +del *.jpg /q +pdftk *.pdf D:\Retro-Work\brought_to_you_by.pdf cat output "!folder!\_mag.pdf" +pdftk "!folder!\_mag.pdf" update_info D:\Retro-Work\metadata.txt output "!folder!\mag.pdf" +del *.pdf /q +del "!folder!\_mag.pdf" +cd .. + + +rem Tablet +cd tablet +for %%i in (*.jpg) DO ( +convert %%i %%~ni.pdf +) +del *.jpg /q +pdftk *.pdf D:\Retro-Work\brought_to_you_by_[TABLET].pdf cat output _tablet.pdf +pdftk _tablet.pdf update_info D:\Retro-Work\metadata.txt output "!folder!\_tablet.pdf" +del *.pdf /q +pause diff --git a/ScanScripts/Windows/sort/backward/Thumbs.db b/ScanScripts/Windows/sort/backward/Thumbs.db new file mode 100644 index 0000000..4b40a2b Binary files /dev/null and b/ScanScripts/Windows/sort/backward/Thumbs.db differ diff --git a/ScanScripts/Windows/sort/forward.php b/ScanScripts/Windows/sort/forward.php new file mode 100644 index 0000000..b776bdd --- /dev/null +++ b/ScanScripts/Windows/sort/forward.php @@ -0,0 +1,32 @@ + $fv) +{ + + echo $fk . ' => ' . $fv . "\n"; + copy($fv, $output . str_pad($fcount, 4, 0, STR_PAD_LEFT) . '.tif'); + $fcount += 2; +} + +foreach($backward as $bk => $bv) +{ + + if ($bk % 2 != 0) + { + echo $bk . ' => ' . $bv . "\n"; + copy($bv, $output . str_pad($bcount, 4, 0, STR_PAD_LEFT) . '.tif'); + $bcount += 2; + } +} + + +?> \ No newline at end of file diff --git a/ScanScripts/Windows/sort/forward/Thumbs.db b/ScanScripts/Windows/sort/forward/Thumbs.db new file mode 100644 index 0000000..c798273 Binary files /dev/null and b/ScanScripts/Windows/sort/forward/Thumbs.db differ diff --git a/ScanScripts/Windows/sort/php.exe b/ScanScripts/Windows/sort/php.exe new file mode 100644 index 0000000..31e861c Binary files /dev/null and b/ScanScripts/Windows/sort/php.exe differ diff --git a/ScanScripts/Windows/sort/php5.dll b/ScanScripts/Windows/sort/php5.dll new file mode 100644 index 0000000..bd51db8 Binary files /dev/null and b/ScanScripts/Windows/sort/php5.dll differ diff --git a/ScanScripts/Windows/sort/runme.cmd b/ScanScripts/Windows/sort/runme.cmd new file mode 100644 index 0000000..9a18d14 --- /dev/null +++ b/ScanScripts/Windows/sort/runme.cmd @@ -0,0 +1,2 @@ +php.exe -f forward.php +pause \ No newline at end of file