
See what you get on this one.
- edit - Hey wait a sec, all 107's? That's the color of the Adelson example I posted. Is it possible that's what you're referring to?




Code: Select all
count.l = 0
total.l = 0
avg.l=0
r1.l=0
g1.l=0
b1.l=0
r2.l=0
g2.l=0
b2.l=0
LoadImage(0,"square1.bmp")
StartDrawing(ImageOutput())
For i = 1 To ImageWidth()
For j = 1 To ImageHeight()
If Point(i,j)<>RGB(255,255,255)
r1 + Red(Point(i,j))
count + 1
EndIf
Next j
Next i
r1=r1/count
count=0
For i = 1 To ImageWidth()
For j = 1 To ImageHeight()
If Point(i,j)<>RGB(255,255,255)
g1 + Green(Point(i,j))
count + 1
EndIf
Next j
Next i
g1=g1/count
count=0
For i = 1 To ImageWidth()
For j = 1 To ImageHeight()
If Point(i,j)<>RGB(255,255,255)
b1 + Blue(Point(i,j))
count + 1
EndIf
Next j
Next i
b1=b1/count
count=0
StopDrawing()
LoadImage(0,"square2.bmp")
StartDrawing(ImageOutput())
For i = 1 To ImageWidth()
For j = 1 To ImageHeight()
If Point(i,j)<>RGB(255,255,255)
r2 + Red(Point(i,j))
count + 1
EndIf
Next j
Next i
r2=r2/count
count=0
For i = 1 To ImageWidth()
For j = 1 To ImageHeight()
If Point(i,j)<>RGB(255,255,255)
g2 + Green(Point(i,j))
count + 1
EndIf
Next j
Next i
g2=g2/count
count=0
For i = 1 To ImageWidth()
For j = 1 To ImageHeight()
If Point(i,j)<>RGB(255,255,255)
b2 + Blue(Point(i,j))
count + 1
EndIf
Next j
Next i
b2=b2/count
count=0
StopDrawing()
Debug "Avg reds in image 1: "+Str(r1)
Debug "Avg reds in image 2: "+Str(r2)
Debug ""
Debug "Avg greens in image 1: "+Str(g1)
Debug "Avg greens in image 2: "+Str(g2)
Debug ""
Debug "Avg blues in image 1: "+Str(b1)
Debug "Avg blues in image 2: "+Str(b2)

Probably the squares are not the same due to the image compression used. Take a look a jpeg images to see what i mean. Lossy compressions such as jpeg heavily pixelate original smooth images.netmaestro wrote:What sets the first example apart from the interactive ones is that it's provable and you can win bets with it.
My point about the others is that you can't prove them - not that they don't work, they do. They are excellent. But if you bet someone 20 bucks that they're the same you would lose your money. I just think that the person who authored them should go back and alter them so that they can be shown equal, and I don't think it would detract much from their effectiveness.
Nit picking analysis? Try to take somebody's money when the colors can be shown unequal and they'll smother you in nit picking analysis! Then they'll take YOUR money!
