DLP4500棋盘格代码

clear, clc, close all
%构建1140*912的棋盘格
height = 1140;
width = 912;
img_chess = ones(height, width);
%棋盘格长为８０，宽度为４０
lengthX = 40;
lengthY = 2*lengthX;
%棋盘格有十行，13列
row = 10;
col = 13;
%%orgX,origY必须是偶数
%做余数
%floor(x)，也写做Floor(x)，其功能是“向下取整”
%height - row * lengthY,要不是偶数，要不是奇数
%将棋盘格居中
if mod(floor((height - row * lengthY) / 2),2)==0
    orgX=floor((height - row * lengthY) / 2)
else
    orgX=floor((height - row * lengthY) / 2)+1
end

if mod(floor((width - col * lengthX) / 2),2)==0
    orgY=floor((width - col * lengthX) / 2)
else
    orgY=floor((width - col * lengthX) / 2)+1
end
%产生1140*912的棋盘格图案
color1 = 1;
color2 = color1;
img_chess_only = zeros(row * lengthY, col * lengthX);
for i = 0: (row - 1)
    color2 = color1;
    for j = 0: (col - 1)
        if color2==1
            img_chess_only(i * lengthY + 1: (i + 1) * lengthY , j * lengthX + 1: (j + 1) * lengthX ) = 1;
        else
            img_chess_only(i * lengthY + 1: (i + 1) * lengthY , j * lengthX + 1: (j + 1) * lengthX ) = 0;
        end
        color2 = ~color2;
    end
    color1 = ~color1;
end
img_chess(orgX : orgX + row * lengthY-1 , orgY : orgY + col * lengthX -1) = img_chess_only;
imshow(img_chess)
imwrite(img_chess, 'chessBoard5Proj.bmp','bmp');
%
I1=zeros(height, width);
I1(:,395:473)=img_chess(:,395:473);
imshow(I1);
imwrite(I1,'test_corresponding5.bmp','bmp');
%%this code is for shanghai projector
ret = zeros(570, 1024);
img = zeros(570,1024);
% img = imresize(img_chess, [570, 912]);%%resize func has problems
for i=1:570
    for j=1:912
        if(img_chess(i*2,j)==1)
            img(i,j)=1;
        else
            img(i,j)=0;
        end
    end
end

imshow(img);
imwrite(img,'chess.bmp','bmp');

for i = 1: 570
    for j = 1: 1024
        if (j > 56 && j <= 968)
            ret(i, j) = img(i, j - 56);            
        else
            ret(i, j) = 1;
        end
    end
end
figure
imshow(ret)
imwrite(ret, 'chessBoard5calib.bmp','bmp');

DLP4500输入为1140*912，输出为570*912棋盘格