// Script function: Demo of alloc, class and passing Objects to Functions.

// 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


class GlobalSino: object
{

void set_i(object GlobalSino, number x, number i) 
{ 
i = 3*x; 
result (i + "\n\n") 
}

void out_i(object GlobalSino, number i)
{
result (i + "\n") 
}
}

object EMObjectH = alloc (GlobalSino)
EMObjectH.out_i(100)

object EMObject = alloc (GlobalSino) 
EMObject.set_i(10, 10)

