% =============================================================================
% Math 336 - Image Processing - Laboratory 2
%
% A Matlab script for generating images A, B, C.
%
% Marty Kandes
% Department of Physics
% San Diego State University
% Fall 2008
% -----------------------------------------------------------------------------
clear all; close all; clc;

NX = uint32(512);
NY = uint32(512);
NB = uint32(8);
IB = uint32(255/(NB-1));
SB = uint32(NY/NB);
MASK = zeros(1,NY);
for I = 0:NB-1
    for J = I*SB+1:(I+1)*SB
        MASK(1,J) = I*IB;
    end
end
A = zeros(NX,NY);
for I = 1:NX
    A(I,:) = MASK;
end
A = mat2gray(A);
B = A';


NX = uint32(512);
NY = uint32(1024);
NZ = uint32(64);
L1 = uint32(254);
L2 = uint32(254);
B1 = uint32(255);
B2 = uint32(255);
C = zeros(NX,NY);
for I = 1:NX
    C(:,I) = L1;
end
for I = NX:NY
    C(:,I) = L2;
end
for I = ((NX-NZ)/2):((NX+NZ)/2)
    for J = ((NX-NZ)/2):((NX+NZ)/2)
        C(I,J) = B1;
    end
end
for I = ((NX-NZ)/2):((NX+NZ)/2)
    for J = (NX+(NX-NZ)/2):(NX+(NX+NZ)/2)
        C(I,J) = B2;
    end
end
C = mat2gray(C);