% 设置起点和终点坐标 x1 = 12; y1 = 15; x2 = 170; y2 = 155; % 中点画线法扫描直线 dx = x2 - x1; dy = y2 - y1; if abs(dx) >= abs(dy) steps = abs(dx); else steps = abs(dy); end x_increment = dx / steps; y_increment = dy / steps; x = x1; y = y1; % 创建图形窗口 figure hold on % 绘制原始直线 plot([x1 x2], [y1 y2], 'LineWidth',2) % 定义基准点和变换矩阵 x0 = 20; y0 = 35; M = [cosd(45) -sind(45) x0*(1-cosd(45))+y0*sind(45); sind(45) cosd(45) y0*(1-cosd(45))-x0*sind(45); 0 0 1]; % 进行复合变换 for i = 1:steps % 将坐标移动到基准点 T = [1 0 -x0; 0 1 -y0; 0 0 1]; point = [x; y; 1]; point = T * point; % 进行指定变换 point = M * point; % 将坐标移回原始位置 T_inv = [1 0 x0; 0 1 y0; 0 0 1]; point = T_inv * point; % 更新坐标 x = x + x_increment; y = y + y_increment; % 绘制变换后的直线 plot([point(1) point(1)+x_increment], [point(2) point(2)+y_increment], 'r', 'LineWidth', 2) end % 添加标题 title('复合变换后的直线') 请将每一步直线变换后的图形绘制出来

将每一步直线变换后的图形绘制出来，可以在for循环中添加如下代码：

% 将坐标移动到基准点
T = [1 0 -x0; 0 1 -y0; 0 0 1];
point = [x; y; 1];
point = T * point;

% 进行指定变换
point = M * point;

% 将坐标移回原始位置
T_inv = [1 0 x0; 0 1 y0; 0 0 1];
point = T_inv * point;

% 绘制变换后的直线
plot([point(1) point(1)+x_increment], [point(2) point(2)+y_increment], 'r', 'LineWidth', 2)

% 暂停0.1秒，以便观察每一步变换后的图像
pause(0.1);

将这段代码加入到for循环中，即可在每个点处绘制变换后的直线，并在每次变换后暂停0.1秒，以便观察每一步变换后的图像。完整代码如下：

% 设置起点和终点坐标
x1 = 12; y1 = 15;
x2 = 170; y2 = 155;

% 中点画线法扫描直线
dx = x2 - x1;
dy = y2 - y1;
if abs(dx) >= abs(dy)
    steps = abs(dx);
else
    steps = abs(dy);
end
x_increment = dx / steps;
y_increment = dy / steps;
x = x1;
y = y1;

% 创建图形窗口
figure
hold on

% 绘制原始直线
plot([x1 x2], [y1 y2], 'LineWidth',2)

% 定义基准点和变换矩阵
x0 = 20; y0 = 35;
M = [cosd(45) -sind(45) x0*(1-cosd(45))+y0*sind(45); sind(45) cosd(45) y0*(1-cosd(45))-x0*sind(45); 0 0 1];

% 进行复合变换
for i = 1:steps
    % 将坐标移动到基准点
    T = [1 0 -x0; 0 1 -y0; 0 0 1];
    point = [x; y; 1];
    point = T * point;
    
    % 进行指定变换
    point = M * point;
    
    % 将坐标移回原始位置
    T_inv = [1 0 x0; 0 1 y0; 0 0 1];
    point = T_inv * point;
    
    % 绘制变换后的直线
    plot([point(1) point(1)+x_increment], [point(2) point(2)+y_increment], 'r', 'LineWidth', 2)
    
    % 暂停0.1秒，以便观察每一步变换后的图像
    pause(0.1);
    
    % 更新坐标
    x = x + x_increment;
    y = y + y_increment;
end

% 添加标题
title('复合变换后的直线')