pro flash_comp, img1, img2, img3, sxtcomp=sxtcomp, bin=bin
;
;
;
if (n_elements(bin) eq 0) then bin=1
if (n_elements(img3) eq 0) then img3=0
nx = n_elements(img1(*,0))
ny = n_elements(img1(0,*))
n = n_params(0)
;
siz = [nx*bin, ny*bin, n]
xinteranimate, title='FLASH_COMP', set=siz
;
qsxt = keyword_set(sxtcomp)
    if (qsxt) then bimg = sxt_comp(img1) else bimg = bytscl(img1)	& xinteranimate, image=rebin(bimg, nx*bin, ny*bin), frame=0
    if (qsxt) then bimg = sxt_comp(img2) else bimg = bytscl(img2) 	& xinteranimate, image=rebin(bimg, nx*bin, ny*bin), frame=1
if (n ge 3) then begin
    if (qsxt) then bimg = sxt_comp(img3) else bimg = bytscl(img3)	& xinteranimate, image=rebin(bimg, nx*bin, ny*bin), frame=2
end
;
xinteranimate, 100
end