通达信趋势通道主图


ZYG1:IF(WINNER(CLOSE),WINNER(CLOSE)*100,0),NODRAW;
ZYG2:=STRCAT(HYBLOCK,'');
ZYG3:=STRCAT(ZYG2,DYBLOCK);
ZYG4:=STRCAT(ZYG3,'');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(ZYG4,GNBLOCK)),COLORYELLOW;
DRAWKLINE(H,O,L,C);
ZYG5:=MA(CLOSE,25);
ZYG6:=MA(CLOSE,43);
ZYG7:=MA(CLOSE,50),COLOR0000FF;
ZYG8:=MA(CLOSE,88);
ZYG9:=STRCAT(CON2STR(YEAR,0),'年');
ZYG10:=STRCAT(CON2STR(MONTH,0),'月');
ZYG11:=STRCAT(CON2STR(DAY,0),'日');
ZYG12:=BARSLAST(CURRBARSCOUNT=120);
ZYG13:=CONST(IF(ISLASTBAR=1,HHV(H,ZYG12),0));
ZYG14:=CONST(IF(ISLASTBAR=1,LLV(L,ZYG12),0));
ZYG15:=ZYG13-ZYG14;
ZYG16:=IF(CURRBARSCOUNT<=120/30,ZYG13,DRAWNULL);
ZYG17:=IF(CURRBARSCOUNT<=120/30,ZYG14,DRAWNULL),COLORFFFF00;
ZYG18:=IF(CURRBARSCOUNT<=120/30,ZYG13,DRAWNULL),COLOR00FFFF;
ZYG19:=IF(CURRBARSCOUNT<=120/30,ZYG14+ZYG15*0.191,DRAWNULL),COLOR00FFFF;
ZYG20:=IF(CURRBARSCOUNT<=120/30,ZYG14+ZYG15*0.382,DRAWNULL),COLORFF00FF;
ZYG21:=IF(CURRBARSCOUNT<=120/30,ZYG14+ZYG15/2,DRAWNULL),COLOR0000FF;
ZYG22:=IF(CURRBARSCOUNT<=120/30,ZYG14+ZYG15*0.618,DRAWNULL),COLORCYAN;
ZYG23:=IF(CURRBARSCOUNT<=120/30,ZYG14+ZYG15*0.809,DRAWNULL),COLORGREEN;
ZYG24:=ZIG(3,6);
ZYG25:=MA(ZYG24,2);
STICKLINE(ZYG24>ZYG25&&O>=C,C,O,-1,0),COLORRED;
STICKLINE(ZYG24>ZYG25&&O>=C,L,H,0,0),COLORRED;
STICKLINE(ZYG24< ZYG25&&O<=C,O,C,-1,1),COLORCYAN;
STICKLINE(ZYG24< ZYG25&&O<=C,O,L,0,1),COLORCYAN;
STICKLINE(ZYG24< ZYG25&&O<=C,C,H,0,1),COLORCYAN;
ZYG26:=HHV(H,60);
ZYG27:=LLV(L,60);
ZYG28:=(ZYG26-ZYG27)/21;
ZYG29:=C>REF(C,4);
ZYG30:=BARSLASTCOUNT(ZYG29);
ZYG31:=ZYG30=9;
ZYG32:=ISLASTBAR&&BETWEEN(ZYG30,5,8);
ZYG33:=(BACKSET(ZYG31>0,9)||BACKSET(ZYG32>0,ZYG30))*ZYG30;
DRAWTEXT(ZYG33>0,H+1.1*ZYG28,VAR2STR(ZYG33,0)),COLORYELLOW;
DRAWTEXT(ZYG30=9,H+1.1*ZYG28,'9'),COLORGREEN;
DRAWTEXT(ZYG30=13,H+1.1*ZYG28,'13'),COLORGREEN;
DRAWTEXT(ZYG30=18,H+1.1*ZYG28,'18'),COLORGREEN;
ZYG34:=C< REF(C,4);
ZYG35:=BARSLASTCOUNT(ZYG34);
ZYG36:=ZYG35=9;
ZYG37:=ISLASTBAR&&BETWEEN(ZYG35,5,8);
ZYG38:=(BACKSET(ZYG36>0,9)||BACKSET(ZYG37>0,ZYG35))*ZYG35;
DRAWTEXT(ZYG38>0,L-1*ZYG28,VAR2STR(ZYG38,0)),COLORLIGREEN;
DRAWTEXT(ZYG35=9,H+1.1*ZYG28,'9'),COLORYELLOW;
DRAWTEXT(ZYG35=13,H+1.1*ZYG28,'13'),COLORYELLOW;
DRAWTEXT(ZYG35=18,H+1.1*ZYG28,'18'),COLORYELLOW;
ZYG39:=2,200,13;
ZYG40:=2,200,6;
ZYG41:=2,200,6;
ZYG42:=IF(H=HHV(H,8*ZYG40),H,DRAWNULL);
ZYG43:=CONST(BARSLAST(ZYG42=H))+1;
ZYG44:=CONST(IF(ZYG43=1,H,REF(H,ZYG43-1)));
ZYG45:=IF(L=LLV(L,8*ZYG41),L,DRAWNULL);
ZYG46:=CONST(BARSLAST(ZYG45=L))+1;
ZYG47:=CONST(IF(ZYG46=1,L,REF(L,ZYG46-1)));
ZYG48:=CURRBARSCOUNT<=ZYG46&&L=ZYG47;
ZYG49:=CURRBARSCOUNT<=ZYG43&&H=ZYG44;
ZYG50:=(IF(ZYG43>ZYG46,ZYG43,ZYG46)-IF(ZYG43>ZYG46,ZYG46,ZYG43));
ZYG51:=FORCAST(C,ZYG50+1);
ZYG52:=IF(CURRBARSCOUNT<=MAX(ZYG46,ZYG43),CONST(IF(MIN(ZYG43,ZYG46)=1,ZYG51,REF(ZYG51,MIN(ZYG43,ZYG46)-1))),DRAWNULL),POINTDOT,COLORRED;
ZYG53:=SLOPE(C,ZYG50+1);
ZYG54:=CONST(IF(MIN(ZYG43,ZYG46)=1,ZYG53,REF(ZYG53,MIN(ZYG43,ZYG46)-1)));
ZYG55:=ZYG52-ZYG54*(ZYG50),POINTDOT,COLORYELLOW;
ZYG56:=(ZYG52+ZYG55)/2,POINTDOT,COLORWHITE;
ZYG57:=ABS(ZYG52-ZYG55);
ZYG58:=BARSLAST(ZYG45!=DRAWNULL)+1;
ZYG59:=BARSLAST(ZYG42!=DRAWNULL)+1;
ZYG60:=IF(ZYG46>ZYG43,ZYG58,ZYG59)-1;
ZYG61:=IF(ZYG52>ZYG55,ZYG55+ZYG57/ZYG50*ZYG60,ZYG55-ZYG57/ZYG50*ZYG60);
ZYG62:=IF(BETWEEN(CURRBARSCOUNT,ZYG46,ZYG43)&&H>ZYG61,H,ZYG61);
ZYG63:=HHV(ZYG62-ZYG61,MAX(ZYG46,ZYG43));
ZYG64:=CONST(BARSLAST(ZYG62-ZYG61=ZYG63));
ZYG65:=CONST(IF(ZYG64=0,H,REF(H,ZYG64)));
ZYG66:=CONST(IF(ZYG64=0,ZYG62-ZYG61,REF(ZYG62-ZYG61,ZYG64)));
ZYG67:=ZYG61+ZYG66;
ZYG68:=IF(BETWEEN(CURRBARSCOUNT,ZYG46,ZYG43)&&L< ZYG61,L,ZYG61);
ZYG69:=HHV(ZYG61-ZYG68,MAX(ZYG46,ZYG43));
ZYG70:=CONST(BARSLAST(ZYG61-ZYG68=ZYG69));
ZYG71:=CONST(IF(ZYG70=0,H,REF(H,ZYG70)));
ZYG72:=CONST(IF(ZYG70=0,ZYG61-ZYG68,REF(ZYG61-ZYG68,ZYG70)));
ZYG73:=ZYG61-ZYG72;
DRAWTEXT_FIX(1,0.60,0.75,0,'更多指标,低费率交易,私聊 '),COLORYELLOW;
ZYG74:=IF(CURRBARSCOUNT>=MIN(ZYG46,ZYG43)-10,ZYG67,CONST(REF(ZYG67,MIN(ZYG46,ZYG43)-11)));
ZYG75:=IF(CURRBARSCOUNT>=MIN(ZYG46,ZYG43)-10,ZYG73,CONST(REF(ZYG73,MIN(ZYG46,ZYG43)-11)));
ZYG76:IF(ZYG52>ZYG55,IF(ZYG61<=ZYG74,ZYG61,DRAWNULL),IF(ZYG61>=ZYG75,ZYG61,DRAWNULL)),COLORBBBBBB;
ZYG77:IF(ZYG52>ZYG55,IF(ZYG67<=ZYG74,ZYG67,DRAWNULL),IF(ZYG67>=ZYG75,ZYG67,DRAWNULL)),COLORFF0000;
ZYG78:IF(ZYG52>ZYG55,IF(ZYG73<=ZYG74,ZYG73,DRAWNULL),IF(ZYG73>=ZYG75,ZYG73,DRAWNULL)),COLORFF00FF;
ZYG79:=(REF(HIGH,3)=HHV(HIGH,((2*3)+1)));
ZYG80:=FILTER(ZYG79,3);
ZYG81:=BACKSET(ZYG80,(3+1));
ZYG82:=FILTER(ZYG81,3);
ZYG83:=(REF(LOW,3)=LLV(LOW,((2*3)+1)));
ZYG84:=FILTER(ZYG83,3);
ZYG85:=BACKSET(ZYG84,(3+1));
ZYG86:=FILTER(ZYG85,3);
ZYG87:=((REF(LLV(LOW,(2*3)),1)+REF(HHV(HIGH,(2*3)),1))/2);
ZYG88:=((HIGH+LOW)/2);
ZYG89:=(((ZYG82&&NOT((ZYG86&&(ZYG87>=ZYG88))))||BARSTATUS)||(BARSCOUNT(CLOSE)=1));
ZYG90:=(ZYG86&&NOT((ZYG82&&(ZYG87< ZYG88))));
ZYG91:=(ZYG82&&NOT((ZYG86&&(ZYG87>=ZYG88))));
ZYG92:=(REF(BARSLAST(ZYG89),1)+1);
ZYG93:=BACKSET((ZYG89&&(COUNT(ZYG90,ZYG92)>0)),LLVBARS(IF(ZYG90,LOW,10000),ZYG92));
ZYG94:=(ZYG93>REF(ZYG93,1));
ZYG95:=BACKSET(ZYG94,2);
ZYG96:=(ZYG95>REF(ZYG95,1));
ZYG97:=((ZYG96||BARSTATUS)||(BARSCOUNT(CLOSE)=1));
ZYG98:=(REF(BARSLAST(ZYG97),1)+1);
ZYG99:=BACKSET((ZYG97&&(COUNT(ZYG91,ZYG98)>0)),HHVBARS(IF(ZYG91,HIGH,0),ZYG98));
ZYG100:=(ZYG99>REF(ZYG99,1));
ZYG101:=BACKSET(ZYG100,2);
ZYG102:=(ZYG101>REF(ZYG101,1));
ZYG103:=BACKSET(BARSTATUS,(BARSLAST(ZYG96)+1));
ZYG104:=(ZYG103>REF(ZYG103,1));
ZYG105:=BACKSET(BARSTATUS,(BARSLAST(ZYG102)+1));
ZYG106:=(ZYG105>REF(ZYG105,1));
ZYG107:REF(LOW,BARSLAST(ZYG104)),COLORLIRED;
ZYG108:REF(HIGH,BARSLAST(ZYG106)),COLORLIGREEN;
DRAWTEXT(CURRBARSCOUNT=3,ZYG108,STRCAT(('压力:'),CON2STR(ZYG108,2))),COLORLIGREEN;
DRAWTEXT(CURRBARSCOUNT=5,ZYG107,STRCAT(('支撑:'),CON2STR(ZYG107,2))),COLORRED;
DRAWLINE(ZYG106,HIGH,ZYG104,ZYG108,1),COLORLIGREEN,LINETHICK1;
DRAWLINE(ZYG104,LOW,ZYG106,ZYG107,1),COLORLIRED,LINETHICK1;
ZYG109:=SUMBARS(V,CAPITAL*1);
ZYG110:=SUM(COST(10),ZYG109)/ZYG109;
ZYG111:=SUM(COST(20),ZYG109)/ZYG109;
ZYG112:=SUM(COST(30),ZYG109)/ZYG109;
ZYG113:=SUM(COST(40),ZYG109)/ZYG109;
ZYG114:=SUM(COST(50),ZYG109)/ZYG109;
ZYG115:=(5*ZYG110+4*ZYG111+3*ZYG112+2*ZYG113+ZYG114)/15,COLOR0080FF,DOTLINE;
ZYG116:REFDATE(ZYG115,DATE),COLORLIGRAY,DOTLINE;
DRAWTEXT(CURRBARSCOUNT=30,ZYG116,STRCAT('庄本:',CON2STR(ZYG116,2))),COLORGRAY;
ZYG117:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK1,COLORRED,DOTLINE;
STICKLINE(ZYG117>LOW&&ZYG117< HIGH,ZYG117,MIN(MIN(OPEN,CLOSE),ZYG117),2,1),COLOR00CCFF;
STICKLINE(ZYG117>MIN(C,O)&&ZYG117< MAX(C,O),ZYG117,MIN(OPEN,CLOSE),2,1),COLOR00CCFF;
STICKLINE(ZYG117>HIGH,OPEN,CLOSE,2,1),COLOR00CCFF;
ZYG118:=PEAKBARS(3,15,1)< 10;
ZYG119:=IF(ZYG118=1,2,0);
ZYG120:=IF(ZYG119=2,2,0);
ZYG121:=IF(ZYG120>REF(ZYG120,1),2,0),COLORGREEN;
DRAWICON(ZYG121=2,H*1.02,2);
ZYG122:=EMA(OPEN,7);
ZYG123:=EMA(ZYG122,21);
ZYG124:=CROSS(ZYG122,ZYG123);
ZYG125:=EMA(SMA((CLOSE-LLV(LOW,20))/(HHV(HIGH,16)-LLV(LOW,20))*100,8,1),3);
ZYG126:=IF(TROUGHBARS(1,6,1)=0&&HIGH>LOW+0,2,0),COLORRED;
DRAWICON(ZYG126=2,L*0.98,1);
ZYG127:DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),H,''),LINETHICK2,COLORYELLOW;
DRAWICON(ZYG127,L*0.99,9);
ZYG128:DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),H,''),LINETHICK2,COLORYELLOW;
DRAWICON(ZYG128,H*1.01,15);
ZYG129:=IF(CURRBARSCOUNT<=60,CONST(IF(ISLASTBAR=1,HHV(H,BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORLIBLUE,DOTLINE;
ZYG130:=IF(CURRBARSCOUNT<=60,CONST(IF(ISLASTBAR=1,LLV(L,BARSLAST(CURRBARSCOUNT=60)),1)),DRAWNULL),COLORLIRED,DOTLINE;
STICKLINE(CCI>=200&&H>=ZYG129,C+(O-C)/3,C,2,0),COLORGREEN;
STICKLINE(CCI<=100&&L<=ZYG130,C-(C-O)/3,C,2,0),COLORLIMAGENTA;
通达信趋势通道选股


M1:=45;
MA13:=MA(C,13);
ZYG1:=IF(1,(C/REF(C,1)-1)*100>9.5,0);
ZYG3:=REF(C,1);
ZYG4:=IF((ZYG3-C)*100/ZYG3>=10-0.01*100/ZYG3,1,0);
ZYG5:=MA(C,21),COLOR00CCCC,LINETHICK2;
ZYG6:=C>ZYG5 AND MA13>REF(MA13,1) AND ZYG4!=1;
ZYG8:=REF(C,1);
ZYG9:=SMA(MAX(C-ZYG8,0),2,1)/SMA(ABS(C-ZYG8),2,1)*100;
ZYG11:=ZYG9< M1 AND REF(ZYG9,1)>M1;
ZYG12:=ZYG9< 20 AND REF(ZYG9,1)>20;
ZYG13:=COUNT(ZYG1,13)>=1;
趋势起X:REF(ZYG11,1) OR REF(ZYG12,1) AND LOW< MA(C,5) AND ZYG13 AND ZYG6 AND C>REF(LOW,BARSLAST(ZYG1));