Extracting Black pixels from an image

Entertaining to see the work going into recreating ‘Super high contrast on an old photocopier’ mode.
:slight_smile:

2 Likes

I think I filed a bug report about that as well
maybe a feature request
I forget

Hi all, thank you for the answers.

@samRowlands
You mean, in three maps arrays, I store the Red / Green / Blue values as Integer each in one map ?
I rephrase as code:

Dim Red_Int_map(255) As Integer
Dim Green_Int_map(255) As Integer
Dim Blue_Int_map(255) As Integer

.Transform(Red_Int_map,Green_Int_map,Blue_Int_map)

Each map above will hold 256 values (range 0 thru255).

Honestly, rtf is far easier to decrypt !

1 Like

Far better than the shared one, but work to do if one want to approach a “perfect” strip.

@anon76569242
I was thinking you wanted to share the project.
Stay Home (Lock Down / Confinment) is very boring. Nap in daylight is bad because of “not been sleepy” @ night !

I checked your suggestions: it is difficult to say (on screen) what technic gave the better result.

For the Comic Character I had in mind (Tim Tyler’s Luck usa / Raoul et Gaston or Richard le Téméraire fr / Cino e Franco it / Jorge y Fernando es etc.), I have nearly 280 clipped daily strips (en-us) from 1930, to convert, then read in pure Black and White.

Each file resolution is around 3544 × 1034 * 72 dpi (and my Retina monitor is 3360 x 2100 * 144).

Emile, you can replace this line:

If aColor.Red < 80 And aColor.Green < 80 And aColor.Blue < 80 Then

EDIT: not that line, but the entire if then block:

   If aColor.Red < 80 And aColor.Green < 80 And aColor.Blue < 80 Then
        // Set the color to Black
        aColor = RGB(0,0,0)
        
      Else
        // Set the color to White
        aColor = RGB(255,255,255)
      End If

By

RGBSurface.transform(mapRed(),mapGreen(),mapBlue()) 

where mapRed(),mapGreen(),mapBlue() are integer arrays that contain 80 zeros and 176 times the value 255 each, if I am not wrong (I haven’t tried it). So you don’t need to loop thorugh all the pixels.

I have no project to share, I used ImageJ to process the image, sorry.

Julen

OK. When I read your answer, I do not really understand.

After some days, on another read, I understand.

BTW: the actual speed is good.

Regards.