飛狐版N日K線漲跌幅限制為M的K線畫法簡單說明: 漲跌幅在百分之M的N日K線合并畫法,調(diào)整參數(shù) XK 可以設(shè)置合并K線的數(shù)量(建議設(shè)置為奇數(shù),為偶數(shù)時所畫K線可能會有點點偏差,因為確定中點向后錯了一位,但高、低、開、收不錯),調(diào)整M設(shè)置限制區(qū)間漲跌幅,小于區(qū)間漲跌幅的不畫出,M設(shè)為0表示不設(shè)置限制漲跌幅,只按XK區(qū)間合并K線畫出。(注:合并K線的畫法是從上市起向后推移合并,故最后一組合并K線可能會有不足XK設(shè)置數(shù)的情況,但仍然按一組K線畫出。遇到少于XK一半的,高低按簡單畫法畫出)針對答疑區(qū)的提問,可以把XK設(shè)為5『指標中已經(jīng)把參數(shù)默認為5』,把 M 設(shè)為0『表示不統(tǒng)計N日漲跌幅顯示條件』-----即每5天一組K線的合并畫圖,以前在網(wǎng)上見過 知無不言(cwy) 有相關(guān)的類似公式指標,通過調(diào)整參數(shù)也可以畫多日線K線『和飛狐的多日線系統(tǒng)顯示方式一樣,而非疊加在日線背景』發(fā)現(xiàn)一點瑕疵,請把一樓源碼中 符合條件:處改為~
符合條件:BACKSET(末點 AND (C/REF(C,BARSLAST(起點)+1)-1)*100>=M OR (C/REF(C,BARSLAST(起點)+1)-1)*100<=-M,ZQ+1),LINETHICK;就是在M和-M 前面加個等號解釋因為加入了周六和周日倒像是自然日數(shù)據(jù),那么用飛狐的自然日坐標應(yīng)該可以了。
源碼{N日K線,漲跌幅大于百分之M的合并K線畫法-
飛狐版-參數(shù):XR(1,100,1);合并數(shù):XK(1,100,9); 限制漲跌幅: M(0,9999,3)}
?
?
INPUT:XR(1,1,100),XK(5,1,100),M(3,0,9999);
界限:=FRACPART(BARSCOUNT(CLOSE)/XK)=0 OR BARSCOUNT(CLOSE)=1;
周期:IF(BARSCOUNT(CLOSE)<=XK,BARSLAST(BARSCOUNT(CLOSE)=1)+1,REF(BARSLAST(界限)+1,1)),LINETHICK;
起點:周期=1,LINETHICK; 末點:周期=XK OR ISLASTBAR,LINETHICK;
ZQ:=BARSLAST(起點),LINETHICK;
符合條件:BACKSET(末點 AND (C/REF(C,BARSLAST(起點)+1)-1)*100>M OR (C/REF(C,BARSLAST(起點)+1)-1)*100<-M,ZQ+1),LINETHICK;
P:=DATACOUNT;
XXK:=IF(SUMBARS(起點,1)<XK,ZQ[P]+1,XK);
XH:SETVAL(末點,HHV(H,XXK),-(XXK-1),HHV(H,XXK)),LINETHICK;
XL:SETVAL(末點,LLV(L,XXK),-(XXK-1),LLV(L,XXK)),LINETHICK;
XO:SETVAL(末點,REF(O,XXK-1),-(XXK-1),REF(O,XXK-1)),LINETHICK;
XC:SETVAL(末點,C,-(XXK-1),C),LINETHICK;
CURRBARSCOUNT:=P-BARPOS+1;
{最后一段周期小于XK/2的畫K}
{STICKLINE(CURRBARSCOUNT<XR+FLOOR(XK/2) AND 周期<9 AND 符合條件,XH,XL,4.5,0),COLOR393939;}
STICKLINE(CURRBARSCOUNT<XR+FLOOR(XK/2) AND 周期<9 AND XC>XO AND 符合條件,XH,XL,12,0),COLORC080FF;
STICKLINE(CURRBARSCOUNT<XR+FLOOR(XK/2) AND 周期<9 AND XC<XO AND 符合條件,XH,XL,12,0),COLOR404000;
STICKLINE(CURRBARSCOUNT<XR+FLOOR(XK/2) AND 周期<9 AND XC>XO AND 符合條件,XO,XC,12,0),COLORYELLOW;
STICKLINE(CURRBARSCOUNT<XR+FLOOR(XK/2) AND 周期<9 AND XC<XO AND 符合條件,XO,XC,12,0),COLORBLUE;
{標準畫K法}
STICKLINE(ZQ+1=XR+FLOOR(XK/2) AND 符合條件,XH,XL,XK*9,0),COLOR393939;
STICKLINE(ZQ+1=XR+FLOOR(XK/2) AND XC>XO AND 符合條件,XH,XL,XK*2.6,0),COLOR000059;
STICKLINE(ZQ+1=XR+FLOOR(XK/2) AND XC<XO AND 符合條件,XH,XL,XK*2.6,0),COLOR591100;
STICKLINE(ZQ+1=XR+FLOOR(XK/2) AND XC>XO AND 符合條件,XO,XC,XK*9,0),COLOR000059;
STICKLINE(ZQ+1=XR+FLOOR(XK/2) AND XC<XO AND 符合條件,XO,XC,XK*9,0),COLOR591100;
{重畫K線}
KLINE(O,H,L,C,0);
{5日均線}
M5:MA(C,5),PRECISION2,COLORYELLOW;
{程序化交易 www.kzuj.com.cn }
?
公式導(dǎo)入教程: 【通達信公式源碼導(dǎo)入方法教程】 【同花順公式源碼導(dǎo)入方法教程】 【大智慧新一代公式源碼導(dǎo)入方法教程】
?