#MKFiles 2

#reg a flag

#MENU
	#STRING 0 "Can you exit?"	; title
	#CHECK "Disable EXIT" flag	; a checked line to disable EXIT action
	#ACTION "Exit !" progend	; run program progend
#ENDMENU

CX STO flag			; when flag=0, then option checked!

#MENUMAINLOOP 7

progend:
	@flag IF(x<>0)THEN	; if flag is not zero, we can stop
		STOP
	ENDIF
	RTN			; else, program goes on
