screenProgb

local aScreen = {
    "                                     ",
    "                                     ",
    "            %%%      %%%             ",
    "           %%%%%    %%%%%            ",
    "          %%%%%%%%%%%%%%%%           ",
    "          %%%%%%%%%%%%%%%%           ",
    "           %%%%%%%%%%%%%%            ",
    "              %%%%%%%%%              ",
    "                %%%%%                ",
    "                 %%%                 ",
    "                  %                  "
}

local bScreen = {
    "                                     ",
    "                                     ",
    "        $$$     $$$                  ",
    "        $$$     $  $                 ",
    "                $   $                ",
    "                $   $                ",
    "        $$$     $  $                 ",
    "        $$$     $$$                  ",
    "                                     ",
    "                                     ",
    "                                     "
}


local screens = {
    {
        "                                     ",
        "   %%  %% %    %%% %%  %  %%         ",
        "   %%  %%      %   % % % %           ",
        "   %%%%%% %    %%  %%  % %           ",
        "   %%  %% %    %   %   % %           ",
        "   %%  %% %  % %%% %   %  %%         ",
        "            %                        ",
        "                                     ",
        "                                     ",
        "                                     ",
        "                                     "
    },
    {
        "                                     ",
        "   %%  %%  %%   %         %          ",
        "   %%  %% %  %   %       %           ",
        "   %%%%%% %  %   %   %   %           ",
        "   %%  %% %  %    % % % %            ",
        "   %%  %%  %%      %   %             ",
        "                                     ",
        "    %%      %  %                     ",
        "    % %     %  %                     ",
        "    %%      %  %                     ",
        "    % %      %%                      "
    },
    {
        "                                     ",
        "       %%%%%%%%%%%%%%%%%%%%%%%%      ",
        "                           %%%%      ",
        "       %%%%%%%%%%%%%%%%%%%%%%%%      ",
        "       %%%%                          ",
        "       %%%%%%%%%%%%%%%%%%%%%%%%      ",
        "                                     ",
        "                 %%%%                ",
        "                 %%%%                ",
        "                                     ",
        "                                     "
    }
}

local scNum = 1
oScreen =nil
--effectsAPI.playEffect(1,1,nil,aScreen,"randomScatter")

local effects = {"randomScatter","vertLines"}
local function getEff() return effects[math.random(1,#effects)] end
term.clear()
while true do
    effectsAPI.playEffect(1,1,oScreen,screens[scNum],getEff())
    sleep(5)
    oScreen = screens[scNum]
    scNum=scNum+1
    if scNum > #screens then scNum = 1 end

    --effectsAPI.playEffect(1,1,bScreen,aScreen,"randomScatter")
end