科学算命-JS特效-爱易网页

科学算命

日期：2014-05-18　浏览次数：20179 次

欢迎光临爱易网网页脚本特效中心，点击运行按钮演示特效：

以下是程序代码

脚本说明:
把如下代码加入<body>区域中
<SCRIPT LANGUAGE="JavaScript">
function mod(x, x_div){
for (var i=x; i>=x_div; i -= x_div)
return i;
}
function checkNum(str, min, max) {
if (str == "") {
alert("请填写完整");
return false;    }

for (var i = 0; i < str.length; i++) {

var ch = str.substring(i, i + 1);

if (ch < "0" || ch > "9") {

alert("请输入数字!");

return false;

}}

var val = parseInt(str, 10);

if ((val < min) || (val > max)) {

alert("请输入1到 "+max+"之间的数字.");

return false;
}

return true;
}

function pastlife(form){
var sex;
if ((checkNum(form.day.value,1,31)) && (checkNum(form.month.value,1,12)) &&
(checkNum(form.year.value,0,99)))  {

var day = parseInt(form.day.value,10);

var cur_month = parseInt(form.month.value,10);

var cur_year = parseInt(form.year.value,10);

if (cur_month-2*(parseInt(cur_month/2)) == 0){

if (cur_year - 4*(parseInt(cur_year/4)) == 0)

sex = 1; else sex = 2}

else if (cur_year - 4*(parseInt(cur_year/4)) == 0)

sex = 0; else sex = 1};

msgWindow=window.open("","有神者说");

msgWindow.document.open();

msgWindow.document.bgColor="black";

msgWindow.document.writeln("<FONT Color=red Face=Arial><B><I>Diagnosis:</I></B></FONT><BR>");

msgWindow.document.write("<FONT Color=white Face=Arial>");

msgWindow.document.write("我不知道你的感觉如何，但你曾是");

var yearString = "ZYXWOTZYQVUTSXWVNZYXPQTZRWVUMYXWOTZYQVUTSXWVNZYXPUTZRWVUMYXWOTZYQVUTSXWVNZYXPUTZRWVUMYXWOTZYQVUTSXWV";

var ys; ys = yearString.charAt(cur_year);

var p1; var p2; var place;

if (sex == 1){

msgWindow.document.write("<FONT color=yellow>男性</FONT>");

var indexString = "VTWZXYURPSOMNQYWZVTUXOMPSQRNWUXTYZVMRNQOPSUZVYWXTRPSOMNQTYUXVWZPNQMRSOYWZVTUXNSORPQM";

var profString = "CDBADCABBACD";

p1 = profString.charAt(cur_month-1);

for (i=0;i<=6;i++){

if (ys == indexString.charAt((cur_month-1)*7+i)) break}

p2 = i+1;

if (p2 == 1){

if (day < 3) place=5;

else if (day < 10) place=46;

else if (day < 17) place=37;

else if (day < 24) place=48;

else if (day < 31) place=65;

else place=6};

if (p2 == 2){

if (day < 8) place=28;

else if (day < 15) place=58;

else if (day < 22) place=10;

else if (day < 29) place=38;

else place=11};
	if (p2 == 3){
		if (day < 4) place=29;

else if (day < 11) place=53;

else if (day < 18) place=30;

else if (day < 25) place=69;

else place=1};

if (p2 == 4){

if (day < 7) place=74;

else if (day < 14) place=4;

else if (day < 21) place=47;

else if (day < 28) place=20;

else place=26};

if (p2 == 5){

if (day < 5) place=23;

else if (day < 12) place=21;

else if (day < 19) place=44;

else if (day < 26) place=16;

else place=43};

if (p2 == 6){

if (day < 6) place=34;

else if (day < 13) place=27;

else if (day < 20) place=14;

else if (day < 27) place=41;

else place=50};

if (p2 == 7){

if (day < 2) place=73;

else if (day < 9) place=63;

else if (day < 16) place=66;

else if (day < 23) place=54;

else if (day < 30) place=61;

else place=72}

}

else {

//for females

msgWindow.document.write("<FONT color=yellow>女性</FONT>");

var indexString = "OMPSQRNYWZVTUXSQMPNORUZVYWXTQORNSMPZXTWUVYOMPSQRNXVYUZTWNSORPQMVTWZXYUSQMPNORTYUXVWZ";

var profString = "ACDBCABDDBCA";

p1 = profString.charAt(cur_month-1);

for (i=0;i<=6;i++){

if (ys == indexString.charAt((cur_month-1)*7+i)) break}

p2 = i+1;

//PLA</div></div>

<div class="clearfix"></div>
                    </div>
                    <nav aria-label="...">
                        <ul class="pager">
                            <li class="previous"><a href="4667">上一篇：狡猾的按钮特效</a></li>

<li class="next"><a href="2815">下一篇：超酷登陆小窗口</a></li>
                        </ul>
                    </nav>

<div class="alert alert-warning" role="alert">
                        <strong>免责声明：</strong> 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
                    </div>

<div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34284' title='途牛开盘价9美元 与发行价持平' target="_blank">
                        途牛开盘价9美元 与发行价持平</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34421' title='搜狐前副总编何毅加盟乐视 任车联网公司CEO' target="_blank">
                        搜狐前副总编何毅加盟乐视 任车联网公司CEO</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/674' title='微软最后的救命稻草Win 8份额继续上升' target="_blank">
                        微软最后的救命稻草Win 8份额继续上升</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34413' title='京东终于想明白，这些年错过的财运，都藏在女人的时装下' target="_blank">
                        京东终于想明白，这些年错过的财运，都藏在女人的时装下</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34217' title='广电地方营业厅的一句“罚停”，暴露出了他们的本质' target="_blank">
                        广电地方营业厅的一句“罚停”，暴露出了他们的本质</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/10820' title='从3G牌照发放看中国4G规划效果 ' target="_blank">
                        从3G牌照发放看中国4G规划效果 </a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/435' title='神州泰岳雪上加霜：副总违规买卖遭罚' target="_blank">
                        神州泰岳雪上加霜：副总违规买卖遭罚</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34293' title='携程整合去哪儿陷入僵局 欲联手老对手艺龙' target="_blank">
                        携程整合去哪儿陷入僵局 欲联手老对手艺龙</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34384' title='小米盗版有理激怒乐视：提500部盗播证据猛追打' target="_blank">
                        小米盗版有理激怒乐视：提500部盗播证据猛追打</a></li></div>
                   
                
        </ol>
    </div>
</div>

</div>

</div>
            </div>
            <div class="clearfix"></div>

<footer class=" footer navbar-bottom">
<em>友情链接：</em>
    
      <a href="http://www.aiyiweb.com/" target="_blank">爱易网 </a>            
    
      <a href="http://www.aiyiweb.com/" target="_blank">云虚拟主机技术 </a>            
    
      <a href="http://www.aiyiweb.com/" target="_blank">云服务器技术 </a>            
    
      <a href="http://www.aiyiweb.com/" target="_blank">程序设计技术 </a>            
    
      <a href="http://www.aiyiweb.com/" target="_blank">开发网站 </a>            
    
      <a href="http://www.aiyiweb.com/" target="_blank">APP开发教程 </a>            
    
<br />
<script type="text/javascript">(function(){document.write(unescape('%3Cdiv id="bdcs"%3E%3C/div%3E'));var bdcs = document.createElement('script');bdcs.type = 'text/javascript';bdcs.async = true;bdcs.src = 'http://znsv.baidu.com/customer_search/api/js?sid=15239353030108964139' + '&plate_url=' + encodeURIComponent(window.location.href) + '&t=' + Math.ceil(new Date()/3600000);var s = document.getElementsByTagName('script')[0];s.parentNode.insertBefore(bdcs, s);})();</script>

Copyright © 2013-2026 爱易网页 当前在线：641人　
        网站在15时43分17秒内访问总人数：155681人
    当前 13.00%
　<a href="https://beian.miit.gov.cn" target="_blank">粤ICP备18100884号-2 </a>
<script charset="UTF-8" id="LA_COLLECT" src="//sdk.51.la/js-sdk-pro.min.js"></script>
<script>LA.init({ id: "JszEmKrtpbU59dY5", ck: "JszEmKrtpbU59dY5" })</script>

</footer>

</div>
   
</body>
</html>