//   簡易電卓      Ver 0.00   //
//                            //
//                            //
//   by Atsushi  2008/10/13   //


// サブルーチン (WSH)

/*@cc_on
try {
	with (Math)
	{
		WScript.StdOut.Write(eval(WScript.StdIn.ReadAll()));
	}
}
catch (e)
{
	WScript.StdOut.Write(e.description);
}
WScript.Quit();
@*/

/*@if (0!=0) @*/


// メイン

if (selecting)
{
	run "cmd.exe /c "+
	    "cd \""+currentmacrodirectory+"\" && "+
	    "cscript.exe //e:jscript //nologo "+currentmacrobasename+" < con > con";
}
else
{
/*
	#x=x;
	#y=y;
	golinetop2;
	beginsel;
	moveto #x,#y;
*/
	$expression=gettext2(0,lineno,column,lineno);
	insert " = ";
	beginsel;
	
	run "cmd.exe /c "+
	    "cd \""+currentmacrodirectory+"\" && "+
	    "echo "+$expression+" | "+
	    "cscript.exe //e:jscript //nologo "+currentmacrobasename+" > con";
}


/*@end @*/