Grayscale image: Difference between revisions

m
→‎{{header|Wren}}: Changed to Wren S/H
m (→‎{{header|Wren}}: Changed to Wren S/H)
(3 intermediate revisions by 2 users not shown)
Line 1,327:
animage = gray
call output_ppm(an_unit, animage)</syntaxhighlight>
 
=={{header|Fōrmulæ}}==
 
{{FormulaeEntry|page=https://formulae.org/?script=examples/Grayscale_image}}
 
'''Solution'''
 
Note the use of the dot product in the calculation of the gray level.
 
[[File:Fōrmulæ - Grayscale image 01.png]]
 
'''Test case'''
 
[[File:Fōrmulæ - Grayscale image 02.png]]
 
[[File:Fōrmulæ - Grayscale image 03.png]]
 
=={{header|FreeBASIC}}==
Line 1,421 ⟶ 1,405:
{{output}}
[[File:Color to Grayscale.png]]
 
=={{header|Fōrmulæ}}==
 
{{FormulaeEntry|page=https://formulae.org/?script=examples/Grayscale_image}}
 
'''Solution'''
 
Note the use of the dot product in the calculation of the gray level.
 
[[File:Fōrmulæ - Grayscale image 01.png]]
 
'''Test case'''
 
[[File:Fōrmulæ - Grayscale image 02.png]]
 
[[File:Fōrmulæ - Grayscale image 03.png]]
 
=={{header|Go}}==
Line 2,009:
<syntaxhighlight lang="matlab">function [grayImage] = colortograyscale(inputImage)
grayImage = rgb2gray(inputImage);</syntaxhighlight>
 
=={{header|MiniScript}}==
This GUI implementation is for use with [http://miniscript.org/MiniMicro Mini Micro].
<syntaxhighlight lang="miniscript">
greyedColor = function(colr)
clist = color.toList(colr)
lum = [0.2126, 0.7152, 0.0722]
red = clist[0] * lum[0]
green = clist[1] * lum[1]
blue = clist[2] * lum[2]
grey = red + green + blue
return color.fromList([grey, grey, grey, clist[3]])
end function
 
toGreyScale = function(img)
greyImg = Image.create(img.width, img.height)
for x in range(0, img.width - 1)
for y in range(0, img.height - 1)
greyed = greyedColor(img.pixel(x, y))
greyImg.setPixel x, y, greyed
end for
end for
return greyImg
end function
 
clear
 
// The turtle and color wheel images are included with MiniMicro
turtle = file.loadImage("/sys/pics/animals/turtle.png")
greyTurtle = toGreyScale(turtle)
gfx.drawImage turtle, 0, 0
gfx.drawImage greyTurtle, turtle.width, 0
 
colorWheel = file.loadImage("/sys/pics/ColorWheel.png")
greyWheel = toGreyScale(colorWheel)
gfx.drawImage colorWheel, 0, 320
gfx.drawImage greyWheel, greyWheel.width, 320
</syntaxhighlight>
 
=={{header|Nim}}==
Line 2,823 ⟶ 2,862:
{{libheader|DOME}}
This script converts the image [https://rosettacode.org/File:Lenna100.jpg Lenna100.jpg] to grayscale and then displays the two images side by side.
<syntaxhighlight lang="ecmascriptwren">import "graphics" for Canvas, Color, ImageData
import "dome" for Window
 
9,485

edits