Bitmap/Write a PPM file: Difference between revisions

Changes to work with version 1.2.x; added an overload function.
(→‎{{header|C++}}: operator <<)
(Changes to work with version 1.2.x; added an overload function.)
Line 1,312:
 
== {{Header|Nim}} ==
<lang nim>proc writePPM(img: Image, f: TFile) =
import bitmap
f.writeln "P6\n", img.w, " ", img.h, "\n255"
 
proc writePPM(img: Image, file: var File) =
## Write an image in a PPM file.
ffile.writeln writeLine("P6\n ", img.w, " ", img.h, "\n255 255")
 
for x,y in img.indices:
ffile.write charwriteBytes(img[x,y].r, 0, 3)
 
f.write char(img[x,y].g)
proc writePPM(img: Image; filename: string) =
f.write char(img[x,y].b)</lang>
## Write an image in a PPM file.
 
var file = open(filename, fmWrite)
file.writePPM(img)
 
</lang>
 
== {{Header|OCaml}} ==
Anonymous user