GM16ImageMBS.sample(geometry as GM16GeometryMBS)

Var p as Picture = LogoMBS(500)
Var image as new GM16ImageMBS(p)

image.sample GM16GeometryMBS.make(100,100)

Backdrop=image.CopyPicture

GM16ImageMBS.scale(geometry as GM16GeometryMBS)

Var p as Picture = LogoMBS(500)
Var image as new GM16ImageMBS(p)

image.scale new GM16GeometryMBS(100,100)

Backdrop=image.CopyPicture

GM16ImageMBS.segment(clusterThreshold as Double=1.0, smoothingThreshold as Double=1.5)

Var p as Picture = LogoMBS(500)
Var image as new GM16ImageMBS(p)

image.segment

image.type = image.TrueColorType

Backdrop=image.CopyPicture

A histogram is built for the image. This histogram is filtered to reduce noise and a second derivative of the histogram plot is built and used to identify potential cluster colors (peaks in the histogram). The cluster colors are then validated by scanning through all of the pixels to see how many pixels fall within each cluster. Some candidate cluster colors may not match any of the image pixels at all and should be discarded. Specify clusterThreshold, as the number of pixels matching a cluster color in order for the cluster to be considered valid. SmoothingThreshold eliminates noise in the second derivative of the histogram. As the value is increased, you can expect a smoother second derivative. The default is 1.5.

GM16ImageMBS.setChromaBluePrimary(x as Double, y as Double)

e.g. x=0.15, y=0.06

GM16ImageMBS.setchromaGreenPrimary(x as Double, y as Double)

e.g. x=0.3, y=0.6

GM16ImageMBS.setchromaRedPrimary(x as Double, y as Double)

e.g. x=0.64, y=0.33

GM16ImageMBS.setchromaWhitePoint(x as Double, y as Double)

e.g. x=0.3127, y=0.329

GM16ImageMBS.SetEXIFOrientation(orientation as integer) as boolean

Changing orientation may need to set orientation via SetOrientation and SetEXIFOrientation. With a JPEG you have orientation both in JPEG header and in EXIF metadata.
Returns true for success and false for failure.

For new development, please use ExifTagsMBS class instead.

GM16ImageMBS.SetPicture(pic as picture, x as Integer, y as Integer)

GM16ImageMBS.SetPictureMask(maskpic as picture, x as Integer, y as Integer)

// this converts 32 bit PNG with alpha channel to BMP

Var f as FolderItem = SpecialFolder.Desktop.Child("test.png")
Var p as Picture = Picture.Open(f)

Var g as new GM16ImageMBS( new GM16GeometryMBS(p.Width, p.Height), new GM16ColorGrayMBS(1.0))

g.type = g.TrueColorMatteType
g.matte = True
g.magick = "BMP"

g.SetPicture(p, 0, 0)
g.SetPictureMask(p.mask.invertMBS, 0, 0)

f = SpecialFolder.Desktop.Child("test.bmp")
g.write(f)

GM16ImageMBS.setPixels(x as Integer, y as Integer, columns as Integer, rows as Integer) as Ptr

Var f as FolderItem = SpecialFolder.Desktop.Child("test.jpg")
Var g as new GM16ImageMBS(f)

// get pointer to some pixels to write
Var x as ptr = g.setPixels(0, 0, 100, 100)

// draw a red line to the pixel buffer
Var o as Integer
for i as Integer = 0 to 99
  o = 100 * i + i
  x.UInt32(o * 4) = &hFFFF0000
next

// write back
g.syncPixels

// show
me.Backdrop = g.CopyPicture

This area is subsequently transferred from the pixel cache to the image via syncPixels.

GM16ImageMBS.setStrokeDashArray(values() as Double)

Specify the pattern of dashes and gaps used to stroke paths. The strokeDashArray represents a zero-terminated array of numbers that specify the lengths of alternating dashes and gaps in pixels. If an odd number of values is provided, then the list of values is repeated to yield an even number of values. A typical strokeDashArray array might contain the members 5 3 2 0, where the zero value indicates the end of the pattern array.

GM16ImageMBS.shade(azimuth as Double=30.0, elevation as Double=30.0, colorShading as boolean=false)

Specify azimuth and elevation as the position of the light source. By default, the shading results as a grayscale image.. Set colorShading to true to shade the red, green, and blue components of the image.

GM16ImageMBS.sharpen(radius as Double=0.0, sigma as Double=1.0)

Var p as Picture = LogoMBS(500)
Var image as new GM16ImageMBS(p)

image.sharpen

Backdrop=image.CopyPicture

The radius parameter specifies the radius of the Gaussian, in pixels, not counting the center pixel. The sigma parameter specifies the standard deviation of the Laplacian, in pixels.

GM16ImageMBS.sharpenChannel(channel as Integer, radius as Double=0.0, sigma as Double=1.0)

The radius parameter specifies the radius of the Gaussian, in pixels, not counting the center pixel. The sigma parameter specifies the standard deviation of the Laplacian, in pixels.

GM16ImageMBS.shave(geometry as GM16GeometryMBS)

Var p as Picture = LogoMBS(500)
Var image as new GM16ImageMBS(p)

image.shave(new GM16GeometryMBS(200,200))

Backdrop=image.CopyPicture

GM16ImageMBS.shear(xShearAngle as Double, yShearAngle as Double)

Var p as Picture = LogoMBS(500)
Var image as new GM16ImageMBS(p)

image.shear(10,20)

Backdrop=image.CopyPicture

Shearing slides one edge of an image along the X or Y axis, creating a parallelogram. An X direction shear slides an edge along the X axis, while a Y direction shear slides an edge along the Y axis. The amount of the shear is controlled by a shear angle. For X direction shears, x degrees is measured relative to the Y axis, and similarly, for Y direction shears y degrees is measured relative to the X axis. Empty triangles left over from shearing the image are filled with the color defined as borderColor.

GM16ImageMBS.signature(force as boolean=false) as string

Var p as Picture = LogoMBS(500)
Var image as new GM16ImageMBS(p)

MsgBox image.signature

Backdrop=image.CopyPicture

Set force to true in order to re-calculate the signature regardless of whether the image data has been modified.

GM16ImageMBS.solarize(factor as Double=50.0)

Var p as Picture = LogoMBS(500)
Var image as new GM16ImageMBS(p)

image.solarize

Backdrop=image.CopyPicture

GM16ImageMBS.spread(amount as UInt32=3)

Var p as Picture = LogoMBS(500)
Var image as new GM16ImageMBS(p)

image.spread 5

Backdrop=image.CopyPicture

GM16ImageMBS.statistics as GM16ImageStatisticsMBS

Var f as FolderItem = SpecialFolder.Desktop.Child("test.jpg")
Var g as new GM16ImageMBS(f)
Var stat as GM16ImageStatisticsMBS = g.statistics
Var gs as GM16ImageChannelStatisticsMBS = stat.blue

MsgBox "blue channel: "+str(gs.minimum)+"-"+str(Gs.maximum)+", mean "+str(gs.mean)

Statistics are normalized to the range of 0.0 to 1.0 and are output to the specified ImageStatistics structure.

GM16ImageMBS.stegano(watermark as GM16ImageMBS)

Var p as Picture = LogoMBS(500)
Var p1 as Picture = New Picture(550,500,32)
Var p2 as Picture = New Picture(550,500,32)

p1.Graphics.DrawPicture p, 0,0
p2.Graphics.DrawPicture p,50,0

Var image1 as new GM16ImageMBS(p1)
Var image2 as new GM16ImageMBS(p2)

image2.zoom(new GM16GeometryMBS(100,100)) // scale down

// add watermark
image1.stegano(image2)

// now make a threshold so you see the difference
image1.threshold 254

image1.type = image1.TrueColorType
Backdrop=image1.CopyPicture

GM16ImageMBS.stereo(rightImage as GM16ImageMBS)

Var p as Picture = LogoMBS(500)
Var p1 as Picture = New Picture(550,500,32)
Var p2 as Picture = New Picture(550,500,32)

p1.Graphics.DrawPicture p, 0,0
p2.Graphics.DrawPicture p,50,0

Var image1 as new GM16ImageMBS(p1)
Var image2 as new GM16ImageMBS(p2)

image1.stereo(IMAGE2)

Backdrop=image1.CopyPicture

GM16ImageMBS.strip

GM16ImageMBS.strokeDashArray as Double()

Specify the pattern of dashes and gaps used to stroke paths. The strokeDashArray represents a zero-terminated array of numbers that specify the lengths of alternating dashes and gaps in pixels. If an odd number of values is provided, then the list of values is repeated to yield an even number of values. A typical strokeDashArray array might contain the members 5 3 2 0, where the zero value indicates the end of the pattern array.

GM16ImageMBS.swirl(degree as Double)

Var p as Picture = LogoMBS(500)
Var image as new GM16ImageMBS(p)

image.swirl 200

Backdrop=image.CopyPicture

GM16ImageMBS.syncPixels