;procedure to take an image with the ir camera on fast ;it really should be made more general by reading the ccd_status command pro image,a ;reply=call_external('idlfast.so','debug',255) reply=call_external('idlfast.so','xmit','ccd_status seq=Frame',/S_VALUE) ;print,reply reply=call_external('idlfast.so','xmit','ccd time=1 nbytes=131072 ',/S_VALUE) print,reply a=fltarr(256,256) b=call_external('idlfast.so','array',a,size(a)) tvscl,a end
The procedure does the following: