宝宝起名网,姓名分析打分php源码带数据库带火车头免登录发布模块

宝宝起名网源码/取名网/姓名分析/名字打分/算命测算文章系统

演示地址：

https://s17.ryzlk.com/

手机端地址：

https://m.s17.ryzlk.com/

起名说明：

起名内容来源数据库，通过客户提交的姓名，出生年月日表单，计算出用户的五行缺旺，然后从数据库中调用五行相符的姓名提供给客户。并且包括：单字，双字，叠字的三种选择！

姓名测算说明：

通过三才五格算法得出名字的得分，做出分析，并通过调用数据库，给出每个字的字形字义，康熙字典数据库二开加入了字的起名寓意和诗词来源。

百家姓：

百家姓页面分字母排序，涵盖了几乎所有的姓氏。

姓氏页面：

给出了喜金，喜木，喜水，喜火，喜土的名字筛选，姓氏页面还包括姓氏的来源历史，变迁和姓氏名人。

文章系统：

1、响应速度快，完全开源，可二次开发！

2、送免登录发布插件+huo车tou头发布模块，适合批量怼文章，适合seoer。

3、完整的程序+数据库，自带1800多条数据+本地图片。

4、后台带采集，并带多条采集规则。

注意：

1、本程序不带付费测算内容，程序里的跳转外站的付费测算内容是调用的cps联盟链接！

部分代码展示：

/***
	 *姓名分析  作者：奥顺互联  微信：kkmp326
	 */
//http://s17.ryzlk.com/qm/qm/xmfx/xing/王/ming/大陆
public function xmfx() {
	$site = get_config();
	$xing = $_GET['xing'];
	$ming = $_GET['ming'];
	$dbbx=D('xinglist');
	$sql='select * from `yzm_xinglist` where `xing`="'.$xing.'"';
	$xing_arr = $dbbx->fetch_array($dbbx->query($sql));
	if(!$xing_arr[0]) {
		header('HTTP/1.0 404 Not Found');
		header('Location: /404.htm');
		exit;
	}
	//$wh_bh_arr = M('mod_xingming')->get_bihua($x1);
	$fullUrl = $_SERVER['REQUEST_URI'];
	parse_str(parse_url($fullUrl, PHP_URL_QUERY), $params);
	if(empty($params)) {
		$y = date('Y',time());
		$m = date('n',time());
		$d = date('j',time());
		$h = date('H',time());
		$params = array('year'=>$y,'month'=>$m,'day'=>$d,'hour'=>$h);
	}
	$sizhu = M('mod_suanming')->getSizhu($params['year'],$params['month'],$params['day'],$params['hour'],0);
	foreach($sizhu as $k=>$v) {
		$sizhuwx[] = M('mod_xingming')->tgdzwh($v);
	}
	$nong = M('cls_nongli')->convertSolarToLunar($params['year'],$params['month'],$params['day']);
	$mtwelve=array(NULL,"子","丑","寅","卯","辰","巳","午","未","申","酉","戌","亥");
	$nlhour=substr($mtwelve[ceil($params['hour']/2)%12+1],0,3);
	//根据时间获得时辰！
	$nongliymdh = array($nong[3],$nong[1],$nong[2],$nlhour);
	$xing1=substr($xing,0,3);
	$ming1=substr($ming,0,3);
	$db=D('kangxi');
	/*xing1*/
	$xing1arr = $db->where(array('hanzi'=>'%'.$xing1.'%'))->find();
	/*xing1*/
	/*ming1*/
	$ming1arr = $db->where(array('hanzi'=>'%'.$ming1.'%'))->find();
	/*ming1*/
	$bihua1 = $xing1arr['bihua'];
	if($bihua1=='') {
		$bihua1 = M('mod_xingming')->get_bihua($xing1)['bihua'];
	}
	$hzwh1 = $xing1arr['wuxing'];
	if($hzwh1=='') {
		$hzwh1 = M('mod_xingming')->get_bihua($xing1)['hzwh'];
	}
	$tiange=$bihua1+1;
	$tiangee=$bihua1+1;
	$renge1=$bihua1;
	$xing2=substr($xing,3,3);
	if($xing2!='') {
		//$sql='select * from `kangxi` where hanzi like "%'.$xing2.'%"';
		$xing2arr = $db->where(array('hanzi'=>'%'.$xing2.'%'))->find();
		$bihua2 = $xing2arr['bihua'];
		if($bihua2=='') {
			$bihua2 = M('mod_xingming')->get_bihua($xing2)['bihua'];
		}
		$hzwh2 = $xing2arr['wuxing'];
		if($hzwh2=='') {
			$hzwh2 = M('mod_xingming')->get_bihua($xing2)['hzwh'];
		}
		$tiange=$bihua1+$bihua2;
		$tiangee=$bihua1+$bihua2;
		$renge1=$bihua2;
	}
	//print_r($bihua2);		
	
	$bihua3 = $ming1arr['bihua'];
	if($bihua3=='') {
		$bihua3 = M('mod_xingming')->get_bihua($ming1)['bihua'];
	}
	$hzwh3 = $ming1arr['wuxing'];
	if($hzwh3=='') {
		$hzwh3 = M('mod_xingming')->get_bihua($ming1)['hzwh'];
	}
	$dige=intval($bihua3)+1;
	$digee=intval($bihua3)+1;
	$renge2=$bihua3;
	$ming2=substr($ming,3,3);
	if($ming2!='') {
		//$sql='select * from `kangxi` where hanzi like "%'.$ming2.'%"';
		$ming2arr = $db->where(array('hanzi'=>'%'.$ming2.'%'))->find();
		$bihua4 = $ming2arr['bihua'];
		if($bihua4=='') {
			$bihua4 = M('mod_xingming')->get_bihua($ming2)['bihua'];
		}
		$hzwh4 = $ming2arr['wuxing'];
		if($hzwh4=='') {
			$hzwh4 = M('mod_xingming')->get_bihua($ming2)['hzwh'];
		}
		$dige=$bihua3+$bihua4;
		$digee=$bihua3+$bihua4;
	}
	//print_r($ming2arr);
	$xm_arr = array('xing1'=>$xing1,'xing2'=>$xing2,'ming1'=>$ming1,'ming2'=>$ming2);
	$bh_wh_arr = array('bihua1'=>$bihua1,'bihua2'=>$bihua2,'bihua3'=>$bihua3,'bihua4'=>$bihua4,'hzwh1'=>$hzwh1,'hzwh2'=>$hzwh2,'hzwh3'=>$hzwh3,'hzwh4'=>$hzwh4,'whpy1'=>M('mod_xingming')->whpy($hzwh1),'whpy2'=>M('mod_xingming')->whpy($hzwh2),'whpy3'=>M('mod_xingming')->whpy($hzwh3),'whpy4'=>M('mod_xingming')->whpy($hzwh4));
	//print_r($bh_wh_arr);
	$zhongge=intval($bihua1)+intval($bihua2)+intval($bihua3)+intval($bihua4);
	$zhonggee=intval($bihua1)+intval($bihua2)+intval($bihua3)+intval($bihua4);
	//计算三才
	$renge=intval($renge1)+intval($renge2);
	$rengee=intval($renge1)+intval($renge2);
	$waige=intval($zhongge)-intval($renge);
	$waigee=intval($zhonggee)-intval($rengee);
	if($xing2=='') {
		$waige=intval($waige)+1;
		$waigee=intval($waigee)+1;
	}
	if($ming2=='') {
		$waige=intval($waige)+1;
		$waigee=intval($waigee)+1;
	}
	//天格	$bihua1=db::queryone($sql);			
	$db=D('sm_81');
	$tiangearr = $db->where(array('num'=>$tiangee))->find();
	$tiangearr['tiangee'] = $tiangee;
	//人格	$bihua1=db::queryone($sql);
	//$sql="select * from `sm_81` where num='".$rengee."'";
	$rengearr=$db->where(array('num'=>$rengee))->find();
	$rengearr['rengee'] = $rengee;
	//地格	$bihua1=db::queryone($sql);
	//$sql="select * from `sm_81` where num='".$digee."'";
	$digearr=$db->where(array('num'=>$digee))->find();
	$digearr['digee'] = $digee;
	//外格	$bihua1=db::queryone($sql);
	//$sql="select * from `sm_81` where num='".$waigee."'";
	$waigearr=$db->where(array('num'=>$waigee))->find();
	$waigearr['waigee'] = $waigee;
	//总格	$bihua1=db::queryone($sql);
	//$sql="select * from `sm_81` where num='".$zhongge."'";
	$zonggearr=$db->where(array('num'=>$zhongge))->find();
	$zonggearr['zonggee'] = $zhonggee;
	$tian_sancai = M('mod_xingming')->getsancai($tiange);
	$ren_sancai = M('mod_xingming')->getsancai($renge);
	$di_sancai = M('mod_xingming')->getsancai($dige);
	//print_r($ren_sancai);
	//三才吉凶
	$sancai=$tian_sancai.$ren_sancai.$di_sancai;
	$db=D('sm_sancai');
	//$sqlsancai="select * from `yzm_sm_sancai` where `title`='".$sancai."'";
	$rssancai=$db->where(array('title'=>$sancai))->find();
	$rssancai['sancai'] = $sancai;
	$tdr_ge = array('renge'=>$renge,'tiange'=>$tiange,'dige'=>$dige,'tian_sancai'=>$tian_sancai,'ren_sancai'=>$ren_sancai,'di_sancai'=>$di_sancai,'waige'=>$waige,'waige_sancai'=>M('mod_xingming')->getsancai($waige),'zhongge'=>$zhongge,'zongge_sancai'=>M('mod_xingming')->getsancai($zhongge));
	$xmdf=M('mod_xingming')->getpf($tiangearr['jx'])/10+M('mod_xingming')->getpf($rengearr['jx'])+M('mod_xingming')->getpf($digearr['jx'])+M('mod_xingming')->getpf($zonggearr['jx'])+M('mod_xingming')->getpf($waigearr['jx'])/10+M('mod_xingming')->getpf($rssancai['jx'])/4+M('mod_xingming')->getpf($rssancai['jx1'])/4+M('mod_xingming')->getpf($rssancai['jx2'])/4+M('mod_xingming')->getpf($rssancai['jx3'])/4;
	if($zhonggee>60) {
		$xmdf=$xmdf-4;
	}
	$xmdf=58+$xmdf;
	$xmdf = round($xmdf);
	if($xmdf>100) {
		$xmdf = 100;
	}
	$allxing = $xing1.$xing2;
	$allming = $ming1.$ming2;
	$xingming = $allxing.$allming;
	//print_r($xmdf);
	$db=D('baijia_ming');
	$minglist['name20']=$db->where(array('xid'=>rand(1,200)))->order('rand()')->limit('0,20')->select();
	for ($i=0;$i<20;$i++) {
		$minglist['mingname20'][$i] = substr($minglist['name20'][$i]['name'],3,6);
		$zuixinming .= '<li><a href="/bjx/'.urlencode ($allxing).'/'.urlencode ($minglist['mingname20'][$i]).'.html" target="_blank">'.$allxing.$minglist['mingname20'][$i].'</a></li>';
	}
	$minglist['rand']=$db->where(array('xid'=>rand(1,200)))->order('rand()')->limit('0,20')->select();
	$db=D('xinglist');
	$xingarr20=$db->order('rand()')->limit('0,20')->select();
	for ($i=0;$i<20;$i++) {
		$randxingming20['ming'][$i]=substr($minglist['rand'][$i]['name'],3,6);
		$qian20 .= '<li><a href="/bjx/'.urlencode ($xingarr20[$i]['xing']).'/'.urlencode ($randxingming20['ming'][$i]).'.html" target="_blank">'.$xingarr20[$i]['xing'].$randxingming20['ming'][$i].'</a></li>';
	}
	$xing1arr['yuyi'] = str_replace($xing1, '<span class="red">' . $xing1 . '</span>', $xing1arr['yuyi']);
	$xing2arr['yuyi'] = str_replace($xing2, '<span class="red">' . $xing2 . '</span>', $xing2arr['yuyi']);
	$ming1arr['yuyi'] = str_replace($ming1, '<span class="red">' . $ming1 . '</span>', $ming1arr['yuyi']);
	$ming2arr['yuyi'] = str_replace($ming2, '<span class="red">' . $ming2 . '</span>', $ming2arr['yuyi']);
	$xing1arr['jieshi'] = str_replace($xing1, '<span class="red">' . $xing1 . '</span>', $xing1arr['jieshi']);
	$xing2arr['jieshi'] = str_replace($xing2, '<span class="red">' . $xing2 . '</span>', $xing2arr['jieshi']);
	$ming1arr['jieshi'] = str_replace($ming1, '<span class="red">' . $ming1 . '</span>', $ming1arr['jieshi']);
	$ming2arr['jieshi'] = str_replace($ming2, '<span class="red">' . $ming2 . '</span>', $ming2arr['jieshi']);
	$db=D('baijia_xing');
	$xingqiming=$db->order('rand()')->limit('0,18')->select();
	for ($i=0;$i<18;$i++) {
		$randqu[$i] = rand(0,60);
		if($randqu[$i] > 50) {
			$xingqiminghtml .= '<li><a href="/bjx/'.urlencode ($xingqiming[$i]['xing']).'/0-0.html" target="_blank">'.$xingqiming[$i]['xing'].'姓男孩名字单字</a></li>';
		} elseif($randqu[$i] <10) {
			$xingqiminghtml .= '<li><a href="/bjx/'.urlencode ($xingqiming[$i]['xing']).'/0-1.html" target="_blank">'.$xingqiming[$i]['xing'].'姓男孩名字双字</a></li>';
		} elseif($randqu[$i] <20 && $randqu[$i] > 10) {
			$xingqiminghtml .= '<li><a href="/bjx/'.urlencode ($xingqiming[$i]['xing']).'/0-2.html" target="_blank">'.$xingqiming[$i]['xing'].'姓男孩名字叠字</a></li>';
		} elseif($randqu[$i] <30 && $randqu[$i] > 20) {
			$xingqiminghtml .= '<li><a href="/bjx/'.urlencode ($xingqiming[$i]['xing']).'/1-0.html" target="_blank">'.$xingqiming[$i]['xing'].'姓女孩名字单字</a></li>';
		} elseif($randqu[$i] <40 && $randqu[$i] > 30) {
			$xingqiminghtml .= '<li><a href="/bjx/'.urlencode ($xingqiming[$i]['xing']).'/1-1.html" target="_blank">'.$xingqiming[$i]['xing'].'姓女孩名字双字</a></li>';
		} else {
			$xingqiminghtml .= '<li><a href="/bjx/'.urlencode ($xingqiming[$i]['xing']).'/1-2.html" target="_blank">'.$xingqiming[$i]['xing'].'姓女孩名字叠字</a></li>';
		}
	}
	//print_r($xingqiminghtml);
	$ismobile = ismobile() || isset($_GET['is_wap']) ? true : false;
	if($ismobile) {
		$targetDomain = "m.s17.ryzlk.com";
		// 目标域名
		$currentPath = $_SERVER['REQUEST_URI'];
		// 获取当前页面路径
		$_SERVER['HTTP_HOST'];
		//=>s17.ryzlk.com
		$_SERVER['REQUEST_SCHEME'];
		//=> http
		if($_SERVER['HTTP_HOST']!=$targetDomain) {
			$newUrl = $_SERVER['REQUEST_SCHEME'].'://'.$targetDomain . "/" . ltrim($currentPath, '/');
			header("Location: ".$newUrl);
		}
		include template('mobile','xmfx');
	} else {
		$targetDomain = "s17.ryzlk.com";
		// 目标域名
		$currentPath = $_SERVER['REQUEST_URI'];
		// 获取当前页面路径
		$_SERVER['HTTP_HOST'];
		//=>s17.ryzlk.com
		$_SERVER['REQUEST_SCHEME'];
		//=> http
		if($_SERVER['HTTP_HOST']!=$targetDomain) {
			$newUrl = $_SERVER['REQUEST_SCHEME'].'://'.$targetDomain . "/" . ltrim($currentPath, '/');
			header("Location: ".$newUrl);
		}
		include template('qm','xmfx');
	}
}

相似程序（不带文章板块）：
诗词起名/姓名打分网源码/带康熙字典数据库/起名取名/汉字五行查询
起名网源码/取名姓名测算系统/带起名康熙字典数据库/姓名评分/百家姓系统

其他远程程序推荐

S22择日老黄历网带免登录发布文章模块
S20黄历网站源码带文章系统带免登录发布模块
S2黄道吉日查询网源码开源带数据黄历
S19测算引流文章系统带火车头免登录发布
S13仿农历网源码
S16节日倒计时网源码
S17宝宝起名网带文章系统源码
S7诗词起名网引流程序
S5粉红色UI老黄历日历网程序
S3棕色UI老黄历网程序源码
S15灵签网源码
S18周公解梦网源码
测算起名工具网源码