PRO mk,mask,cols,rows IF N_PARAMS() GE 2 THEN c=cols ELSE c=256 IF N_PARAMS() EQ 3 THEN r=rows ELSE r=256 mask=BYTARR(c,r) RETURN END