用MATLAB编写旋转的大风车代码给出代码注释将大风车的四片花瓣叶子填充不同的颜色。

% 定义风车半径 r = 10; % 定义叶子宽度 w = 2; % 定义旋转速度 w_speed = pi/10;

% 创建画布 figure; hold on; axis equal; axis([-15 15 -15 15]);

% 绘制大风车 for i=1:4 % 计算叶子的起始和结束角度 theta_start = (i-1)pi/2; theta_end = ipi/2; % 计算叶子的中心点坐标 x_center = rcos((theta_start+theta_end)/2); y_center = rsin((theta_start+theta_end)/2); % 计算叶子的两个端点坐标 x_start = x_center - w/2cos(theta_start); y_start = y_center - w/2sin(theta_start); x_end = x_center + w/2cos(theta_end); y_end = y_center + w/2sin(theta_end); % 绘制叶子 patch([x_start x_center x_end],[y_start y_center y_end],'g'); end

% 循环旋转风车 while 1 % 旋转风车 for i=1:4 % 计算叶子的起始和结束角度 theta_start = (i-1)pi/2 + w_speed; theta_end = ipi/2 + w_speed; % 计算叶子的中心点坐标 x_center = rcos((theta_start+theta_end)/2); y_center = rsin((theta_start+theta_end)/2); % 计算叶子的两个端点坐标 x_start = x_center - w/2cos(theta_start); y_start = y_center - w/2sin(theta_start); x_end = x_center + w/2cos(theta_end); y_end = y_center + w/2sin(theta_end); % 更新叶子位置 patch([x_start x_center x_end],[y_start y_center y_end],mod(i,4)+1); end % 刷新画面 drawnow; end

% 注：代码中使用了patch函数绘制叶子，其中参数[...]表示叶子的三个顶点坐标，'g'表示填充颜色为绿色。mod(i,4)+1表示将四个叶子的填充颜色分别取值为1、2、3、4，实现彩色旋转效果