第一个 颜色区分异动（副图 源码 贴图）
{颜色区分异动}
分量:=CONST(LLV(V/CONST(HHV(V,250)),250));
百量:=CONST(HHV(V/CONST(HHV(V,250)),250))-分量;
基点量:=CONST(LLV(L,250));
基量:=CONST(HHV(H,250))-基点量;
CC比量:=(V/CONST(HHV(V,250))-分量)/百量;
个股:=(CC比量*基量+基点量);
阳量:STICKLINE(C>0,基点量,个股,2.3,0),COLORRED;
阴量:STICKLINE(C<O,基点量,个股,2.3,0),COLORCYAN;
出量:STICKLINE(V>=2*REF(V,1),基点量,个股,3.2,0),COLORGREEN;
进量:STICKLINE(V>=3*REF(V,1),基点量,个股,3.2,0),COLORBROWN;
买入:STICKLINE(C>EMA(C,13),H,L,0,0),COLORMAGENTA;
持有:STICKLINE(C>EMA(C,13),C,O,-1,1),COLORMAGENTA;
谨慎:STICKLINE(C=EMA(C,13),H,L,0,0),COLORWHITE;
观望:STICKLINE(C<EMA(C,13),H,L,0,0),COLORYELLOW;
转世:STICKLINE(C<EMA(C,13),O,C,-1,1),COLORYELLOW;
空仓:STICKLINE(C<EMA(C,20),H,L,0,0),COLORCYAN;
持币:STICKLINE(C<EMA(C,20),O,C,-1,1),COLORCYAN;
分:=CONST(LLV(INDEXL,250)); 百:=CONST(HHV(INDEXH,250))-分;
点:=CONST(LLV(L,250)); 基:=CONST(HHV(H,250))-点;
CC比:=(INDEXC-分)/百;
HH比:=(INDEXH-分)/百;
LL比:=(INDEXL-分)/百;
OO比:=(INDEXO-分)/百;
CX:=CC比*基+点;
HX:=HH比*基+点;
LX:=LL比*基+点;
OX:=OO比*基+点;
大盘:DRAWKLINE(HX,OX,LX,CX);
A00:=SUM(IF((CLOSE> REF(CLOSE,1)),VOL,IF((CLOSE<REF(CLOSE,1)),(0-VOL),0)),0);
A01:=SUMBARS(VOL,CAPITAL);
A02:=IF((CLOSE>LLV(CLOSE,A01)),1,(0-1))*IF((A00 >LLV(A00,A01)),1,(0-1));
A03:=(COUNT((IF((A02=(0-1)),1,0)=1),8)>2);
A04:=((CLOSE-DMA((((3 * HIGH + LOW)+OPEN)+2 * CLOSE)/7,VOL/SUM(AMOUNT,13)/
AMOUNT/VOL/100/100))/DMA((((3*HIGH+LOW)+OPEN)+2*CLOSE)/7,VOL/SUM(AMOUNT,13)/
AMOUNT/VOL/100/100)*100<(-18));
A05:=((CLOSE-MIN(REF(CLOSE,5)*0.865,REF(CLOSE,21)*0.772))/CLOSE<0.009);
A06:=((A03 AND A04) AND A05);
A07:=(((((OPEN < EMA(CLOSE,5)) AND (CLOSE=HIGH)) AND (CLOSE/OPEN>=1.05)) AND (VOL/
CAPITAL>=0.019)) AND (VOL/CAPITAL<=0.200));
A08:=(A07 AND (COUNT(A07,5)=1));
A09:=((((((((((((MA(CLOSE, 3)>REF(MA(CLOSE,3),1)) AND (MA(CLOSE, 5)>
REF(MA(CLOSE,5),1))) AND (MA(CLOSE,10)>REF(MA(CLOSE,10),1))) AND
(VOL/240>REF(VOL,30)*1.2/240*1.5)) AND (CLOSE>LOW*1.059)) AND (CLOSE>
REF(MA(CLOSE,3),1))) AND REF(CLOSE,1)) AND (MA(CLOSE,5)>REF(MA(CLOSE,
5),1))) AND (MA(CLOSE,10)>REF(MA(CLOSE,10),1))) AND (MA(CLOSE,20)>
REF(MA(CLOSE,20),1))) AND (MA(VOL,5)>REF(MA(VOL,5),1))) AND ((MA(CLOSE,5)-MA
(CLOSE,10))<= 0.579));
A0A:=FILTER(A09,5);
超级黑码:((A06 OR A07) AND A0A),COLORMAGENTA;
DRAWTEXT(超级黑码,7,'←超级黑码'),COLORMAGENTA;
ZF:=(H-L)/REF(C,1)*100;
M3:=EMA(C,3);
M5:=EMA(C,5);
M10:=EMA(C,10);
HSL:=V/CAPITAL*100;
VX1:=C>M3 AND M3>M5 AND M5>M10 AND C>REF(C,1) AND M3>REF(M3,1)
AND M5>REF(M5,1) AND M10>REF(M10,1) AND C/O>1.01 AND (H-C)/C<0.02;
VX2:=V>REF(V,1)*1.3 AND HSL>2;
VA:=ZF>10 AND VX1 AND VX2;
加仓买:=IF(VA,1,0);
STICKLINE(加仓买,买入,H,0.1,0 ),COLORYELLOW;
DRAWTEXT(加仓买,7,'加仓买'),COLORMAGENTA;
LS:=C/REF(C,1)>1.048 AND C=H AND BETWEEN(FORCAST(V,4),0.2*FORCAST(V,12),2.1*FORCAST(V,12));
拉:=FILTER(LS,28),COLORYELLOW;
DRAWTEXT(拉,13,'▲★拉升★'),COLORYELLOW;
升:IF(拉=1 AND V>1,13.7,0),COLORYELLOW,LINETHICK1;
陆:=MA(C,60),LINETHICK1,COLORGREEN;
牛熊:=MA(C,120),COLORBLUE;
牛气冲天:CROSS(陆,牛熊),COLORGREEN;
牛头:IF(牛气冲天=1 AND V>1,7.1393,0),COLORGREEN,LINETHICK1;
DRAWTEXT(牛气冲天,陆,'牛气冲天'),COLORGREEN;
月DI:="MACD.DIF#MONTH",COLOR0080FF;
月DE:="MACD.DEA#MONTH",COLOR0080FF,LINETHICK2;
周DI:="MACD.DIF#WEEK",COLORRED;
周DE:="MACD.DEA#WEEK",COLORRED,LINETHICK2;
日DI:="MACD.DIF",COLORWHITE;
日DE:="MACD.DEA",COLORWHITE,LINETHICK2;
日金叉:IF(CROSS(日DI,日DE),20,0),COLORWHITE;
周金叉:IF(CROSS(周DI,周DE),40,0),COLORRED;
月金叉:IF(CROSS(月DI,月DE),60,0),COLOR0080FF;
DRAWICON(周金叉 AND 日金叉,5,15);
DRAWICON(周金叉 AND 月金叉,8,11);
DRAWICON(日金叉 AND 月金叉,13,17);
WW:=IF((日DI>日DE AND 周DI>周DE AND 月金叉) OR ( 周DI>周DE AND 月DI>月DE AND 日金叉)
OR (月DI>月DE AND 日DI>日DE AND 周金叉) OR (日金叉 AND 周金叉 AND 月金叉),100,0);
日周月金叉:WW,COLORF00FF0,LINETHICK2;
月K:="KDJ.K#MONTH",COLOR0080FF;
月D:="KDJ.D#MONTH",COLOR0080FF,LINETHICK2;
周K:="KDJ.K#WEEK",COLORRED;
周D:="KDJ.D#WEEK",COLORRED,LINETHICK2;
日K:="KDJ.K",COLORWHITE;
日D:="KDJ.D",COLORWHITE,LINETHICK2;
日金叉1:IF(CROSS(日K,日D),20,0),COLORWHITE;
周金叉1:IF(CROSS(周K,周D),40,0),COLORRED;
月金叉1:IF(CROSS(月K,月D),60,0),COLOR0080FF;
DRAWICON(周金叉1 AND 日金叉1,5,15);
DRAWICON(周金叉1 AND 月金叉1,8,11);
DRAWICON(日金叉1 AND 月金叉1,13,17);
WW1:=IF((日K>日D AND 周K>周D AND 月金叉1) OR ( 周K>周D AND 月K>月D AND 日金叉1)
OR(月K>月D AND 日K>日D AND 周金叉1) OR (日金叉1 AND 周金叉1 AND 月金叉1),100,0);
日周月金叉1:WW1;
