pro differencefitscubes

fitsfiles = $
      dialog_pickfile(filter = filterlist, $
                      /multiple_files, $
                      /must_exist, $
                      /read, $
                      path = $
			'/Users/lances/Desktop/LSST/KPNO/ASICDevelopmentKit/'+$
			'H2RG_DevBrd_code/IDLASICCom/Images', $
                      title = 'Select Fits Images')

fits_read, fitsfiles(0), main_image1, head1
fits_read, fitsfiles(1), main_image2, head2

DiffImage= float(main_image1)-float(main_image2)

DiffFile = '/Users/lances/Desktop/LSST/KPNO/ASICDevelopmentKit/'+$
                        'H2RG_DevBrd_code/IDLASICCom/Images/'+$
			'H4RG_Mux_10x10_Window_Light_Minus_Dark.fits'
fits_write, DiffFile, DiffImage

stop

end