;^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^Lance Simms, Stanford University 2009
;make_bad_mask_manually_xrg.pro
;
;PURPOSE
;  To create a bad mask for a detector without running scripts to find 
;  bad pixels.  For instance, the H2RG-001 has large regions that should 
;  be avoided completely.
;INPUTS:
;  DetStr: str
;    The name of the detector for which the bad mask will be produced.
;OUTPUTS:
;
;EXAMPLE:
; make_bad_mask_manually_xrg, 'H2RG-001'
;
pro make_bad_mask_manually_xrg, DetStr

if DetStr eq 'H2RG-001' then begin

BadPixMap = BytArr(2048,2048)
BadPixMap(*)=-1
BadPixMap(1300:1800, 450:750)     = 0
BadPixMap(800:2044,  800:1720)    = 0
BadPixMap(1500:2044, 1400:2044)   = 0
BadPixMap(1784:1834, 1842:1890)   = -1
BadPixMap(712:1200,  1500:2044)   = 0
BadPixMap(4:484,     1706:2044)   = 0
BadPixMap(20:327,    1020:1850)   = 0
BadPixMap(570:1170,  1640:2044)   = 0
BadPixMap(380:1180,  640:1060)    = 0
BadPixMap(533:553,   690:712)     = -1
fits_write, '/nfs/slac/g/ki/ki04/lances/H2RG-001/BadPix/BadMask.fits', BadPixMap

endif 


end