
// Script function: Create an image with pixel values of sin(2*Pi()/iheight*irow).

// Unless named starting with GlobalSino, EM, My, Self, the function commands are defined 
//by Gatan DM, please see at link: http://www.globalsino.com/EM/page2597.html


image GlobalSinoImage
GlobalSinoImage := RealImage ("GlobalSino Image", 4, 500, 500)
GlobalSinoImage = sin((iheight*irow*icol)*Pi()/5000000) // Note that iheight and icol are different.
ShowImage(GlobalSinoImage)

// Comparison with another case of creating an image at:
// http://www.globalsino.com/EM/page2597_CreateFloatImage.s
// http://www.globalsino.com/EM/page2597_ConstantPixelValue.s