flowtpls.sff

使用flex和bison

		#联通CDMA 和炫
		if(ringclass==5)
		{
			#请选择要接收铃声图片的手机品牌!	
			menufile = "d:\trasin\tplsvoc\8001.pcm";
		}
		##联通CDMA 彩色
		if(ringclass==6)
		{
			#请选择要接收铃声图片的手机品牌!	
			menufile = "d:\trasin\tplsvoc\8001.pcm";
		}
		playfile(menufile,2);
		readdigits(2);
		setchantimer(menutime);
	}
	proc
	{
		sf($sys_dtmf=="*")
		{
			goto m_start;
		}
		else
		{
			jixing = $sys_dtmf;
			if(ringclass ==1)
			{
				goto m_ringjixingpanduan_danyin;
			}
			if(ringclass==2)
			{
				goto m_ringjixingpanduan_hexuan_yd;
			}
			if(ringclass==3)
			{
				goto m_ringjixingpanduan_heibai;
			}
			if(ringclass==4)
			{
				goto m_ringjixingpanduan_caise_yd;
			}

			if(ringclass==5)
			{
				goto m_ringjixingpanduan_hexuan_lt;
			}
			if(ringclass==6)
			{
				goto m_ringjixingpanduan_caise_lt;
			}
		}
	}
}

state m_ringjixingpanduan_danyin
{
	init
	{
		sf(jixing=="01"){ goto m_ringplayxinghao; }
		elsesf(jixing=="02"){ goto m_ringplayxinghao; }
		elsesf(jixing=="03"){ goto m_ringplayxinghao; }
		elsesf(jixing=="04"){ goto m_ringplayxinghao; }
		elsesf(jixing=="05"){ goto m_ringplayxinghao; }
		elsesf(jixing=="06"){ goto m_ringplayxinghao; }
		elsesf(jixing=="07"){ goto m_ringplayxinghao; }
		elsesf(jixing=="08"){ goto m_ringplayxinghao; }
		elsesf(jixing=="09"){ goto m_ringplayxinghao; }
		elsesf(jixing=="10"){ goto m_ringplayxinghao; }
		elsesf(jixing=="11"){ goto m_ringplayxinghao; }
		elsesf(jixing=="12"){ goto m_ringplayxinghao; }
		elsesf(jixing=="13"){ goto m_ringplayxinghao; }
		elsesf(jixing=="14"){ goto m_ringplayxinghao; }
		elsesf(jixing=="15"){ goto m_ringplayxinghao; }
		elsesf(jixing=="16"){ goto m_ringplayxinghao; }
		else{ goto m_ringjixing_xinghaoerror; }		
	}
}


state m_ringjixingpanduan_heibai
{
	init
	{
		sf(jixing=="01"){ goto m_ringplayxinghao; }
		elsesf(jixing=="02"){ goto m_ringplayxinghao; }
		elsesf(jixing=="03"){ goto m_ringplayxinghao; }
		elsesf(jixing=="04"){ goto m_ringplayxinghao; }
		elsesf(jixing=="05"){ goto m_ringplayxinghao; }
		elsesf(jixing=="06"){ goto m_ringplayxinghao; }
		elsesf(jixing=="07"){ goto m_ringplayxinghao; }
		elsesf(jixing=="08"){ goto m_ringplayxinghao; }
		elsesf(jixing=="09"){ goto m_ringplayxinghao; }
		elsesf(jixing=="10"){ goto m_ringplayxinghao; }
		elsesf(jixing=="11"){ goto m_ringplayxinghao; }
		elsesf(jixing=="12"){ goto m_ringplayxinghao; }
		else{ goto m_ringjixing_xinghaoerror; }		
	}
}

state m_ringjixingpanduan_hexuan_yd
{
	init
	{
		sf(jixing=="01"){ goto m_ringplayxinghao; }
		elsesf(jixing=="02"){ goto m_ringplayxinghao; }
		elsesf(jixing=="03"){ goto m_ringplayxinghao; }
		elsesf(jixing=="04"){ goto m_ringplayxinghao; }
		elsesf(jixing=="05"){ goto m_ringplayxinghao; }
		elsesf(jixing=="06"){ goto m_ringplayxinghao; }
		elsesf(jixing=="07"){ goto m_ringplayxinghao; }
		elsesf(jixing=="08"){ goto m_ringplayxinghao; }
		elsesf(jixing=="09"){ goto m_ringplayxinghao; }
		elsesf(jixing=="10"){ goto m_ringplayxinghao; }
		elsesf(jixing=="11"){ goto m_ringplayxinghao; }
		elsesf(jixing=="12"){ goto m_ringplayxinghao; }
		elsesf(jixing=="13"){ goto m_ringplayxinghao; }
		elsesf(jixing=="14"){ goto m_ringplayxinghao; }
		elsesf(jixing=="15"){ goto m_ringplayxinghao; }
		elsesf(jixing=="16"){ goto m_ringplayxinghao; }
		elsesf(jixing=="17"){ goto m_ringplayxinghao; }
		elsesf(jixing=="18"){ goto m_ringplayxinghao; }
		elsesf(jixing=="19"){ goto m_ringplayxinghao; }
		elsesf(jixing=="20"){ goto m_ringplayxinghao; }
		elsesf(jixing=="21"){ goto m_ringplayxinghao; }
		elsesf(jixing=="22"){ goto m_ringplayxinghao; }
		elsesf(jixing=="23"){ goto m_ringplayxinghao; }
		elsesf(jixing=="24"){ goto m_ringplayxinghao; }
		elsesf(jixing=="25"){ goto m_ringplayxinghao; }
		elsesf(jixing=="26"){ goto m_ringplayxinghao; }
		elsesf(jixing=="27"){ goto m_ringplayxinghao; }
		elsesf(jixing=="28"){ goto m_ringplayxinghao; }
		elsesf(jixing=="29"){ goto m_ringplayxinghao; }
		else{ goto m_ringjixing_xinghaoerror; }		
	}
}

state m_ringjixingpanduan_hexuan_lt
{
	init
	{
		sf(jixing=="01"){ goto m_ringplayxinghao; }
		elsesf(jixing=="02"){ goto m_ringplayxinghao; }
		elsesf(jixing=="03"){ goto m_ringplayxinghao; }
		elsesf(jixing=="04"){ goto m_ringplayxinghao; }
		elsesf(jixing=="05"){ goto m_ringplayxinghao; }
		elsesf(jixing=="06"){ goto m_ringplayxinghao; }
		elsesf(jixing=="07"){ goto m_ringplayxinghao; }
		elsesf(jixing=="08"){ goto m_ringplayxinghao; }
		elsesf(jixing=="09"){ goto m_ringplayxinghao; }
		elsesf(jixing=="10"){ goto m_ringplayxinghao; }
		else{ goto m_ringjixing_xinghaoerror; }		
	}
}

state m_ringjixingpanduan_caise_yd
{
	init
	{
		sf(jixing=="01"){ goto m_ringplayxinghao; }
		elsesf(jixing=="02"){ goto m_ringplayxinghao; }
		elsesf(jixing=="03"){ goto m_ringplayxinghao; }
		elsesf(jixing=="04"){ goto m_ringplayxinghao; }
		elsesf(jixing=="05"){ goto m_ringplayxinghao; }
		elsesf(jixing=="06"){ goto m_ringplayxinghao; }
		elsesf(jixing=="07"){ goto m_ringplayxinghao; }
		elsesf(jixing=="08"){ goto m_ringplayxinghao; }
		elsesf(jixing=="09"){ goto m_ringplayxinghao; }
		elsesf(jixing=="10"){ goto m_ringplayxinghao; }
		elsesf(jixing=="11"){ goto m_ringplayxinghao; }
		elsesf(jixing=="12"){ goto m_ringplayxinghao; }
		elsesf(jixing=="13"){ goto m_ringplayxinghao; }
		elsesf(jixing=="14"){ goto m_ringplayxinghao; }
		elsesf(jixing=="15"){ goto m_ringplayxinghao; }
		elsesf(jixing=="16"){ goto m_ringplayxinghao; }
		elsesf(jixing=="17"){ goto m_ringplayxinghao; }
		elsesf(jixing=="18"){ goto m_ringplayxinghao; }
		elsesf(jixing=="19"){ goto m_ringplayxinghao; }
		elsesf(jixing=="20"){ goto m_ringplayxinghao; }
		elsesf(jixing=="21"){ goto m_ringplayxinghao; }
		elsesf(jixing=="22"){ goto m_ringplayxinghao; }
		elsesf(jixing=="23"){ goto m_ringplayxinghao; }
		elsesf(jixing=="24"){ goto m_ringplayxinghao; }
		elsesf(jixing=="25"){ goto m_ringplayxinghao; }
		elsesf(jixing=="26"){ goto m_ringplayxinghao; }
		elsesf(jixing=="27"){ goto m_ringplayxinghao; }
		elsesf(jixing=="28"){ goto m_ringplayxinghao; }
		elsesf(jixing=="29"){ goto m_ringplayxinghao; }
		elsesf(jixing=="30"){ goto m_ringplayxinghao; }
		elsesf(jixing=="31"){ goto m_ringplayxinghao; }
		elsesf(jixing=="32"){ goto m_ringplayxinghao; }
		elsesf(jixing=="33"){ goto m_ringplayxinghao; }
		else{ goto m_ringjixing_xinghaoerror; }	
	}
}

state m_ringjixingpanduan_caise_lt
{
	init
	{
		sf(jixing=="01"){ goto m_ringplayxinghao; }
		elsesf(jixing=="02"){ goto m_ringplayxinghao; }
		elsesf(jixing=="03"){ goto m_ringplayxinghao; }
		elsesf(jixing=="04"){ goto m_ringplayxinghao; }
		elsesf(jixing=="05"){ goto m_ringplayxinghao; }
		elsesf(jixing=="06"){ goto m_ringplayxinghao; }
		elsesf(jixing=="07"){ goto m_ringplayxinghao; }
		elsesf(jixing=="08"){ goto m_ringplayxinghao; }
		elsesf(jixing=="09"){ goto m_ringplayxinghao; }
		elsesf(jixing=="10"){ goto m_ringplayxinghao; }
		else{ goto m_ringjixing_xinghaoerror; }	
	}
}

state m_ringjixing_xinghaoerror
{
	init
	{
		#您输入的代码不正确，请重新输入	
		playfile("d:\trasin\tplsvoc\7022.pcm",2);
	}
	proc
	{
		goto m_ringjixingselect;
	}
}
state m_ringplayxinghao
{
	init
	{
		if(ringclass==1)
		{
			#在收听中，按1号键确定 按2号键返回  for danyin lt & yd
			menufile = "d:\trasin\tplsvoc\pt"+jixing+".pcm";
		}
		if(ringclass==2)
		{
			#在收听中，按1号键确定 按2号键返回  for hexuan yd
			menufile = "d:\trasin\tplsvoc\hx"+jixing+".pcm";
		}
		if(ringclass==3)
		{
			#在收听中，按1号键确定 按2号键返回  for heibai lt & yd
			menufile = "d:\trasin\tplsvoc\hb"+jixing+".pcm";
		}
		if(ringclass==4)
		{
			#在收听中，按1号键确定 按2号键返回  for caise yd
			menufile = "d:\trasin\tplsvoc\hb"+jixing+".pcm";
		}
		if(ringclass==5)
		{
			#在收听中，按1号键确定 按2号键返回 for hexuan ltcdma
			menufile = "d:\trasin\tplsvoc\cd"+jixing+".pcm";
		}
		if(ringclass==6)
		{
			#在收听中，按1号键确定 按2号键返回 for caise ltcdma
			menufile = "d:\trasin\tplsvoc\cc"+jixing+".pcm";
		}
		
		playfile(menufile,2);
		readdigits(1);
		setchantimer(menutime);
	}
	proc
	{
		sf($sys_dtmf=="1")
		{
			goto m_xiazai;
		}
		elsesf($sys_dtmf=="2")
		{
			goto m_ringjixingselect;
		}
		elsesf($sys_dtmf=="*")
		{
			goto m_ringjixingselect;
		}
		else
		{
			goto m_ringplayxinghao;
		}
		
	}
}

state m_xiazai
{
	init
	{
		#如果您的机型符合我们的标准，请按1号键继续，
		#退出下载程序请按*。
		playfile("d:\trasin\tplsvoc\3004.pcm",2);
		readdigits(1);
		setchantimer(menutime);
	}
	proc
	{
		switch($sys_dtmf)
		{
			case "1":
				goto m_phoneselect;
			break;
			case "*":
				goto m_tpls;
			break;
			default:
				goto m_xiazai;
			break;
		}
	}
}

state m_phoneselect
{
	init
	{
		#本机下载请按1，给朋友下载请按2
		playfile("d:\trasin\tplsvoc\3005.pcm",2);
		readdigits(1);
		setchantimer(menutime);
	}
	proc
	{
		switch($sys_dtmf)
		{
			case "1":
				phone = $sys_caller;
				goto m_phoneconfirm;
			break;
			case "2":
				goto m_inputphone;
			break;
			default:
				goto m_phoneselect;
			break;
		}
	}
}
state m_inputphone
{
	init
	{
		#请输入要接受铃声的手机或小灵通号码，以#号键结束
		playfile("d:\trasin\tplsvoc\3006.pcm",2);
		readdigits(13);
	}
	proc
	{
		phone = $sys_dtmf;
		goto m_preplayphone;
	}
}
state m_preplayphone
{
	init
	{
		#你输入的电话号码为
		playfile("d:\trasin\tplsvoc\3006.pcm",2);
	}
	proc
	{
		goto m_phoneplay;
	}
}
state m_phoneplay
{
	init
	{
		playfile(phone,1);
	}
	proc
	{
		goto m_phoneconfirm;
	}
}
state m_phoneconfirm
{
	init
	{
		#确认请按1 重新输入请按2，退出下载请按*
		playfile("d:\trasin\tplsvoc\3009.pcm",2);
	}
	proc
	{
		switch($sys_dtmf)
		{
			case "1":
				goto m_insertring;
			break;
			case "2":
				goto m_inputphone;
			break;
			case "*":
				goto m_quxiaoxiazai;
			break;
			default:
				goto m_phoneconfirm;
			break;
		}
	}
}

state m_quxiaoxiazai
{
	init
	{
		#下载流程还没有完成，您将接收不到我们得服务？
		#返回下载请按1,确认退出请按0		
		playfile("d:\trasin\tplsvoc\3010.pcm",2);
	}
	proc
	{
		switch($sys_dtmf)
		{
			case "1":
				goto m_insertring;
			break;
			case "0":
				goto m_tpls;
			break;
			case "*":
				goto m_tpls;
			break;
			default:
				goto m_quxiaoxiazai;
			break;
		}
	}
}

state m_insertring
{
	init
	{
		string sringclass = itos(ringclass);
		sql = "select phone_code , sort_code from main where phone_type = '"
			+ jixing + "' and phone_sort ='"
			+ sringclass + "'"; 
		sqlselect(connid,sql);
		string phonecode = getfieldvalue(0);
		string sortcode = getfieldvalue(1);
		sql = "insert into tpls_log(c_sender,c_receive,i_feevalue,c_detail,i_mobiletype,"
			+ "i_smstype,i_status,i_sendtime) values('"
			+ $sys_caller+"','"
			+ phone + "',0,'"
			+ ringid + "',"
			+ phonecode +","
			+ sortcode
			+ ",0,0)";
		sqlcommand(connid,sql);
		sql = "insert into smslog(c_receive,c_detail,i_mobiletype,i_smstype,i_status,"
			+ "i_sendtime) values ('"
			+ phone + "','" 
			+ ringid + "',"
			+ phonecode + ","
			+ sortcode 
			+",0,0)";
		sqlcommand(connid,sql);
		goto m_over;
	}
}
state m_over
{
	init
	{
		#如果您的手机符合之前介绍的手机类型，
		#稍候就能接收到要下载的铃声了！如果您的手机型
		#号不在公布范围之内，您将可能接收不到所要下载的铃声，
		#现在开始感受手机也疯狂的时尚感觉吧！
		#如果您想继续选择其他服务，系统将自动返回到上一级菜单。	
		playfile("d:\trasin\tplsvoc\3011.pcm",2);
	}
	proc
	{
		goto m_tpls;
	}
}

state m_daima
{
	init
	{
		#请输入您要下载的铃声代码，以#号键结束，返回请按*
		playfile("d:\trasin\tplsvoc\7001.pcm",2);
		readdigits(9);
	}
	proc
	{
		sf($sys_dtmf=="*")
		{
			goto m_tpls;
		}
		else
		{
			ringid = $sys_dtmf;
			goto m_getringclass;
		}
	}
}
state m_getringclass
{
	init
	{
		sql = "select top 1 RingClass from ring_order where Ringid = ' "
			+ ringid + "' by ringclass";
		sqlselect(connid,sql);
		int ret = getaffectedrow();
		if(ret == 0)
		{
			goto m_daimaerror;
		}
		else
		{
			string sringclass = getfieldvalue(0);
			ringclass = stoi(sringclass);
			if(ringclass == 1)
			{goto m_playdaima;}
			elseif(ringclass == 2)
			{goto m_playdaima;}
			elseif(ringclass == 3)
			{goto m_playdaima;}
			elseif(ringclass == 4)
			{goto m_playdaima;}
			else
			{goto m_daimaerror;}		
		}
	}
}
state m_daimaerror
{
	init
	{
		#您输入的代码不正确，请重新输入，返回请按*
		playfile("d:\trasin\tplsvoc\7002.pcm",2);
	}
	proc
	{
		goto m_daima;
	}
}
state m_playdaima
{
	init
	{
		#您要下载铃声的是
		playfile("d:\trasin\tplsvoc\7003.pcm",2);
	}
	proc
	{
		goto m_playringclass;
	}
}
state m_playringclass
{
	init
	{
		if(ringclass==1)
		{	
			#单音铃声
			playfile("d:\trasin\tplsvoc\7011.pcm",2);
		}
		if(ringclass==2)
		{	
			#合炫铃声
			playfile("d:\trasin\tplsvoc\7011.pcm",2);
		}
		if(ringclass==3)
		{	
			#普通图片
			playfile("d:\trasin\tplsvoc\7011.pcm",2);
		}
		if(ringclass==4)
		{	
			#彩色图片
			playfile("d:\trasin\tplsvoc\7011.pcm",2);
		}		
	}
	proc
	{
		goto m_ringselect;
	}
}