通达信黄买蓝卖短线副图指标 源码 贴图

W:=10;
W2:=6;
W3:=1;
N1:=60;
TS:=3;
80,COLORBLACK;
45,COLORYELLOW;
30,COLORLIRED;
VOLUME:=VOL,VOLSTICK;
MAVOL1:=MA(VOLUME,5);
MAVOL2:=MA(VOLUME,10);
SSTS:=BARSSINCE(C>0);
N4:=IF(SSTS<N1,SSTS,N1);
MAV200:=EMA(VOL,N4);
QD1:=IF(MAVOL1>=MAVOL2,10,0);
{STICKLINE(MAVOL1>=MAVOL2,66,70,3,0),COLORYELLOW;
STICKLINE (MAVOL1<MAVOL2,66,70,3,1),COLOR333333;
STICKLINE(VOLUME>=2*REF(VOLUME,1) AND C>=REF(C,1),60,95,1,0),COLORYELLOW;
STICKLINE(VOLUME>=2*REF(VOLUME,1) AND C<REF(C,1),60,95,1,0),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=W3,68,'★量'),COLORFFFFFF;}
PJJ:=DMA((HIGH+LOW+CLOSE*2)/4,0.9);
JJ:=REF(EMA(PJJ,3),1);
QJJ:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
XVL:=IF(CLOSE>OPEN,QJJ*(HIGH-LOW),IF(CLOSE<OPEN,QJJ*(HIGH-OPEN+CLOSE-LOW),VOL/2))+IF
(CLOSE>OPEN,0-QJJ*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-QJJ*(HIGH-LOW),0-VOL/2));
HSL:=(XVL/20)/1.15;
攻击流量:=((HSL*0.55+(REF(HSL,1)*0.33))+(REF(HSL,2)*0.22));
GJJ:=EMA(攻击流量,8);
LLJX:=EMA(攻击流量,3);
资金流量:=LLJX,LINETHICK0,COLOR0000FF;
A10:=资金流量>0;
{STICKLINE(资金流量>=0,72,76,3,0),COLORLIRED;
STICKLINE (资金流量<0,72,76,3,1),COLOR333333;
DRAWTEXT(CURRBARSCOUNT=W3,74,'★流'),COLORFFFFFF;}
QD2:=IF(资金流量>=0,10,0);
DIF60:=EMA(CLOSE,12/2)-EMA(CLOSE,26/2);
DEA60:=EMA(DIF60,9/2);
{STICKLINE(DIF60>=DEA60,54,58,3,0),COLORYELLOW;
STICKLINE(DIF60<DEA60,54,58,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W3,56,'★60M'),COLORFFFFFF;}
QD3:=IF(DIF60>=DEA60,10,0);
RSV60:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36));
K60:=SMA(RSV60,3,1);
D60:=SMA(K60,3,1);
{STICKLINE(K60>= D60,60,64,3,0),COLORRED;
STICKLINE(K60 < D60,60,64,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W2,62,'★60K '),COLORWHITE;}
QD4:=IF(K60>= D60,10,0);
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
{STICKLINE(DIF>=DEA,48,52,3,0),COLORYELLOW;
STICKLINE(DIF<DEA,48,52,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W3,50,'★日M'),COLORFFFFFF;}
QD5:=IF(DIF>=DEA,10,0);
周MD:=MACD.DIF#WEEK;
周MA:=MACD.DEA#WEEK;
{STICKLINE(周MD>=周MA,30,34,3,0),COLORYELLOW;
STICKLINE(周MD<周MA,30,34,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W3,32,'★周M'),COLORFFFFFF;}
QD6:=IF(周MD>=周MA,10,0);
月MD:=MACD.DIF#MONTH;
月MA:=MACD.DEA#MONTH;
{STICKLINE(月MD>=月MA,12,16,3,0),COLORYELLOW;
STICKLINE(月MD<月MA,12,16,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W3,14,'★月M'),COLORFFFFFF;}
QD7:=IF(月MD>=月MA,10,0);
RSV:=(CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12));
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
{STICKLINE(K>=D,42,46,3,0),COLORLIRED;
STICKLINE(K<D,42,46,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W2,44,'★日K'),COLORFFFFFF;}
QD8:=IF(K>=D,10,0);
周K:=MA("KDJ.K#WEEK"(9,3,3) ,5);
周D:=MA("KDJ.D#WEEK"(9,3,3) ,5);
周J:=MA("KDJ.J#WEEK"(9,3,3) ,5);
{STICKLINE(周K>=周D,24,28,3,0),COLORLIRED;
STICKLINE(周K<周D,24,28,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W2,26,'★周K'),COLORFFFFFF;}
QD9:=IF(周K>=周D,10,0);
{STICKLINE(周K>=REF(周K,1),-6,-2,3,0),COLORYELLOW;
STICKLINE (周K<REF(周K,1),-6,-2,3,0),COLOR333333;
DRAWTEXT(CURRBARSCOUNT=W2,-4,'★周K拐'),COLORFFFFFF;}
QD10:=IF(周K>=周D,10,0);
{STICKLINE(周J>=REF(周J,1),-12,-8,3,0),COLORRED;
STICKLINE(周J<REF(周J,1),-12,-8,3,0),COLOR333333;
DRAWTEXT(CURRBARSCOUNT=W2,-10,'★周J拐'),COLORWHITE;}
QD11:=IF(周J>=REF(周J,1),10,0);
月K:="KDJ.K#MONTH" ;
月D:="KDJ.D#MONTH" ;
{STICKLINE(月K>=月D,6,10,3,0),COLORLIRED;
STICKLINE(月K<月D,6,10,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W2,8,'★月K'),COLORWHITE;}
QD12:=IF(月K>=月D,10,0);
{RSI日}{股票下载网WWW.GPXIAZAI.COM}
日RSI1:="RSI.RSI1#DAY"(9);
日RSI2:="RSI.RSI2#DAY"(9);
{STICKLINE(日RSI1>=日RSI2,36,40,3,0),COLORFF00FF;
STICKLINE(日RSI1<日RSI2,36,40,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W,38,'★日R'),COLORFFFFFF;}
QD13:=IF(日RSI1>=日RSI2,10,0);
{RSI周}
周RSI1:="RSI.RSI1#WEEK"(9);
周RSI2:="RSI.RSI2#WEEK"(9);
{STICKLINE(周RSI1>=周RSI2,18,22,3,0),COLORFF00FF;
STICKLINE(周RSI1<周RSI2,18,22,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W,20,'★周R'),COLORFFFFFF;}
QD14:=IF(周RSI1>=周RSI2,10,0);
{RSI月}
月RSI1:="RSI.RSI1#MONTH"(9);
月RSI2:="RSI.RSI1#MONTH"(9);
{STICKLINE(月RSI1>=月RSI2,0,4,3,0),COLORFF00FF;
STICKLINE(月RSI1<月RSI2,0,4,3,1),COLOR696969;
DRAWTEXT(CURRBARSCOUNT=W,2,'★月R'),COLORFFFFFF;}
QD15:=IF(月RSI1>=月RSI2,10,0);
XH1:=IF(DIF60>=DEA60,1,0);
XH2:=IF(K60>= D60,1,0);
XH3:=IF(DIF>=DEA,1,0);
XH4:=IF(周MD>=周MA,1,0);
XH5:=IF(月MD>=月MA,1,0);
XH6:=IF(K>=D,1,0);
XH7:=IF(周K>=REF(周K,1),1,0);
XH8:=IF(周J>=REF(周J,1),1,0);
XH9:=IF(月K>=月D,1,0);
XH10:=IF(MAVOL1>MAVOL2,1,0);
XH11:=IF(资金流量>0,1,0);
XH12:=IF(日RSI1>=日RSI2,1,0);
XH13:=IF(周RSI1>=周RSI2,1,0);
XH14:=IF(月RSI1>=月RSI2,1,0);
XH15:=IF(周K>=周D,1,0);
ZTB:=COUNT(C/REF(C,1)>=1.09,5)>=1;
XHHJ:XH1+XH2+XH3+XH4+XH6+XH7+XH8+XH5+XH9+XH10+XH11+XH12+XH13+XH14+XH15,NODRAW;
{IF( XHHJ<8,XHHJ*10,DRAWNULL),LINETHICK2,COLORGREEN;
IF(XHHJ>=8 AND XHHJ<10,XHHJ*10,DRAWNULL),LINETHICK2,COLORLIRED;
IF(XHHJ>=10,XHHJ*10,DRAWNULL),LINETHICK2,COLORYELLOW;
IF(XHHJ<REF(XHHJ,1) AND XHHJ>=10,XHHJ*10,DRAWNULL),LINETHICK2,COLORGREEN;}
55,COLORRED;
STICKLINE(XHHJ<8 ,0,XHHJ*3,2,0),COLORLIGREEN;
STICKLINE(XHHJ>=8 AND XHHJ<10,0,XHHJ*3,2,0),COLORLIRED;
STICKLINE(XHHJ>=10 ,0,XHHJ*3,2,0),COLORYELLOW;
STICKLINE(XHHJ=15 ,0,XHHJ*3,2,0),COLORRED;
{1指.能量线}
能量线:=EMA(100*(C-LLV(L,34))/(HHV(H,34)-LLV(L,34)),3),LINETHICK0;
{2指.RSI}
RSI:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100,LINETHICK0;
{3指.KDJ}
RSV1:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,LINETHICK0;
K1:=SMA(RSV1,3,1);
D1:=SMA(K1,3,1);
J1:=3*K1-2*D1,LINETHICK0;
{4指.W&R}
威廉WR:=(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))*100,LINETHICK0;
{5指.CCI}
TYP := (HIGH + LOW + CLOSE)/3;
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)),LINETHICK0;
获利:WINNER(C)*100,COLORLIBLUE,LINETHICK2,NODRAW;
{IF(获利>=90,获利,DRAWNULL),COLORYELLOW,LINETHICK2;
IF(获利>80 AND 获利<90,获利,DRAWNULL),COLORRED,LINETHICK2;
IF(获利>50 AND 获利<80,获利,DRAWNULL),COLORLIRED,LINETHICK2;}
获利分水岭:-30,COLORLIRED;
-20,COLORYELLOW;
STICKLINE(获利<=5,-50,-48,2,0),COLORBLUE;
STICKLINE(获利>=5 AND 获利<10,-50,-36,2,0),COLORLIBLUE;
STICKLINE(获利>=10 AND 获利<20,-50,-34,2,0),COLORLIGREEN;
STICKLINE(获利>=20 AND 获利<50,-50,-32,2,0),COLORWHITE;
STICKLINE(获利>=50 AND 获利<80,-50,-30,2,0),COLORLIRED;
STICKLINE(获利>=80 AND 获利<90,-50,-26,2,0),COLORRED;
STICKLINE(获利>=90 AND 获利<=100,-50,-20,2,0),COLORYELLOW;
XHHJ1:=XH2+XH6+XH9+XH15;
XHHJ2:=XH3+XH4+XH5+XH1;
XHHJ3:=XH12+XH13+XH14+XH2;
{XG1:=(XHHJ1=4) ;
XG2:=(XHHJ2= 4) ;
XG3:=(XHHJ3= 4) ;
DRAWTEXT(XG1,-6,'K'),COLORYELLOW;DRAWTEXT(XG2,-14,'M'),COLORYELLOW;DRAWTEXT(XG3,-22,'R'),COLORYELLOW;}
{DRAWICON(XG2 AND CROSS(DIF60,DEA60),90,26);}
DRAWICON(CROSS(XHHJ1,3) OR CROSS(XHHJ2,3),65,23);
DRAWICON(周K>=REF(周K,1) AND DIF60>=DEA60,55,25);
LV00:=VOL<MAV200*1 ;
LV0:=VOL>=MAV200*1 AND VOL<MAV200*2;
LV1:=VOL>=MAV200*2 AND VOL<MAV200*3;
LV2:=VOL>=MAV200*3 AND VOL<MAV200*4;
LV3:=VOL>=MAV200*4 AND VOL<MAV200*5;
LV4:=VOL>=MAV200*5 AND VOL<MAV200*6;
LV5:=VOL>=MAV200*6 AND VOL<MAV200*7;
LV6:=VOL>=MAV200*7 AND VOL<MAV200*8;
LV7:=VOL>=MAV200*8 AND VOL<MAV200*9;
LV8:=VOL>=MAV200*9 AND VOL<MAV200*10;
LV9:=VOL>=MAV200*10;
DRAWTEXT(LV00,-4 ,'0'),COLORGREEN;
DRAWTEXT(LV0,-4 ,'1'),COLORWHITE;
DRAWTEXT(LV1,-4 ,'2'),COLORLIRED;
DRAWTEXT(LV2,-4 ,'3'),COLORLIRED;
DRAWTEXT(LV3,-4 ,'4'),COLORLIRED;
DRAWTEXT(LV4,-4 ,'5'),COLORLIRED;
DRAWTEXT(LV5,-4 ,'6'),COLORYELLOW;
DRAWTEXT(LV6,-4,'7'),COLORYELLOW;
DRAWTEXT(LV7,-4,'8'),COLORYELLOW;
DRAWTEXT(LV8,-4,'9'),COLORRED;
DRAWTEXT(LV9,-4,'10'),COLORRED;
{成交额倍数}{股票下载网WWW.GPXIAZAI.COM}
成交额:=AMOUNT,NODRAW;
{STICKLINE(成交额>=REF(成交额,1) AND C>=REF(C,1),成交额,0,2.5,0),COLORRED;
STICKLINE(成交额>=REF(成交额,1) AND C<REF(C,1),成交额,0,2.5,0),COLORLIRED;
STICKLINE(成交额<REF(成交额,1) AND C>=REF(C,1),成交额,0,2.5,0),COLORYELLOW;
STICKLINE(成交额<REF(成交额,1) AND C<REF(C,1),成交额,0,2.5,0),COLORGREEN;}
{MACJE1:EMA(成交额,N1);
MACJE2:EMA(成交额,N2);}
MACJE3:=EMA(成交额,N1),LINETHICK2,COLORYELLOW;
LE00:=成交额<MACJE3*1 ;
LE0:=成交额>=MACJE3*1 AND 成交额<MACJE3*2;
LE1:=成交额>=MACJE3*2 AND 成交额<MACJE3*3;
LE2:=成交额>=MACJE3*3 AND 成交额<MACJE3*4;
LE3:=成交额>=MACJE3*4 AND 成交额<MACJE3*5;
LE4:=成交额>=MACJE3*5 AND 成交额<MACJE3*6;
LE5:=成交额>=MACJE3*6 AND 成交额<MACJE3*7;
LE6:=成交额>=MACJE3*7 AND 成交额<MACJE3*8;
LE7:=成交额>=MACJE3*8 AND 成交额<MACJE3*9;
LE8:=成交额>=MACJE3*9 AND 成交额<MACJE3*10;
LE9:=成交额>=MACJE3*10;
DRAWTEXT(LE00,-10 ,'0'),COLORGREEN;
DRAWTEXT(LE0,-10 ,'1'),COLORWHITE;
DRAWTEXT(LE1,-10 ,'2'),COLORLIRED;
DRAWTEXT(LE2,-10 ,'3'),COLORLIRED;
DRAWTEXT(LE3,-10 ,'4'),COLORLIRED;
DRAWTEXT(LE4,-10 ,'5'),COLORLIRED;
DRAWTEXT(LE5,-10 ,'6'),COLORYELLOW;
DRAWTEXT(LE6,-10,'7'),COLORYELLOW;
DRAWTEXT(LE7,-10,'8'),COLORYELLOW;
DRAWTEXT(LE8,-10,'9'),COLORRED;
DRAWTEXT(LE9,-10,'10'),COLORRED;
{换手率变化趋势}
换手:DYNAINFO(37)*100,NODRAW;
换手200:SUM(换手,200),NODRAW ;
换手60:=SUM(换手,TS) ;
YXTS:=BARSSINCE(换手60);
均换手6:=IF(YXTS>=1,EMA(换手,TS),0),LINETHICK2;
换手3:=3;
HS00:=换手<换手3*1 ;
HS0:=换手>=换手3*1 AND 换手<换手3*2;
HS1:=换手>=换手3*2 AND 换手<换手3*3;
HS2:=换手>=换手3*3 AND 换手<换手3*4;
HS3:=换手>=换手3*4 AND 换手<换手3*5;
HS4:=换手>=换手3*5 AND 换手<换手3*6;
HS5:=换手>=换手3*6 AND 换手<换手3*7;
HS6:=换手>=换手3*7 AND 换手<换手3*8;
HS7:=换手>=换手3*8 AND 换手<换手3*9;
HS8:=换手>=换手3*9 AND 换手<换手3*10;
HS9:=换手>=换手3*10;
DRAWTEXT(HS00,-16 ,'0'),COLORGREEN;
DRAWTEXT(HS0,-16 ,'1'),COLORWHITE;
DRAWTEXT(HS1,-16 ,'2'),COLORLIRED;
DRAWTEXT(HS2,-16 ,'3'),COLORLIRED;
DRAWTEXT(HS3,-16 ,'4'),COLORYELLOW;
DRAWTEXT(HS4,-16 ,'5'),COLORYELLOW;
DRAWTEXT(HS5,-16 ,'6'),COLORRED;
DRAWTEXT(HS6,-16,'7'),COLORRED;
DRAWTEXT(HS7,-16,'8'),COLORRED;
DRAWTEXT(HS8,-16,'9'),COLORRED;
DRAWTEXT(HS9,-16,'10'),COLORRED;
PL3:=BARSLASTCOUNT(LV00)>=3 OR BARSLASTCOUNT(LV0)>=3 OR BARSLASTCOUNT(LV1)>=3 OR BARSLASTCOUNT(LV2)>=3 OR BARSLASTCOUNT(LV3)>=3 OR BARSLASTCOUNT(LV4)>=3 OR BARSLASTCOUNT(LV5)>=3 OR BARSLASTCOUNT(LV6)>=3 OR BARSLASTCOUNT(LV7)>=3 OR BARSLASTCOUNT(LV8)>=3 OR BARSLASTCOUNT(LV9)>=3;
DRAWICON(PL3>=1 AND C<HHV(C,3),65,27);
DRAWICON(PL3>=1 AND C=HHV(C,3),65,26);
今日量比: DYNAINFO(17),NODRAW;
均量比:IF(K=1,AMOUNT/VOL/IF(CAPITAL,100,10000),AMOUNT/REF(MA(AMOUNT,5),1)),NODRAW,COLORYELLOW;
{DRAWTEXT(量比<1,70,'缩'),COLORYELLOW;
DRAWTEXT(量比>=1 AND 量比<1.5,70,'平'),COLORYELLOW;
DRAWTEXT(量比>=1.5 AND 量比<=2.5,70,'温'),COLORYELLOW;
DRAWTEXT(量比>=2.5 AND 量比<=5,70,'放'),COLORYELLOW;
DRAWTEXT(量比>=5 AND 量比<=10,70,'剧'),COLORYELLOW;
DRAWTEXT(量比>=10,70,'极'),COLORYELLOW;}
LB0:=AMOUNT/REF(MA(AMOUNT,5),1)<1;
LB1:=AMOUNT/REF(MA(AMOUNT,5),1)>=1 AND AMOUNT/REF(MA(AMOUNT,5),1)<2;
LB2:=AMOUNT/REF(MA(AMOUNT,5),1)>=2 AND AMOUNT/REF(MA(AMOUNT,5),1)<3;
LB3:=AMOUNT/REF(MA(AMOUNT,5),1)>=3 AND AMOUNT/REF(MA(AMOUNT,5),1)<4;
LB4:=AMOUNT/REF(MA(AMOUNT,5),1)>=4 AND AMOUNT/REF(MA(AMOUNT,5),1)<5;
LB5:=AMOUNT/REF(MA(AMOUNT,5),1)>=5 AND AMOUNT/REF(MA(AMOUNT,5),1)<6;
LB6:=AMOUNT/REF(MA(AMOUNT,5),1)>=6 AND AMOUNT/REF(MA(AMOUNT,5),1)<7;
LB7:=AMOUNT/REF(MA(AMOUNT,5),1)>=7 AND AMOUNT/REF(MA(AMOUNT,5),1)<8;
LB8:=AMOUNT/REF(MA(AMOUNT,5),1)>=8 AND AMOUNT/REF(MA(AMOUNT,5),1)<9;
LB9:=AMOUNT/REF(MA(AMOUNT,5),1)>=9 AND AMOUNT/REF(MA(AMOUNT,5),1)<10;
LB10:=AMOUNT/REF(MA(AMOUNT,5),1)>=10 ;
DRAWTEXT(LB0,70,'0'),COLORGREEN;
DRAWTEXT(LB1,70,'1'),COLORWHITE;
DRAWTEXT(LB2,70,'2'),COLORLIRED;
DRAWTEXT(LB3,70,'3'),COLORLIRED;
DRAWTEXT(LB4,70,'4'),COLORYELLOW;
DRAWTEXT(LB5,70,'5'),COLORYELLOW;
DRAWTEXT(LB6,70,'6'),COLORYELLOW;
DRAWTEXT(LB7,70,'7'),COLORRED;
DRAWTEXT(LB8,70,'8'),COLORRED;
DRAWTEXT(LB9,70,'9'),COLORRED;
DRAWTEXT(LB10,70,'10'),COLORRED;
MD2:=BARSLASTCOUNT(LV00)>=2 OR BARSLASTCOUNT(LV0)>=2 OR BARSLASTCOUNT(LV1)>=2 OR BARSLASTCOUNT(LV2)>=2 ;
DRAWTEXT(MD2 AND XHHJ>REF(XHHJ,1) AND CROSS(C,REF(C,1)),XHHJ*3,'加'),COLORYELLOW;
DRAWTEXT(MD2 AND XHHJ<REF(XHHJ,1) AND H<REF(H,1)AND CROSS(REF(C,1),C),XHHJ*3,'减'),COLORGREEN;
P200TS:=BARSLAST(CROSS(C,HHV(REF(C,1),200)));
{STICKLINE(P200TS>1 AND C>=REF(C,P200TS),REF(C,P200TS),REF(C,P200TS),60,0),COLORWHITE;}
DRAWTEXT(P200TS>1 AND C>=REF(C,P200TS),65,'牛'),COLORYELLOW;