magazines scripts

ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/README.txt

@@ -0,0 +1,32 @@
+Scriptet kr<6B>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<73>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<73>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<65>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.

ScanScripts/Windows/magazines/Rarely used scripts/Ret_Sider/correct_pages.php

@@ -0,0 +1,65 @@
+<?php
+// Author Carsten Jensen aka Tomse
+// Copyright (c) 2013 Carsten Jensen
+// Released under GNU GPL v2
+
+// Corrects page numbers from scanned full-paper pages
+// which has been split into 2, and been edited in scan tailor
+
+$ext = '.tif';
+$files = glob('*.tif');
+
+// set to 0 if back page lies first, or 1 if frontpage lies first
+$up = 0;
+$down = count($files);
+$dest = 'newpages';
+$pad = strlen($down)+1;
+@mkdir($dest);
+
+$again = 1;
+$back = true;
+
+foreach($files as $k => $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);
+}
+?>

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