 , , ;
//************************************************
 ()
	 = ("");
	=("");
	=("");
	 () = 1 
		 = (".");
		.();
		 .()=1 
		     = .();
		;
	;
	 () = 1 
		 = (".");
		.();
		 .()=1 
			("",);
		;
	;

//************************************************
 ()
	("",);
	("",);

//************************************************
 ()
	 .()=1 
		  = 1  .() 
			(""+,.());
		;
		 (2) <> "" 
		 2.() = "" 
			2.(1);
		;
	;

//************************************************
 ()
	1=0; 2=0; 
	 .()=1 
		 .()>0 
		    1=1;
			.1.((.(1)))
		;
		 .()>1 
		    2=1;
			.2.((.(2)))
		;
		.1.(1);
		.2.(2);
	;

//************************************************
 ()
	();
	=("");

//*************************************** 
 ()
	("",);

//*************************************** 
//************************************************
 ()
	();
	();
 //
//***************************************
 (,)
	 ( = "")  
		 = 0;
		 ()>0 
		    ("    !",20);
			;
		;
		=;
		(".",);
	 ="" 
		 = (".");
		 .(" ","") = 1 
		     = .;
	    	="  "+(.)+" "+
	    				(.)+",  "+
	    				(.)+" "+
	    				((.," "));
		;
		 = 0;
		// = (".");
		//.(.());
		//.();
		// .()=1 
		//     = .();
		//	 = " "+(.)+
		//		" "+(.)+",  "+(.)+" "+
		//		((.," (0)"));
		//;
	;

//***************************************
 () 
	 =0 
		();
		 = ..;
	;
	 = 1;
 	();

//***************************************
 ()
	(1);
     = ("");
	 = "70,71.01,73,75,76.01,76.02,76.03,76.04,76.06,76.07,76.10,76.11,76.13";
	(,);
	();
 //
//***************************************
 1()
	// 1.() = 0 
	// (1) <> "" 
	// 1.() = "" 
	//     = 1.;
	//	 = (".");
	//	.(1);
	//	.();
	//	 .()=1 
	//	     = .();
	//		 = " "+(.)+
	//			" "+(1.)+",  "+(1.)+" "+
	//			((1.," (0)"));
	//	;
	// 1.() = "" 
	//	 = 1.;
	//	//    
	//	  1.<>.. 
	//		// -
	//		 = (".");
	//		.(1);
	//		.();
	//		 .()=1 
	//			 = .();
	//			="  "+(.)+" "+
	//			(.)+",  "+
	//			(.)+" "+
	//			((.," (0)"));
	//		;
	//	;
	//	 2.() = "" 
	//		2.(1);
	//	;
	//;
 //1     
//************************************************
 ()
	 ()<>"" 
		 0;
	 .()<>"" 
		 0;
	 . = .. 
		 1;
	
		 0;
	;
 //
//*********************************************
 ()
	 (1) = 1 
		 = ("", );
		 =  *  / (100 - );
	  
		 = 0;
	;
 //
//***************************************
 ()
	//	(2));
	// ,   
	(, );
	=",,";
	 (1)<>"" 
	    =+",1";
	;
	 (2)<>"" 
	    =+",2";
	;
    ();  =0;
     () = 1 
    	  > 0 
    	    =1; ;
    	;
	;  
	 (=1) 
	    =+",";
	;
	 (, )=0 
	     ("   -   !");
	;
	. = ("");
	. = "  : "+;
	();

//***************************************
 ()
	 = ("");
	 = ()+"mxl\rko1.mxl";
	 .() = 1 
		.();
	
		.("");
	;
	.();
	("");
	.(0,0,0,0,"","");
	.(1);
	.("   ","");

//***************************************

