corrade-nucleus-nucleons – Blame information for rev 20
?pathlinks?
Rev | Author | Line No. | Line |
---|---|---|---|
20 | office | 1 | // animated duplicates, instances script |
2 | proc animatedDuplication (int $rangeStart, int $rangeEnd, int $numOfDuplicates, int $duplicateOrInstance) |
||
3 | { |
||
4 | int $range_start = $rangeStart; |
||
5 | int $range_end = $rangeEnd; |
||
6 | int $num_of_duplicates = $numOfDuplicates; |
||
7 | int $step_size = ($range_end - $range_start) / $num_of_duplicates; |
||
8 | int $i = 0; |
||
9 | int $temp; |
||
10 | |||
11 | currentTime $range_start; // set to range start |
||
12 | |||
13 | string $selectedObjects[]; // to store selected objects |
||
14 | $selectedObjects = `ls -sl`; // store selected objects |
||
15 | select $selectedObjects; |
||
16 | |||
17 | while ($i <= $num_of_duplicates) |
||
18 | { |
||
19 | $temp = $range_start + ($step_size * $i); |
||
20 | currentTime ($temp); |
||
21 | // seleced the objects to duplicate or instance |
||
22 | select $selectedObjects; |
||
23 | if($duplicateOrInstance == 0) |
||
24 | { |
||
25 | duplicate; |
||
26 | } |
||
27 | else |
||
28 | { |
||
29 | instance; |
||
30 | } |
||
31 | $i++; |
||
32 | } |
||
33 | } |