大家好，我这是寒山收费公式，我尝试和谐几个，把代码发出来
寒山涨停五品(主图)
操盘线: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))
L2:=ABS(L-REF(L,2))
L3:=ABS(L-REF(L,3))
L4:=ABS(L-REF(L,4))
L5:=ABS(L-REF(L,5))
精准线首次:=L1 OR L2 OR L3 OR L4 OR L5;
精准左:=FILTER(精准线首次,N) ;
天数:=BARSLAST(精准左);
LTS:=REF(L,天数);
精准右:=ABS(L-LTS)
STICKLINE(精准左,L,L,50,-1),COLOR8080FF;
G1:=ABS(H-REF(H,1))
G2:=ABS(H-REF(H,2))
G3:=ABS(H-REF(H,3))
G4:=ABS(H-REF(H,4))
G5:=ABS(H-REF(H,5))
G6:=ABS(H-REF(H,6))
G7:=ABS(H-REF(H,7))
G8:=ABS(H-REF(H,8))
精准线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)
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)
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
黄金柱: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;
