101900.sff

使用flex和bison

string menukey;
string songkey;
string menufile;
string songfile;
int menuflag;
string dialnum;
string sql;
int menutime = 50;
int songtime = 50;
string linkfile ;
int sysconnid = 1;
int connid = 5;
string newfile;
string userid ;
string flag ;
string companyid = "1";
string callednum;
string leavefile;
int isbaoyueuser;
int songkeyint;
int freechanno;


#判断是不是联通号码
state m_mainproc
{
	init
	{	
		int len = strlen($sys_caller);
		if(len != 11)
		{
			hangup();
		}
		string phonetype = getsubstring($sys_caller,0,3);
		switch(phonetype)
		{
			case "130":
				goto m_menu;
			break;
			case "131":
				goto m_menu;
			break;
			case "132":
				goto m_menu;
			break;
			case "133":
				goto m_menu;
			break;
			case "153":
				goto m_menu;
			break;
			default:
				hangup();
			break;
		}
	}
}


state m_menu
{
	init
	{
		playfile("d:\trasin\myvoc\menu.pcm",2);
		readdigits(1);
		setchantimer(menutime);
	}
	proc
	{	
		menukey = $sys_dtmf;
		switch($sys_dtmf)
		{		
			case "1":
				goto m_sendsong;
			break;
			case "4":
				goto m_liaotian;
			break;		
			default:
				goto m_temp;
			break;
		}
	}

}

state m_temp
{
	init
	{
		playfile("d:\trasin\myvoc\sysshengji.pcm",2);
	}
	proc
	{	
		goto m_menu;
	}

}

state m_sendsong 
{
	init
	{
		sql=  "select * from taga_talkin_baoyueuser where type=1 and flag = 1 and mobile = '"
			+ $sys_caller
			+ "'";
		sqlselect(connid,sql);
		int ret = getaffectedrow();
		if(ret > 0)
		{
			goto m_sendsongbaoyue;
		}
		else
		{
			goto m_regsendsong;
		}
	}
}


state m_liaotian
{
	init
	{
		sql=  "select * from taga_talkin_liaotianuser where flag = 1 and mobile = '"
			+ $sys_caller
			+ "'";
		sqlselect(connid,sql);
		int ret = getaffectedrow();
		if(ret > 0)
		{
			gotosubflow(companyid,"flowliaotian");
		}
		else
		{
			goto m_regliaotian;
		}
	}
}


state m_regsendsong
{
	init
	{
		playfile("d:\trasin\myvoc\SongBaoYue.pcm",2);
		readdigits(1);
		setchantimer(menutime);
	}
	proc
	{	
		switch($sys_dtmf)
		{		
			case "1":			
				sql= "select * from taga_talkin_baoyueuser where type=1 and mobile = '"
					+ $sys_caller
					+ "'";
				sqlselect(connid,sql);
				int ret = getaffectedrow();
				#曾经注销过的用户
				if(ret > 0)
				{
					sql= "update taga_talkin_baoyueuser set flag = 1,regtime = getdate() where type= 1 and mobile = '" 
						+ $sys_caller
						+ "'";
				}
				else
				#新用户包月
				{					
					sql="insert into taga_talkin_baoyueuser(mobile,regtime,type,flag) values ('"
						+ $sys_caller
						+ "', getdate(),1,1)"; 
					               
				}
				sqlcommand(connid,sql);
				sql = "insert into gr_deliver_xx(src_addr,dst_addr,short_msg) values('"
					+ $sys_caller
					+ "','8191','DGBY')";
				sqlcommand(connid,sql);
				goto m_sendsongbaoyue;
			break;
			case "2":
				goto m_sendsongdandian;
			break;
			default:
				goto m_regsendsong;
			break;
		}
	}

}


state m_sendsongbaoyue
{
	init
	{
		playfile("d:\trasin\myvoc\SendSongBaoYueOK.pcm",2);
	}
	proc
	{	
		gotosubflow(companyid,"flowsendsong");
	}
}


state m_sendsongdandian
{
	init
	{
		playfile("d:\trasin\myvoc\SendSongDanDian.pcm",2);
	}
	proc
	{	
		gotosubflow(companyid,"flowsendsong");
	}
}


state m_regliaotian
{
	init
	{
		playfile("d:\trasin\myvoc\liaotianzhuce.pcm",2);
		readdigits(1);
		setchantimer(menutime);
	}
	proc
	{	
		switch($sys_dtmf)
		{		
			case "1":
				sql= "select * from taga_talkin_liaotianuser where mobile = '"
					+ $sys_caller
					+ "'";
				sqlselect(connid,sql);
				int ret = getaffectedrow();
				#曾经注销过的用户
				if(ret > 0)
				{
					sql= "update taga_talkin_liaotianuser set flag = 1,regtime = getdate() where mobile = '" 
						+ $sys_caller
						+ "'";
				}
				else
				#新用户包月
				{					
					sql="insert into taga_talkin_liaotianuser(mobile,regtime,flag) values ('"
						+ $sys_caller
						+ "', getdate(),1)";
					               
				}
				sqlcommand(connid,sql);
				sql = "insert into gr_deliver_xx(src_addr,dst_addr,short_msg) values('"
					+ $sys_caller
					+ "','8191','LTBY')";
				sqlcommand(connid,sql);
				gotosubflow(companyid,"flowliaotian");
			break;
			case "2":
				goto m_liaotianzifei;
			break;		
			default:
				goto m_regliaotian;
			break;
		}
	}

}


state m_liaotianzifei
{
	init
	{
		playfile("d:\trasin\myvoc\liaotianzifei.pcm",2);
	}
	proc
	{
		goto m_regliaotian;
	}
}