寒山收费公式

寒山涨停五品(主图)
操盘线:EMA(C,5),COLORGRAY,LINETHICK2;
DRAWTEXT(ISLASTBAR,操盘线,'-----【操盘线】'),COLORYELLOW;
牛熊线:EMA(C,250),COLORMAGENTA,LINETHICK2;
DRAWTEXT(ISLASTBAR,牛熊线,'-----【牛熊线】'),COLORMAGENTA;

UPPER:=(1+6/100)*MA(CLOSE,25);
LOWER:=(1-6/100)*MA(CLOSE,25);
ZZZ:=(UPPER+LOWER)/2;
一品:ZZZ*1.14,COLORRED;
二品:ZZZ*1.07,COLORYELLOW;
三品:ZZZ,COLORWHITE;
四品:ZZZ*0.94,COLORBLUE;
五品:ZZZ*0.86,COLORGREEN;

DRAWTEXT(ISLASTBAR,一品,'一品'),COLORRED;
DRAWTEXT(ISLASTBAR,二品,'二品'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,三品,'三品'),COLORWHITE;
DRAWTEXT(ISLASTBAR,四品,'四品'),COLORBLUE;
DRAWTEXT(ISLASTBAR,五品,'五品'),COLORGREEN;

ATJ:=VOL=HHV(V,22);
APL:=BARSLAST(ATJ);
量压力:IF(BARSLAST(ATJ),REF(CLOSE,APL),DRAWNULL),COLORYELLOW,LINETHICK2;
DRAWTEXT(ISLASTBAR,量压力,'-----【量压力】'),COLORYELLOW;

IF(操盘线>REF(操盘线,1),操盘线,DRAWNULL),COLORYELLOW, LINETHICK2;
大阴线:STICKLINE(C<REF(C,1)*0.91,OPEN,CLOSE,2,0),COLORBLUE;

涨停了:STICKLINE(C>REF(C,1)*1.090,OPEN,CLOSE,2,0),COLORYELLOW;

涨停宝点:DRAWTEXT(CROSS(C,一品) AND C>REF(C,1)*1.09,一品*1.03,'涨停宝'),COLORGREEN;
抄底宝点:DRAWTEXT(CROSS(五品,L),五品*0.94,'抄底宝'),COLORYELLOW;
抄底关注:DRAWTEXT(CROSS(四品,L),四品*0.98,'关注'),COLORWHITE;

 

寒山涨停小线（主图）
AA:=REF(H,N)=HHV(H,2*N+1);{N日前的最高价}
QY:=BACKSET(AA,N+1);{周期记录}
CC:=FILTER(QY,N) AND H=HHV(H,N+1);{周期过滤 最高价最高值}
DDD:=BARSLAST(CC),NODRAW;{CC条件成立的天数}
GDTS:=IF(CC,CURRBARSCOUNT,0),NODRAW;{CC成立 返回交易日的周}
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS),NODRAW;{DDD成立,返回DDD日前的GDTS,否则返回GDTS}
GDCS1:=CONST(DINGBUTS),NODRAW;{取DINGBUTS值}
GDCS13:=CONST(REF(HIGH,GDCS1-1));
DINGBUTS1:=REF(DINGBUTS,DDD+1),NODRAW;
GDCS2:=CONST(DINGBUTS1);
GDCS23:=CONST(REF(HIGH,DINGBUTS1-1));
XG1:=BACKSET(ISLASTBAR,GDCS1);{ ISLASTBAR 判断是否为最后一个周期}
XG2:=BACKSET(ISLASTBAR,DINGBUTS1);
STICKLINE(XG2,GDCS23,GDCS23,0.5,1),COLORWHITE,LINETHICK3;{白线}
STICKLINE(XG1,GDCS13,GDCS13,0.5,1),COLORYELLOW,LINETHICK3;{黄线}
{谷线}
AA1:=REF(L,N1)=LLV(L,2*N1+1);
QY1:=BACKSET(AA1,N1+1);
CC1:=FILTER(QY1,N1) AND L=LLV(L,N1+1);
DD1:=BARSLAST(CC1);
DDTS:=IF(CC1,CURRBARSCOUNT,0);
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
DDCS1:=CONST(DDTS1);
DDCS13:=CONST(REF(L,DDCS1-1));
DDTS2:=REF(DDTS1,DD1+1);
DDCS2:=CONST(DDTS2);
DDCS23:=CONST(REF(L,DDTS2-1));
XD1:=BACKSET(ISLASTBAR,DDCS1);
XD2:=BACKSET(ISLASTBAR,DDTS2);
STICKLINE(XD2,DDCS23,DDCS23,0.5,1),COLORMAGENTA,LINETHICK3;
STICKLINE(XD1,DDCS13,DDCS13,0.5,1),COLORCYAN,LINETHICK3;
{压力支撑}
M:=INTPART(3*N2/5);{压力线取}
AAA:=REF(H,M)=HHV(H,2*M+1);
QYY:=BACKSET(AAA,M+1);
CCC:=FILTER(QYY,M) AND H=HHV(H,M+1);
DDDD:=BARSLAST(CCC),NODRAW;
GDTSS:=IF(CCC,CURRBARSCOUNT,0),NODRAW;
DINGBUTSS:=IF(DDDD,REF(GDTSS,DDDD),GDTSS),NODRAW;
GDCS11:=CONST(DINGBUTSS),NODRAW;
DINGBUTS11:REF(DINGBUTSS,DDDD+1),NODRAW;
GDCS22:=CONST(DINGBUTS11);
高点压力M:DRAWLINE(CURRBARSCOUNT=GDCS22,H,CURRBARSCOUNT=GDCS11,H,1),COLORGREEN,LINETHICK2;
W:=INTPART(3*N3/5);
AA11:=REF(L,W)=LLV(L,2*W+1);
QY11:=BACKSET(AA11,W+1);
CC11:=FILTER(QY11,W) AND L=LLV(L,W+1);
DD11:=BARSLAST(CC11);
DDTSS:=IF(CC11,CURRBARSCOUNT,0);
DDTS11:=IF(DD11,REF(DDTSS,DD11),DDTSS);
DDCS11:=CONST(DDTS11);
DDTS22:=REF(DDTS11,DD11+1);
DDCS22:=CONST(DDTS22);
低点支撑M:DRAWLINE(CURRBARSCOUNT=DDCS22,L,CURRBARSCOUNT=DDCS11,L,1) COLORRED,LINETHICK2;
{
ZGSTAR:=(高点压力M+低点支撑M)/2;
ZGEND:=CONST((高点压力M+低点支撑M)/2);
STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2);
中轨:DRAWLINE(CURRBARSCOUNT=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,1),COLORFF55BB,LINETHICK2;
}
{DRAWKLINE(H,O,L,C);}
{主图中的倍量K线如何变黄色}
V2V:=V/REF(V,1)>=1.9 AND C>REF(C,1);
STICKLINE(V2V,O,C,-1,0),COLORYELLOW;
{涨停}
ZT:=C/REF(C,1)>1.097;
STICKLINE(ZT,O,C,-1,0),COLORMAGENTA;
{以下复制到参数精灵注: PARAM第一字母大写后面小写
请设置计算参数:
峰顶线==== N: PARAM#0 (1--300)==黄白色
谷底线====N1: PARAM#1 (1--300)==洋红蓝
高点压力==N2: PARAM#2 (1--300)==绿线
低点支撑==N3: PARAM#3 (1--300)==红线
};
异向并肩精准:= MIN(O,C)=REF(MAX(O,C),1) ;
DRAWTEXT(异向并肩精准,L*0.95,'异向精准'),COLORRED;

现价:DYNAINFO(7),COLORYELLOW,LINETHICK1;
ZTB:=(C-REF(C,1))*100/REF(C,1)>=(10-1/REF(C,1)) AND
(C-REF(C,1))*100/REF(C,1)<=(10+1/REF(C,1)) AND H=C;
STICKLINE(ZTB,C,C,12,0),COLORYELLOW;
DRAWLINE(ZTB,REF(C,BARSLAST(ZTB)+1),BARSLAST(ZTB)>0,
REF(C,BARSLAST(ZTB)+1),1),COLORYELLOW;

C2:=REF(C,1); 涨停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0); STICKLINE(涨停,OPEN,CLOSE,2,0),COLORYELLOW; STICKLINE(涨停,H,L,0,0),COLORRED; 跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0); STICKLINE(跌停,OPEN,CLOSE,2,0),COLORGREEN; STICKLINE(跌停,H,L,0,1),COLORGREEN;
N:=3;
L0:=0.00;{点位差参数}
L1:=ABS(L-REF(L,1))<=L0;
L2:=ABS(L-REF(L,2))<=L0;
L3:=ABS(L-REF(L,3))<=L0;
L4:=ABS(L-REF(L,4))<=L0;
L5:=ABS(L-REF(L,5))<=L0;
精准线首次:=L1 OR L2 OR L3 OR L4 OR L5;
精准左:=FILTER(精准线首次,N) ;
天数:=BARSLAST(精准左);
LTS:=REF(L,天数);
精准右:=ABS(L-LTS)<=L0;
STICKLINE(精准左,L,L,50,-1),COLOR8080FF;
G1:=ABS(H-REF(H,1))<=L0;
G2:=ABS(H-REF(H,2))<=L0;
G3:=ABS(H-REF(H,3))<=L0;
G4:=ABS(H-REF(H,4))<=L0;
G5:=ABS(H-REF(H,5))<=L0;
G6:=ABS(H-REF(H,6))<=L0;
G7:=ABS(H-REF(H,7))<=L0;
G8:=ABS(H-REF(H,8))<=L0;
精准线1首次:=G1 OR G2 OR G3 OR G4 OR G5 OR G6 OR G7 OR G8;
精准左1:=FILTER(精准线1首次,N) ;
天数1:=BARSLAST(精准左1);
GTS:=REF(L,天数1);
精准右1:=ABS(H-LTS)<=L0;
STICKLINE(精准左1,H,H,50,-1),COLOR00FF00;
TY:=L;
A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C5:=BACKSET(B2,10+1); LD:=FILTER(C5,10);
前期低位:REF(L,BARSLAST(LD)),COLOR00FF00,POINTDOT;
STICKLINE(L,前期低位,前期低位,8,0),COLORRED;
TZ:=H;
A3:=REF(TY,10)=HHV(TY,2*10+1); B3:=FILTER(A1,10); C3:=BACKSET(B1,10+1); MD:=FILTER(C1,10);
A4:=REF(TY,10)=LLV(TY,2*10+1); B4:=FILTER(A2,10); C4:=BACKSET(B2,10+1); ND:=FILTER(C5,10);
前期高位:REF(H,BARSLAST(MD)),COLOR00FF00,POINTDOT;
STICKLINE(H,前期高位,前期高位,8,0),COLORGREEN;
ZTC:=C/REF(C,1)>1.097;
XH:=FILTER(ZTC,13);
BH:=BARSLAST(ZTC);
CZ:=REF(H,BH)-REF(L,BH);
STICKLINE(C,(REF(L,BH)+CZ*0.5),(REF(L,BH)+CZ*0.5),7,0),COLORRED;
STICKLINE(C,REF(L,BH),REF(L,BH),7,0),COLORBLUE;
DRAWTEXT(ZTC,L*0.98,'涨停'),COLORF00FF0;

T:=150;
TT:=3;
高1:=REF(HHV(H,T),TT);
低1:=REF(LLV(L,T),TT);
H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
H3:=高1-(高1-低1)*0.5;
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
顶:REFDATE(高1,DATE),COLORFFFF00;
一:REFDATE(H1,DATE),POINTDOT,COLORYELLOW;
二:REFDATE(H2,DATE),POINTDOT,COLORMAGENTA;
三:REFDATE(H3,DATE),COLOR00FFFF;
四:REFDATE(H4,DATE),POINTDOT,COLORMAGENTA;
五:REFDATE(H5,DATE),POINTDOT,COLORYELLOW;
低:REFDATE(低1,DATE),COLOR00FF00;

TT3:=(CURRBARSCOUNT=5);
TT4:=(CURRBARSCOUNT=5+3);

涨停板:=IF(REF(C,1)*1.1-C<0.2 ,1,0);
STICKLINE(涨停板,OPEN,CLOSE,4,0),COLORRED;
STICKLINE(涨停板,OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE(涨停板,H,L,0,0),COLORYELLOW;

所属地域:DRAWTEXT_FIX(ISLASTBAR ,0.88,1,1,DYBLOCK),COLORYELLOW;
所属行业:DRAWTEXT_FIX(ISLASTBAR ,0.91,1,0,HYBLOCK),COLORYELLOW;

 

寒山量线
VOLUME:VOL,VOLSTICK;
|:COUNT(CLOSE>REF(CLOSE,1),2)=2 AND COUNT(VOL<REF(VOL,1),2)=2;
STICKLINE(|,0,V,1,0),COLORGREEN;
DRAWTEXT(|,VOL+3000,'降'),COLORGREEN;
T:=DYNAINFO(8)>0;
VO:VOL=LLV(VOL,100) AND T;
地量柱:T AND VO,COLORBLUE;
STICKLINE(地量柱,0,V,1,0),COLORBLUE;
DRAWTEXT(地量柱,VOL+3000,'地'),COLORBLUE;
BLZ:=VOL>REF(V,1)*1.9;
BLZ1:=VOL<REF(LLV(VOL,13),1);
BLZ2:=VOL<REF(LLV(VOL,55),1);
STICKLINE(BLZ,0,V,1,0),COLORYELLOW;
倍量柱:BLZ,COLORYELLOW;
DRAWTEXT(倍量柱,VOL+3000,'倍'),COLORYELLOW;
HJZ:=(3*C+H+L+O)/6;
HJZ2:=(8*HJZ+7*REF(HJZ,1)+6*REF(HJZ,2)+5*REF(HJZ,3)+4*REF(HJZ,4)+3*REF(HJZ,5)+2*REF(HJZ,6)+REF(HJZ,8))/36;
HJZ3:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>HJZ2 AND C>O;
黄金柱:FILTER(HJZ3,5),STICK,COLORRED,LINETHICK4;
STICKLINE(黄金柱,0,V,1,0),COLORRED;
DRAWTEXT(黄金柱,VOL+10000,'黄'),COLORRED;
价涨量缩:|,COLORGREEN;
FLZ:=V>REF(V,1)*0.98 AND V<REF(V,1)*1.02,LINETHICK0;
STICKLINE(FLZ,0,V,1,0),COLORMAGENTA;
DRAWTEXT(FLZ,VOL+3000,'平'),COLORMAGENTA;
平量柱:FLZ,COLORMAGENTA;

上斜线:DRAWLINE(V<= LLV(V,20),VOL,VOL>=HHV(V,20) ,HHV(V,20),0),,COLOR00FFFF,LINETHICK1;
下斜线:DRAWLINE(V>=HHV(V,20),V,V<=LLV(V,10),HHV(V,6),0),COLORFFCCCC,LINETHICK1;

DRAWLINE(V>=HHV(V,30),V,V<=LLV(V,30),HHV(V,30),1),COLORYELLOW;

历史最高成交量:HHV(V,BARSCOUNT(V)),NODRAW;
历史新高:=FILTERX(V=HHV(V,BARSCOUNT(V)),BARSCOUNT(V)),COLORYELLOW;
DRAWTEXT(历史新高,V,'←历史新高'),COLORYELLOW;
STICKLINE(历史新高,0,V,2,1);
DRAWLINE(历史新高>0,历史最高成交量,历史最高成交量,V,1),LINETHICK1,COLORRED;
乾坤卖点:DRAWLINE(VOL<=LLV(VOL,8) ,LLV(VOL,3),VOL>=HHV(VOL,35),VOL,0),
COLORFFCCCC,LINETHICK1;
乾坤买点:DRAWLINE(VOL>=HHV(VOL,35),VOL,VOL<=LLV(VOL,8) ,HHV(VOL,3),0),
COLORFFCCCC,LINETHICK1;
梯量柱:=V>REF(V,1)*1.05 AND REF(V,1)>REF(V,2)*1.05 AND C>O AND REF(C>O,1);

缩倍量:=VOL<=REF(V,1)*0.55;
STICKLINE(梯量柱,0,V,1,0),COLORRED;
STICKLINE(缩倍量,0,V*0.75,1,0),COLOR0099FF;
DRAWTEXT(梯量柱,V*1.0,'梯'),COLORYELLOW;

DRAWTEXT(缩倍量,V*1.0,'缩'),COLORRED;

 

点击下载寒山收费公式