要過年了,有些纏友還不會畫中樞,現在提供一個本博飛狐的主圖指標,大家在過年期間好好學習吧。本博主圖所畫中樞,基本上是纏講62課之前所說的周期圖中的中樞,需要悟多中樞公式組件(chzhshch.dll),安裝到飛狐文件夾FMLDLL下,本博主圖公式目前僅適用于飛狐系列軟件。
{纏終禪主圖公式}
if DATAPERIOD=0 then minbi:="fbase.var2#min1";
if DATAPERIOD=1 then minbi:="fbase.var2#min5";
if DATAPERIOD=2 then minbi:="fbase.var2#min30";
if DATAPERIOD=3 then minbi:="fbase.var2#min60";
if DATAPERIOD=4 then minbi:="fbase.var2#day";
if DATAPERIOD=5 then minbi:="fbase.var2#day";
if DATAPERIOD=6 then minbi:="fbase.var2#week";
if DATAPERIOD=7 then minbi:="fbase.var2#month";
if DATAPERIOD=8 then minbi:="fbase.var2#year";
if DATAPERIOD=9 then minbi:="fbase.var2#day";
if DATAPERIOD=10 then minbi:="fbase.var2#min60";
var1:="chzhshch@kxian";
var2:="chzhshch@bi";{處理筆關系}
var3:="chzhshch@tongji"(minbi);{同級別分解}
zg:="chzhshch@zg"(var3);//一定要先調用ZG
zd:="chzhshch@zd"(var3);
pre:=2; //設置小數點位數
if STKTYPE=0 then pre:=1;
if STKTYPE=11 then pre:=3;
drawline(var2=1,h,var2=-1,l,0),COLORWHITE,LINEDASH,LINETHICK1;
drawline(var2=-1,l,var2=1,h,0),COLORWHITE,LINEDASH,LINETHICK1;
drawline(var3=1,h,var3=-1,l,0),COLORYELLOW,LINEDASH,LINETHICK1;
drawline(var3=-1,l,var3=1,h,0),COLORYELLOW,LINEDASH,LINETHICK1;
//以框的形式畫中樞
stickline(zg>zd and zg<>ref(zg,1),zg,zd,2,0),COLORMAGENTA ,LINETHICK2;
stickline(zg>zd and zg<>refx(zg,1),zg,zd,2,0),COLORMAGENTA ,LINETHICK2;
drawline(zg>zd and zg<>ref(zg,1),zg,zg>zd and zg<>refx(zg,1),zg,0),COLORMAGENTA ,LINETHICK2;
drawline(zg>zd and zd<>ref(zd,1),zd,zg>zd and zd<>refx(zd,1),zd,0),COLORMAGENTA ,LINETHICK2;
if DATAPERIOD<=1 then
begin var2:=var3;{處理段1分鐘的關系}
end;
pre:=2; {設置小數點位數}
if STKTYPE=0 then pre:=1;
if STKTYPE=11 then pre:=3;
a1:=barslast(var2<>0);
a2:=ref(var2,a1);
aa1:=ref(a1+1,1);
aa2:=ref(a2,1);
a3:=if (aa2>0,l-ref(h,aa1),h-ref(l,aa1)),linethick0;{計算點位差}
//顯示點位
drawnumber(var2= 1,h,h,pre),pxup99,color3300ff,align0;
drawnumber(var2=-1,l,l,pre),pxdn99,colorffff00,align0;
//顯示力度
drawtext (var2= 1,h,'+' ),pxup40,colormagenta,align2;
drawnumber(var2= 1,h,a3,pre),pxup40,colormagenta,align1;
drawnumber(var2=-1,l,a3,pre),pxdn40,colorgreen ,align0;
//顯示周期數
drawtext (var2= 1,h,'T' ),pxup70,coloryellow,align1;
drawnumber(var2= 1,h,aa1,0 ),pxup70,coloryellow,align2;
drawtext (var2=-1,l,'T' ),pxdn70,coloryellow,align1;
drawnumber(var2=-1,l,aa1,0 ),pxdn70,coloryellow,align2;
stickline(DATAPERIOD=6 and c/ref(c,1)>=1.097,o,c,6,1),colormagenta;
//顯示最后沒完成的點位
aa9:=hhv(h,a1);
aa11:=llv(l,a1);
drawnumber( islastbar and a2= 1,aa11,aa11,pre),pxdn99,colorffff00,align0;
drawnumber( islastbar and a2=-1, aa9, aa9,pre),pxup99,color3300ff,align0;
//顯示最后沒完成的力度
drawtext( islastbar and a2=-1, aa9,'+' ),pxup40,colormagenta,align2;
drawnumber( islastbar and a2=-1, aa9,a3,pre),pxup40,colormagenta,align1;
drawnumber( islastbar and a2=1, aa11,a3,pre),pxdn40,colorgreen ,align0;
//顯示最后沒完成的周期
drawtext( islastbar and a2=-1, aa9, 'T'),pxup70,coloryellow,align1;
drawnumber(islastbar and a2=-1, aa9,aa1,0),pxup70,coloryellow,align2;
drawtext( islastbar and a2= 1, aa11, 'T'),pxdn70,coloryellow,align1;
drawnumber(islastbar and a2= 1, aa11,aa1,0),pxdn70,coloryellow,align2;
漣:EMA(CLOSE,5),COLORYELLOW,LINETHICK1;
漪:EMA(CLOSE,10),COLORGREEN,LINETHICK1;
波:EMA(CLOSE,30),COLORWHITE,LINETHICK2;
浪:EMA(CLOSE,89),COLORRED,LINEDOT,LINETHICK1;
濤:EMA(CLOSE,144),COLORMAGENTA,LINEDASHDOT,LINETHICK1;
潮:MA(CLOSE,288),COLORCYAN,LINEDASHDOT,LINETHICK1;
嘯:MA(CLOSE,720),COLORWHITE,LINEDASHDOT,LINETHICK1;
峰:波+3.5*STDP(CLOSE,30),COLORYELLOW,LINETHICK2;
谷:波-3.5*STDP(CLOSE,30),COLORGREEN,LINETHICK2;(南方財富網SOUTHMONEY.COM)
(責任編輯:張曉軒)