*! A supplement for bstrap.tut
program define autobs
   version 6
   if "`1'"=="?" {
      global S_1 "oweight oforeign ompg rweight rforeign rmpg"
      exit
   }
   regress price weight foreign mpg
   local ow=_b[weight]
   local of=_b[foreign]
   local om=_b[mpg]
   rreg price weight foreign mpg
   local rw=_b[weight]
   local rf=_b[foreign]
   local rm=_b[mpg]
   post `1' (`ow') (`of') (`om') (`rw') (`rf') (`rm')
end