Hype Video Number Generator

clear
clc
close all


blank = zeros(1080,1920);
transparentPixels = zeros(1080,1920);
imshow(blank)
for n = 0:30
    myText = strcat('F', num2str(n));
    newImage = insertText(blank,[1600 840],myText,BoxOpacity=0,FontSize=170,TextColor="white",Font='Seven Segment');
    transparentPixels = newImage(:,:,1);
    myName = strcat(myText,'.png');
    imwrite(newImage,myName,'Alpha',transparentPixels)
    imshow(newImage)
end
%transparentPixels

%
% filename = "testAnimated.gif"; % Specify the output file name
%
% A(:,:,1) = rand(pixelSize);
% A(:,:,2) = rand(pixelSize);
% A(:,:,3) = rand(pixelSize);
% [A,map] = rgb2ind(A,256);
% imwrite(A,map,filename,"gif","LoopCount",Inf,"DelayTime",1);
% A(:,:,1) = zeros(pixelSize)+256;
% A(:,:,2) = zeros(pixelSize);
% A(:,:,3) = zeros(pixelSize);
% [A,map] = rgb2ind(A,256);
% imwrite(A,map,filename,"gif","WriteMode","append","DelayTime",1);
% A(:,:,1) = zeros(pixelSize);
% A(:,:,2) = zeros(pixelSize)+256;
% A(:,:,3) = zeros(pixelSize);
% [A,map] = rgb2ind(A,256);
% imwrite(A,map,filename,"gif","WriteMode","append","DelayTime",1);
% A(:,:,1) = zeros(pixelSize);
% A(:,:,2) = zeros(pixelSize);
% A(:,:,3) = zeros(pixelSize)+256;
% [A,map] = rgb2ind(A,256);
% imwrite(A,map,filename,"gif","WriteMode","append","DelayTime",1);


% A(:,:,1) = rand(pixelSize);
% A(:,:,2) = rand(pixelSize);
% A(:,:,3) = rand(pixelSize);
% [A,map] = rgb2ind(A,256);
% imwrite(A,map,filename,"gif","WriteMode","append","DelayTime",1);

% filename = "testAnimated.gif"; % Specify the output file name
% for idx = 1:nImages
%     [A,map] = rgb2ind(im{idx},256);
%     if idx == 1
%         imwrite(A,map,filename,"gif","LoopCount",Inf,"DelayTime",1);
%     else
%         imwrite(A,map,filename,"gif","WriteMode","append","DelayTime",1);
%     end
% end
%






% x = 0:0.01:1;
% n = 3;
% y = x.^n;
% plot(x,y,"LineWidth",3)
% title("y = x^n,  n = " + num2str(n))
%
% n = 1:0.5:5;
% nImages = length(n);
%
% fig = figure;
% for idx = 1:nImages
%     y = x.^n(idx);
%     plot(x,y,"LineWidth",3)
%     title("y = x^n,  n = " + num2str(n(idx)))
%     drawnow
%     frame = getframe(fig);
%     im{idx} = frame2im(frame);
% end
% close;
%
% filename = "testAnimated.gif"; % Specify the output file name
% for idx = 1:nImages
%     [A,map] = rgb2ind(im{idx},256);
%     if idx == 1
%         imwrite(A,map,filename,"gif","LoopCount",Inf,"DelayTime",1);
%     else
%         imwrite(A,map,filename,"gif","WriteMode","append","DelayTime",1);
%     end
% end