local y=1
while `y'<=100   {
use “your_data”, clear
set seed #(a fixed number)
bsample 200
...
drop _all
local y=`y'+1
}