@name FailCake EPIC VIRUS FAILURE
@inputs Screen:wirelink
@outputs Screen:wirelink
@persist S Timer
@trigger all

interval(1)

##Virus FailCake!##

S = random(2,70)
    
Screen:writeCell(100,100)
Screen:writeString("0010101",S,S,S)
Screen:writeString("101010",S,S,S)
Screen:writeString("CAKE010",S,S,S)
Screen:writeString("1010101",S,S,S)
Screen:writeString("001010",S,S,S)
Screen:writeString("0010101",S,S,S)
Screen:writeString("101010",S,S,S)
Screen:writeString("CAKE010",S,S,S)
Screen:writeString("1010101",S,S,S)
Screen:writeString("001010",S,S,S)
Screen:writeString(" |----------------------| ",1,6,S)
Screen:writeString(" | OMG! FAILCAKE VIRUS! | ",1,7,S)
Screen:writeString(" |----------------------| ",1,8,S)
Screen:writeString("1010101",S,S,S)
Screen:writeString("1010101000",S,S,S)
Screen:writeString("000110CAKE",S,S,S)
Screen:writeString("1100101",S,S,S)
Screen:writeString("11CAKE0101",S,S,S)
Screen:writeString("1010101",S,S,S)
Screen:writeString("101CAKE000",S,S,S)
Screen:writeString("1100101",S,S,S)
Screen:writeString("11CAKE0101",S,S,S)
Screen:writeString("1010101",S,S,100)
Screen:writeString("1010101",S,S,S)
Screen:writeString("1010101000",S,S,S)
Screen:writeString("000110CAKE",S,S,S)
Screen:writeString("1100101",S,S,S)
Screen:writeString("11CAKE0101",S,S,S)
Screen:writeString("1010101",S,S,S)
Screen:writeString("101CAKE000",S,S,S)
Screen:writeString("1100101",S,S,S)
Screen:writeString("11CAKE0101",S,S,S)
Screen:writeString("1010101",S,S,100)
Screen:writeString("1010101",S,S,S)
Screen:writeString("1010101000",S,S,S)
Screen:writeString("000110CAKE",S,S,S)
Screen:writeString("1100101",S,S,S)
Screen:writeString("11CAKE0101",S,S,S)
Screen:writeString("1010101",S,S,S)
Screen:writeString("101CAKE000",S,S,S)
Screen:writeString("1100101",S,S,S)
Screen:writeString("11CAKE0101",S,S,S)
Screen:writeString("1010101",S,S,100)
Screen:writeString("1010101",S,S,S)
Screen:writeString("1010101000",S,S,S)
Screen:writeString("000110CAKE",S,S,S)
Screen:writeString("1100101",S,S,S)
Screen:writeString("11CAKE0101",S,S,S)
Screen:writeString("1010101",S,S,S)
Screen:writeString("101CAKE000",S,S,S)
Screen:writeString("1100101",S,S,S)
Screen:writeString("11CAKE0101",S,S,S)
Screen:writeString("1010101",S,S,100)
Screen:writeString("101CAKE000",S,S,S)
Screen:writeCell(100,100)

##PROTECTION SISTEM MUAHAHAHAH##

if(duped()){selfDestructAll()}

soundPlay(0,10000,"")
