Evaluated proc magic:getpixel {wand x y {c 1} {r 1} {f RGB}} {str2hex [dowand $wand getpixel $x $y $c $r $f char] {}}