计算机全息图案计算代码

% Generation of RLUT（by KIM）

clear
%tic

lambda = 628;               % wavelength
k0 = 100*3.14/lambda;         % 50*k0
% theta = 1;
% th0=30;

% Image Volume
x0=50;           % x center
y0=50;           % y center
xmax=1;       % image volume x                        check!!!
ymax=1;       % image volume y                        check!!!
zmax=1;         % image volume x                        check!!!
z_rep=5.99;     % Start point of z          9.99=999mm
magn=15;        % magnitude
% Hologram Pattern Resolution
hologram_vertical=400;          % vertical（x） resolution of CGH hologram                     check!!!
hologram_horizontal=400;        % horizontal（y） resolution of CGH hologram                     check!!!
dx=0.1;                       % pixel pitch x of hologram       0.1=10um         check!!!
dy=0.1;                       % pixel pitch y of hologram       0.1=10um         check!!!

% Elemental Fringe Pattern resolution
discretization = 1.5;                                          % discretization（1.5=150um）      check!!!
% total_shift_x=xmax*discretization/dx;                        % total shift of x
% total_shift_y=xmax*discretization/dy;                        % total shift of y
total_shift_x=xmax*magn;                                         % total shift of x
total_shift_y=xmax*magn;                                         % total shift of y
% EFP_vertical=hologram_vertical+total_shift_x+500;               % vertical side
% EFP_horizontal=hologram_horizontal+total_shift_y+500;           % horizontal side
EFP_vertical=1080;
EFP_horizontal=1920;
fFZP=zeros（EFP_verticalEFP_horizontal）;
AA=ones（EFP_verticalEFP_horizontal）;


% z=100;
%