通达信一图走天下综合版

DRAWGBK(1,COLORRGB(0,0,20),COLORRGB(0,60,50),1);

DRAWTEXTEX(CLOSE,1,0,22,STKLABEL+' '+STKNAME+''),colorDDFF;

BB:=BARPOS=SYSPARAM(1);

VARIABLE:WDAY[7]='星期六';

WDAY[1]:='星期日';

WDAY[2]:='星期一';

WDAY[3]:='星期二';

WDAY[4]:='星期三';

WDAY[5]:='星期四';

WDAY[6]:='星期五';

FY:=YEAR;

FM:=MONTH;

FD:=DAY;

WD:=WEEKDAY;

P:=SYSPARAM(1);

STR1:=''+'今日： '+NUMTOSTR(FY[P],0)+'年'+NUMTOSTR(FM[P],0)+'月'+NUMTOSTR(FD[P],0)+'日 '+WDAY[WD[P]+1];

DRAWTEXTEX(CLOSE,1,460,22,STR1),colorDDFF;

月向线:=98;

月量线:=100;

50,LINEDOT;

CS:=IF(CAPITAL 1,516,469);

A:=EMA(CLOSE,198)-EMA(CLOSE,CS);

B:=EMA(A,112);

月线下水:=A

月转红:=A =REF(A,1);

A11:EMA(CLOSE,55)-EMA(CLOSE,119),colorFF0000;

B1:=EMA(A11,36);

周线下水:=A11

周红:=A11 =REF(A11,1);

周转红:=A11 =REF(A11,1) AND REF(A11 =REF(A11,1),1)=0;

DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);

DEA:=EMA(DIFF,9);

MACD1:=2*(DIFF-DEA);

日转红:=MACD1 =0 AND REF(MACD1,1)

PARTLINE(月转红,月向线),LINETHICK3,colorFFFFFF;

PARTLINE(周红,月量线),LINETHICK3,colorFF;

PARTLINE(月转红=0,月向线),LINEDOT,LINETHICK1,colorFF00;

PARTLINE(月线下水 AND 月转红=0,月向线),LINETHICK2,colorFF00;

PARTLINE(周红=0,月量线),LINEDOT,LINETHICK1,colorFF00;

PARTLINE(周线下水 AND 周红=0,月量线),LINETHICK2,colorFF00;

CS1:=100;

CS2:=HHV(ABS(MACD1),CS1);

CS3:=ABS(100/CS2);

MACD:(MACD1*CS3+100)/2,LINETHICK1,color74FFFF;

CS:=MACD;

日红:=CS =REF(CS,1);

日转红:=日红 AND REF(日红,1)=0;

PARTLINE(日红,CS),LINETHICK3,colorFFFF;

A:=MA(VOL,5);

V1:=IF(CAPITAL 1,MA(A,74),A);

V2:=IF(CAPITAL 1,WMA(V1,360),WMA(V1,14));

V3:=(A-LLV(A,14))/(HHV(A,14)-LLV(A,14))*100;

V4:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;

V7:=SMA(V4,3,1);

V8:=SMA(V7,3,1);

V5:=CROSS(V3,1) AND V1 V2 AND V8

V6:=CROSS(98,V3) AND V1 V2 AND V7

W1:=CROSS(V7,V8) AND V8

MACDMR:=W1 AND 周红;

DRAWICON(MACDMR,月量线,4),colorFF;

月WW1:=SMA((CLOSE-LLV(CLOSE,350))/(HHV(HIGH,350)-LLV(LOW,350)),54,1);

月线:=SMA((月WW1-LLV(月WW1,20))/(HHV(月WW1,20)-LLV(月WW1,20)),54,1)*100;

月价:月线,LINETHICK0,colorFFFFFF;

月ZZ:=SMA((VOL-LLV(VOL,350))/(HHV(VOL,350)-LLV(VOL,350)),54,1);

月量:SMA((月ZZ-LLV(月ZZ,20))/(HHV(月ZZ,20)-LLV(月ZZ,20)),54,1)*100,LINETHICK0,colorFF;

NN:=IF(MA(CLOSE,60) MA(CLOSE,120),6,3);

NN:=3;

WW1:=SMA((CLOSE-LLV(CLOSE,21))/(HHV(HIGH,21)-LLV(LOW,21)),NN,1);

WW2:=SMA((WW1-LLV(WW1,5))/(HHV(WW1,5)-LLV(WW1,5)),NN,1)*100;

ZZ:=SMA((VOL-LLV(VOL,21))/(HHV(VOL,21)-LLV(VOL,21)),NN,1);

ZZ1:=SMA((ZZ-LLV(ZZ,5))/(HHV(ZZ,5)-LLV(ZZ,5)),NN,1)*100;

快线:=EMA(WW2,1);

价快:=快线;

慢线:=EMA(快线,2);

价慢:慢线,LINETHICK0,colorFF00;

STICKLINE(EMA(慢线,2) =REF(EMA(慢线,2),1),EMA(慢线,1),REF(EMA(慢线,1),1),5,0),LINETHICK1,colorFF;

STICKLINE(EMA(慢线,2) REF(EMA(慢线,2),1),EMA(慢线,2),REF(EMA(慢线,2),1),5,0),colorFF00;

量快:EMA(ZZ1,1),LINEDOT,LINETHICK1,colorFFFFFF;

量慢:=EMA(量快,2);

PARTLINE(快线 =REF(快线,1),快线),LINETHICK1,colorFF;

PARTLINE(快线 REF(快线,1),快线),LINETHICK1,colorFF00;

PARTLINE(月线 =REF(月线,1),月线),LINEDOT,LINETHICK3,colorFFFFFF;

PARTLINE(月线 REF(月线,1),月线),LINETHICK2,color808080;

PARTLINE(月量 =REF(月量,1),月量),LINEDOT,LINETHICK1,color7400FF;

PARTLINE(月量 REF(月量,1),月量),LINEDOT,LINETHICK1,color808080;

周WW1:=SMA((CLOSE-LLV(CLOSE,110))/(HHV(HIGH,110)-LLV(LOW,110)),16,1);

周线:=SMA((周WW1-LLV(周WW1,10))/(HHV(周WW1,10)-LLV(周WW1,10)),16,1)*100;

周价:周线,LINETHICK0,colorFF00FF;

周ZZ:=SMA((VOL-LLV(VOL,110))/(HHV(VOL,110)-LLV(VOL,110)),16,1);

周量:SMA((周ZZ-LLV(周ZZ,10))/(HHV(周ZZ,10)-LLV(周ZZ,10)),16,1)*100,LINETHICK0,colorFFFF;

快线2:=EMA(周线,1);

慢线2:=EMA(快线2,2);

量快2:=EMA(周量,1);

量慢2:=EMA(量快2,2);

DRAWICON(CROSS(快线2,慢线2),慢线2,10);

DRAWICON(CROSS(慢线2,快线2),快线2,11);

DRAWICON(CROSS(量快2,量慢2),量慢2,10);

DRAWICON(CROSS(量慢2,量快2),量快2,11);

PARTLINE(周线 =REF(周线,1),周线),LINETHICK2,colorFF00FF;

PARTLINE(周线 =REF(周线,1) AND 月线 =REF(月线,1),周线),LINETHICK3,colorFF;

PARTLINE(周线 REF(周线,1),周线),LINETHICK2,colorFF00;

PARTLINE(周量 =REF(周量,1),周量),LINEDOT,LINETHICK1,colorFFFF;

PARTLINE(周量 REF(周量,1),周量),LINEDOT,LINETHICK1,colorFF00;

DRAWTEXT(FILTER(快线 =95 AND 慢线 =95 AND 周线 =90 OR 周量 =90,5),90,'周减'),PXUP4,colorFFFFFF;

DRAWTEXT(FILTER(快线 =95,5),95,'日减'),PXUP4,colorFFFFFF;

DRAWTEXT(周线 =REF(周线,1) AND CROSS(快线,慢线) AND 周线 50 AND 快线 50,快线+快线*0.1,' 价买'),colorFFFF;

DRAWTEXT(周量 =REF(周量,1) AND CROSS(快线,慢线) AND 周线 50 AND 快线 60,快线,' 量买'),colorFFFF;

DRAWICON(CROSS(价快,量快) AND 量快 60 AND 量快 REF(量快,1) OR CROSS(量快,价快) AND 量快 60 AND 价快 REF(价快,1),量快,11);

显示位置:=-6;

RSI6:(SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1))/(SMA(ABS(CLOSE-REF(CLOSE,1)),6,1))*100,LINEDOT,LINETHICK1,color6FFF;

DRAWICON(CROSS(RSI6,价快),RSI6,4),colorFF;

DRAWICON(CROSS(价快,RSI6),RSI6,5),colorFF00;

DRAWICON(CROSS(RSI6,周价),RSI6,4),colorFF;

LC:=REF(CLOSE,1);

月RS:=(SMA(MAX(CLOSE-LC,0),100,1))/(SMA(ABS(CLOSE-LC),100,1))*100;

月SI:=(SMA(MAX(CLOSE-LC,0),320,1))/(SMA(ABS(CLOSE-LC),320,1))*100;

PARTLINE(月RS 月SI,显示位置+2),LINETHICK4,colorFFFFFF;

PARTLINE(月RS 月SI,显示位置+2),LINEDOT,LINETHICK1,colorFF00;

周RS:=EMA((SMA(MAX(CLOSE-LC,0),25,1))/(SMA(ABS(CLOSE-LC),25,1))*100,2);

周SI:=EMA((SMA(MAX(CLOSE-LC,0),80,1))/(SMA(ABS(CLOSE-LC),80,1))*100,21);

PARTLINE(周RS 周SI,显示位置+4),LINETHICK4,colorFF;

PARTLINE(周RS 周SI,显示位置+4),LINEDOT,LINETHICK1,colorFF00;

有量:=130-15*(SMA(SMA(VOL,4,3)/SMA(VOL,24,4)+SMA(VOL,5,4)/SMA(VOL,36,4)*1.052,18,9));

STICKLINE(有量 =100,100-有量,0,2,0),color78FF;

攻击量:IF(有量 =100,100-有量,0),LINETHICK0,color78FF;

量买:周量 =REF(周量,1) AND CROSS(快线,慢线) AND 周线 50 AND 快线 60,LINETHICK0;

价买:周线 =REF(周线,1) AND CROSS(快线,慢线) AND 周线 50 AND 快线 50,LINETHICK0;

ST:=STRFIND(STKNAME,'ST',1)

S:=STRFIND(STKNAME,'S',1)

停牌:=DYNAINFO(4)=0;

非ST:=NOT(ST) AND NOT(停牌) AND NOT(S) AND REF(CLOSE,100)

红点选股:CROSS(快线2,慢线2) AND CROSS(量快2,量慢2) AND 非ST,LINETHICK0;

持仓区选股:月RS 月SI OR 周RS 周SI AND 非ST,LINETHICK0;

超级选股:红点选股 AND 持仓区选股 AND 非ST,LINETHICK0;

参考选股1:非ST AND 快线2 慢线2 AND 量快2 量慢2 AND 持仓区选股 AND (REF(快线2,1) REF(慢线2,1) OR REF(量快2,1) REF(量慢2,1)),LINETHICK0;

A:=ABS(快线-量快);

参考选股2:非ST AND 持仓区选股 AND CROSS(快线,慢线) AND 快线 50 AND 周线 REF(周线,1) AND 周量 REF(周量,1) AND (CLOSE-LLV(CLOSE,10))/LLV(CLOSE,10)*100 20 AND (HHV(CLOSE,20)-CLOSE)/CLOSE 0.1 AND A 20,LINETHICK0;

VERTLINE(参考选股2),LINEDOT,LINETHICK1,colorFF;

VERTLINE(参考选股1),LINEDOT,LINETHICK1,colorFFFF;

VERTLINE(超级选股),LINETHICK2,colorFF00AB;

周持仓区选股:周RS 周SI,LINETHICK0;

周持仓新:周RS 周SI AND REF(周RS 周SI,1) 1,LINETHICK0;

月持仓区选股:月RS 月SI AND 非ST,LINETHICK0;

A1:=CROSS(快线,慢线);

A3:=BARSLAST(REF(CROSS(快线,慢线),1));

C3:=REF(CLOSE,A3);

LX:=REF(快线,A3);

价背选股:A1 AND 快线 LX AND CLOSE C3 AND 量慢 REF(量慢,C3),LINETHICK0;

DRAWTEXT(价背选股,快线+快线*0.1,' 价背'),colorFF;

A21:=CROSS(量快,量慢);

A23:=BARSLAST(REF(CROSS(量快,量慢),1));

C23:=REF(CLOSE,A23);

LX:=REF(量快,A23);

量背选股:COUNT(A21 AND 量快 LX AND CLOSE C23,10) 0 AND CROSS(快线,慢线) AND 量慢 REF(量慢,1),LINETHICK0;

DRAWTEXT(量背选股,量快,' 量背'),colorFF;

顶背离:=FILTER(COUNT(REF(慢线,1) REF(慢线,2),3) =2 AND 慢线 REF(慢线,1) AND COUNT(REF(量慢,1) REF(量慢,2),3) =2 AND 量慢 REF(量慢,1),2);

DRAWTEXT(顶背离,量慢,' 顶背离'),colorFFFF00;

CPE1:=CLOSE*CLOSE/FINANCE(33);

CPE:=EMA(CPE1,5);

SP:=EMA(CLOSE,5);

TJ:=CPE REF(CPE,1) AND SP REF(SP,1);

CPE选股:=TJ AND REF(TJ,1)=0;

V1:=EMA(CLOSE,5)-EMA(CLOSE,340);

V2:=EMA(V1,144);

V3:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;

卖出:=CROSS(95,V3) AND V1 V2 AND COUNT(V3 95,3)=2 AND TJ=0;

量价判断:=价慢 35 AND 周价 35 AND 攻击量

抄底买入:CROSS(V3,5) AND V1 V2 AND COUNT(V3 5,3) =2 AND 量价判断,LINETHICK0;

VERTLINE(卖出),LINEDOT,colorFF00;

DRAWTEXT(卖出,10,'顶'),colorFF00;

VERTLINE(抄底买入),LINEDOT,color5BFF;

DRAWTEXT(抄底买入,90,'抄底'),colorFF;

抄底加码:CPE选股 AND COUNT(抄底买入,4) 0,LINETHICK0;

VERTLINE(抄底加码),colorFF;

DRAWTEXT(抄底加码,90,'加码'),colorFF;

二师量买:量背选股 AND 量买,LINETHICK0;

二师价买:价背选股 AND 价买,LINETHICK0;

二师量价买:量背选股 AND 价背选股 OR 量买 AND 价买,LINETHICK0;

二师送礼:抄底买入 AND (二师量买 OR 二师价买),LINETHICK0;

二师送钱:二师量买 AND 二师价买,LINETHICK0;

VERTLINE(二师量买 OR 二师价买 OR 二师送礼 OR 二师送钱 OR 二师量价买),color89FF;

V1:=MA(CLOSE,3)=HHV(MA(CLOSE,3),7);

V2:=MA(CLOSE,3) MA(CLOSE,5);

V3:=MA(VOL,5) MA(VOL,10)*1.01;

V4:=COUNT(MA(CLOSE,1) REF(CLOSE,1),2)=2;

逃顶:=V1 AND V2 AND V3 AND V4 AND TJ=0 AND MACD

DRAWICON(逃顶,98,5);

AA:=-2;

V1:=LLV(LOW,10);

V2:=HHV(HIGH,25);

价位线:=EMA((CLOSE-V1)/(V2-V1)*4,4);

DRAWTEXT(CROSS(价位线,0.3),AA,'■'),colorFF;

DRAWTEXT(CROSS(3.5,价位线),AA,'■'),colorFF00;

价位线选股:CROSS(价位线,0.3),LINETHICK0;

周月低选股:周价 10 AND 月价 10 AND 慢线 REF(慢线,1) AND REF(慢线,1) REF(慢线,2) AND 非ST,LINETHICK0;

RSI选股1:CROSS(RSI6,价快),LINETHICK0;

RSI选股2:CROSS(RSI6,周价),LINETHICK0;

MACD选股:MACDMR,LINETHICK0;

MACD选股1:周红 AND 日转红 AND 慢线 90,LINETHICK0;

DRAWICON(MACD选股1,98,10);

DRAWTEXT(BARPOS=SYSPARAM(1) AND 超级选股,80,' 超级选股'),colorFF;

DRAWTEXT(BARPOS=SYSPARAM(1) AND 参考选股1,80,' 参考选股1'),colorFF;

DRAWTEXT(BARPOS=SYSPARAM(1) AND 参考选股2,80,' 参考选股2'),colorFF;

DRAWTEXT(BARPOS=SYSPARAM(1) AND (卖出 OR 逃顶),80,' 逃顶'),colorFF00;

DRAWTEXT(BARPOS=SYSPARAM(1) AND 二师量买,80,' 二师量买'),colorFF;

DRAWTEXT(BARPOS=SYSPARAM(1) AND 二师价买,80,' 二师价买'),colorFF;

DRAWTEXT(BARPOS=SYSPARAM(1) AND 二师送礼,80,' 二师送礼'),colorFF;

DRAWTEXT(BARPOS=SYSPARAM(1) AND 二师送钱,80,' 二师送钱'),colorFF;

DRAWTEXT(BARPOS=SYSPARAM(1) AND 二师量价买,80,' 二师量价买'),colorFF;