-
Notifications
You must be signed in to change notification settings - Fork 2
/
_DKR_Batch_split_mosaic.txt
101 lines (75 loc) · 2.66 KB
/
_DKR_Batch_split_mosaic.txt
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
// created by Dan Rozelle 20091005
//used to quickly open each DV movie, and wait to do some simple manual function or paste another macro as a function
macro "split"{
//list auto functions here, adjust mode as necessary
function batchfunction();
mode="MANUAL"; //use "MANUAL" or "AUTO" or "BOTH"
if(nImages>0) exit ("close all images before proceeding");
dir1 = getDirectory("Choose source directory");
if (dir1=="")
exit("No directory available");
//get a list of all the files in this folder
preList = getFileList(dir1);
size=0;
//include only certain filetypes
filter=".zvi";
//count each '*filter*' files
for(place=0;place<preList.length;place++){
if(endsWith(preList[place],filter)){
size++;
}
}
//create a new array and populate with filtered images
list=newArray(size);
position=0;
for(place=0;place<preList.length;place++){
if(endsWith(preList[place],filter)){
list[position]=preList[place];
position++;
}
}
//starting with the first image, we increment through each image until we have done 6, or finish our list, whichever comes first
for(i=0; i<list.length; i++) {
run("Bio-Formats Importer", "open="+dir1+list[i]+" color_mode=Composite view=Hyperstack stack_order=XYCZT ");
base = File.nameWithoutExtension;
selectWindow(list[i]);
rename("current");
batchfunction(base,dir1);
//close the window after dialog box is closed
selectWindow("current");
close();
}
}
showMessage("done")
function batchfunction(base, dir1)
{
selectWindow("current");
run("Enhance Contrast", "saturated=0.35");
run("Specify...", "width=2688 height=2048 x=0 y=0 slice=1");
run("Duplicate...", "title="+base+"-1.zvi duplicate channels=1-3 frames=1-7");
selectWindow(base+"-1.zvi");
saveAs("Tiff", dir1+base+"-1.tif");
selectWindow(base+"-1.tif");
close();
selectWindow("current");
run("Specify...", "width=2688 height=2048 x=2688 y=0 slice=1");
run("Duplicate...", "title="+base+"-2.zvi duplicate channels=1-3 frames=1-7");
selectWindow(base+"-2.zvi");
saveAs("Tiff", dir1+base+"-2.tif");
selectWindow(base+"-2.tif");
close();
selectWindow("current");
run("Specify...", "width=2688 height=2048 x=0 y=2048 slice=1");
run("Duplicate...", "title="+base+"-3.zvi duplicate channels=1-3 frames=1-7");
selectWindow(base+"-3.zvi");
saveAs("Tiff", dir1+base+"-3.tif");
selectWindow(base+"-3.tif");
close();
selectWindow("current");
run("Specify...", "width=2688 height=2048 x=2688 y=2048 slice=1");
run("Duplicate...", "title="+base+"-4.zvi duplicate channels=1-3 frames=1-7");
selectWindow(base+"-4.zvi");
saveAs("Tiff", dir1+base+"-4.tif");
selectWindow(base+"-4.tif");
close();
}