;
;
;
seq = ['940312_025326', '940312_041421', '940312_052339']
;dir = '/mdidata6/log/sci160k/'
dir = '/disk6/log/sci160k/'
;
img_shift = 1
nimg_per_pos = 42
idark = 1
iobs = 0
ist1 = 2
;
for iseq=0,n_elements(seq)-1 do begin
    outfil = concat_dir('$MDI_CAL_TXT', seq(iseq)+'.raw_summary')
    file_append, outfil, 'RAW_SUMMARY   Program Run: '+ !stime, /newfile
    file_append, outfil, 'Output file: ' + outfil
    file_append, outfil, '  '
    ;
    for ipos=0,4 do for irep=0,1 do begin
	imgnum = [idark, iobs, indgen(20)+irep*20+ist1] + ipos*nimg_per_pos + img_shift
	mmap1pos, dir+seq(iseq), ipos, sub10=irep, imgnum=imgnum, summary=outfil
    end
end
;
end