

// Script function: TwoButtonDialog


// 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 EMImg1 := RealImage( "GlobalSino Test1", 8, 400, 400 )
image EMImg2 := RealImage( "GlobalSino Test2", 4, 300, 300 )
EMImg1 = random()
EMImg2 = random()

 
if ( TwoButtonDialog( "Perform tests with displayed images", "Display GlobalSino Test1", "Display GlobalSino Test2") )
showImage( EMImg1 )

if ( 0 == EMImg1.ImageCountImageDisplays() )
showImage( EMImg2 )
