スキャンデータの品質チェックのために、読み取り直後に2秒間だけ画像表示させるMacro

スキャナでファイルを保存した直後に、データ確認のため2秒間だけ画像表示させるマクロです。

//FileWatcher_Modoki.ijm
//Detect if there are any "Newly created files" in selected dir.
//"Deleted files" and "Modified files" are not the subject.



print("");
print("FileWatcher_Modoki.ijm");
print("");


checkImgTime = 2000;


//select dir
dir = getDirectory("Choose a Directory");
print("Watching :",dir);
print("");


//Main ope
list0 = getFileList(dir);
count =0;
progress="*";

while(count<10000){
	//Show Progress
	print("\\Update:"+progress);
	wait(200);
	
	//Create list1
	list1 = getFileList(dir);
	
	//Check Missmatch list0 and list1
	for(i=0;i<list1.length;i++){
		if(fileExistInArray(list1[i],list0) == 0){
			open(dir+list1[i]);
			wait(checkImgTime);
			close();
			count=0;
		}
	}
	//OverWrite list0
	list0 = Array.copy(list1);
	
	
	progress = progress+"*";
	if(count%20 == 0) progress = "*";
	count++;

}

showMessage("Time out");	

//-----------------------------------------------------------------------------

function fileExistInArray(fileName,ARRAY){
	output = 0;
	for(i=0;i<ARRAY.length;i++){
		if(ARRAY[i] == fileName) output = 1;
	}
	return output;
}

//-----------------------------------------------------------------------------

「新規ファイル検知→2秒間画像表示」を生業とするマクロです。

単純なマクロですが、スキャナに原稿をセットしたあとは、ボーッとディスプレイを眺めているだけでスキャンデータの異常（主に縦線ノイズ）を即時チェックできるので、シンプルに捗ります。