指標公式源碼分析及使用說明:

?

?

?

源碼：

{通達信指標
設置如下參數
K----- K=0時考量區間成交價的密集程度
K=1時考量區間成交價的活躍成交的密集程度
P-----:統計方式
M----當P=1時以M周期為考量區域
ZF---當P=0時以大于ZF漲跌幅度的B個Ｖ形波段時間為考量區域
B----選擇幾個波段,最小2,}
{聽雪尋股指標--價位密集}{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);
光標:DATACOUNT-BARPOS+1,LINETHICK;{看光標位置,方便在P=1時自己設置M的大小}
起點: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:=起點;
高:=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);
區間:=高-低;區間0:=區間*0/10+低;
區間1:=區間*1/10+低;
區間2:=區間*2/10+低;
區間3:=區間*3/10+低;
區間4:=區間*4/10+低;
區間5:=區間*5/10+低;
區間6:=區間*6/10+低;
區間7:=區間*7/10+低;
區間8:=區間*8/10+低;
區間9:=區間*9/10+低;
區間H:=區間*10/10+低;穿1:=(L<=區間1 AND H>=區間0)*IF(K<1,1,V);
穿2:=(L<=區間2 AND H>=區間1)*IF(K<1,1,V);
穿3:=(L<=區間3 AND H>=區間2)*IF(K<1,1,V);
穿4:=(L<=區間4 AND H>=區間3)*IF(K<1,1,V);
穿5:=(L<=區間5 AND H>=區間4)*IF(K<1,1,V);
穿6:=(L<=區間6 AND H>=區間5)*IF(K<1,1,V);
穿7:=(L<=區間7 AND H>=區間6)*IF(K<1,1,V);
穿8:=(L<=區間8 AND H>=區間7)*IF(K<1,1,V);
穿9:=(L<=區間9 AND H>=區間8)*IF(K<1,1,V);
穿H:=(L<=區間H AND H>=區間9)*IF(K<1,1,V);
和1:=REFX(SUM(穿1,起點),DATACOUNT-BARPOS),LINETHICK;
和2:=REFX(SUM(穿2,起點),DATACOUNT-BARPOS),LINETHICK;
和3:=REFX(SUM(穿3,起點),DATACOUNT-BARPOS),LINETHICK;
和4:=REFX(SUM(穿4,起點),DATACOUNT-BARPOS),LINETHICK;
和5:=REFX(SUM(穿5,起點),DATACOUNT-BARPOS),LINETHICK;
和6:=REFX(SUM(穿6,起點),DATACOUNT-BARPOS),LINETHICK;
和7:=REFX(SUM(穿7,起點),DATACOUNT-BARPOS),LINETHICK;
和8:=REFX(SUM(穿8,起點),DATACOUNT-BARPOS),LINETHICK;
和9:=REFX(SUM(穿9,起點),DATACOUNT-BARPOS),LINETHICK;
和H:=REFX(SUM(穿H,起點),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),區間0+區間*1/60,區間1-區間*1/60,10.67,0),COLORDD2200;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和2/最多*N),區間1+區間*1/60,區間2-區間*1/60,10.67,0),COLOREE6622;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和3/最多*N),區間2+區間*1/60,區間3-區間*1/60,10.67,0),COLORFF8855;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和4/最多*N),區間3+區間*1/60,區間4-區間*1/60,10.67,0),COLORFF8888;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和5/最多*N),區間4+區間*1/60,區間5-區間*1/60,10.67,0),COLOREE88A0;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和6/最多*N),區間5+區間*1/60,區間6-區間*1/60,10.67,0),COLORF588AA;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和7/最多*N),區間6+區間*1/60,區間7-區間*1/60,10.67,0),COLORFF88CC;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和8/最多*N),區間7+區間*1/60,區間8-區間*1/60,10.67,0),COLORFF99DD;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和9/最多*N),區間8+區間*1/60,區間9-區間*1/60,10.67,0),COLORFF99FF;
STICKLINE(DATACOUNT-BARPOS+1<=ROUND(和H/最多*N),區間9+區間*1/60,區間H-區間*1/60,10.67,0),COLORFF00FF;密集價位:
IF(最多=和1,(區間1+區間0)/2,
IF(最多=和2,(區間2+區間1)/2,
IF(最多=和3,(區間3+區間2)/2,
IF(最多=和4,(區間4+區間3)/2,
IF(最多=和5,(區間5+區間4)/2,
IF(最多=和6,(區間6+區間5)/2,
IF(最多=和7,(區間7+區間6)/2,
IF(最多=和8,(區間8+區間7)/2,
IF(最多=和9,(區間9+區間8)/2,
(區間H+區間9)/2))))))))),COLORFFFFFF,LINETHICK;
STICKLINE(DATACOUNT-BARPOS+1<=N,密集價位,密集價位,10,0),COLORFFFFFF;
密集價上位1:密集價位*(1+16.18/200),COLOR00FFFF,LINETHICK;
STICKLINE(DATACOUNT-BARPOS+1<=N,密集價上位1,密集價上位1,10,0),COLOR00FFFF,LINETHICK3;
密集價下位1:密集價位*(1-16.18/200),COLOR00FFFF,LINETHICK;
STICKLINE(DATACOUNT-BARPOS+1<=N,密集價下位1,密集價下位1,10,0),COLOR00FFFF,LINETHICK3;
密集價上位2:IF(密集價上位1*(1+16.18/200)<高*1.05,密集價上位1*(1+16.18/200),0),COLOR00FFFF,LINETHICK;
STICKLINE(密集價上位2>0,密集價上位2,密集價上位2,0,0),COLOR00FFFF,LINETHICK2,POINTDOT;
密集價上位3:IF(密集價上位2*(1+16.18/200)<高*1.05,密集價上位2*(1+16.18/200),0),COLOR00FFFF,LINETHICK;
STICKLINE(密集價上位3>0,密集價上位3,密集價上位3,0,0),COLOR00FFFF,LINETHICK2,POINTDOT;
密集價下位2:IF(密集價下位1*(1-16.18/200)>低*0.95,密集價下位1*(1-16.18/200),0),COLOR00FFFF,LINETHICK;
STICKLINE(密集價下位2>0,密集價下位2,密集價下位2,0,0),COLOR00FFFF,LINETHICK2,POINTDOT;
密集價下位3:IF(密集價下位2*(1-16.18/200)>低*0.95,密集價下位2*(1-16.18/200),0),COLOR00FFFF,LINETHICK;
STICKLINE(密集價下位3>0,密集價下位3,密集價下位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,'統 計 區 域'),COLOR00FFFF;DRAWTEXT(DATACOUNT-BARPOS+1=N+10 ,WZ,
' 注 意: 參 數 設 置'),COLOR66FFFF;
DRAWTEXT(DATACOUNT-BARPOS+1=N+10 ,WZ*0.98,
' K=0時考量區間成交價的密集程度'),COLORFFFFFF;
DRAWTEXT(DATACOUNT-BARPOS+1=N+10 ,WZ*0.96,
' K=1時考量區間成交價活躍成交量密集程度'),COLORFFFFFF;
DRAWTEXT(DATACOUNT-BARPOS+1=N+10 ,WZ*0.94,
' P=0時以大于ZF漲跌幅度的B個V形波段時間為考量區域'),COLORFFFFFF;
DRAWTEXT(DATACOUNT-BARPOS+1=N+10 ,WZ*0.92,
' P=1時以M周期為考量區域'),COLORFFFFFF;{程序化交易 m.kzuj.com.cn }

?

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

?