smcolor
!p.multi=[0,1,2]
j=300-4
chip=2
for i=09730011L,09730012L do begin
  apload,'apCframe-'+string(format='(i8.8)',i)+'.fits',a
  plot,a.(chip).flux[*,j],xr=[0,1000],yr=[0,20000]
  oplot,a.(chip).sky[*,j],color=4
  oplot,a.(chip).flux[*,j]*a.(chip).telluric,color=3
  oplot,a.(chip).flux[*,j]
  plot,a.(chip).flux[*,j],xr=[1900,2050],yr=[1200,25000]
;  oplot,a.(chip).flux[*,j],psym=6,symsize=0.3
  oplot,a.(chip).sky[*,j],color=4
  oplot,a.(chip).flux[*,j]*a.(chip).telluric,color=3
;  oplot,a.(chip).flux[*,j]*a.(chip).telluric,color=3,psym=6,symsize=0.3
;  oplot,a.(chip).telluric*22000,color=3,psym=6,symsize=0.3
  oplot,a.(chip).flux[*,j]
stop

endfor
end