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&&C>MZ1&&C>MZ2&&GLL>ATR1*3.8;
COND200:=BARSLAST(CROSSDOWN(C,MZ1))+1>=12&&C<MZ1&&C<MZ2&&GLL>ATR1*3.8;
COND100,ICON(1,'ICO157'),ALIGN1,VALIGN2;
COND200,ICON(0,'ICO158'),ALIGN1,VALIGN0;
COND1:=BARSLAST(CROSS(C,MZ1))+1<5&&C>MZ1&&C>MZ2&&GLL>ATR1*1.4 ;//高开或快速上涨开仓信号以下是COND1;
COND11:=BARSLAST(CROSS(C,MZ1))+1=5&&C>MZ1&&C>MZ2;
COND111:=BARSLAST(CROSS(C,MZ1))+1<=5&&C>MZ1&&C>MZ2&&GLL>=ATR1*0.90&&GLL<=ATR1*1.4;
COND4:=BARSLAST(CROSS(C,MZ1))+1=5&&C>MZ1&&C<MZ2;
COND44:=BARSLAST(CROSS(C,MZ1))+1<=5&&C>MZ1&&C<MZ2&&GLL>=ATR1*0.90&&GLL<=ATR1*1.4;
COND444:=BARSLAST(CROSS(C,MZ1))+1<=5&&C>MZ1&&C<MZ2&&GLL>ATR1*1.4;
COND2:=BARSLAST(CROSSDOWN(C,MZ1))+1<5&&C<MZ1&&C<MZ2&&GLL>ATR1*1.4 ;//高开或快速下跌开仓信号以下是COND2;
COND22:=BARSLAST(CROSSDOWN(C,MZ1))+1=5&&C<MZ1&&C<MZ2;
COND222:=BARSLAST(CROSSDOWN(C,MZ1))+1<=5&&C<MZ1&&C<MZ2&&GLL>=ATR1*0.90&&GLL<=ATR1*1.4;
COND3:=BARSLAST(CROSSDOWN(C,MZ1))+1=5&&C<MZ1&&C>MZ2;
COND33:=BARSLAST(CROSSDOWN(C,MZ1))+1<=5&&C<MZ1&&C>MZ2&&GLL>=ATR1*0.90&&GLL<=ATR1*1.4;
COND333:=BARSLAST(CROSSDOWN(C,MZ1))+1<=5&&C<MZ1&&C>MZ2&&GLL>ATR1*1.4;
AA:=COND1||COND11||COND111;
BB:=COND2||COND22||COND222;
CC:=COND3||COND33||COND333;
DD:=COND4||COND44||COND444;
DRAWTEXT(BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1&&COUNT(BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(AA)>BARSLAST(BB)))=1,H,'K'),ALIGN1,VALIGN2,COLORGREEN,FONTSIZE27;
DRAWTEXT(BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1&&COUNT(BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(DD)>BARSLAST(BB)))=1,H,'K'),ALIGN1,VALIGN2,COLORGREEN,FONTSIZE27;
DRAWTEXT(AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1&&COUNT(AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(BB)))=1,L,'D'),ALIGN1,VALIGN0,COLORRED,FONTSIZE27;
DRAWTEXT(AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1&&COUNT(AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(CC)))=1,L,'D'),ALIGN1,VALIGN0,COLORRED,FONTSIZE27;
DRAWTEXT(CC&&COUNT(CC,BARSLAST(AA||DD)+1)=1&&BARSLAST(AA)<BARSLAST(BB),H,'K'),ALIGN1,VALIGN2,COLORWHITE,FONTSIZE27;
DRAWTEXT(CC&&COUNT(CC,BARSLAST(AA||DD||BB)+1)=1&&BARSLAST(CC)<BARSLAST(DD)&&BARSLAST(DD)<BARSLAST(BB),H,'K'),ALIGN1,VALIGN2,COLORWHITE,FONTSIZE27;
DRAWTEXT(DD&&COUNT(DD,BARSLAST(BB||CC)+1)=1&&BARSLAST(BB)<BARSLAST(AA),L,'D'),ALIGN1,VALIGN0,COLORWHITE,FONTSIZE27;
DRAWTEXT(DD&&COUNT(DD,BARSLAST(AA||CC||BB)+1)=1&&BARSLAST(DD)<BARSLAST(CC)&&BARSLAST(CC)<BARSLAST(AA),L,'D'),ALIGN1,VALIGN0,COLORWHITE,FONTSIZE27;
BB1:=BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1&&COUNT(BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(AA)>BARSLAST(BB)))=1;
BB11:=BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1&&COUNT(BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(DD)>BARSLAST(BB)))=1;
AA1:=AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1&&COUNT(AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(BB)))=1;
AA11:=AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1&&COUNT(AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(CC)))=1;
CC12:=CC&&COUNT(CC,BARSLAST(AA||DD)+1)=1&&BARSLAST(AA)<BARSLAST(BB);
CC11:=CC&&COUNT(CC,BARSLAST(AA||DD||BB)+1)=1&&BARSLAST(CC)<BARSLAST(DD)&&BARSLAST(DD)<BARSLAST(BB);
DD12:=DD&&COUNT(DD,BARSLAST(BB||CC)+1)=1&&BARSLAST(BB)<BARSLAST(AA);
DD11:=DD&&COUNT(DD,BARSLAST(AA||CC||BB)+1)=1&&BARSLAST(DD)<BARSLAST(CC)&&BARSLAST(CC)<BARSLAST(AA);
BB3:=BB1||BB11;
AA3:=AA1||AA11;
CC3:=CC12||CC11;
DD3:=DD12||DD11;
PLAYSOUND(AA3||BB3||CC3||DD3,'A');
CONDD1:=L>=REF(L,1)&&H<REF(H,1);//包含关系条件;
HHH:=VALUEWHEN(CONDD1,REF(H,1));//取K线最高价;
LLL:=VALUEWHEN(CONDD1,REF(L,1));//取K线最低价;
CC1:=BARSLASTCOUNT(L>LLL&&H<HHH);//后面几根K线包含关系周期数;
B:=HHV(H,CC1+1);//包含关系最高点;
F:=LLV(L,CC1+1);//包含关系最低点;
CONDD3:= C>F&&H<B;
E:=EVERY(CONDD3,CC1);
CONDD22:E=0&&CROSSDOWN(L,REF(L,1)),NODRAW;//下跌连续两根没包含关系;
CONDD44:=E=0&&CROSS(H,REF(H,1));//上涨连续两根K线没包含关系;
UU1:=CONDBARS(CONDD22,CONDD44);//下跌K线周数;
DD1:=CONDBARS(CONDD44,CONDD22);//上涨K线周期数;
X1:=CONDD44&&SUM(CONDD44,BARSLAST(CONDD22))=1;
X2:=CONDD22&&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(AA3,C);//开仓价;
KKCJ:=VALUEWHEN(BB3,C);//开仓价;
T:=(X1||X2);
HX:CROSS(C,HH11+MINPRICE),NODRAW;
LX:CROSSDOWN(C,LL11-MINPRICE),NODRAW;
VALUEWHEN(AA||BB||CC||DD,AA||DD)&&LX&&BACKSET(VALUEWHEN(AA||BB||CC||DD,AA||DD)&&ISLASTBAR,BARSLAST(AA||DD)),WORD(1,'多减'),ALIGN1,VALIGN2,COLORYELLOW,FONTSIZE20;
VALUEWHEN(AA||BB||CC||DD,CC||BB)&&HX&&BACKSET(VALUEWHEN(AA||BB||CC||DD,CC||BB)&&ISLASTBAR,BARSLAST(BB||CC)),WORD(0,'空减'),ALIGN1,VALIGN0,COLORYELLOW,FONTSIZE20;
VALUEWHEN(AA||BB||CC||DD,AA||DD)&&LX&&BACKSET(VALUEWHEN(AA||BB||CC||DD,AA||DD)&&ISLASTBAR,BARSLAST(AA||DD)),SOUND('B');
VALUEWHEN(AA||BB||CC||DD,CC||BB)&&HX&&BACKSET(VALUEWHEN(AA||BB||CC||DD,CC||BB)&&ISLASTBAR,BARSLAST(BB||CC)),SOUND('C');
DRAWTEXT(EXIST(CC,BARSLAST(AA))=0&&BB&&C-DKCJ222>=ATR1*5&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1&&COUNT(BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(AA)>BARSLAST(BB)))=1,L*1,'D大盈'),ALIGN1,VALIGN0,COLORYELLOW,FONTSIZE16;
DRAWTEXT(EXIST(CC,BARSLAST(AA))=0&&BB&&C-DKCJ222>=ATR1*5&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1&&COUNT(BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(DD)>BARSLAST(BB)))=1,L*1,'D大盈'),ALIGN1,VALIGN0,COLORYELLOW,FONTSIZE16;
DRAWTEXT(CC&&C-DKCJ222>=ATR1*5&&COUNT(CC,BARSLAST(AA||DD)+1)=1&&BARSLAST(AA)<BARSLAST(BB),L*1,'D大盈'),ALIGN1,VALIGN0,COLORYELLOW,FONTSIZE16;
DRAWTEXT(CC&&C-DKCJ222>=ATR1*5&&COUNT(CC,BARSLAST(AA||DD||BB)+1)=1&&BARSLAST(CC)<BARSLAST(DD)&&BARSLAST(DD)<BARSLAST(BB),L*1,'D大盈'),ALIGN1,VALIGN0,COLORYELLOW,FONTSIZE16;
DRAWTEXT(EXIST(CC,BARSLAST(AA))=0&&BB&&ATR1*2.5>C-DKCJ222&&C-DKCJ222>=0&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1&&COUNT(BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(AA)>BARSLAST(BB)))=1,L*1,'D小盈'),ALIGN1,VALIGN0,COLORYELLOW,FONTSIZE16;
DRAWTEXT(EXIST(CC,BARSLAST(AA))=0&&BB&&ATR1*2.5>C-DKCJ222&&C-DKCJ222>=0&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1&&COUNT(BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(DD)>BARSLAST(BB)))=1,L*1,'D小盈'),ALIGN1,VALIGN0,COLORYELLOW,FONTSIZE16;
DRAWTEXT(CC&&ATR1*2.5>C-DKCJ222&&C-DKCJ222>0&&COUNT(CC,BARSLAST(AA||DD||BB)+1)=1&&BARSLAST(CC)<BARSLAST(DD)&&BARSLAST(DD)<BARSLAST(BB),L*1,'D小盈'),ALIGN1,VALIGN0,COLORYELLOW,FONTSIZE16;
DRAWTEXT(CC&&ATR1*2.5>C-DKCJ222&&C-DKCJ222>0&&COUNT(CC,BARSLAST(AA||DD)+1)=1&&BARSLAST(AA)<BARSLAST(BB),L*1,'D小盈'),ALIGN1,VALIGN0,COLORYELLOW,FONTSIZE16;
DRAWTEXT(EXIST(CC,BARSLAST(AA))=0&&BB&&ATR1*5>C-DKCJ222&&C-DKCJ222>=ATR1*2.5&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1&&COUNT(BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(AA)>BARSLAST(BB)))=1,L*1,'D中盈'),ALIGN1,VALIGN0,COLORYELLOW,FONTSIZE16;
DRAWTEXT(EXIST(CC,BARSLAST(AA))=0&&BB&&ATR1*5>C-DKCJ222&&C-DKCJ222>=ATR1*2.5&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1&&COUNT(BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(DD)>BARSLAST(BB)))=1,L*1,'D中盈'),ALIGN1,VALIGN0,COLORYELLOW,FONTSIZE16;
DRAWTEXT(CC&&ATR1*5>C-DKCJ222&&C-DKCJ222>=ATR1*2.5&&COUNT(CC,BARSLAST(AA||DD)+1)=1&&BARSLAST(AA)<BARSLAST(BB),L*1,'D中盈'),ALIGN1,VALIGN0,COLORYELLOW,FONTSIZE16;
DRAWTEXT(CC&&ATR1*5>C-DKCJ222&&C-DKCJ222>=ATR1*2.5&&COUNT(CC,BARSLAST(AA||DD||BB)+1)=1&&BARSLAST(CC)<BARSLAST(DD)&&BARSLAST(DD)<BARSLAST(BB),L*1,'D中盈'),ALIGN1,VALIGN0,COLORYELLOW,FONTSIZE16;
DRAWTEXT(EXIST(DD,BARSLAST(BB))=0&&AA&&KKCJ-C>=ATR1*5&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1&&COUNT(AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(BB)))=1,H*1,'K大盈'),ALIGN1,VALIGN2,COLORYELLOW,FONTSIZE16;
DRAWTEXT(EXIST(DD,BARSLAST(BB))=0&&AA&&KKCJ-C>=ATR1*5&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1&&COUNT(AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(CC)))=1,H*1,'K大盈'),ALIGN1,VALIGN2,COLORYELLOW,FONTSIZE16;
DRAWTEXT(DD&&KKCJ-C>=ATR1*5&&COUNT(DD,BARSLAST(BB||CC)+1)=1&&BARSLAST(BB)<BARSLAST(AA),H*1,'K大盈'),ALIGN1,VALIGN2,COLORYELLOW,FONTSIZE16;
DRAWTEXT(DD&&KKCJ-C>=ATR1*5&&COUNT(DD,BARSLAST(AA||CC||BB)+1)=1&&BARSLAST(DD)<BARSLAST(CC)&&BARSLAST(CC)<BARSLAST(AA),H*1,'K大盈'),ALIGN1,VALIGN2,COLORYELLOW,FONTSIZE16;
DRAWTEXT(EXIST(DD,BARSLAST(BB))=0&&AA&&ATR1*5>KKCJ-C&&KKCJ-C>=ATR1*2.5&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1&&COUNT(AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(BB)))=1,H*1,'K中盈'),ALIGN1,VALIGN2,COLORYELLOW,FONTSIZE16;
DRAWTEXT(EXIST(DD,BARSLAST(BB))=0&&AA&&ATR1*5>KKCJ-C&&KKCJ-C>=ATR1*2.5&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1&&COUNT(AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(CC)))=1,H*1,'K中盈'),ALIGN1,VALIGN2,COLORYELLOW,FONTSIZE16;
DRAWTEXT(DD&&ATR1*5>KKCJ-C&&KKCJ-C>=ATR1*2.5&&COUNT(DD,BARSLAST(BB||CC)+1)=1&&BARSLAST(BB)<BARSLAST(AA),H*1,'K中盈'),ALIGN1,VALIGN2,COLORYELLOW,FONTSIZE16;
DRAWTEXT(DD&&ATR1*5>KKCJ-C&&KKCJ-C>=ATR1*2.5&&COUNT(DD,BARSLAST(AA||CC||BB)+1)=1&&BARSLAST(DD)<BARSLAST(CC)&&BARSLAST(CC)<BARSLAST(AA),H*1,'K中盈'),ALIGN1,VALIGN2,COLORYELLOW,FONTSIZE16;
Z1:EXIST(DD,BARSLAST(BB))=0&&AA&&ATR1*5>KKCJ-C&&KKCJ-C>=ATR1*2.5&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1&&COUNT(AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(BB)))=1,NODRAW;
Z2:EXIST(DD,BARSLAST(BB))=0&&AA&&ATR1*5>KKCJ-C&&KKCJ-C>=ATR1*2.5&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1&&COUNT(AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(CC)))=1,NODRAW;
Z3:DD&&ATR1*5>KKCJ-C&&KKCJ-C>=ATR1*2.5&&COUNT(DD,BARSLAST(BB||CC)+1)=1&&BARSLAST(BB)<BARSLAST(AA),NODRAW;
Z4:DD&&ATR1*5>KKCJ-C&&KKCJ-C>=ATR1*2.5&&COUNT(DD,BARSLAST(AA||CC||BB)+1)=1&&BARSLAST(DD)<BARSLAST(CC)&&BARSLAST(CC)<BARSLAST(AA),NODRAW;
DRAWTEXT(COUNT(Z1||Z2||Z3||Z4,BARSLAST(DD)+1)=0&&EXIST(DD,BARSLAST(BB))=0&&AA&&ATR1*2.5>KKCJ-C&&KKCJ-C>0&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1&&COUNT(AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(BB)))=1,H*1,'K小盈'),ALIGN1,VALIGN2,COLORYELLOW,FONTSIZE16;
DRAWTEXT(COUNT(Z1||Z2||Z3||Z4,BARSLAST(DD)+1)=0&&EXIST(DD,BARSLAST(BB))=0&&AA&&ATR1*2.5>KKCJ-C&&KKCJ-C>0&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1&&COUNT(AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(CC)))=1,H*1,'K小盈'),ALIGN1,VALIGN2,COLORYELLOW,FONTSIZE16;
DRAWTEXT(COUNT(Z1||Z2||Z3||Z4,BARSLAST(DD)+1)=0&&DD&&ATR1*2.5>KKCJ-C&&KKCJ-C>0&&COUNT(DD,BARSLAST(BB||CC)+1)=1&&BARSLAST(BB)<BARSLAST(AA),H*1,'K小盈'),ALIGN1,VALIGN2,COLORYELLOW,FONTSIZE16;
DRAWTEXT(COUNT(Z1||Z2||Z3||Z4,BARSLAST(DD)+1)=0&&DD&&ATR1*2.5>KKCJ-C&&KKCJ-C>0&&COUNT(DD,BARSLAST(AA||CC||BB)+1)=1&&BARSLAST(DD)<BARSLAST(CC)&&BARSLAST(CC)<BARSLAST(AA),H*1,'K小盈'),ALIGN1,VALIGN2,COLORYELLOW,FONTSIZE16;
COND66:=VALUEWHEN(AA||BB||CC||DD,AA||DD)&&LX&&BACKSET(VALUEWHEN(AA||BB||CC||DD,AA||DD)&&ISLASTBAR,BARSLAST(AA||DD));
COND666:=VALUEWHEN(AA||BB||CC||DD,CC||BB)&&HX&&BACKSET(VALUEWHEN(AA||BB||CC||DD,CC||BB)&&ISLASTBAR,BARSLAST(BB||CC));
COND88:=ISLASTBAR&& VALUEWHEN(AA||BB||CC||DD,AA||DD),(BARSLAST(X1)+REF(LLVBARS(L,UU1+1),BARSLAST(X1)));
COND888:=ISLASTBAR&& VALUEWHEN(AA||BB||CC||DD,BB||CC),(BARSLAST(X2)+REF(HHVBARS(L,DD1+1),BARSLAST(X1)));
DRAWSHIFTNUMBER(COND88,LL11-ATR1*4/5,LL11-MINPRICE,2,COLORYELLOW,0,2),ALIGN1,VALIGN0,COLORYELLOW,FONTSIZE20;
DRAWSHIFTNUMBER(COND888,HH11+ATR1*4/5,HH11+MINPRICE,2,COLORYELLOW,0,2),ALIGN1,VALIGN2,COLORYELLOW,FONTSIZE20;
P1:=DD&&COUNT(DD,BARSLAST(AA||CC||BB)+1)=1&&BARSLAST(DD)<BARSLAST(CC)&&BARSLAST(CC)<BARSLAST(AA)||CC&&COUNT(CC,BARSLAST(AA||DD||BB)+1)=1&&BARSLAST(CC)<BARSLAST(DD)&&BARSLAST(DD)<BARSLAST(BB)
||DD&&COUNT(DD,BARSLAST(BB||CC)+1)=1&&BARSLAST(BB)<BARSLAST(AA)||CC&&COUNT(CC,BARSLAST(AA||DD)+1)=1&&BARSLAST(AA)<BARSLAST(BB);
P2:=BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1&&COUNT(BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(AA)>BARSLAST(BB)))=1||BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1&&COUNT(BB&&COUNT(BB,BARSLAST(AA||DD||CC)+1)=1,BARSLASTCOUNT(BARSLAST(DD)>BARSLAST(BB)))=1;
P3:=AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1&&COUNT(AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(BB)))=1||AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1&&COUNT(AA&&COUNT(AA,BARSLAST(BB||CC||DD)+1)=1,BARSLASTCOUNT(BARSLAST(AA)<BARSLAST(CC)))=1;
X1A:=BARSLAST(P3)<BARSLAST(P2)&&BARSLAST(P3)<BARSLAST(P1);
X2A:=BARSLAST(P3)>BARSLAST(P2)&&BARSLAST(P2)<BARSLAST(P1);
X3A:=BARSLAST(P1)<BARSLAST(P2)&&BARSLAST(P3)>BARSLAST(P1);
DRAWCOLORKLINE(X2A&&NOT(ISDOWN),COLORGREEN,1);
DRAWCOLORKLINE(X2A&&ISDOWN,COLORGREEN,0);
DRAWCOLORKLINE(X1A&&NOT(ISDOWN),COLORRED,1);
DRAWCOLORKLINE(X1A&&ISDOWN,COLORRED,0);
DRAWCOLORKLINE(X3A&&C>=O,COLORWHITE,1);
DRAWCOLORKLINE(X3A&&C<=O,COLORWHITE,0);
DRAWLINE3(X1A,MZ1,0,1,REF(MZ1,1),1,0),LINETHICK2,COLORRED;
DRAWLINE3(X2A,MZ1,0,1,REF(MZ1,1),1,0),LINETHICK2,COLORGREEN;
DRAWLINE3(X3A,MZ1,0,1,REF(MZ1,1),1,0),LINETHICK2,COLORWHITE;