@name Testing
@inputs Start Screen:wirelink
@outputs I
@persist Count Res
runOnTick(1)

if(first() | duped()) {
    Count=0
    Res=256
    Screen[1048572]=Res  # Set Vertical Resolution
    Screen[1048573]=Res  # Set Horizontal Resolution
    Screen[1048569]=2  # Set Color Mode
    Screen[1048574]=0  # Hardware Clear screen
}

if(Start){
    
for(Loops=1,75){
    
        Count++
        X=(Count%Res)
        Y=floor(Count/Res)
        Screen[Count] = X*256^2+Y*256+X/Y
        
}  
    
}
