var str_1="\n";
for(k2=1;k2<=NumB;k2++){
str_1+="function Flash"+k2+"_DoFSCommand(command, args) {\n"
str_1+="	if(command=='play'){\n"
str_1+="    var ar1=args.split('|');\n"
str_1+="      showMenu(ar1[0],ar1[1]); PrecI=ar1[1];\n"
str_1+="		}\n"
str_1+="if(command=='getURL'){\n"
str_1+="var	varLink=args.split('|');"
str_1+="   if(varLink.length==2){\n"
str_1+="if (isIE||isNN){\n"
str_1+="	document.getElementById('pag').src=varLink[0] \n"
str_1+="	}	\n"
str_1+="}else if(varLink.length==3){\n"	
str_1+="window.open(varLink[0],varLink[1])\n"
str_1+="	} \n"
str_1+="		}\n"
str_1+="if(command=='ChiudeMenuAperti'){\n"
str_1+="   OutMenu(args) \n"
str_1+="		}\n"
str_1+="if(command=='out'){\n"
str_1+="\n"
str_1+="\n"	
str_1+="  out(args)\n" 
str_1+="  \n"
str_1+="  \n"
str_1+=" }\n"
str_1+="};\n"
}

eval(str_1);

str_2="<script language='VBscript'>\n"
str_2+="<!--\n" 
str_2+="// Catch the fscommand in ie with vbscript, and pass\n"
str_2+="// it on to JavaScript.\n"
for(i1=1;i1<=NumB;i1++){
str_2+="Sub Flash"+i1+"_FSCommand(ByVal command, ByVal args) \n";
str_2+="call Flash"+i1+"_DoFSCommand(command, args)\n";
str_2+="end Sub\n";
}
str_2+="//-->\n"
str_2+="</script>"

document.write(str_2)