Methodology for fast evaluation of Bacillus thuringiensis crystal protein content