價(jià)位密集公式 指標(biāo) 選股 源碼[其他軟件公式]

指標(biāo)公式源碼分析及使用說(shuō)明:

?

?

?

源碼：

{通達(dá)信指標(biāo)
設(shè)置如下參數(shù)
K----- K=0時(shí)考量區(qū)間成交價(jià)的密集程度
K=1時(shí)考量區(qū)間成交價(jià)的活躍成交的密集程度
P-----:統(tǒng)計(jì)方式
M----當(dāng)P=1時(shí)以M周期為考量區(qū)域
ZF---當(dāng)P=0時(shí)以大于ZF漲跌幅度的B個(gè)Ｖ形波段時(shí)間為考量區(qū)域
B----選擇幾個(gè)波段,最小2,}
{聽雪尋股指標(biāo)--價(jià)位密集}{loy518改飛狐版}
INPUT:K(1,0,1),P(0,0,1),M(43,1,999),ZF(1,1,999),B(2,2,999);
{***********************************************************}
HW:=PEAKBARS(1,ZF,B);
LW:=TROUGHBARS(2,ZF,B);
光標(biāo):DATACOUNT-BARPOS+1,LINETHICK;{看光標(biāo)位置,方便在P=1時(shí)自己設(shè)置M的大小}
起點(diǎn):IF(P<1,REFX(MAX(HW,LW),DATACOUNT-BARPOS),M),LINETHICK;
HJ:=REFX(MAX(PEAK(1,ZF,B),PEAK(1,ZF,1)),DATACOUNT-BARPOS),LINETHICK;
LJ:=REFX(MIN(TROUGH(2,ZF,B),TROUGH(2,ZF,1)),DATACOUNT-BARPOS);
N:=起點(diǎn);
高:=IF(DATACOUNT-BARPOS+1<=N,IF(P<1,REFX(HHV(HJ,N),DATACOUNT-BARPOS),REFX(HHV(H,N),DATACOUNT-BARPOS)),0);
低:=IF(DATACOUNT-BARPOS+1<=N,IF(P<1,REFX(LLV(LJ,N),DATACOUNT-BARPOS),REFX(LLV(L,N),DATACOUNT-BARPOS)),0);
WZ:=REFX(REFX(HHV(C,N+20),DATACOUNT-BARPOS)+REFX(LLV(C,N+20),DATACOUNT-BARPOS),DATACOUNT-BARPOS)/2;
今:=REFX(C,DATACOUNT-BARPOS);
區(qū)間:=高-低;區(qū)間0:=區(qū)間*0/10+低;
區(qū)間1:=區(qū)間*1/10+低;
區(qū)間2:=區(qū)間*2/10+低;
區(qū)間3:=區(qū)間*3/10+低;
區(qū)間4:=區(qū)間*4/10+低;
區(qū)間5:=區(qū)間*5/10+低;
區(qū)間6:=區(qū)間*6/10+低;
區(qū)間7:=區(qū)間*7/10+低;
區(qū)間8:=區(qū)間*8/10+低;
區(qū)間9:=區(qū)間*9/10+低;
區(qū)間H:=區(qū)間*10/10+低;穿1:=(L<=區(qū)間1 AND H>=區(qū)間0)*IF(K<1,1,V);
穿2:=(L<=區(qū)間2 AND H>=區(qū)間1)*IF(K<1,1,V);
穿3:=(L<=區(qū)間3 AND H>=區(qū)間2)*IF(K<1,1,V);
穿4:=(L<=區(qū)間4 AND H>=區(qū)間3)*IF(K<1,1,V);
穿5:=(L<=區(qū)間5 AND H>=區(qū)間4)*IF(K<1,1,V);
穿6:=(L<=區(qū)間6 AND H>=區(qū)間5)*IF(K<1,1,V);
穿7:=(L<=區(qū)間7 AND H>=區(qū)間6)*IF(K<1,1,V);
穿8:=(L<=區(qū)間8 AND H>=區(qū)間7)*IF(K<1,1,V);
穿9:=(L<=區(qū)間9 AND H>=區(qū)間8)*IF(K<1,1,V);
穿H:=(L<=區(qū)間H AND H>=區(qū)間9)*IF(K<1,1,V);
和1:=REFX(SUM(穿1,起點(diǎn)),DATACOUNT-BARPOS),LINETHICK;
和2:=REFX(SUM(穿2,起點(diǎn)),DATACOUNT-BARPOS),LINETHICK;
和3:=REFX(SUM(穿3,起點(diǎn)),DATACOUNT-BARPOS),LINETHICK;
和4:=REFX(SUM(穿4,起點(diǎn)),DATACOUNT-BARPOS),LINETHICK;
和5:=REFX(SUM(穿5,起點(diǎn)),DATACOUNT-BARPOS),LINETHICK;
和6:=REFX(SUM(穿6,起點(diǎn)),DATACOUNT-BARPOS),LINETHICK;
和7:=REFX(SUM(穿7,起點(diǎn)),DATACOUNT-BARPOS),LINETHICK;
和8:=REFX(SUM(穿8,起點(diǎn)),DATACOUNT-BARPOS),LINETHICK;
和9:=REFX(SUM(穿9,起點(diǎn)),DATACOUNT-BARPOS),LINETHICK;
和H:=REFX(SUM(穿H,起點(diǎn)),DATACOUNT-BARPOS),LINETHICK;最多:=MAX(和1,MAX(和2,MAX(和3,MAX(和4,MAX(和5,MAX(和6,MAX(和7,MAX(和8,MAX(和H,和9))))))))),LINETHICK;
最少:=MIN(和1,MIN(和2,MIN(和3,MIN(和4,MIN(和5,MIN(和6,MIN(和7,MIN(和8,MIN(和H,和9))))))))),LINETHICK;
STICKLINE(DATACOUNT-BARPOS+1<=N,高,今,13.33,0)COLOR882266;
STICKLINE(DATACOUNT-BARPOS+1<=N,低,今,13.33,0)COLOR886622;STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和1/最多*N),區(qū)間0+區(qū)間*1/60,區(qū)間1-區(qū)間*1/60,10.67,0),COLORDD2200;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和2/最多*N),區(qū)間1+區(qū)間*1/60,區(qū)間2-區(qū)間*1/60,10.67,0),COLOREE6622;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和3/最多*N),區(qū)間2+區(qū)間*1/60,區(qū)間3-區(qū)間*1/60,10.67,0),COLORFF8855;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和4/最多*N),區(qū)間3+區(qū)間*1/60,區(qū)間4-區(qū)間*1/60,10.67,0),COLORFF8888;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和5/最多*N),區(qū)間4+區(qū)間*1/60,區(qū)間5-區(qū)間*1/60,10.67,0),COLOREE88A0;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和6/最多*N),區(qū)間5+區(qū)間*1/60,區(qū)間6-區(qū)間*1/60,10.67,0),COLORF588AA;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和7/最多*N),區(qū)間6+區(qū)間*1/60,區(qū)間7-區(qū)間*1/60,10.67,0),COLORFF88CC;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和8/最多*N),區(qū)間7+區(qū)間*1/60,區(qū)間8-區(qū)間*1/60,10.67,0),COLORFF99DD;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和9/最多*N),區(qū)間8+區(qū)間*1/60,區(qū)間9-區(qū)間*1/60,10.67,0),COLORFF99FF;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和H/最多*N),區(qū)間9+區(qū)間*1/60,區(qū)間H-區(qū)間*1/60,10.67,0),COLORFF00FF;密集價(jià)位:
IF(最多=和1,(區(qū)間1+區(qū)間0)/2,
IF(最多=和2,(區(qū)間2+區(qū)間1)/2,
IF(最多=和3,(區(qū)間3+區(qū)間2)/2,
IF(最多=和4,(區(qū)間4+區(qū)間3)/2,
IF(最多=和5,(區(qū)間5+區(qū)間4)/2,
IF(最多=和6,(區(qū)間6+區(qū)間5)/2,
IF(最多=和7,(區(qū)間7+區(qū)間6)/2,
IF(最多=和8,(區(qū)間8+區(qū)間7)/2,
IF(最多=和9,(區(qū)間9+區(qū)間8)/2,
(區(qū)間H+區(qū)間9)/2))))))))),COLORFFFFFF,LINETHICK;
STICKLINE(DATACOUNT-BARPOS+1<=N,密集價(jià)位,密集價(jià)位,10,0),COLORFFFFFF;
密集價(jià)上位1:密集價(jià)位*(1+16.18/200),COLOR00FFFF,LINETHICK;
STICKLINE(DATACOUNT-BARPOS+1<=N,密集價(jià)上位1,密集價(jià)上位1,10,0),COLOR00FFFF,LINETHICK3;
密集價(jià)下位1:密集價(jià)位*(1-16.18/200),COLOR00FFFF,LINETHICK;
STICKLINE(DATACOUNT-BARPOS+1<=N,密集價(jià)下位1,密集價(jià)下位1,10,0),COLOR00FFFF,LINETHICK3;
密集價(jià)上位2:IF(密集價(jià)上位1*(1+16.18/200)<高*1.05,密集價(jià)上位1*(1+16.18/200),0),COLOR00FFFF,LINETHICK;
STICKLINE(密集價(jià)上位2>0,密集價(jià)上位2,密集價(jià)上位2,0,0),COLOR00FFFF,LINETHICK2,POINTDOT;
密集價(jià)上位3:IF(密集價(jià)上位2*(1+16.18/200)<高*1.05,密集價(jià)上位2*(1+16.18/200),0),COLOR00FFFF,LINETHICK;
STICKLINE(密集價(jià)上位3>0,密集價(jià)上位3,密集價(jià)上位3,0,0),COLOR00FFFF,LINETHICK2,POINTDOT;
密集價(jià)下位2:IF(密集價(jià)下位1*(1-16.18/200)>低*0.95,密集價(jià)下位1*(1-16.18/200),0),COLOR00FFFF,LINETHICK;
STICKLINE(密集價(jià)下位2>0,密集價(jià)下位2,密集價(jià)下位2,0,0),COLOR00FFFF,LINETHICK2,POINTDOT;
密集價(jià)下位3:IF(密集價(jià)下位2*(1-16.18/200)>低*0.95,密集價(jià)下位2*(1-16.18/200),0),COLOR00FFFF,LINETHICK;
STICKLINE(密集價(jià)下位3>0,密集價(jià)下位3,密集價(jià)下位3,0,0),COLOR00FFFF,LINETHICK2,POINTDOT;總換手:REFX(SUM(V,N)/(FINANCE(7)*10000)*10000,DATACOUNT-BARPOS),LINETHICK;
密集換手:最多/(FINANCE(7)*10000)*10000,LINETHICK;
KLINE(O,H,L,C,0);
DRAWTEXT(DATACOUNT-BARPOS+1=ROUND(N/2+2.5),高*0.985,'統(tǒng) 計(jì) 區(qū) 域'),COLOR00FFFF;DRAWTEXT(DATACOUNT-BARPOS+1=N+10 ,WZ,
' 注 意: 參 數(shù) 設(shè) 置'),COLOR66FFFF;
DRAWTEXT(DATACOUNT-BARPOS+1=N+10 ,WZ*0.98,
' K=0時(shí)考量區(qū)間成交價(jià)的密集程度'),COLORFFFFFF;
DRAWTEXT(DATACOUNT-BARPOS+1=N+10 ,WZ*0.96,
' K=1時(shí)考量區(qū)間成交價(jià)活躍成交量密集程度'),COLORFFFFFF;
DRAWTEXT(DATACOUNT-BARPOS+1=N+10 ,WZ*0.94,
' P=0時(shí)以大于ZF漲跌幅度的B個(gè)V形波段時(shí)間為考量區(qū)域'),COLORFFFFFF;
DRAWTEXT(DATACOUNT-BARPOS+1=N+10 ,WZ*0.92,
' P=1時(shí)以M周期為考量區(qū)域'),COLORFFFFFF;{程序化交易 www.tumamayizhan.com }

?

公式導(dǎo)入教程: 【通達(dá)信公式源碼導(dǎo)入方法教程】 【同花順公式源碼導(dǎo)入方法教程】 【大智慧新一代公式源碼導(dǎo)入方法教程】

?