Displays a movie from a series of images or a volume. There are two choices:
; Interleave two consecutively numbered image series into a volume
; Sept 13 2001 ArDean Leith
;
MO 3 ; Create a blank volume of desired size
merged_movie ; Volume name
390 390 ; x & y size
72 ; Number of frames (Total number of images)
B ; Blank volume
0.0 ; Voxel value
;
[slice] = 0
DO [n]=0,35 ; Number of frames in each series
[slice]=[slice]+1 ; Increment slice number
;
SK R ; Put image into volume
merged_movie ; Volume
movie_one{***[n]} ; Image
[slice] ; Slice
* ; Finished
;
[slice]=[slice]+1 ; Increment slice number
;
SK R ; Put image into volume
merged_movie ; Volume
movie_two{***[n]} ; Image
[slice] ; Slice
* ; Finished
;
ENDDO