[通达信指标]一主一副 三色主图 回归通道

MZ1:EMA(C,21),LINETHICK2,COLORMAGENTA;

MZ2:EMA(C,55),NODRAW;

TR1:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));

ATR1:=MA(TR1,26);

GLL:=ABS(CLOSE-MZ1);

COND100:=BARSLAST(CROSS(C,MZ1))+1>=12 AND C>MZ1 AND C>MZ2 AND GLL>ATR1*3.8;

COND200:=BARSLAST(CROSS(MZ1,C))+1>=12 AND C<MZ1 AND C<MZ2 AND GLL>ATR1*3.8;

DRAWICON(COND100,L,1);

DRAWICON(COND200,H,2);

COND1:=BARSLAST(CROSS(C,MZ1))+1<5 AND C>MZ1 AND C>MZ2 AND GLL>ATR1*1.4 ;

COND11:=BARSLAST(CROSS(C,MZ1))+1=5 AND C>MZ1 AND C>MZ2;

COND111:=BARSLAST(CROSS(C,MZ1))+1<=5 AND C>MZ1 AND C>MZ2 AND GLL>=ATR1*0.90 AND GLL<=ATR1*1.4;

COND4:=BARSLAST(CROSS(C,MZ1))+1=5 AND C>MZ1 AND C<MZ2;

COND44:=BARSLAST(CROSS(C,MZ1))+1<=5 AND C>MZ1 AND C<MZ2 AND GLL>=ATR1*0.90 AND GLL<=ATR1*1.4;

COND444:=BARSLAST(CROSS(C,MZ1))+1<=5 AND C>MZ1 AND C<MZ2 AND GLL>ATR1*1.4;

COND2:=BARSLAST(CROSS(MZ1,C))+1<5 AND C<MZ1 AND C<MZ2 AND GLL>ATR1*1.4 ;

COND22:=BARSLAST(CROSS(MZ1,C))+1=5 AND C<MZ1 AND C<MZ2;

COND222:=BARSLAST(CROSS(MZ1,C))+1<=5 AND C<MZ1 AND C<MZ2 AND GLL>=ATR1*0.90 AND GLL<=ATR1*1.4;

COND3:=BARSLAST(CROSS(MZ1,C))+1=5 AND C<MZ1 AND C>MZ2;

COND33:=BARSLAST(CROSS(MZ1,C))+1<=5 AND C<MZ1 AND C>MZ2 AND GLL>=ATR1*0.90 AND GLL<=ATR1*1.4;

COND333:=BARSLAST(CROSS(MZ1,C))+1<=5 AND C<MZ1 AND C>MZ2 AND GLL>ATR1*1.4;

AA:=COND1||COND11||COND111;

BB:=COND2||COND22||COND222;

CC:=COND3||COND33||COND333;

DD:=COND4||COND44||COND444;

DRAWTEXT(BB AND COUNT(BB,BARSLAST(AA||DD||CC)+1)=1 AND COUNT(BB AND COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(AA)>BARSLAST(BB)))=1,H,’空’),COLORGREEN;

DRAWTEXT(BB AND COUNT(BB,BARSLAST(AA||DD||CC)+1)=1 AND COUNT(BB AND COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(DD)>BARSLAST(BB)))=1,H,’空’),COLORGREEN;

DRAWTEXT(AA AND COUNT(AA,BARSLAST(BB||CC||DD)+1)=1 AND COUNT(AA AND COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(BB)))=1,L,’多’),COLORRED,;

DRAWTEXT(AA AND COUNT(AA,BARSLAST(BB||CC||DD)+1)=1 AND COUNT(AA AND COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(CC)))=1,L,’多’),COLORRED;

DRAWTEXT(CC AND COUNT(CC,BARSLAST(AA||DD)+1)=1 AND BARSLAST(AA)<BARSLAST(BB),H,’空’),COLORWHITE;

DRAWTEXT(CC AND COUNT(CC,BARSLAST(AA||DD||BB)+1)=1 AND BARSLAST(CC)<BARSLAST(DD) AND BARSLAST(DD)<BARSLAST(BB),H,’空’)COLORWHITE;

DRAWTEXT(DD AND COUNT(DD,BARSLAST(BB||CC)+1)=1 AND BARSLAST(BB)<BARSLAST(AA),L,’多’)COLORWHITE;

DRAWTEXT(DD AND COUNT(DD,BARSLAST(AA||CC||BB)+1)=1 AND BARSLAST(DD)<BARSLAST(CC) AND BARSLAST(CC)<BARSLAST(AA),L,’多’),COLORWHITE;

CONDD1:=L>=REF(L,1) AND H<REF(H,1);

HHH:=VALUEWHEN(CONDD1,REF(H,1));

LLL:=VALUEWHEN(CONDD1,REF(L,1));

CC1:=BARSLASTCOUNT(L>LLL AND H<HHH);

B:=HHV(H,CC1+1);

F:=LLV(L,CC1+1);

CONDD3:= C>F AND H<B;

E:=EVERY(CONDD3,CC1);

CONDD22:E=0 AND CROSS(REF(L,1),C),NODRAW;

CONDD44:=E=0 AND CROSS(C,REF(H,1));

UU1:=BARSLAST(CROSS(BARSLAST(CONDD22)<BARSLAST(CONDD44),0.5));

DD1:=BARSLAST(CROSS(BARSLAST(CONDD44)<BARSLAST(CONDD22),0.5));

X1:=CONDD44 AND SUM(CONDD44,BARSLAST(CONDD22))=1;

X2:=CONDD22 AND SUM(CONDD22,BARSLAST(CONDD44))=1;

LL11:=VALUEWHEN(X1,LLV(L,UU1+1));

HH11:=VALUEWHEN(X2,HHV(H,DD1+1));

LL22:=VALUEWHEN(X1,REF(LL11,1));

HH22:=VALUEWHEN(X2,HHV(HH11,1));

DKCJ222:=VALUEWHEN(AA,C);

KKCJ:=VALUEWHEN(BB,C);

DRAWTEXT(BB AND C-DKCJ222>ATR1*3 AND COUNT(BB,BARSLAST(AA||DD||CC)+1)=1 AND COUNT(BB AND COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(AA)>BARSLAST(BB)))=1,H*1.001,’多头止盈’),COLORGREEN;

DRAWTEXT(BB AND C-DKCJ222>ATR1*3 AND COUNT(BB,BARSLAST(AA||DD||CC)+1)=1 AND COUNT(BB AND COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(DD)>BARSLAST(BB)))=1,H*1.001,’多头止盈’),COLORGREEN;

DRAWTEXT(AA AND KKCJ-C>ATR1*3 AND COUNT(AA,BARSLAST(BB||CC||DD)+1)=1 AND COUNT(AA AND COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(BB)))=1,L*0.999,’空头止盈’),COLORRED;

DRAWTEXT(AA AND KKCJ-C>ATR1*3 AND COUNT(AA,BARSLAST(BB||CC||DD)+1)=1 AND COUNT(AA AND COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(CC)))=1,L*0.999,’空头止盈’),COLORRED;

DRAWTEXT(CC AND C-DKCJ222>ATR1*3 AND COUNT(CC,BARSLAST(AA||DD)+1)=1 AND BARSLAST(AA)<BARSLAST(BB),H*1.001,’多头止盈’)COLORWHITE;

DRAWTEXT(CC AND C-DKCJ222>ATR1*3 AND COUNT(CC,BARSLAST(AA||DD||BB)+1)=1 AND BARSLAST(CC)<BARSLAST(DD) AND BARSLAST(DD)<BARSLAST(BB),H*1.001,’多头止盈’)COLORWHITE;

DRAWTEXT(DD AND KKCJ-C>ATR1*3 AND COUNT(DD,BARSLAST(BB||CC)+1)=1 AND BARSLAST(BB)<BARSLAST(AA),L*0.999,’空头止盈’)COLORWHITE;

DRAWTEXT(DD AND KKCJ-C>ATR1*3 AND COUNT(DD,BARSLAST(AA||CC||BB)+1)=1 AND BARSLAST(DD)<BARSLAST(CC) AND BARSLAST(CC)<BARSLAST(AA),L*0.999,’空头止盈’),COLORWHITE;

P1:=DD AND COUNT(DD,BARSLAST(AA||CC||BB)+1)=1 AND BARSLAST(DD)<BARSLAST(CC) AND BARSLAST(CC)<BARSLAST(AA)||CC AND COUNT(CC,BARSLAST(AA||DD||BB)+1)=1 AND BARSLAST(CC)<BARSLAST(DD) AND BARSLAST(DD)<BARSLAST(BB)||DD AND COUNT(DD,BARSLAST(BB||CC)+1)=1 AND BARSLAST(BB)<BARSLAST(AA)||CC AND COUNT(CC,BARSLAST(AA||DD)+1)=1 AND BARSLAST(AA)<BARSLAST(BB);

P2:=BB AND COUNT(BB,BARSLAST(AA||DD||CC)+1)=1 AND COUNT(BB AND COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(AA)>BARSLAST(BB)))=1||BB AND COUNT(BB,BARSLAST(AA||DD||CC)+1)=1 AND COUNT(BB AND COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(DD)>BARSLAST(BB)))=1;

P3:=AA AND COUNT(AA,BARSLAST(BB||CC||DD)+1)=1 AND COUNT(AA AND COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(BB)))=1||AA AND COUNT(AA,BARSLAST(BB||CC||DD)+1)=1 AND COUNT(AA AND COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(CC)))=1;

X1A:=BARSLAST(P3)<BARSLAST(P2) AND BARSLAST(P3)<BARSLAST(P1);

X2A:=BARSLAST(P3)>BARSLAST(P2) AND BARSLAST(P2)<BARSLAST(P1);

X3A:=BARSLAST(P1)<BARSLAST(P2) AND BARSLAST(P3)>BARSLAST(P1);

STICKLINE(X2A AND C>=O,H,L,0,0),COLORGREEN;

STICKLINE(X2A AND C>=O,C,O,3,1),COLORGREEN;

STICKLINE(X2A AND C<O,H,L,0,0),COLORGREEN;

STICKLINE(X2A AND C<O,C,O,3,0),COLORGREEN;

STICKLINE(X1A AND C>=O,H,L,0,0),COLORRED;

STICKLINE(X1A AND C>=O,C,O,3,1),COLORRED;

STICKLINE(X1A AND C<O,H,L,0,0),COLORRED;

STICKLINE(X1A AND C<O,C,O,3,0),COLORRED;

STICKLINE(X3A AND C>=O,H,L,0,0),COLORWHITE;

STICKLINE(X3A AND C>=O,C,O,3,1),COLORWHITE;

STICKLINE(X3A AND C<O,H,L,0,0),COLORWHITE;

STICKLINE(X3A AND C<O,C,O,3,0),COLORWHITE;

MACD2:=2*(C-MA20);

UPPER:=MA20+2*STD(CLOSE,20);

LOWER:=MA20-2*STD(CLOSE,20);

UP:2*(UPPER-MA20),POINTDOT;

LO:2*(LOWER-MA20),POINTDOT;

STICKLINE(MACD2>0,0,MACD2,1.5,1),COLORMAGENTA;

STICKLINE(MACD2<0,0,MACD2,1.5,1),COLORCYAN;

DRAWTEXT(CROSS(C,LOWER),LO,’↑安全’);

DRAWTEXT(CROSS(UPPER,C),UP,’★风险’),COLORGREEN;

MA5:=MA(CLOSE,5);

MACD1:2*(C-MA5),STICK;

STICKLINE(MACD1>0,0,MACD1,0.5,0),COLOR0000DD;

STICKLINE(MACD1<0,0,MACD1,0.5,0),COLOR00BB00;

VAR1:=MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3);

VAR2:=REF(MACD1,1)<0 AND MACD1>0;

VAR3:=MA20>REF(MA20,1);

DRAWICON(VAR1 AND VAR2 AND VAR3,0,9);