玄空飞星风水布局入门-玄空飞星在线电子罗盘排盘软件-沈氏玄空学-中州派玄空学

<% if xing<>"" then userbirthday=nian1&"-"&yue1&"-"&ri1 userll=DateDiff("yyyy", userbirthday, date) %>
当前算命者<%=xing&ming%>的信息
姓名:<%=xing&ming%> 性别:<%=xingbie%> <%if xuexing<>"" then%> 血型:<%=xuexing%> 型 <%end if%> 出生:<%=nian1%>年<%=yue1%>月<%=ri1%>日<%=hh1%>时<%=mm1%>分 今年<%=userll%>岁 属相:<%=sx%> 星座:<%=Constellation(nian1&"-"&yue1&"-"&ri1)%> 
<%end if%>
四柱八字 | 大六壬起课 | 六爻起卦 | 奇门遁甲起局 | 玄空飞星 | 金口诀立课 | 紫微斗数 | 真太阳时间修正 | 地区经度查询
<%if request("act")="ok" then%><% Gm=trim(request("gm")) Dy=request("dy") Sx=trim(request("sx")) pljsx=request("pljsx") nian=request("nian") Response.Cookies("ciduppyear")=nian sex=request("sex") Response.Cookies("ciduppsex")=sex y=request("year") mont=request("month") SxId=left(Sx,(len(Sx)-4)) SxName=right(Sx,4) shan=left(SxName,1) xiang=left(right(sxname,2),1) tixing=0 %> <% select case shan case "丑","未","辰","戌","乙","辛","丁","癸","艮","坤","寅","申","子","午" tixing=1 end select dim Jiu(7) dim sx1(23) sx1(0)="壬" sx1(1)="子" sx1(2)="癸" sx1(3)="丑" sx1(4)="艮" sx1(5)="寅" sx1(6)="甲" sx1(7)="卯" sx1(8)="乙" sx1(9)="辰" sx1(10)="巽" sx1(11)="巳" sx1(12)="丙" sx1(13)="午" sx1(14)="丁" sx1(15)="未" sx1(16)="坤" sx1(17)="申" sx1(18)="庚" sx1(19)="酉" sx1(20)="辛" sx1(21)="戌" sx1(22)="乾" sx1(23)="亥" jiu(0)=1 jiu(1)=8 jiu(2)=3 jiu(3)=4 jiu(4)=9 jiu(5)=2 jiu(6)=7 jiu(7)=6 Bgid=(sxid\3) BgYu=sxid mod 3'获得所在元龙,如天元,地元,人元。 bgidx=(jiu(bgid)+4)mod 9 bgidy=9-bgidx %><% select case dy case 0 DaYun="一运" case 1 DaYun="二运" case 2 DaYun="三运" case 3 DaYun="四运" case 4 DaYun="五运" case 5 DaYun="六运" case 6 DaYun="七运" case 7 DaYun="八运" case 8 DaYun="九运" end select %> <%Dim DaXie(8) Dim SP(8) Dim Xp(8) Dim Yp(8) Dim Yporder(8) DaXie(0)="一" DaXie(1)="二" DaXie(2)="三" DaXie(3)="四" DaXie(4)="五" DaXie(5)="六" DaXie(6)="七" DaXie(7)="八" DaXie(8)="九" for i=0 to 8 YpIndex=(i+dy)mod 9 Yp(i)=Daxie(YPindex) yporder(i)=ypindex+1 next '运盘 %> <% sp1=yporder(bgidx) xp1=yporder(bgidy) %> <% for i=0 to 7 if jiu(i)=sp1 then kki=i exit for end if next for i=0 to 7 if jiu(i)=xp1 then kkj=i exit for end if next if sp1=5 then kki=dy end if if xp1=5 then kkj=dy end if' ' response.write sp1&xp1&"
" 'response.write kki&kkj&"
" ' response.write bgyu&"" %> <% if gm="挨星替卦" then 'response.write shan&xiang shangx=kki*3+bgyu xiangx=kkj*3+bgyu shan=sx1(shangx) xiang=sx1(xiangx) ' response.write xiangx 'response.write shan&xiang if sp1<>5 then select case shan case "子","癸","甲","申" dyys=1 case "坤","壬","乙","卯","未" dyys=2 case "戌","乾","亥","辰","巽","巳" dyys=6 case "艮","丙","辛","酉","丑" dyys=7 case "寅","午","庚","丁" dyys=9 end select end if if xp1<>5 then 'response.write dyys select case xiang case "子","癸","甲","申" dyyx=1 case "坤","壬","乙","卯","未" dyyx=2 case "戌","乾","亥","辰","巽","巳" dyyx=6 case "艮","丙","辛","酉","丑" dyyx=7 case "寅","午","庚","丁" dyyx=9 end select end if else dyy=dy end if if gm="挨星替卦" then sp(0)=dyys xp(0)=dyyx else sp(0)=yporder(bgidx) xp(0)=yporder(bgidy) end if'获得中宫山向盘 if sp1=5 then sp(0)=5 end if if xp1=5 then xp(0)=5 end if %> <% SxIds=kki*3+bgyu SxIdx=kkj*3+bgyu'山向得到序号 %> <% If (((SxIds-1)\3)mod 2)=1 then Orderx=true else Orderx=false end if '确定阴阳 If sXIDs=0 then Orderx=true end if If (((SxIdx-1)\3)mod 2)=1 then Ordery=true else Ordery=false end if '确定阴阳 If sXIDx=0 then Ordery=true end if '壬为阳 'response.write order %> <% if Orderx then for i=1 to 8 Sp(i)=(Sp(0)+i)mod 9 if sp(i)=0 then sp(i)=9 end if next else for i=1 to 8 Sp(i)=(Sp(0)-i+9)mod 9 if sp(i)=0 then sp(i)=9 end if next end if %> <% if Ordery then for i=1 to 8 Xp(i)=(Xp(0)+i)mod 9 if xp(i)=0 then xp(i)=9 end if next else for i=1 to 8 Xp(i)=(Xp(0)-i+9)mod 9 if xp(i)=0 then xp(i)=9 end if next end if %>
本站为您提供玄空飞星风水、玄空飞星布局、玄空飞星排盘、玄空飞星电子罗盘等服务,让你学习玄空飞星入门。玄空飞星在线排盘
<%=dayun%> <%=sxName%>
<%=gm%>

    
┌──┬──┬──┐
│ <%=sP(8)%> <%=xP(8)%> │ <%=sP(4)%> <%=xP(4)%> │<%=sP(6)%> <%=xP(6)%>  │
│ <%=yP(8)%> │ <%=yP(4)%> │ <%=yP(6)%> │
├──┼──┼──┤
│ <%=sP(7)%> <%=xP(7)%> │ <%=sP(0)%> <%=xP(0)%> │<%=sP(2)%> <%=xP(2)%>  │
│ <%=yP(7)%> │ <%=yP(0)%> │ <%=yP(2)%> │
├──┼──┼──┤
│ <%=sP(3)%> <%=xP(3)%> │ <%=sP(5)%> <%=xP(5)%> │<%=sP(1)%> <%=xP(1)%>  │
│ <%=yP(3)%> │ <%=yP(5)%> │ <%=yP(1)%> │
└──┴──┴──┘
  <%response.Write(shan&"山:") if tixing=1 then %> 宜出煞,楼门或大门宜开畅。而不宜收敛。开门宜大,或门旁边有较多玻璃窗,于室内于门处不宜有所阻拦,如设屏风等。且门外地势宜略低。 <%else%> 宜收山,住宅形势须保守,而不宜开畅,于开门不宜过大,且于门处宜设屏风以遮掩,用以藏气。屋门外形势不宜过低,低则收山不尽 <%end if%>
<%if request("pailong")=1 then%>
 排龙诀

<%'response.Write(pljsx) 'response.end call plj(pljsx) end if %>
<% if request("mingua")=1 then %>
 命卦流年流月

<%'response.Write(pljsx) 'response.end call minggua(nian,sex,y,mont) %> <% end if%>
<%else%><% dim dz(11) dz(0)="子" dz(1)="丑" dz(2)="寅" dz(3)="卯" dz(4)="辰" dz(5)="巳" dz(6)="午" dz(7)="未" dz(8)="申" dz(9)="酉" dz(10)="戌" dz(11)="亥" %>
玄空飞星在线排盘
选择 飞星盘  卦名: 大运: 山向:
选择 排龙诀  水口在:
选择 流年、流月、命卦  流年 流月:
                   出生时间: 性别:
注:排龙诀及收山出煞诀采用王亭之先生"中州派玄空学"内容,谨此致谢!
 
<%end if%>
玄空飞星在线排盘

玄就是时间,空就是空间,玄空学就是一门研究时间和空间为人造福的学问。本站为您提供玄空飞星风水、玄空飞星布局、玄空飞星排盘、玄空飞星电子罗盘等服务,让你学习玄空飞星入门,沈氏玄空学,中州派玄空学。
   玄空学由三大体系构成:河图,洛书,八卦。
   河图必须要记忆的是:一六为水,二七为火,三八为木,四九为金,五十为土。河图为先天。
   洛书必须要记忆的是:戴九履一,左三右七,二四为肩,六八为足。洛书为后天。
   八卦有先天八卦,有后天八卦,先天配河图,后天配洛书。先后天八卦的方位一定要记牢。
   关于河图洛书八卦的内容很多书籍都有了,我就不多说了,但大家要记住的是,这些是最重要的基础,一定要充分了解,否则后面的东西就很难掌握了。
   在玄空风水中要用到的是:坎水为一居正北,坤土为二居西南,震木为三居正东,巽木为四居东南,五为土居正中,乾金为六居西北,艮土为八居东北,离火为九居正南。
   玄空风水学在实践运用中的四的步骤是:一,排龙;二,安星;三,析局;四,调整。
   玄空风水的最大关键是:形理兼察。重理气也重峦头(在平洋主要是水法)。
   往后我们就直接进入玄空之门,易学基础不够的学友,马上把河图、洛书、八卦的基本知识掌握,因为到后面就是这些东西的运用了。 现在比较流行的是沈氏玄空学和中州派玄空学。