個(gè)股疊加對(duì)應(yīng)指數(shù)指標(biāo)源碼[通達(dá)信公式]
{自填參數(shù):--【參數(shù)P】大于零時(shí)采用P的周期作為大盤(pán)個(gè)股疊加周期,P等于零時(shí)采用個(gè)股全部上市日期作為疊加周期
M(50,9999,100),P1(0,300,5),P2(0,300,10),P3(0,300,60),N(0,3,0),P(0,99999,0);}
使用方法:請(qǐng)?jiān)贏股下使用,指數(shù)和其它品種不顯示數(shù)據(jù)。中小、創(chuàng)業(yè)、滬、深大盤(pán)分顯,采取飛狐的源碼取3組可調(diào)均線可調(diào)顯示根數(shù)(N),默認(rèn)N為0不顯示可調(diào)均線}
源碼如下:
創(chuàng)業(yè)板:=INBLOCK('創(chuàng)業(yè)板'),NODRAW;
中小企業(yè):=INBLOCK('中小企業(yè)'),NODRAW;
上證A股:=INBLOCK('上證A股'),NODRAW;
深證A股:=INBLOCK('深證A股'),NODRAW;
交易所基金:=INBLOCK('交易所基金'),NODRAW;
開(kāi)A:=IF(中小企業(yè)=1,"399101$O",IF(創(chuàng)業(yè)板=1,"399102$O",IF(上證A股=1,"999999$O",IF(深證A股=1,"399001$O",IF(交易所基金=1,"399305$O",0))))),NODRAW;
高A:=IF(中小企業(yè)=1,"399101$H",IF(創(chuàng)業(yè)板=1,"399102$H",IF(上證A股=1,"999999$H",IF(深證A股=1,"399001$H",IF(交易所基金=1,"399305$H",0))))),NODRAW;
低A:=IF(中小企業(yè)=1,"399101$L",IF(創(chuàng)業(yè)板=1,"399102$L",IF(上證A股=1,"999999$L",IF(深證A股=1,"399001$L",IF(交易所基金=1,"399305$L",0))))),NODRAW;
收A:=IF(中小企業(yè)=1,"399101$C",IF(創(chuàng)業(yè)板=1,"399102$C",IF(上證A股=1,"999999$C",IF(深證A股=1,"399001$C",IF(交易所基金=1,"399305$C",0))))),NODRAW;
DPJX:=(開(kāi)A+高A+低A+收A)/4;{大盤(pán)均價(jià)} JX:=(O+H+L+C)/4;{個(gè)股均價(jià)}
YXZQ1:=IF(中小企業(yè)=1 AND REF(DATE,BARSCOUNT(C))<=1050608,BARSLAST(DATE=1050608),IF(創(chuàng)業(yè)板=1 AND REF(DATE,BARSCOUNT(C))<=1100820,BARSLAST(DATE=1100820),IF(深證A股=1 AND REF(DATE,BARSCOUNT(C))<=910403,BARSLAST(DATE=910403),BARSCOUNT(C)))),NODRAW;
YXZQ:=IF(P>0 AND P<CONST(BARSCOUNT(C)),IF(P-CURRBARSCOUNT>=0,P-CURRBARSCOUNT,0),YXZQ1),NODRAW;
{大盤(pán)個(gè)股比例}
BLO:=開(kāi)A/REF(DPJX,YXZQ)/(O/REF(JX,YXZQ));{大盤(pán)開(kāi)盤(pán)比例}
BLH:=高A/REF(DPJX,YXZQ)/(H/REF(JX,YXZQ));{大盤(pán)最高比例}
BLL:=低A/REF(DPJX,YXZQ)/(L/REF(JX,YXZQ));{大盤(pán)最低比例}
BLC:=收A/REF(DPJX,YXZQ)/(C/REF(JX,YXZQ));{大盤(pán)收盤(pán)比例}
{模擬大盤(pán)數(shù)據(jù)}
開(kāi):BLO*O,NODRAW;
高:BLH*H,NODRAW;
低:BLL*L,NODRAW;
收:BLC*C,NODRAW;
{畫(huà)背景圖}{調(diào)節(jié)參數(shù)N確定背景高度}
DRAWBAND(CONST(HHV(MAX(高,H),M)),RGB(100,100,100),CONST(LLV(MIN(低,L),M)),RGB(50,50,50));
STICKLINE(P=CURRBARSCOUNT,CONST(HHV(MAX(高,H),M)),CONST(LLV(MIN(低,L),M)),0.01,-1),COLORBLUE;{統(tǒng)計(jì)周期界限}
DRAWTEXT(CURRBARSCOUNT=100,CONST(LLV(MIN(低,L),M))*1.03,'大盤(pán)個(gè)股K線'),COLORFFFFCC;
{畫(huà)大盤(pán)K線}
STICKLINE(收>=開(kāi),高,低,0,0),COLORYELLOW;
STICKLINE(收<開(kāi),高,低,0,0),COLORFF55BB;
STICKLINE(收>=開(kāi),收,開(kāi),4,0),COLOR00AAFF;
STICKLINE(收>=開(kāi),收,開(kāi),3.3,0),COLOR00BBFF;
STICKLINE(收>=開(kāi),收,開(kāi),2.2,0),COLOR00CCFF;
STICKLINE(收>=開(kāi),收,開(kāi),1.65,0),COLOR00DDFF;
STICKLINE(收>=開(kāi),收,開(kāi),1.1,0),COLOR00EEFF;
STICKLINE(收>=開(kāi),收,開(kāi),0.55,0),COLOR00FFFF;
STICKLINE(收<開(kāi),收,開(kāi),4,0),COLORAA00BB;
STICKLINE(收<開(kāi),收,開(kāi),3.3,0),COLORBB11BB;
STICKLINE(收<開(kāi),收,開(kāi),2.2,0),COLORCC22BB;
STICKLINE(收<開(kāi),收,開(kāi),1.65,0),COLORDD33BB;
STICKLINE(收<開(kāi),收,開(kāi),1.1,0),COLOREE44BB;
STICKLINE(收<開(kāi),收,開(kāi),0.55,0),COLORFF55BB;
{畫(huà)個(gè)股K線}
STICKLINE(C>=O,L,H,0,0),COLORRED;
STICKLINE(C<O,L,H,0,0),COLORFFFF00;
STICKLINE(1,C,O,3,0),COLOR353500;
STICKLINE(1,C,O,2.8,0),COLOR454500;
STICKLINE(1,C,O,2,0),COLOR555500;
STICKLINE(1,C,O,1.5,0),COLOR656500;
STICKLINE(1,C,O,1,0),COLOR757500;
STICKLINE(1,C,O,0.5,0),COLOR858500;
STICKLINE(C>=O,C,O,3,0),COLOR000045;
STICKLINE(C>=O,C,O,2.8,0),COLOR000065;
STICKLINE(C>=O,C,O,2,0),COLOR000085;
STICKLINE(C>=O,C,O,1.5,0),COLOR0000A5;
STICKLINE(C>=O,C,O,1,0),COLOR0000C5;
STICKLINE(C>=O,C,O,0.5,0),COLOR0000E5;
個(gè)股命:MA(C,21),COLORRED,LINETHICK2;
大盤(pán)命:MA(收,21),COLOR00FF80,LINETHICK2;
DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.weiqiv.net.cn '),COLORRED;
有思路,想編寫(xiě)各種指標(biāo)公式,程序化交易模型,選股公式,預(yù)警公式的朋友
可聯(lián)系技術(shù)人員 QQ: 262069696 進(jìn)行 有償 編寫(xiě)!(不貴!點(diǎn)擊查看價(jià)格!)
相關(guān)文章
-
沒(méi)有相關(guān)內(nèi)容