Grayscale image: Difference between revisions

m
(→‎Tcl: Added implementation)
Line 465:
<!-- L = 0.2126·R + 0.7152·G + 0.0722·B -->
{{libheader|Tk}}
<lang tcl>proc grayscale image {
proc grayscale image {
set w [image width $image]
set h [image height $image]
Line 476 ⟶ 475:
}
}
}</lang>
}
</lang>
 
=={{header|Vedit macro language}}==
Anonymous user