for "i1" from _D1min to _D1max step 0.01 do{
    sleep 0.06;
	door1 attachTo [side1, [-i1, 0.4, 0] ];
};
for "i2" from _D2min to _D2max step 0.01 do{
    sleep 0.06;
	door attachTo [side1, [+i2, 0.4, 0] ];
};