Divide Close Curve(Polyline) By List Of Area

I improved my script but it’s a bit slow!