//MACRO		ANDIF		Condition,  WReg= !"", Far{boolean}= no
//--------------------------------------------------------------------------------------------------
//
//  @ CopyRight Roberti & Parau Enterprises, Inc.  2021-2023
//
//  This work is licensed under the Creative Commons Attribution-NoDerivatives 4.0 International License.
//  To view a copy of this license, visit http://creativecommons.org/licenses/by-nd/4.0/
//   or send a letter to Creative Commons, PO Box 1866, Mountain View, CA 94042, USA.
//
//--------------------------------------------------------------------------------------------------
//
	var nestStack= DVASM.getJSGlobal("__arch_condNestBlockStack");
	if (nestStack == null)
		nestStack= [];
	
	//
	//	Check if inner nesting is IF, ANDIF
	//
	var n= nestStack.length-1;
	if (n < 0)
		DVASM.putError("No nest block is current to match [ELSE]");
	if (! ["IF", "ANDIF"].includes(nestStack[n][0]))
		return DVASM.putError("Inner nest block is [" + nestStack[n][0] + "] and cannot be ended by [ELSE]");
	
	//
	//	End IF type nest block
	//
    DVASM.formatLine("", "INDENTOUT", "", "");
	if (Label !== "")
		DVASM.formatLine(Label, "BYTE", "0[0]", "");

	DVASM.formatLine("", "__CondGen", Condition + ", true, " +
		DVASM.getNewLabel() + ", " + nestStack[n][2] + ", WReg= " + WReg + ", " + Far, "");
    DVASM.formatLine("", "INDENTIN", "", "");

	nestStack[n][0]= "ANDIF";
	DVASM.putJSGlobal("__arch_condNestBlockStack", nestStack);