local b64str = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"

local logostr = [[
32Vid 1.1
14
!CPC009CAAAAAA8ADQAAAAAAAAAAACApnwEgG5ABIAKfASALiwKQASANggGDASBdAClAAQAbAgEAAhABAAsCASABAgEADQICAF0AAAAHBwf///8LCwsODg4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA=b7cd0256
!CPC009CAAAAAA8ADQAAAAAAAAAAACApnwEgG5ABIAKfASAMiwGQASAMnwGHAYMBIF0AKUABABsCAQACEAEACyACAgEADAIDAF0AAAAHBwf///8LCwsODg4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA=2b710733
!CPC00E8AAAAAA8ADQAAAAAAAAAAACApnwEgG5ABIAKfASAMiwGQASAMnwGHAYMBIAqIAYcBmAEgAZ8BIAmfAYEBIAKfAYEBIAqDAYsBhwEgMgApoAEAGwgBAAJwAQALgAIIAQAMaAMACgUBYAFkAWABBgEACWABYQFgAgYCAAoGAwAyAAAAEhIS4+Tl5ubn5eXmBAQE5OTlBwcH/v7+CwsLDQ0NAAAAAAAAAAAAAAAAAAAA08f91bff
!CPC00FCAAAAAA8ADQAAAAAAAAAAACApnwEgG5ABIAKfASAMiwGQASAMnwGHAYMBIAuHASACnwEgCZ8BgQEgAp8BgQEgCIcBIAOHASAJlQEgAp8BgQEgCoIBgwIgFwApUAEAGwMBAAIgAQALMAIDAQAMEwMACxADAQEACRAEAQIACBAEAQEACRADAQIACgEDABcAAADk5OQHBwf+/v4LCwsODg4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA=0a11a2a8
!CPC0150AAAAAA8ADQAAAAAAAAAAACAjgQEgBZ8BIAaIAYQBIA2PASAFkAEgAp8BIAaCAYsBIASLAZABIAmCAYsBkAGfAYcBgwEgBoIBjwEgA4cBIAKfASAJnAGBASACnwGBASAIhwEgA4cBIAmVASACnwGBASAKggGDAiAXACMHAQAFYAEABgcCAA1AAQAFAwEAAiABAAVAAwADMAIDAQAGQAUEARMDAAYEAkADFAEQAgEBAAlAARQBEAIBAgAIEAQBAQAJEAMBAgAKAQMAFwAAAOTk5AcHB/7+/ru5uQsLCw4ODgICAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==3d1b8cf9
!CPC0160AAAAAA8ADQAAAAAAAAAAACAlnwGDASACnwEgCIcBgQGaAYUBIAmDASAEnwGQASACnwEgCIcBgQEgAosBkAEgCYIBiwGQAZ8BhwGDASAGggGPASADhwEgAp8BIAmcAYEBIAKfAYEBIAiHASADhwEgCZUBIAKfAYEBIAqCAYMCIBfwJR8B7wHwAj8B8AjvApYBdQHwCe8B4AT+AfIB8AIfAfAF4AP+AvABIAEvAfIB8AbgA+8C/gECA/AG/gLgAw4BAALwCu8BDgEAAvAKDwEAA/AKDwEAAvAm5OTkBQUF/v7+DAwMw8LDy8vMu7m6wcDBtbOzy8rLxsXGxsXHycjKycnKu7m5AAAAb1c34e98
!CPC0170AAAAAA8ADQAAAAAAAAAAACAYnwEgDJ8BgwGVAYIBiwEgCIcBgQEgApUBnwGBASAGgwEgBJ8BkAEgAp8BIAiHAYEBIAKLAZABIAmCAYsBkAGfAYcBgwEgBoIBjwEgA4cBIAKfASAJnAGBASACnwGBASAIhwEgA4cBIAmVASACnwGBASAKggGDAiAXABhQAQAMQAJQAwAIQARQAQUCAAZABQQBBQEAAiABAAVAAwQCAAFQAgUBAAZABQQBFQMABgQCQAMUARACAQEACUABFAEQAgECAAgQBAEBAAkQAwECAAoBAwAXAAAA5OTkBQUFEBARu7m5/v7+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAd32547aa
!CPC017CAAAAAA8ADQAAAAAAAAAAACAYnwEgDJ8BgwGVAYIBiwEgCIcBgQEgApUBnwGBAYcBIAWDASAEnwGQASABiwGQASAIhwGBASACiwGQASAJggGLAZABnwGHAYMBIAaCAY8BIAOHASACnwEgCZwBgQEgAp8BgQEgCIcBIAOHASAJlQEgAp8BgQEgCoIBgwIgFwAYQAEADDACQAMACDAEQAEEAkABAAUwBQMBBAEAAQQBQAEABTADAwIAAUACBAEABjAFAwEUAwAGAwIwAxMBEAIBAQAJMAETARACAQIACBAEAQEACRADAQIACgEDABcAAADk5OQTExO7ubn+/v4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA=3b77f20a
!CPC0174AAAAAA8ADQAAAAAAAAAAACAXjwGVAYsBkAEgCJ8BhwGBASABlQEgAYcBnwEgBY8BgwEgBIIBgQGTASAJnwGHAYEBggGQASABggEgCIsBkAEgAp8BggEgBosBIASCAYEBIAqDAY8BhwEgA4UBIAifAYEBIAKfAYEBIAiXASADhwEgCooBjwKBASAlABcwAUACBAEACDAEQAIEAUABAAUwBgQCQAIABTADAwNAAQQBAAEEAQAFMAQDAQABQAEUARABAAYDATAFFAEQAgAIAwITARADAQEACBAEAQIACBAEAQEACgEEACUAAADk5OQUFBS7ubn+/v4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA=e8f01cff
!CPC0168AAAAAA8ADQAAAAAAAAAAACAJlwGQASAKnwGHASABlQEgAZ0BIAePAYEBIAOKAYcBjwGBASAJnwGHAYsBIAGCAYsBIAiRASADggGLASAGkAEgA4IBiwGHAYEBIAiDAY8BIAGfAYEBIAKXASAJhwEgA4cBIAifAYEBIAKfAYEBIAmVASAChwEgNAAJQAEEAQAKMANAAgQBAAcwBQQCQAIABTAEAwJAAQABBAIABTADAwEAAkADAAYwBhQCEAEABwMCMAETAhACAQEACRAEAQEACBAEAQIACRADAQEANAAAAOTk5BISE7u5uf7+/gAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==71309b9a
!CPC0180AAAAAA8ADQAAAAAAAAAAACAIjwGVAYsBkAEgCJ8BhwGBASABlQEgAYcBnwEgBY8BgwEgBIIBgQGTASAJnwGHAYEBggGQASABggEgCIsBkAEgAp8BggEgBosBIASCAYEBIAqDAY8BhwEgA4UBIAifAYEBIAKfAYEBIAiXASADhwEgCooBjwKBASAIiAGQASAqAAgwAUACBAEACDAEQAIEAUABAAUwBgQCQAIABTADAwNAAQQBAAEEAQAFMAQDAQABQAEUARABAAYDATAFFAEQAgAIAwITARADAQEACBAEAQIACBAEAQEACgEEAAgEAgAqAAAA5OTkEhITu7m5/v7+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA09bec4a6
!CPC01ACAAAAAA8ADQAAAAAAAAAAACAIjwGVAYsBkAEgCJ8BhwGBASABlQEgAYcBnwEgBY8BgwEgBIIBgQGTASAJnwGHAYEBggGQASABggEgCIsBkAEgAp8BggEgBosBIASCAYEBIAqDAY8BhwEgA4UBIAifAYEBIAKfAYEBIAiXASADhwEgCooBjwKBASAHmAGMAZABiAEgB58BIAGIAZsBIBeXASAGAAgwAUACBAEACDAEQAIEAUABAAUwBgQCQAIABTADAwNAAQQBAAEEAQAFMAQDAQABQAEUARABAAYDATAFFAEQAgAIAwITARADAQEACBAEAQIACBAEAQEACgEEAAcEBAAHQAEAAQQBQAEAF0ABAAYAAADk5OQSEhO7ubn+/v4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA=d150c220
!CPC01D8AAAAAA8ADQAAAAAAAAAAACAIjwGVAYsBkAEgCJ8BhwGBASABlQEgAYcBnwEgBY8BgwEgBIIBgQGTASAJnwGHAYEBggGQASABggEgCIsBkAEgAp8BggEgBosBIASCAYEBIAqDAY8BhwEgA4UBIAifAYEBIAKfAYEBIAiXASADhwEgCooBjwKBASAHmAGMAZABiAEgBZ8BjAGbAZ8BjAGbAZUBIAefASADggEgCJcBIAGVASAGAAgwAUACBAEACDAEQAIEAUABAAUwBgQCQAIABTADAwNAAQQBAAEEAQAFMAQDAQABQAEUARABAAYDATAFFAEQAgAIAwITARADAQEACBAEAQIACBAEAQEACgEEAAcEBAAFQAEEAUACBAFAAQQBAAdAAQADBAEACEABAAFAAQAGAAAA5OTkExMTu7m5////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA0659c669
!CPC0208AAAAAA8ADQAAAAAAAAAAACAIjwGVAYsBkAEgCJ8BhwGBASABlQEgAYcBnwEgBY8BgwEgBIIBgQGTASAJnwGHAYEBggGQASABggEgCIsBkAEgAp8BggEgBosBIASCAYEBIAqDAY8BhwEgA4UBIAifAYEBIAKfAYEBIAiXASADhwEgCooBjwKBASAHmAGMAZABlwEgBZ8BjAGbAZ8BjAGbAZUBIAWfASABnwGCAYQBIAGCAYQBIAGFASACnwEgApUBIAGVASAGAAgwAUACBAEACDAEQAIEAUABAAUwBgQCQAIABTADAwNAAQQBAAEEAQAFMAQDAQABQAEUARABAAYDATAFFAEQAgAIAwITARADAQEACBAEAQIACBAEAQEACgEEAAcEA0ABAAVAAQQBQAIEAUABBAEABUABAAFAAQQCAAEEAgABBAEAAkABAAJAAQABQAEABgAAAOTk5BMTE7u5uf///wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==96fa278a
!CPC0214AAAAAA8ADQAAAAAAAAAAACAIjwGVAYsBkAEgCJ8BhwGBASABlQEgAYcBnwEgBY8BgwEgBIIBgQGTASAJnwGHAYEBggGQASABggEgCIsBkAEgAp8BggEgBosBIASCAYEBIAqDAY8BhwEgA4UBIAifAYEBIAKfAYEBIAiXASADhwEgCooBjwKBASAHmAGMAZABlwEgBZ8BjAGbAZ8BjAGbAZUBIAKCASAClQEgAZUBggGMAZABggGMAZABmgGQASABnwGQASABlQEgAZUBIAYACDABQAIEAQAIMARAAgQBQAEABTAGBAJAAgAFMAMDA0ABBAEAAQQBAAUwBAMBAAFAARQBEAEABgMBMAUUARACAAgDAhMBEAMBAQAIEAQBAgAIEAQBAQAKAQQABwQDQAEABUABBAFAAgQBQAEEAQACBAEAAkABAAFAAQQGQAEEAQABQAEEAQABQAEAAUABAAYAAADk5OQTExO7ubn///8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA=4bc7ae74
!CPC0228AAAAAA8ADQAAAAAAAAAAACAIjwGVAYsBkAEgCJ8BhwGBASABlQEgAYcBnwEgBY8BgwEgBIIBgQGTASAJnwGHAYEBggGQASABggEgCIsBkAEgAp8BggEgBosBIASCAYEBIAqDAY8BhwEgA4UBIAifAYEBIAKfAYEBIAiXASADhwEgCooBjwKBASAHmAGMAZABlwEgAp8BhAGfAowBmwGfAYwBmwGVASACigEgApUBIAGVAYIBjAGQAYIBjAGQAZoBjwGEAZ8BjwEgAZUBIAGVASACigEgAooBAAgwAUACBAEACDAEQAIEAUABAAUwBgQCQAIABTADAwNAAQQBAAEEAQAFMAQDAQABQAEUARABAAYDATAFFAEQAgAIAwITARADAQEACBAEAQIACBAEAQEACgEEAAcEA0ABAAJAAQQBQAIEAUACBAFAAQQBAAIEAQACQAEAAUABBAZAAgQBQAIAAUABAAFAAQACBAEAAgQBAAAA5OTkExMTu7m5////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA4c7a3588
!CPC023CAAAAAA8ADQAAAAAAAAAAACAIjwGVAYsBkAEgCJ8BhwGBASABlQEgAYcBnwEgBY8BgwEgBIIBgQGTASAJnwGHAYEBggGQASABggEgCIsBkAEgAp8BggEgBosBIASCAYEBIAqDAY8BhwEgA4UBIAifAYEBIAKfAYEBIAiXASADhwEgCooBjwKBASAHmAGMAZABlwEgAp8BjAGbAZ8BjAGbAZ8BjAGbAZUBIAGQAZUBIAKVASABlQGCAYwBkAGCAYwBkAGaAY8BhQGfAY8BkAGVASABlQEgAZ8BmgEgAZ8BmgEACDABQAIEAQAIMARAAgQBQAEABTAGBAJAAgAFMAMDA0ABBAEAAQQBAAUwBAMBAAFAARQBEAEABgMBMAUUARACAAgDAhMBEAMBAQAIEAQBAgAIEAQBAQAKAQQABwQDQAEAAkABBAFAAgQBQAIEAUABBAEAAQQBQAEAAkABAAFAAQQGQAIEAUACBAFAAQABQAEAAUABBAEAAUABBAEAAADk5OQTExO7ubn///8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA=c37eac4a
!CPC023CAAAAAA8ADQAAAAAAAAAAACAIjwGVAYsBkAEgCJ8BhwGBASABlQEgAYcBnwEgBY8BgwEgBIIBgQGTASAJnwGHAYEBggGQASABggEgCIsBkAEgAp8BggEgBosBIASCAYEBIAqDAY8BhwEgA4UBIAifAYEBIAKfAYEBIAiXASADhwEgCooBjwKBASAHmAGMAZABlwEgAp8BjAGbAZ8BjAGbAZ8BjAGbAZUBnwGQAZUBIAKVASABlQGCAYwBkAGCAYwBkAGaAY8BhQGdAY8BkAGVAYMBlAEgAY8BmgEgAY8BmgEACDABQAIEAQAIMARAAgQBQAEABTAGBAJAAgAFMAMDA0ABBAEAAQQBAAUwBAMBAAFAARQBEAEABgMBMAUUARACAAgDAhMBEAMBAQAIEAQBAgAIEAQBAQAKAQQABwQDQAEAAkABBAFAAgQBQAIEAUABBAFAAQQBQAEAAkABAAFAAQQGQAIEAUACBAFAAQQBQAEAAUABBAEAAUABBAEAAADk5OQTExO7ubn///8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA=dbdd3396

]]

local lines, lineIndex = {}, 1; for line in logostr:gmatch("[^\r\n]+") do table.insert(lines, line) end; local readLine = function() local line = lines[lineIndex]; lineIndex = lineIndex + 1; return line end; if readLine() ~= "32Vid 1.1" then error("Unsupported file") end; local fps = tonumber(readLine()); local first, second = readLine(), readLine(); if second == "" or second == nil then fps = 0 end

term.clear()

local fi = 1
while true do
    local f;if first then f,first=first,nil elseif second then f,second=second,nil else f=readLine()end;if f==""or f==nil then break end;local m=f:match("^!CP([CD])");if not m then error("Invalid file")end;local d;if m=="C"then local l=tonumber(f:sub(5,8),16);d=f:sub(9,l+8)else local l=tonumber(f:sub(5,16),16);d=f:sub(17,l+16)end;local function b64dec(s)local r="";for c in s:gmatch"...."do if c:sub(3,4)=="=="then r=r..string.char(bit32.bor(bit32.lshift(b64str:find(c:sub(1,1))-1,2),bit32.rshift(b64str:find(c:sub(2,2))-1,4)))elseif c:sub(4,4)=="="then local n=(b64str:find(c:sub(1,1))-1)*4096+(b64str:find(c:sub(2,2))-1)*64+(b64str:find(c:sub(3,3))-1);r=r..string.char(bit32.extract(n,10,8))..string.char(bit32.extract(n,2,8))else local n=(b64str:find(c:sub(1,1))-1)*262144+(b64str:find(c:sub(2,2))-1)*4096+(b64str:find(c:sub(3,3))-1)*64+(b64str:find(c:sub(4,4))-1);r=r..string.char(bit32.extract(n,16,8))..string.char(bit32.extract(n,8,8))..string.char(bit32.extract(n,0,8))end end;return r end;local dt=b64dec(d);assert(dt:sub(1,4)=="\0\0\0\0"and dt:sub(9,16)=="\0\0\0\0\0\0\0\0","Invalid file");local w,h=("HH"):unpack(dt,5);if w<=0 or h<=0 then break end;local c,n,p=string.unpack("c1B",dt,17);local tl={};local ch=c:byte();for y=1,h do local l="";for x=1,w do l=l..string.char(ch);n=n-1;if n==0 then c,n,p=string.unpack("c1B",dt,p);ch=c:byte()end end;tl[y]=l end;local fl,bl={},{};
    for y=1,h do local fg,bg="","";for x=1,w do fg=fg..("%x"):format(bit32.band(ch,0x0F));bg=bg..("%x"):format(bit32.rshift(ch,4));n=n-1;if n==0 then ch,n,p=string.unpack("BB",dt,p)end end;fl[y]=fg;bl[y]=bg end;local tw,th=term.getSize();local sx=math.max(1,math.floor((tw-w)/2)+1);local sy=math.max(1,math.floor((th-h)/2)+1);local dh=math.min(h,th-sy+1);local dw=math.min(w,tw-sx+1);if dh>0 and dw>0 then for y=1,dh do local tx=string.sub(tl[y],1,dw);local fg=string.sub(fl[y],1,dw);local bg=string.sub(bl[y],1,dw);term.setCursorPos(sx,sy+y-1);term.blit(tx,fg,bg)end end;p=p-2;for i=0,15 do local r,g,b;r,g,b,p=string.unpack("BBB",dt,p);term.setPaletteColor(2^i,r/255,g/255,b/255)end;if fps==0 then read();break else sleep(1/fps)end

    if fi == 8 then sleep(0.5) end
    fi = fi+1
end

sleep(1.5)
-- Restore default palette
for i = 0, 15 do term.setPaletteColor(2^i, term.nativePaletteColor(2^i)) end
term.setBackgroundColor(colors.black)
term.setTextColor(colors.white)
term.clear()
term.setCursorPos(1, 1)

shell.run("shell")