cap program drop NormalWeight_intervene
program define NormalWeight_intervene
	syntax [varlist] [if] [in], cyr(integer)

* Normal Weight Intervention
* Not sure whats the point of this

		marksample touse, zeroweight strok novarlist

		replace treat_effective = 1 if treat_now & normal(x_wtstate2004) >= aobese
		replace obese = 0 if treat_effective

end