SaveImage() - Monochrom

[onny]

Wie kann ich ein Image als BMP speichern und zwar monochrom?
thx schonmal für alle antworten

[Sicro]

Hallo onny,

du kannst ein farbiges Bild einfarbig abspeichern, indem du das Bild vorher in ein einfarbiges Bild umwandelst.
Nachfolgend eine Prozedur, die ein farbiges Bild in ein graues Bild umwandelt:

Code: Alles auswählen

Procedure.l ConvertToGray(Image.l)
  Protected iHeight.l, iWidth.l, pColor.l

  If StartDrawing(ImageOutput(Image))
    For iHeight = 1 To ImageHeight(Image)
      For iWidth = 1 To ImageWidth(Image)
        pColor = Point(iWidth,iHeight)
        pColor = (Red(pColor) * 77 + Green(pColor) * 150 + Blue(pColor) * 28) / 255
        pColor = RGB(pColor,pColor,pColor)
        Plot(iWidth,iHeight,pColor)
      Next
    Next
    StopDrawing()
    ProcedureReturn #True
  EndIf
EndProcedure

Mfg DerProgger

[onny]

danke!

[Kaeru Gaman]

sorry, DP, das ist nicht ganz richtig so.

du hast zwar ein grauton-bild draus gemacht, aber das hat immer noch 24bit farbtiefe.
als monochrom bezeichnet man ein bild mit 1bit farbtiefe.

[AND51]

Dann machs doch besser

Wenns gar nicht anders geht, waru mnicht um die Ecke denken?
1. OpenScreen mit 1 Bit Farbtiefe öffnen
2. Bild als monochromes Sprite laden
3. Screenshot schießen, geht glaube ich mit GrabSprite()
4. Abspeichern

SOnst wüsst ich auch nichts...

[Kaeru Gaman]

> Dann machs doch besser

wasn das für ne schei$-antwort?

nur weil ich nicht hokuspokus ne lösung hab, darf ich nicht sagen, dass ne andere lösung nicht den erfordernissen entspricht?

wobei - ich schätze, dass die lösung von DP durchaus onny's wünschen entspricht, dass allerdings onny keinen schimmer hat, was monochrom bedeutet.

[AND51]

Du hast wohl das nicht gesehen, was? Brauchst du eine neu ?
Das war keineswegs eine Anmache und ich hatte nicht im Entferntesten vor, dich anzusaugen.

[Kaeru Gaman]

ja psst schon. sorry, bin etwas blank mit den nerven heut.

[Kurzer]

pColor = (Red(pColor) * 77 + Green(pColor) * 150 + Blue(pColor) * 28) / 255

Uiih, wo hast Du die Gewichtung der einzelnen Kanäle her?
Ist das irgendwie "Standard"?

Gruß Markus

[MVXA]

> Ist das irgendwie "Standard"?
Klar...