New G'MIC filter "Rendering / Neon Carpet"

cli345 · **Posted:** Sun Dec 08, 2024 10:22 am **(#1)**

Hi everyone!

I intend to add a new G'MIC filter "Rendering / Neon Carpet".

With default parameters, on a 800x600 layer, it would give:

Attachment:

neonCarpet.png [ 209.15 KiB | Viewed 5620 times ]

Here is its code:

Code: Select all

#@gui ____<b>Rendering</b>
#------------------
#@gui Neon Carpet (prerelease): cl_neonCarpet_prerelease, cl_neonCarpet_prerelease(0)
#@gui : Sequence Number = ~int(0, 0, 200)
#@gui : Item Number = ~int(0, 0, 100)
#@gui : Invert = ~bool(0)
#@gui : sep = separator()
#@gui : note = note("Note: Some combinations of parameters give a completely black result")
#@gui : note = note("<small>Author: <i>Claude Lion</i>. Latest Update: <i>2024/12/08</i>.</small>")
#@gui : note = note["<small>It uses filters of David Tschumperlé and Andy Kelday (garagecoder)</small>"]

cl_neonCarpet_prerelease:
   num1,num2,inv=$"*"
   
   foreach {

      fact2={11+2*$num2}
      fact1={$fact2+$num1}

      fill. "(x*x+y*y+128*c)%512%"$fact1"%"$fact2
      n. 0,256
      distance. 128,3
      %. 32
      n. 0,255
      b. 1.1
      ac "repeat 6 { bilateral 10,7 }",0 # copied from "fx_smooth_bilateral 10,7,6,0" of David Tschumperlé
      cut. 0,100
      n. 0,255
      # copied from "gcd_despeckle 20,20" of Andy Kelday (garagecoder)
      +label. 20,1 nb={1+iM}
      +histogram. $nb,0,{$nb-1}
      map.. . rm.
      le. 20 *. 255
      inpaint.. . rm.
      # end of copy from garagecoder

      if $inv==1
         negate. n. 0,255
      fi

   }

Installation:

Copy and paste the above code into the file "~/.gmic" on Linux or the file "%USERPROFILE%\user.gmic" on Windows.
The new filter appears in "Filters -> G'MIC -> Rendering -> Rendering / Neon Carpet (prerelease)".

or you can use the new option.

Have fun!

cli345 · **Posted:** Wed Dec 11, 2024 9:14 am **(#2)**

Are you able to use the filter?

quietreader · **Joined:** Apr 11, 2024 **Posts:** 298

cli345 · **Posted:** Wed Dec 11, 2024 12:31 pm **(#4)**

That's not the result I expected. I have to find the reason of that bug.
With your parameters, I obtain this:

Attachment:

neonCarpet90_4_0.png [ 2.59 MiB | Viewed 5515 times ]

cli345 · **Posted:** Wed Dec 11, 2024 1:36 pm **(#5)**

Is the bug fixed with this version?

Code: Select all

#@gui ____<b>Rendering</b>
#------------------
#@gui Neon Carpet (prerelease): cl_neonCarpet_prerelease, cl_neonCarpet_prerelease(0)
#@gui : Sequence Number = ~int(0, 0, 200)
#@gui : Item Number = ~int(0, 0, 100)
#@gui : Invert = ~bool(0)
#@gui : sep = separator()
#@gui : note = note("Note: Some combinations of parameters give a completely black result")
#@gui : note = note("<small>Author: <i>Claude Lion</i>. Latest Update: <i>2024/12/11</i>.</small>")
#@gui : note = note["<small>It uses filters of David Tschumperlé and Andy Kelday (garagecoder)</small>"]

cl_neonCarpet_prerelease:
   num1,num2,inv=$"*"
   
   foreach {

      remove_opacity.
      fact2={11+2*$num2}
      fact1={$fact2+$num1}

      fill. "(x*x+y*y+128*c)%512%"$fact1"%"$fact2
      n. 0,256
      distance. 128,3
      %. 32
      n. 0,255
      b. 1.1
      ac "repeat 6 { bilateral 10,7 }",0 # copied from "fx_smooth_bilateral 10,7,6,0" of David Tschumperlé
      cut. 0,100
      n. 0,255
      # copied from "gcd_despeckle 20,20" of Andy Kelday (garagecoder)
      +label. 20,1 nb={1+iM}
      +histogram. $nb,0,{$nb-1}
      map.. . rm.
      le. 20 *. 255
      inpaint.. . rm.
      # end of copy from garagecoder

      if $inv==1
         negate. n. 0,255
      fi

   }

quietreader · **Joined:** Apr 11, 2024 **Posts:** 298

Yes, it looks like yours now

cli345 · **Posted:** Wed Dec 11, 2024 1:55 pm **(#7)**

Thanks to you, I've fixed the bug, thank you! :tyspin

sallyanne · **Posted:** Fri Dec 13, 2024 1:47 am **(#8)**

cli345 · **Posted:** Sun Dec 15, 2024 10:46 am **(#9)**

Thanks, Sallyanne

@everyone
Have you experienced any other bugs?

quietreader · **Joined:** Apr 11, 2024 **Posts:** 298

Seems to work fine.
Looks nice in monochrome, too:

Removed the black background, then coloured the remainders white.
Put a coloured layer underneath. Voilà.
Looks a bit like embroidered ...

MareroQ · **Posted:** Tue Dec 17, 2024 2:52 pm **(#11)**

Wallace · **Posted:** Tue Dec 17, 2024 10:23 pm **(#12)**

MareroQ wrote:

:tyspin

[ Image ]

cli345 · **Posted:** Fri Dec 20, 2024 8:22 am **(#13)**

Thanks, Quietreader, MareroQ and Wallace :tyspin

Now, the filter is included in version 3.5.0_pre of G'MIC.