NN:=4;//5
HH.:=H>HV(H,NN);
NH:=BARSLAST(HH.)+1;
LL.:=L<LV(L,NN);
NL:=BARSLAST(LL.)+1;
AH:=BACKSET(COUNT(LL.,NH)&&LL.,NH);
AL:=BACKSET(COUNT(HH.,NL)&&HH.,NL);
DRAWNUMBER1(CROSS(AH=1,0.5),H+0.1,H,0),COLORYELLOW,ALIGN1,FONTSIZE16;
DRAWNUMBER1(CROSS(AL=1,0.5),L-0.1,L,0),COLORWHITE,ALIGN1,VALIGN0,FONTSIZE16;
//////////////////////////////////////////////////////
N:=5;//N:=4;
A1:=REF(HIGH,N)=HHV(HIGH,3*N+1);
B1:=FILTER(A1,N);
C1:=BACKSET(B1,N+1);
D1:=FILTER(C1,N);//{高点}
A2:=REF(LOW,N)=LLV(LOW,3*N+1);
B2:=FILTER(A2,N);
C2:=BACKSET(B2,N+1);
D2:=FILTER(C2,N);//{低点}
E1:=(REF(LLV(LOW,2*N),1)+REF(HHV(HIGH,2*N),1))/2;
E2:=(HIGH+LOW)/2;
H1:=(D1 AND NOT((D2 AND E1>=E2))) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
L1:=(D2 AND NOT((D1 AND E1<E2))),NODRAW;
H2:=D1 AND NOT((D2 AND E1>=E2));
X1:=REF(BARSLAST(H1),1)+1;
F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(LOW,X1)+1);//LLVBARS(IF(L1,LOW,N000),X1)+1,NODRAW;
G1:=F1>REF(F1,1);//DRAWTEXT(X1,L,'X1');
I1:=BACKSET(G1,1);//DRAWTEXT(F1,H,'F1');
LD:=I1>REF(I1,1);//{过滤后低点}
L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
X2:=REF(BARSLAST(L2),1)+1;
F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(H,X2)+1);
G2:=F2>REF(F2,1);//DRAWTEXT(HD,H*1.01,'HD');
I2:=BACKSET(G2,1);//DRAWTEXT(LD,L*0.99,'LD');
HD:=I2>REF(I2,1);//{过滤后高点}
DD1:=VALUEWHEN(LD,L);
GD1:=VALUEWHEN(HD,H);
CZ1:= ABS(GD1-REF(DD1,1));//高到低点差价;
CZ2:= ABS(DD1-REF(GD1,1));//低到高点差价;
CJ1:=50<ABS(GD1-REF(DD1,1));//高到低点差超限;
CJ2:=50<ABS(DD1-REF(GD1,1));//低到高低点差超限;
ABA:=BACKSET(ISLASTBAR,SUMBARS(HD||LD,3));
DRAWLINE1(LD&&ABA,L,HD&&ABA,H,0),LINETHICK2,COLORLIGHTGREY;//黄色折线
DRAWLINE1(HD&&ABA,H,LD&&ABA,L,0),LINETHICK2,COLORLIGHTGREY;//蓝色折线
DRAWTEXT(LD&&ABA ,L,'●'),COLORWHITE,FONTSIZE20,VALIGN1;//下面
DRAWTEXT(HD&&ABA ,H,'●'),COLORWHITE,FONTSIZE20,VALIGN1;//上面
/////////////////////////////////////////////////////////////////以下为上升回调支撑位
Q:=BARSLAST(HD)<BARSLAST(LD)&&ISLASTBAR;
P:=BACKSET(ISLASTBAR&&BARSLAST(HD)<BARSLAST(LD),BARSLAST(HD)+1);
M:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
QQ:=REFX(BARSLAST(HD)>BARSLAST(LD)&&ISLASTBAR,20);
PP:=BACKSET(ISLASTBAR&&BARSLAST(HD)>BARSLAST(LD),BARSLAST(LD)+1);
MM:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
AA:=EMA(C,5) > EMA(C,20);
BB:=EMA(C,5) < EMA(C,20);
CC:= EMA(C,5) > EMA(C,10);
CC1:=EMA(C,5) < EMA(C,10);
DD:=CLOSE<OPEN;
BBB:=BACKSET(ISLASTBAR,SUMBARS(HD||LD,3));
AAA:=BACKSET(ISLASTBAR,SUMBARS(HD||LD,1));
CCC:=BACKSET(ISLASTBAR,SUMBARS(HD||LD,2));
A:=REFX1(BARSLAST(HD)<BARSLAST(LD),0);//10000
236压:IF(NOT(A)&&AAA,REF(VALUEWHEN(LD&&BBB,L),BARSLAST(HD))+(VALUEWHEN(HD&&BBB,H)-REF(VALUEWHEN(LD&&BBB,L),BARSLAST(HD)))*0.236,NULL),PRECIS0,COLORWHITE,NODRAW;//抬头T2
382压:IF(NOT(A)&&AAA,REF(VALUEWHEN(LD&&BBB,L),BARSLAST(HD))+(VALUEWHEN(HD&&BBB,H)-REF(VALUEWHEN(LD&&BBB,L),BARSLAST(HD)))*0.382,NULL),PRECIS0,COLORGREEN,NODRAW;//抬头T2
500压:IF(NOT(A)&&AAA,REF(VALUEWHEN(LD&&BBB,L),BARSLAST(HD))+(VALUEWHEN(HD&&BBB,H)-REF(VALUEWHEN(LD&&BBB,L),BARSLAST(HD)))*0.500,NULL),PRECIS0,COLORWHITE,NODRAW;//抬头T2
618压:IF(NOT(A)&&AAA,REF(VALUEWHEN(LD&&BBB,L),BARSLAST(HD))+(VALUEWHEN(HD&&BBB,H)-REF(VALUEWHEN(LD&&BBB,L),BARSLAST(HD)))*0.618,NULL),PRECIS0,RGB(0,128,255),NODRAW;//抬头T3
691压:IF(NOT(A)&&AAA,REF(VALUEWHEN(LD&&BBB,L),BARSLAST(HD))+(VALUEWHEN(HD&&BBB,H)-REF(VALUEWHEN(LD&&BBB,L),BARSLAST(HD)))*0.691,NULL),PRECIS0,COLORMAGENTA,NODRAW;//抬头T3
764压:IF(NOT(A)&&AAA,REF(VALUEWHEN(LD&&BBB,L),BARSLAST(HD))+(VALUEWHEN(HD&&BBB,H)-REF(VALUEWHEN(LD&&BBB,L),BARSLAST(HD)))*0.764,NULL),PRECIS0,RGB(255,128,0),NODRAW;//抬头T4
卖压:IF(NOT(A)&&AAA,VALUEWHEN(HD&&BBB,H),NULL),PRECIS0,COLORRED,NODRAW;//抬头T5
买压:IF(NOT(A)&&AAA,REF(VALUEWHEN(LD&&BBB,L),BARSLAST(HD)),NULL),PRECIS0,COLORGREEN,NODRAW;//抬头T1
236支:IF(A&&AAA,REF(VALUEWHEN(HD&&BBB,H),BARSLAST(LD))-(REF(VALUEWHEN(HD&&BBB,H),BARSLAST(LD))-VALUEWHEN(LD&&BBB,L))*0.236,NULL),PRECIS0,COLORRED,NODRAW;
382支:IF(A&&AAA,REF(VALUEWHEN(HD&&BBB,H),BARSLAST(LD))-(REF(VALUEWHEN(HD&&BBB,H),BARSLAST(LD))-VALUEWHEN(LD&&BBB,L))*0.382,NULL),PRECIS0,COLORGREEN,NODRAW;
500支:IF(A&&AAA,REF(VALUEWHEN(HD&&BBB,H),BARSLAST(LD))-(REF(VALUEWHEN(HD&&BBB,H),BARSLAST(LD))-VALUEWHEN(LD&&BBB,L))*0.500,NULL),PRECIS0,COLORWHITE,NODRAW;
618支:IF(A&&AAA,REF(VALUEWHEN(HD&&BBB,H),BARSLAST(LD))-(REF(VALUEWHEN(HD&&BBB,H),BARSLAST(LD))-VALUEWHEN(LD&&BBB,L))*0.618,NULL),PRECIS0,RGB(0,128,255),NODRAW;
691支:IF(A&&AAA,REF(VALUEWHEN(HD&&BBB,H),BARSLAST(LD))-(REF(VALUEWHEN(HD&&BBB,H),BARSLAST(LD))-VALUEWHEN(LD&&BBB,L))*0.691,NULL),PRECIS0,COLORMAGENTA,NODRAW;
764支:IF(A&&AAA,REF(VALUEWHEN(HD&&BBB,H),BARSLAST(LD))-(REF(VALUEWHEN(HD&&BBB,H),BARSLAST(LD))-VALUEWHEN(LD&&BBB,L))*0.764,NULL),PRECIS0,RGB(255,128,0),NODRAW;
卖点:IF(A&&AAA,REF(VALUEWHEN(HD&&BBB,H),BARSLAST(LD)),NULL),PRECIS0,COLORGREEN,NODRAW;
买点:IF(A&&AAA,VALUEWHEN(LD&&BBB,L),NULL),PRECIS0,COLORRED,NODRAW;
DRAWNUMBER(REFX(Q,20),REFX1(236支,10000),REFX1(236支-C,10000),0,COLORYELLOW),ALIGN0,VALIGN1,FONTSIZE30;//000
DRAWNUMBER(REFX(Q,20),REFX1(382支,10000),REFX1(382支-C,10000),0,COLORGREEN),ALIGN0,VALIGN1,FONTSIZE30;//500
DRAWNUMBER(REFX(Q,20),REFX1(500支,10000),REFX1(500支-C,10000),0,COLORWHITE ),ALIGN0,VALIGN1,FONTSIZE30;//500
DRAWNUMBER(REFX(Q,20),REFX1(618支,10000),REFX1(618支-C,10000),0,RGB(0,128,255)),ALIGN0,VALIGN1,FONTSIZE30;//500
DRAWNUMBER(REFX(Q,20),REFX1(691支,10000),REFX1(691支-C,10000),0,COLORMAGENTA),ALIGN0,VALIGN1,FONTSIZE30;//618
DRAWNUMBER(REFX(Q,20),REFX1(764支,10000),REFX1(764支-C,10000),0,RGB(255,128,0)),ALIGN0,VALIGN1,FONTSIZE30;//691
DRAWNUMBER(REFX(Q,20),REFX1(卖点,10000),REFX1(卖点-C,10000),0,COLORGREEN),ALIGN0,VALIGN1,FONTSIZE30;//764
DRAWNUMBER(REFX(Q,20),REFX1(买点,10000),REFX1(买点-C,10000),0,COLORRED),ALIGN0,VALIGN1,FONTSIZE30;//100
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////以下为下降反弹压力位
DRAWNUMBER(QQ,REFX1(236压,10000),REFX1(C-236压,10000),0,COLORYELLOW),ALIGN0,VALIGN1,FONTSIZE30;//000
DRAWNUMBER(QQ,REFX1(382压,10000),REFX1(C-382压,10000),0,COLORGREEN),ALIGN0,VALIGN1,FONTSIZE30;//500
DRAWNUMBER(QQ,REFX1(500压,10000),REFX1(C-500压,10000),0,COLORWHITE ),ALIGN0,VALIGN1,FONTSIZE30;//500
DRAWNUMBER(QQ,REFX1(618压,10000),REFX1(C-618压,10000),0,RGB(0,128,255)),ALIGN0,VALIGN1,FONTSIZE30;//500
DRAWNUMBER(QQ,REFX1(691压,10000),REFX1(C-691压,10000),0,COLORMAGENTA),ALIGN0,VALIGN1,FONTSIZE30;//618
DRAWNUMBER(QQ,REFX1(764压,10000),REFX1(C-764压,10000),0,RGB(255,128,0)),ALIGN0,VALIGN1,FONTSIZE30;//691
DRAWNUMBER(QQ,REFX1(卖压,10000),REFX1(C-卖压,10000),0,COLORGREEN),ALIGN0,VALIGN1,FONTSIZE30;//764
DRAWNUMBER(QQ,REFX1(买压,10000),REFX1(C-买压,10000),0,COLORRED),ALIGN0,VALIGN1,FONTSIZE30;//100
买卖差值.:=卖点-买点,COLORMAGENTA,NODRAW,PRECIS0;
DRAWNUMBER(REFX(ISLASTBAR,25),REFX(卖点,25),REFX(卖点,25),0,COLORGREEN),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//上升
DRAWNUMBER(REFX(ISLASTBAR,25),REFX(236支,25),REFX(236支,25),0,COLORYELLOW),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//上升
DRAWNUMBER(REFX(ISLASTBAR,25),REFX(382支,25),REFX(382支,25),0,COLORGREEN),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//上升
DRAWNUMBER(REFX(ISLASTBAR,25),REFX(500支,25),REFX(500支,25),0,COLORWHITE),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//上升
DRAWNUMBER(REFX(ISLASTBAR,25),REFX(618支,25),REFX(618支,25),0,RGB(0,128,255)),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//上升
DRAWNUMBER(REFX(ISLASTBAR,25),REFX(691支,25),REFX(691支,25),0,COLORMAGENTA),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//上升
DRAWNUMBER(REFX(ISLASTBAR,25),REFX(764支,25),REFX(764支,25),0,RGB(255,128,0)),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//上升
DRAWNUMBER(REFX(ISLASTBAR,25),REFX(买点,25),REFX(买点,25),0,COLORRED),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//上升
DRAWTEXT(REFX(ISLASTBAR,25),REFX(卖点,25),' 卖支'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE27;//文字左边//T4//61.8 %
DRAWTEXT(REFX(ISLASTBAR,25),REFX(236支,25),' 236'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T3//50 %
DRAWTEXT(REFX(ISLASTBAR,25),REFX(382支,25),' 382'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T2//38.2 %
DRAWTEXT(REFX(ISLASTBAR,25),REFX(500支,25),' 500'),COLORMAGENTA,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T2//38.2 %
DRAWTEXT(REFX(ISLASTBAR,25),REFX(618支,25),' 618'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T1//0 %,FONTSIZE16
DRAWTEXT(REFX(ISLASTBAR,25),REFX(691支,25),' 691'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T5//100 %
DRAWTEXT(REFX(ISLASTBAR,25),REFX(764支,25),' 764'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T1//0 %,FONTSIZE16
DRAWTEXT(REFX(ISLASTBAR,25),REFX(买点,25),' 买支'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE27;//文字左边//T5//100 %
买卖差值:=卖压-买压,COLORMAGENTA,NODRAW,PRECIS0;
DRAWNUMBER(REFX(ISLASTBAR,25),REFX(卖压,25),REFX(卖压,25),0,COLORGREEN),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//
DRAWNUMBER(REFX(ISLASTBAR,25),REFX(236压,25),REFX(236压,25),0,COLORYELLOW),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//
DRAWNUMBER(REFX(ISLASTBAR,25),REFX(382压,25),REFX(382压,25),0,COLORLIGHTGREEN),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//
DRAWNUMBER(REFX(ISLASTBAR,25),REFX(500压,25),REFX(500压,25),0,COLORWHITE),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//
DRAWNUMBER(REFX(ISLASTBAR,25),REFX(618压,25),REFX(618压,25),0,RGB(0,128,255)),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//
DRAWNUMBER(REFX(ISLASTBAR,25),REFX(691压,25),REFX(691压,25),0,COLORMAGENTA),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//
DRAWNUMBER(REFX(ISLASTBAR,25),REFX(764压,25),REFX(764压,25),0,RGB(255,128,0)),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//
DRAWNUMBER(REFX(ISLASTBAR,25),REFX(买压,25),REFX(买压,25),0,COLORRED),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//
DRAWTEXT(REFX(ISLASTBAR,25),REFX(卖压,25),' 卖压'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE27;//文字左边//T4//61.8 %
DRAWTEXT(REFX(ISLASTBAR,25),REFX(236压,25),' 236'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T3//50 %
DRAWTEXT(REFX(ISLASTBAR,25),REFX(382压,25),' 382'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T2//38.2 %
DRAWTEXT(REFX(ISLASTBAR,25),REFX(500压,25),' 500'),COLORMAGENTA,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T2//38.2 %
DRAWTEXT(REFX(ISLASTBAR,25),REFX(618压,25),' 618'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T1//0 %,FONTSIZE16
DRAWTEXT(REFX(ISLASTBAR,25),REFX(691压,25),' 691'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T5//100 %
DRAWTEXT(REFX(ISLASTBAR,25),REFX(764压,25),' 764'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T1//0 %,FONTSIZE16
DRAWTEXT(REFX(ISLASTBAR,25),REFX(买压,25),' 买压'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE27;//文字左边//T5//100 %
MA5:MA(CLOSE,8);
MA10:MA(CLOSE,89);
MA20:MA(CLOSE,144);
N1:=0;
T:=150;
TT:=3;
N:=0;
CURRBARSCOUNT:=REFX1(BARPOS,10000)-BARPOS+1;
高:=REF(HHV(H,T),TT);
低:=REF(LLV(L,T),TT);
H1:=高-(高-低)*0.191;
H2:=高-(高-低)*0.382;
H3:=高-(高-低)*0.5;
H4:=高-(高-低)*0.618;
H5:=高-(高-低)*0.809;
H6:=高-(高-低)*1.272;
H7:=高-(高-低)*1.618;
顶:REFX1(高,10000),COLORFFFF00;
一:REFX1(H1,10000),DOT,COLORYELLOW;
二:REFX1(H2,10000),DOT,COLORMAGENTA;
三:REFX1(H3,10000),COLOR00FFFF;
四:REFX1(H4,10000),DOT,COLORMAGENTA;
五:REFX1(H5,10000),DOT,COLORYELLOW;
六:REFX1(H6,10000),DOT,COLORMAGENTA;
七:REFX1(H7,10000),DOT,COLORYELLOW;
底:REFX1(低,10000),COLOR00FF00;
TT3:=(CURRBARSCOUNT=5);
TT4:=(CURRBARSCOUNT=5+3);
DRAWNUMBER1(TT3 AND 1,顶,顶,2),COLOR999900,ALIGN0;
DRAWTEXT(TT4 AND 1,顶,'高'),COLOR208FFF;
DRAWNUMBER1(TT3 AND 1,一,一,2),COLOR999999,ALIGN0;
DRAWTEXT(TT4 AND 1,一,'191'),COLOR208FFF;
DRAWNUMBER1(TT3 AND 1,二,二,2),COLOR999999,ALIGN0;
DRAWTEXT(TT4 AND 1,二,'382'),COLOR208FFF;
DRAWNUMBER1(TT3 AND 1,三,三,2),COLOR999999,ALIGN0;
DRAWTEXT(TT4 AND 1,三,'1/2'),COLOR208FFF;
DRAWNUMBER1(TT3 AND 1,四,四,2),COLOR999999,ALIGN0;
DRAWTEXT(TT4 AND 1,四,'618'),COLOR208FFF;
DRAWNUMBER1(TT3 AND 1,五,五,2),COLOR999999,ALIGN0;
DRAWTEXT(TT4 AND 1,五,'809'),COLOR208FFF;
DRAWNUMBER1(TT3 AND 1,六,六,2),COLOR999999,ALIGN0;
DRAWTEXT(TT4 AND 1,六,'1.272'),COLOR208FFF;
DRAWNUMBER1(TT3 AND 1,七,七,2),COLOR999999,ALIGN0;
DRAWTEXT(TT4 AND 1,七,'1.618'),COLOR208FFF;
DRAWNUMBER1(TT3 AND 1,底,底,3),COLOR999900,ALIGN0;
DRAWTEXT(TT4 AND 1,底,'低'),COLOR208FFF;
NN:=4;//5
HH.:=H>HV(H,NN);
NH:=BARSLAST(HH.)+1;
LL.:=L<LV(L,NN);
NL:=BARSLAST(LL.)+1;
AH:=BACKSET(COUNT(LL.,NH)&&LL.,NH);
AL:=BACKSET(COUNT(HH.,NL)&&HH.,NL);
DRAWNUMBER1(CROSS(AH=1,0.5),H+0.1,H,0),COLORYELLOW,ALIGN1,FONTSIZE16;
DRAWNUMBER1(CROSS(AL=1,0.5),L-0.1,L,0),COLORWHITE,ALIGN1,VALIGN0,FONTSIZE16;
//////////////////////////////////////////////////////
N:=5;//N:=4;
A1:=REF(HIGH,N)=HHV(HIGH,3*N+1);
B1:=FILTER(A1,N);
C1:=BACKSET(B1,N+1);
D1:=FILTER(C1,N);//{高点}
A2:=REF(LOW,N)=LLV(LOW,3*N+1);
B2:=FILTER(A2,N);
C2:=BACKSET(B2,N+1);
D2:=FILTER(C2,N);//{低点}
E1:=(REF(LLV(LOW,2*N),1)+REF(HHV(HIGH,2*N),1))/2;
E2:=(HIGH+LOW)/2;
H1:=(D1 AND NOT((D2 AND E1>=E2))) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
L1:=(D2 AND NOT((D1 AND E1<E2))),NODRAW;
H2:=D1 AND NOT((D2 AND E1>=E2));
X1:=REF(BARSLAST(H1),1)+1;
F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(LOW,X1)+1);//LLVBARS(IF(L1,LOW,N000),X1)+1,NODRAW;
G1:=F1>REF(F1,1);//DRAWTEXT(X1,L,'X1');
I1:=BACKSET(G1,1);//DRAWTEXT(F1,H,'F1');
LD:=I1>REF(I1,1);//{过滤后低点}
L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
X2:=REF(BARSLAST(L2),1)+1;
F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(H,X2)+1);
G2:=F2>REF(F2,1);//DRAWTEXT(HD,H*1.01,'HD');
I2:=BACKSET(G2,1);//DRAWTEXT(LD,L*0.99,'LD');
HD:=I2>REF(I2,1);//{过滤后高点}
DD1:=VALUEWHEN(LD,L);
GD1:=VALUEWHEN(HD,H);
CZ1:= ABS(GD1-REF(DD1,1));//高到低点差价;
CZ2:= ABS(DD1-REF(GD1,1));//低到高点差价;
CJ1:=50<ABS(GD1-REF(DD1,1));//高到低点差超限;
CJ2:=50<ABS(DD1-REF(GD1,1));//低到高低点差超限;
ABA:=BACKSET(ISLASTBAR,SUMBARS(HD||LD,3));
DRAWLINE1(LD&&ABA,L,HD&&ABA,H,0),LINETHICK2,COLORLIGHTGREY;//黄色折线
DRAWLINE1(HD&&ABA,H,LD&&ABA,L,0),LINETHICK2,COLORLIGHTGREY;//蓝色折线
DRAWTEXT(LD&&ABA ,L,'●'),COLORWHITE,FONTSIZE20,VALIGN1;//下面
DRAWTEXT(HD&&ABA ,H,'●'),COLORWHITE,FONTSIZE20,VALIGN1;//上面
/////////////////////////////////////////////////////////////////以下为上升回调支撑位
Q:=BARSLAST(HD)<BARSLAST(LD)&&ISLASTBAR;
P:=BACKSET(ISLASTBAR&&BARSLAST(HD)<BARSLAST(LD),BARSLAST(HD)+1);
M:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
QQ:=REFX(BARSLAST(HD)>BARSLAST(LD)&&ISLASTBAR,20);
PP:=BACKSET(ISLASTBAR&&BARSLAST(HD)>BARSLAST(LD),BARSLAST(LD)+1);
MM:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
AA:=EMA(C,5) > EMA(C,20);
BB:=EMA(C,5) < EMA(C,20);
CC:= EMA(C,5) > EMA(C,10);
CC1:=EMA(C,5) < EMA(C,10);
DD:=CLOSE<OPEN;
BBB:=1;
AAA:=1;
CCC:=1;
A:=REFX1(BARSLAST(HD)<BARSLAST(LD),0);//10000
236支:IF(A&&AAA,VALUEWHEN(HD&&BBB,H)-(VALUEWHEN(HD&&BBB,H)-VALUEWHEN(LD&&BBB,L))*0.236,NULL),PRECIS0,COLORRED,NODRAW;
382支:IF(A&&AAA,VALUEWHEN(HD&&BBB,H)-(VALUEWHEN(HD&&BBB,H)-VALUEWHEN(LD&&BBB,L))*0.382,NULL),PRECIS0,COLORGREEN,NODRAW;
500支:IF(A&&AAA,VALUEWHEN(HD&&BBB,H)-(VALUEWHEN(HD&&BBB,H)-VALUEWHEN(LD&&BBB,L))*0.500,NULL),PRECIS0,COLORWHITE,NODRAW;
618支:IF(A&&AAA,VALUEWHEN(HD&&BBB,H)-(VALUEWHEN(HD&&BBB,H)-VALUEWHEN(LD&&BBB,L))*0.618,NULL),PRECIS0,RGB(0,128,255),NODRAW;
691支:IF(A&&AAA,VALUEWHEN(HD&&BBB,H)-(VALUEWHEN(HD&&BBB,H)-VALUEWHEN(LD&&BBB,L))*0.691,NULL),PRECIS0,COLORMAGENTA,NODRAW;
764支:IF(A&&AAA,VALUEWHEN(HD&&BBB,H)-(VALUEWHEN(HD&&BBB,H)-VALUEWHEN(LD&&BBB,L))*0.764,NULL),PRECIS0,RGB(255,128,0),NODRAW;
卖点:IF(A&&AAA,VALUEWHEN(HD&&BBB,H),NULL),PRECIS0,COLORGREEN,NODRAW;
买点:IF(A&&AAA,VALUEWHEN(LD&&BBB,L),NULL),PRECIS0,COLORRED,NODRAW;
买卖差值.:=卖点-买点,COLORMAGENTA,NODRAW,PRECIS0;
K1:=BACKSET(ISLASTBAR,SUMBARS(HD||LD,1)+1);
CC:=REFX1(C,10000);
DRAWNUMBER(REFX(K1>REF(K1,1),20),REFX(卖点,20),REFX(卖点,20)-CC,0,COLORGREEN),ALIGN0,VALIGN1,FONTSIZE30;//000
DRAWNUMBER(REFX(K1>REF(K1,1),20),REFX(236支,20),REFX(236支,20)-CC,0,COLORYELLOW),ALIGN0,VALIGN1,FONTSIZE30;//500
DRAWNUMBER(REFX(K1>REF(K1,1),20),REFX(382支,20),REFX(382支,20)-CC,0,COLORGREEN),ALIGN0,VALIGN1,FONTSIZE30;//500
DRAWNUMBER(REFX(K1>REF(K1,1),20),REFX(500支,20),REFX(500支,20)-CC,0,COLORWHITE),ALIGN0,VALIGN1,FONTSIZE30;//500
DRAWNUMBER(REFX(K1>REF(K1,1),20),REFX(618支,20),REFX(618支,20)-CC,0,RGB(0,128,255)),ALIGN0,VALIGN1,FONTSIZE30;//618
DRAWNUMBER(REFX(K1>REF(K1,1),20),REFX(691支,20),REFX(691支,20)-CC,0,COLORMAGENTA),ALIGN0,VALIGN1,FONTSIZE30;//691
DRAWNUMBER(REFX(K1>REF(K1,1),20),REFX(764支,20),REFX(764支,20)-CC,0,RGB(255,128,0)),ALIGN0,VALIGN1,FONTSIZE30;//764
DRAWNUMBER(REFX(K1>REF(K1,1),20),REFX(买点,20),REFX(买点,20)-CC,0,COLORRED),ALIGN0,VALIGN1,FONTSIZE30;//100
DRAWNUMBER(REFX(K1>REF(K1,1),25),REFX(卖点,25),REFX(卖点,25),0,COLORGREEN),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//上升
DRAWNUMBER(REFX(K1>REF(K1,1),25),REFX(236支,25),REFX(236支,25),0,COLORYELLOW),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//上升
DRAWNUMBER(REFX(K1>REF(K1,1),25),REFX(382支,25),REFX(382支,25),0,COLORGREEN),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//上升
DRAWNUMBER(REFX(K1>REF(K1,1),25),REFX(500支,25),REFX(500支,25),0,COLORWHITE),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//上升
DRAWNUMBER(REFX(K1>REF(K1,1),25),REFX(618支,25),REFX(618支,25),0,RGB(0,128,255)),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//上升
DRAWNUMBER(REFX(K1>REF(K1,1),25),REFX(691支,25),REFX(691支,25),0,COLORMAGENTA),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//上升
DRAWNUMBER(REFX(K1>REF(K1,1),25),REFX(764支,25),REFX(764支,25),0,RGB(255,128,0)),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//上升
DRAWNUMBER(REFX(K1>REF(K1,1),25),REFX(买点,25),REFX(买点,25),0,COLORRED),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//上升
DRAWTEXT(REFX(K1>REF(K1,1),25),REFX(卖点,25),' 卖支'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE27;//文字左边//T4//61.8 %
DRAWTEXT(REFX(K1>REF(K1,1),25),REFX(236支,25),' 236'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T3//50 %
DRAWTEXT(REFX(K1>REF(K1,1),25),REFX(382支,25),' 382'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T2//38.2 %
DRAWTEXT(REFX(K1>REF(K1,1),25),REFX(500支,25),' 500'),COLORMAGENTA,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T2//38.2 %
DRAWTEXT(REFX(K1>REF(K1,1),25),REFX(618支,25),' 618'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T1//0 %,FONTSIZE16
DRAWTEXT(REFX(K1>REF(K1,1),25),REFX(691支,25),' 691'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T5//100 %
DRAWTEXT(REFX(K1>REF(K1,1),25),REFX(764支,25),' 764'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T1//0 %,FONTSIZE16
DRAWTEXT(REFX(K1>REF(K1,1),25),REFX(买点,25),' 买支'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE27;//文字左边//T5//100 %
236压:IF(NOT(A)&&AAA,VALUEWHEN(LD&&BBB,L)+(VALUEWHEN(HD&&BBB,H)-VALUEWHEN(LD&&BBB,L))*0.236,NULL),PRECIS0,COLORWHITE,NODRAW;//抬头T2
382压:IF(NOT(A)&&AAA,VALUEWHEN(LD&&BBB,L)+(VALUEWHEN(HD&&BBB,H)-VALUEWHEN(LD&&BBB,L))*0.382,NULL),PRECIS0,COLORGREEN,NODRAW;//抬头T2
500压:IF(NOT(A)&&AAA,VALUEWHEN(LD&&BBB,L)+(VALUEWHEN(HD&&BBB,H)-VALUEWHEN(LD&&BBB,L))*0.500,NULL),PRECIS0,COLORWHITE,NODRAW;//抬头T2
618压:IF(NOT(A)&&AAA,VALUEWHEN(LD&&BBB,L)+(VALUEWHEN(HD&&BBB,H)-VALUEWHEN(LD&&BBB,L))*0.618,NULL),PRECIS0,RGB(0,128,255),NODRAW;//抬头T3
691压:IF(NOT(A)&&AAA,VALUEWHEN(LD&&BBB,L)+(VALUEWHEN(HD&&BBB,H)-VALUEWHEN(LD&&BBB,L))*0.691,NULL),PRECIS0,COLORMAGENTA,NODRAW;//抬头T3
764压:IF(NOT(A)&&AAA,VALUEWHEN(LD&&BBB,L)+(VALUEWHEN(HD&&BBB,H)-VALUEWHEN(LD&&BBB,L))*0.764,NULL),PRECIS0,RGB(255,128,0),NODRAW;//抬头T4
卖压:IF(NOT(A)&&AAA,VALUEWHEN(HD&&BBB,H),NULL),PRECIS0,COLORRED,NODRAW;//抬头T5
买压:IF(NOT(A)&&AAA,VALUEWHEN(LD&&BBB,L),NULL),PRECIS0,COLORGREEN,NODRAW;//抬头T1
买卖差值:=卖压-买压,COLORMAGENTA,NODRAW,PRECIS0;
DRAWNUMBER(REFX(K1>REF(K1,1),20),REFX(卖压,20),REFX(卖压,20)-CC,0,COLORGREEN),ALIGN0,VALIGN1,FONTSIZE30;//000
DRAWNUMBER(REFX(K1>REF(K1,1),20),REFX(236压,20),REFX(236压,20)-CC,0,COLORYELLOW),ALIGN0,VALIGN1,FONTSIZE30;//500
DRAWNUMBER(REFX(K1>REF(K1,1),20),REFX(382压,20),REFX(382压,20)-CC,0,COLORGREEN),ALIGN0,VALIGN1,FONTSIZE30;//500
DRAWNUMBER(REFX(K1>REF(K1,1),20),REFX(500压,20),REFX(500压,20)-CC,0,COLORWHITE),ALIGN0,VALIGN1,FONTSIZE30;//500
DRAWNUMBER(REFX(K1>REF(K1,1),20),REFX(618压,20),REFX(618压,20)-CC,0,RGB(0,128,255)),ALIGN0,VALIGN1,FONTSIZE30;//618
DRAWNUMBER(REFX(K1>REF(K1,1),20),REFX(691压,20),REFX(691压,20)-CC,0,COLORMAGENTA),ALIGN0,VALIGN1,FONTSIZE30;//691
DRAWNUMBER(REFX(K1>REF(K1,1),20),REFX(764压,20),REFX(764压,20)-CC,0,RGB(255,128,0)),ALIGN0,VALIGN1,FONTSIZE30;//764
DRAWNUMBER(REFX(K1>REF(K1,1),20),REFX(买压,20),REFX(买压,20)-CC,0,COLORRED),ALIGN0,VALIGN1,FONTSIZE30;//100
DRAWNUMBER(REFX(K1>REF(K1,1),25),REFX(卖压,25),REFX(卖压,25),0,COLORGREEN),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//
DRAWNUMBER(REFX(K1>REF(K1,1),25),REFX(236压,25),REFX(236压,25),0,COLORYELLOW),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//
DRAWNUMBER(REFX(K1>REF(K1,1),25),REFX(382压,25),REFX(382压,25),0,COLORLIGHTGREEN),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//
DRAWNUMBER(REFX(K1>REF(K1,1),25),REFX(500压,25),REFX(500压,25),0,COLORWHITE),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//
DRAWNUMBER(REFX(K1>REF(K1,1),25),REFX(618压,25),REFX(618压,25),0,RGB(0,128,255)),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//
DRAWNUMBER(REFX(K1>REF(K1,1),25),REFX(691压,25),REFX(691压,25),0,COLORMAGENTA),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//
DRAWNUMBER(REFX(K1>REF(K1,1),25),REFX(764压,25),REFX(764压,25),0,RGB(255,128,0)),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//
DRAWNUMBER(REFX(K1>REF(K1,1),25),REFX(买压,25),REFX(买压,25),0,COLORRED),ALIGN2,VALIGN1,FONTSIZE30;//左边价格//
DRAWTEXT(REFX(K1>REF(K1,1),25),REFX(卖压,25),' 卖压'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE27;//文字左边//T4//61.8 %
DRAWTEXT(REFX(K1>REF(K1,1),25),REFX(236压,25),' 236'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T3//50 %
DRAWTEXT(REFX(K1>REF(K1,1),25),REFX(382压,25),' 382'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T2//38.2 %
DRAWTEXT(REFX(K1>REF(K1,1),25),REFX(500压,25),' 500'),COLORMAGENTA,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T2//38.2 %
DRAWTEXT(REFX(K1>REF(K1,1),25),REFX(618压,25),' 618'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T1//0 %,FONTSIZE16
DRAWTEXT(REFX(K1>REF(K1,1),25),REFX(691压,25),' 691'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T5//100 %
DRAWTEXT(REFX(K1>REF(K1,1),25),REFX(764压,25),' 764'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE30;//文字左边//T1//0 %,FONTSIZE16
DRAWTEXT(REFX(K1>REF(K1,1),25),REFX(买压,25),' 买压'),COLORWHITE,ALIGN0,VALIGN1,FONTSIZE27;//文字左边//T5//100 %
HH:=HHV(H,30);
LL:=LLV(L,30);
DRAWSL(ISLASTBAR,HH,0,1,0,COLORRED),DOT;
DRAWSL(ISLASTBAR,LL,0,1,0,COLORGREEN),DOT;
DRAWSL(ISLASTBAR,LL+(HH-LL)*0.191,0,1,0,COLORYELLOW);
DRAWSL(ISLASTBAR,LL+(HH-LL)*0.382,0,1,0,COLORBLUE);
DRAWSL(ISLASTBAR,LL+(HH-LL)*0.5,0,1,0,COLORWHITE);
DRAWSL(ISLASTBAR,LL+(HH-LL)*0.618,0,1,0,COLORMAGENTA);
DRAWSL(ISLASTBAR,LL+(HH-LL)*0.809,0,1,0,COLORGRAY);
DRAWSL(ISLASTBAR,HH,0,-1,0,COLORRED),DOT;
DRAWSL(ISLASTBAR,LL,0,-1,0,COLORGREEN),DOT;
DRAWSL(ISLASTBAR,LL+(HH-LL)*0.191,0,-1,0,COLORYELLOW);
DRAWSL(ISLASTBAR,LL+(HH-LL)*0.382,0,-1,0,COLORBLUE);
DRAWSL(ISLASTBAR,LL+(HH-LL)*0.5,0,-1,0,COLORWHITE);
DRAWSL(ISLASTBAR,LL+(HH-LL)*0.618,0,-1,0,COLORMAGENTA);
DRAWSL(ISLASTBAR,LL+(HH-LL)*0.809,0,-1,0,COLORGRAY);
COND1:=H>LL+(HH-LL)*0.191&&L<LL+(HH-LL)*0.191;
COND2:=H>LL+(HH-LL)*0.382&&L<LL+(HH-LL)*0.382;
COND3:=H>LL+(HH-LL)*0.5&&L<LL+(HH-LL)*0.5;
COND4:=H>LL+(HH-LL)*0.618&&L<LL+(HH-LL)*0.618;
COND5:=H>LL+(HH-LL)*0.809&&L<LL+(HH-LL)*0.809;
DRAWCOLORKLINE(ISLASTBAR&&COND1,COLORYELLOW,0);
DRAWCOLORKLINE(ISLASTBAR&&COND2,COLORBLUE,0);
DRAWCOLORKLINE(ISLASTBAR&&COND3,COLORWHITE,0);
DRAWCOLORKLINE(ISLASTBAR&&COND4,COLORMAGENTA,0);
DRAWCOLORKLINE(ISLASTBAR&&COND5,COLORGRAY,0);
DRAWTEXT(TT4 AND 1,底,'低'),COLOR208FFF;
{切线趋势}
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2,COLORSTICK;
VAR1:=CLOSE-LOW;
VAR2:=HIGH-LOW;
VAR3:=CLOSE-HIGH;
VAR4:=IF(HIGH>LOW,(VAR1/VAR2+VAR3/VAR2)*VOL,0);
HPTP:=SUM(VAR4,10)/10000,COLORSTICK;
TKXL:=(DIF-DEA)*2;
XVYO:=TKXL>REF(TKXL,1);
G:=MA(C,5);
D:=MA(C,10);
HH:=REF(H,5)=HHV(H,11);
LL:=REF(L,5)=LLV(L,11);
FG01:=BACKSET(HH,6)>BACKSET(HH,5);
FD01:=BACKSET(LL,6)>BACKSET(LL,5);
FG02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND G>D,FG01,IF(BARSLAST(FD01)>BARSLAST(FG01),FG01,0));
FD02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND D>G,FD01,IF(BARSLAST(FG01)>BARSLAST(FD01),FD01,0));
FG0:=FG02 AND H=HHV(H,BARSLAST(FD02));
FD0:=FD02 AND L=LLV(L,BARSLAST(FG02));
GQ:=L>REF(H,1) AND DAY<>REF(DAY,1);
DQ:=H<REF(L,1) AND DAY<>REF(DAY,1);
FGH:=REF(H,BARSLAST(FG0));
FGL:=REF(L,BARSLAST(FG0));
FGH1:=REF(H,BARSLAST(FG0)+1);
FGL1:=REF(L,BARSLAST(FG0)+1);
FGL2:=REF(L,BARSLAST(FG0)+2);
FDH2:=REF(H,BARSLAST(FD0)+2);
FDH:=REF(H,BARSLAST(FD0));
FDL:=REF(L,BARSLAST(FD0));
FDH1:=REF(H,BARSLAST(FD0)+1);
FDL1:=REF(L,BARSLAST(FD0)+1);
FGZL:=IF(FGH1<FGL,FGL,IF(FGL<=FGL1,FGL2,FGL1));
FDZH:=IF(FDL1>FDH,FDH,IF(FDH>=FDH1,FDH2,FDH1));
FG1:=FGH>FDZH AND FG0;
FD1:=FDL<FGZL AND FD0;
FG:=FG1 AND FGH>FDH AND FGL>FDL AND FGL1>FDL;
FD:=FD1 AND FDL<FGL AND FDH<FGH AND FDH1<FGH;
BH0:=(H<=REF(H,1) AND L>=REF(L,1)) OR (H>=REF(H,1) AND L<=REF(L,1));
BHG:=COUNT(BH0,IF(BARSLAST(FD0)=0,1,BARSLAST(FD0)));
BHD:=COUNT(BH0,IF(BARSLAST(FD0)=0,1,BARSLAST(FD0)));
BGQ:=COUNT(GQ,IF(BARSLAST(FD0)=0,1,BARSLAST(FD0)));
BDQ:=COUNT(DQ,IF(BARSLAST(FD0)=0,1,BARSLAST(FD0)));
BK0:=IF(BHG>0,BHG+2,IF(BHD,BHD+2,3));
BK1:=IF(BGQ,BK0-BGQ,IF(BDQ,BK0-BDQ,BK0));
G1X:=(FG AND BARSLAST(FD)>BK1);
D1X:=(FD AND BARSLAST(FG)>BK1);
G1:=(FG0 AND REF(H,BARSLAST(FG0))>=REF(H,BARSLAST(G1X)) AND BARSLAST(D1X)>BARSLAST(G1X)) OR (FG1 AND COUNT(GQ,BARSLAST(FD1))>0 AND REF(H,BARSLAST(FG1))>REF(H,BARSLAST(G1X)));
D1:=(FD0 AND REF(L,BARSLAST(FD0))<=REF(L,BARSLAST(D1X)) AND BARSLAST(G1X)>BARSLAST(D1X)) OR (FD1 AND COUNT(DQ,BARSLAST(FG1))>0 AND REF(L,BARSLAST(FD1))<REF(H,BARSLAST(D1X)));
G1H:=IF(BARSLAST(D1)>BARSLAST(G1),REF(H,BARSLAST(G1)),REF(H,BARSLAST(D1)));
D1L:=IF(BARSLAST(G1)>BARSLAST(D1),REF(L,BARSLAST(D1)),REF(L,BARSLAST(G1)));
G2:=G1 AND H=HHV(G1H,BARSLAST(D1)+1) AND H>REF(H,1) AND BARSLAST(D1)>BARSLAST(G1);
D2:=D1 AND L=LLV(D1L,BARSLAST(G1)+1) AND L<REF(L,1) AND BARSLAST(G1)>BARSLAST(D1);
NN:=G2 OR (FG0 AND REF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2));
UU:=D2 OR (FD0 AND REF(L,BARSLAST(FD0))<REF(L,BARSLAST(D2)) AND BARSLAST(G2)>BARSLAST(D2));
L1:=CROSS(BACKSET(NN,BARSLAST(UU)+1),0.5),NODRAW;
H1:=CROSS(BACKSET(UU,BARSLAST(NN)+1),0.5),NODRAW;
DRAWLINE1(L1,L,H1,H,0),COLORYELLOW,DOT;
DRAWLINE1(H1,H,L1,L,0),COLORWHITE,DOT;
HH1:=VALUEWHEN(H1,H),NODRAW;
HH2:=VALUEWHEN(H1,REF(HH1,1)),NODRAW;
HN1:=IF(HH2>HH1,2,1),NODRAW;
DRAWLINE1(CROSS(BACKSET(ISLASTBAR,SUMBARS(H1,HN1)),0.5),H,CROSS(BACKSET(ISLASTBAR,SUMBARS(H1,1)),0.5),H,1),LINETHICK1,COLORGREEN;
LL1:=VALUEWHEN(L1,L),NODRAW;
LL2:=VALUEWHEN(L1,REF(LL1,1)),NODRAW;
LN1:=IF(LL2<LL1,2,1),NODRAW;
DRAWLINE1(CROSS(BACKSET(ISLASTBAR,SUMBARS(L1,LN1)),0.5),L,CROSS(BACKSET(ISLASTBAR,SUMBARS(L1,1)),0.5),L,1),LINETHICK1,COLORRED;
/*
当前一低C高于前二低A时,中间必有一个高点B,此时求上升趋势的预测点位
D=C+(B-A)*0.618,D1=C+(B-A)*1,D2=C+(B-A)*1.382,在C点向上画垂直线段,
在垂直线段画水平线段并标注D,D1,D2点数字;
下降趋势同理
2:在最近的两个高点和低点上画水平虚线
*/
MM:=L1&&L>REF(L,SUMBARS(L1,2)-1);
AA:=BACKSET(ISLASTBAR,SUMBARS(MM,1));
DM:=L+(REF(H,BARSLAST(H1))-REF(L,SUMBARS(L1,2)-1))*0.618;
DM1:=L+(REF(H,BARSLAST(H1))-REF(L,SUMBARS(L1,2)-1))*1;
DM2:=L+(REF(H,BARSLAST(H1))-REF(L,SUMBARS(L1,2)-1))*1.382;
DRAWSL(MM&&AA,DM,0,10,0,COLORRED);
DRAWSL(MM&&AA,DM1,0,10,0,COLORRED);
DRAWSL(MM&&AA,DM2,0,10,0,COLORRED);
DRAWNUMBER(MM&&AA,DM,DM,0,COLORRED);
DRAWNUMBER(MM&&AA,DM1,DM1,0,COLORRED);
DRAWNUMBER(MM&&AA,DM2,DM2,0,COLORRED);
MM1:=H1&&H<REF(H,SUMBARS(H1,2)-1);
BB:=BACKSET(ISLASTBAR,SUMBARS(MM1,1));
DDT:=H+(REF(L,BARSLAST(L1))-REF(H,SUMBARS(H1,2)-1))*0.618;
DDT1:=H+(REF(L,BARSLAST(L1))-REF(H,SUMBARS(H1,2)-1))*1;
DDT2:=H+(REF(L,BARSLAST(L1))-REF(H,SUMBARS(H1,2)-1))*1.382;
DDT3:=H+(REF(L,BARSLAST(L1))-REF(H,SUMBARS(H1,2)-1))*1.618;
DRAWSL(MM1&&BB,DDT,0,10,0,COLORGREEN);
DRAWSL(MM1&&BB,DDT1,0,10,0,COLORGREEN);
DRAWSL(MM1&&BB,DDT2,0,10,0,COLORGREEN);
DRAWNUMBER(MM1&&BB,DDT,DDT,0,COLORGREEN);
DRAWNUMBER(MM1&&BB,DDT1,DDT1,0,COLORGREEN);
DRAWNUMBER(MM1&&BB,DDT2,DDT2,0,COLORGREEN);
CZ:=ABS(REF(L,BARSLAST(L1))-REF(H,SUMBARS(H1,1)-1));
LA:=MIN(REF(H,SUMBARS(H1,1)-1),REF(L,BARSLAST(L1)));
A1:=LA+CZ*0.618;
A2:=LA+CZ*0.382;
DRAWSL(ISLASTBAR,LA,0,-10,0,COLORMAGENTA);
DRAWSL(ISLASTBAR,A1,0,-10,0,COLORMAGENTA);
DRAWSL(ISLASTBAR,A2,0,-10,0,COLORMAGENTA);
DRAWNUMBER(ISLASTBAR,LA,LA,0,COLORMAGENTA);
DRAWNUMBER(ISLASTBAR,A1,A1,0,COLORMAGENTA);
DRAWNUMBER(ISLASTBAR,A2,A2,0,COLORMAGENTA);
高:=HHV(H,120),NODRAW;
低:=LLV(L,120),NODRAW;
第一目标:=SQRT(((高-低)*0.5+低)*((高-低)*0.382+低) );
第二目标:=SQRT(((高-低)*0.618+低)*((高-低)*0.764+低) );
DRAWSL(ISLASTBAR,高,0,-120,0,COLORRED);
DRAWSL(ISLASTBAR,低,0,-120,0,COLORGREEN);
DRAWSL(ISLASTBAR,第一目标,0,-120,0,COLORYELLOW);
DRAWSL(ISLASTBAR,第二目标,0,-120,0,COLORYELLOW);
DRAWNUMBER(ISLASTBAR,高,高,0,COLORRED),ALIGN0;
DRAWNUMBER(ISLASTBAR,低,低,0,COLORGREEN),ALIGN0;
DRAWNUMBER(ISLASTBAR,第一目标,第一目标,0,COLORYELLOW),ALIGN0;
DRAWNUMBER(ISLASTBAR,第二目标,第二目标,0,COLORYELLOW),ALIGN0;
M:=20;
G:=MA(C,5);
D:=MA(C,10);
NNH:=BARSLAST(H=HHV(H,M)) ,NODRAW;
NNL:=BARSLAST(L=LLV(L,M)) ,NODRAW;
NN:=IF(REF(G,NNH)>REF(D,NNH) AND NNH<=M-3,NNH,IF(REF(G,NNL)<REF(D,NNL) AND NNL<=M-3,NNL,M-2)) ,NODRAW;
NNN:=IF(ISLASTBAR AND NN>0,NN,M-2) ,NODRAW;
H1:=REF(H,NNN)=HHV(H,M-1);
L1:=REF(L,NNN)=LLV(L,M-1);
FG01:=BACKSET(H1,NNN+1)>BACKSET(H1,NNN),NODRAW;//只设置前面第M-1个
FD01:=BACKSET(L1,NNN+1)>BACKSET(L1,NNN) ,NODRAW;
FG02:=FG01=FD01 AND G>D,NODRAW;
FD02:=FG01=FD01 AND G<D,NODRAW;
TTTT:=BARSLAST(FD01),NODRAW;
FG0:=FG01 AND IF(FG02=1,H=HHV(H,BARSLAST(REF(FD01,1))+1),H=HHV(H,IF(BARSLAST(L=LLV(L,M))>=M-2,M-2,BARSLAST(FD01)))) AND FD02=0 ,NODRAW;
FD0:=FD01 AND IF(FD02=1,L=LLV(L,BARSLAST(REF(FG01,1))+1),L=LLV(L,IF(BARSLAST(H=HHV(L,M))>=M-2,M-2,BARSLAST(FG01)))) AND FG02=0 ,NODRAW;
//高低点间周期
GT:=BARSLAST(FG0),NODRAW;
DT:=BARSLAST(FD0),NODRAW;
//第一次处理高低点间多余的点
LLLL:=DT=0 AND REF(DT,1)<GT AND L>REF(L,REF(DT,1)+1),NODRAW;
FG1:=BACKSET(REFX(GT,1)=0 AND GT<DT AND REFX(H,1)>=REF(H,GT),GT+1),NODRAW;
FD1:=BACKSET(REFX(DT,1)=0 AND DT<GT AND REFX(L,1)<=REF(L,DT),DT+1),NODRAW;
FG11:=IF(GT=0 AND REF(GT,1)<DT AND IF(REF(G,BARSLAST(L=LLV(L,M)))>REF(D,BARSLAST(L=LLV(L,M))),BARSLAST(L=LLV(L,M))<M-2,1) AND H<REF(H,REF(GT,1)+1),1,0),NODRAW;
FD11:=IF(DT=0 AND REF(DT,1)<GT AND IF(REF(G,BARSLAST(H=HHV(H,M)))<REF(D,BARSLAST(H=HHV(H,M))),BARSLAST(H=HHV(H,M))<M-2,1) AND L>REF(L,REF(DT,1)+1),1,0),NODRAW;
//再次周期
GT1:=BARSLAST(FG11<>1 AND FG1<>1 AND FG0),NODRAW;
DT1:=BARSLAST(FD11<>1 AND FD1<>1 AND FD0),NODRAW;
FD2:=BACKSET(REFX(GT1,1)=0 AND DT1<3 AND GT1-DT1<4 AND REF(L,DT1)>LLV(L,GT1+M-2),DT1+1),NODRAW;
FG2A:=BACKSET(REFX(GT1,1)=0 AND DT1<3 AND GT1-DT1<4 AND REF(L,DT1)<=LLV(L,GT1+M-2) AND REF(H,GT1)>HHV(H,GT1+M-2),GT1+1),NODRAW;
FG2B:=IF(GT1=0 AND DT1<4 AND REF(GT1,1)-DT1<4 AND REF(L,DT1)<=LLV(L,REF(GT1,1)+M-1) AND H>HHV(H,REF(GT1,1)+M-1),1,0),NODRAW;
FG2:=BACKSET(REFX(DT1,1)=0 AND GT1<3 AND DT1-GT1<4 AND REF(H,GT1)<HHV(H,DT1+M-2),GT1+1),NODRAW;
FD2A:=BACKSET(REFX(DT1,1)=0 AND GT1<3 AND DT1-GT1<4 AND REF(H,GT1)>=HHV(L,DT1+M-2) AND REF(L,DT1)>LLV(L,DT1+M-2),DT1+1),NODRAW;
FD2B:=IF(DT1=0 AND GT1<4 AND REF(DT1,1)-GT1<4 AND REF(H,GT1)>=HHV(H,REF(DT1,1)+6) AND L>LLV(L,REF(DT1,1)+M-1),1,0),NODRAW;
TTTTTT:= H<REF(H,REF(GT1,1)+1) AND DT1<4,NODRAW;
HHHHHH:=REF(LLV(L,10),DT1),NODRAW;
//前长后短;
FG21:=IF(GT1=0 AND DT1<4 AND H<=REF(H,REF(GT1,1)+1) ,1,0),NODRAW;
FD21:=IF(DT1=0 AND GT1<4 AND L>=REF(L,REF(DT1,1)+1) ,1,0),NODRAW;
//前短后长,前低后高(去低);
FD231:=BACKSET(REFX(GT1,1)=0 AND DT1>3 AND GT1>DT1 AND GT1-DT1<4 AND REFX(H,1)>REF(H,GT1) AND REF(L,DT1)>REF(LLV(L,10),DT1),DT1+1),NODRAW;
FG23:=BACKSET(REFX(GT1,1)=0 AND DT1>3 AND GT1>DT1 AND GT1-DT1<4 AND REFX(H,1)>REF(H,GT1) AND (REF(H,GT1)<REF(HHV(H,13),GT1) OR REF(FD231,DT1)=0),GT1+1),NODRAW;
//前短后长,去2;
FG231:=BACKSET(REFX(DT1,1)=0 AND GT1>3 AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)<REF(L,DT1) AND REF(H,GT1)<REF(HHV(H,10),GT1) ,GT1+1),NODRAW;
FD23:=BACKSET(REFX(DT1,1)=0 AND GT1>3 AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)<REF(L,DT1) AND ( REF(L,DT1)>REF(LLV(L,13),DT1) OR REF(FG231,GT1)=0),DT1+1),NODRAW;
//前短后长,去3;
FDD23:=REF(H,GT1)<REF(HHV(H,10),GT1) OR REF(FD23,DT1)=0,NODRAW;
FD24:=BACKSET(REFX(GT1,1)=0 AND DT1>3 AND GT1>DT1 AND GT1-DT1<4 AND REFX(H,1)<HHV(H,GT1+3) AND REF(L,DT1)>LLV(L,DT1+5),DT1+1),NODRAW;
FG24:=BACKSET(REFX(DT1,1)=0 AND GT1>3 AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)>LLV(L,DT1+3) AND REF(H,GT1)<HHV(H,GT1+5),GT1+1),NODRAW;
//做两次高低点间多余的点
GT2:=BARSLAST(FG21<>1 AND FG23<>1 AND FG231<>1 AND FG24<>1 AND FG2<>1 AND FG2A<>1 AND FG2B<>1 AND GT1=0),NODRAW;
DT2:=BARSLAST(FD21<>1 AND FD23<>1 AND FD231<>1 AND FD24<>1 AND FD2<>1 AND FD2A<>1 AND FD2B<>1 AND DT1=0),NODRAW;
FG3:=BACKSET(REFX(GT2,1)=0 AND GT2<DT2 AND REFX(H,1)>=REF(H,GT2),GT2+1),NODRAW;
FD3:=BACKSET(REFX(DT2,1)=0 AND DT2<GT2 AND REFX(L,1)<=REF(L,DT2),DT2+1),NODRAW;
FG31:=IF(GT2=0 AND REF(GT2,1)<DT2 AND H<REF(H,REF(GT2,1)+1),1,0),NODRAW;
FD31:=IF(DT2=0 AND REF(DT2,1)<GT2 AND L>REF(L,REF(DT2,1)+1),1,0),NODRAW;
GT3:=BARSLAST(GT2=0 AND FG3<>1 AND FG31<>1 ),NODRAW;
DT3:=BARSLAST(DT2=0 AND FD3<>1 AND FD31<>1),NODRAW;
FG4:=BACKSET(REFX(GT3,1)=0 AND GT3<DT3 AND REFX(H,1)>=REF(H,GT3),GT3+1),NODRAW;
FD4:=BACKSET(REFX(DT3,1)=0 AND DT3<GT3 AND REFX(L,1)<=REF(L,DT3),DT3+1),NODRAW;
FG41:=IF(GT3=0 AND REF(GT3,1)<DT3 AND H<REF(H,REF(GT3,1)+1),1,0),NODRAW;
FD41:=IF(DT3=0 AND REF(DT3,1)<GT3 AND L>REF(L,REF(DT3,1)+1),1,0),NODRAW;
HHH:=GT3=0 AND FG31<>1 AND FG3<>1,NODRAW;
LLL:=DT3=0 AND FD31<>1 AND FD3<>1,NODRAW;
DRAWLINE1(LLL,L,HHH,H,0),COLORYELLOW,LINETHICK1;
DRAWLINE1(HHH,H,LLL,L,0),COLORGREEN,LINETHICK1;
AA:=CROSS(BACKSET(ISLASTBAR,BARSLAST(HHH||LLL)+1),0.5),ICON(1,'ICO1');
BB:=CROSS(BACKSET(ISLASTBAR,SUMBARS(HHH||LLL,2)),0.5),ICON(1,'ICO1');
XX1:HHH||LLL,NODRAW;
XX:IF(HHH,H,L);
DRAWSL(AA&&HHH,H,0,1000,0,COLORYELLOW);
DRAWSL(AA&&HHH,VALUEWHEN(LLL,L),0,1000,0,COLORYELLOW);
DRAWSL(AA&&HHH,VALUEWHEN(LLL,L)+(H-VALUEWHEN(LLL,L))*0.382 ,0,1000,0,COLORGREEN);
DRAWSL(AA&&HHH,VALUEWHEN(LLL,L)+(H-VALUEWHEN(LLL,L))*0.618,0,1000,0,COLORYELLOW);
DRAWSL(AA&&HHH,H,0,-SUMBARS(XX1,2),0,COLORYELLOW);
DRAWSL(AA&&HHH,VALUEWHEN(LLL,L),0,-SUMBARS(XX1,2),0,COLORYELLOW);
DRAWSL(AA&&HHH,VALUEWHEN(LLL,L)+(H-VALUEWHEN(LLL,L))*0.382 ,0,-SUMBARS(XX1,2),0,COLORGREEN);
DRAWSL(AA&&HHH,VALUEWHEN(LLL,L)+(H-VALUEWHEN(LLL,L))*0.618,0,-SUMBARS(XX1,2),0,COLORYELLOW);
DRAWSL(AA&&LLL,L,0,-SUMBARS(XX1,2),0,COLORYELLOW);
DRAWSL(AA&&LLL,VALUEWHEN(HHH,H),0,-SUMBARS(XX1,2),0,COLORYELLOW);
DRAWSL(AA&&LLL,VALUEWHEN(LLL,L)+(VALUEWHEN(HHH,H)-L)*0.382 ,0,-SUMBARS(XX1,2),0,COLORRED);
DRAWSL(AA&&LLL,VALUEWHEN(LLL,L)+(VALUEWHEN(HHH,H)-L)*0.618,0,-SUMBARS(XX1,2),0,COLORYELLOW);
DRAWSL(AA&&LLL,L,0,1000,0,COLORYELLOW);
DRAWSL(AA&&LLL,VALUEWHEN(HHH,H),0,1000,0,COLORYELLOW);
DRAWSL(AA&&LLL,VALUEWHEN(LLL,L)+(VALUEWHEN(HHH,H)-L)*0.382 ,0,1000,0,COLORRED);
DRAWSL(AA&&LLL,VALUEWHEN(LLL,L)+(VALUEWHEN(HHH,H)-L)*0.618,0,1000,0,COLORYELLOW);
DRAWNUMBER(BB,REFX1(VALUEWHEN(LLL,L),10000),REFX1(VALUEWHEN(LLL,L),10000),1,COLORYELLOW);
DRAWNUMBER(BB,REFX1(VALUEWHEN(HHH,H),10000),REFX1(VALUEWHEN(HHH,H),10000),1,COLORYELLOW);
DRAWTEXT(BB,REFX1(VALUEWHEN(LLL,L),10000),'低'),VALIGN0,COLORYELLOW;
DRAWTEXT(BB,REFX1(VALUEWHEN(HHH,H),10000),'高'),VALIGN0,COLORYELLOW;
DRAWNUMBER(BB&&HHH,REFX1(VALUEWHEN(LLL,VALUEWHEN(LLL,L)+(VALUEWHEN(HHH,H)-L)*0.382),10000),REFX1(VALUEWHEN(LLL,VALUEWHEN(LLL,L)+(VALUEWHEN(HHH,H)-L)*0.382),10000),1,COLORRED);
DRAWNUMBER(BB&&HHH,REFX1(VALUEWHEN(LLL,VALUEWHEN(LLL,L)+(VALUEWHEN(HHH,H)-L)*0.618),10000),REFX1(VALUEWHEN(LLL,VALUEWHEN(LLL,L)+(VALUEWHEN(HHH,H)-L)*0.618),10000),1,COLORYELLOW);
DRAWNUMBER(BB&&LLL,REFX1(VALUEWHEN(HHH,VALUEWHEN(LLL,L)+(H-VALUEWHEN(LLL,L))*0.382),10000),REFX1(VALUEWHEN(HHH,VALUEWHEN(LLL,L)+(H-VALUEWHEN(LLL,L))*0.382),10000),1,COLORGREEN);
DRAWNUMBER(BB&&LLL,REFX1(VALUEWHEN(HHH,VALUEWHEN(LLL,L)+(H-VALUEWHEN(LLL,L))*0.618),10000),REFX1(VALUEWHEN(HHH,VALUEWHEN(LLL,L)+(H-VALUEWHEN(LLL,L))*0.618),10000),1,COLORYELLOW);
笔周期:=10;
半分位:=50;
画趋势:=1;
涨停位:=50;
时间:=1;
日线:=IF(PERIOD=5,1,0);
CA3:=REF(C,1)*日线;
CURRBARSCOUNT:=REFX1(BARPOS,10000)-BARPOS+1;
涨停:=C/CA3>1.09;
A1:=REF(H,3)=HHV(H,笔周期*3+1)*1;
B1:=FILTER(A1,3);
C1:=BACKSET(B1,3+1);
D1:=FILTER(C1,3);
{高点}
A2:=REF(L,3)=LLV(L,笔周期*3+1)*1;
B2:=FILTER(A2,3);
C2:=BACKSET(B2,3+1);
D2:=FILTER(C2,3);
{低点}
E1:=(REF(LLV(L,2*3),1)+REF(HHV(H,2*3),1))/2;
E2:=(H+L)/2;
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR BARSTATUS=2 OR BARSCOUNT(C)=1;
H2:=D1 AND NOT(D2 AND E1>=E2);
L1:=D2 AND NOT(D1 AND E1=E2);
X1:=REF(BARSLAST(H1),1)+1;
F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,L,100000),X1)+1);
G1:=F1>REF(F1,1);
I1:=BACKSET(G1,1);
LD:=I1>REF(I1,1);
L2:=LD OR BARSTATUS=2 OR BARSCOUNT(C)=1;
X2:=REF(BARSLAST(L2),1)+1;
F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,H,0),X2)+1);
G2:=F2>REF(F2,1);
I2:=BACKSET(G2,1);
HD:=I2>REF(I2,1);
DRAWLINE3(LD,REF(H,BARSLAST(HD)),BARSLAST(HD),HD,REF(L,BARSLAST(LD)),BARSLAST(LD),0),COLORGREEN,LINETHICK3;
DRAWLINE3(HD,REF(L,BARSLAST(LD)),BARSLAST(LD),LD,REF(H,BARSLAST(HD)),BARSLAST(HD),0),COLORRED,LINETHICK3;
J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1);
J2:=J1>REF(J1,1);
A3:=H;
B3:=REF(H,REF(BARSLAST(HD),1)+1)>REF(H,REF(BARSLAST(HD),1)+2+REF(BARSLAST(HD),REF(BARSLAST(HD),1)+2));
D3:=A3 AND B3 AND HD;
E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2);
HH:=E3>REF(E3,1);
A4:=L>REF(L,REF(BARSLAST(LD),1)+1);
B4:=REF(L,REF(BARSLAST(LD),1)+1);
D4:=A4 AND B4 AND LD;
E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2);
LL:=E4>REF(E4,1);
H3:=HH OR BARSTATUS=2 OR BARSCOUNT(C)=1;
X3:=REF(BARSLAST(H3),1)+1;
F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));
G3:=F3>REF(F3,1);
I3:=BACKSET(G3,2);
LZ:=I3>REF(I3,1);
L4:=LZ OR BARSTATUS=2 OR BARSCOUNT(C)=1;
X4:=REF(BARSLAST(L4),1)+1;
F4:=BACKSET(L4 AND COUNT(HH,X4)>0,HHVBARS(IF(HH,H,-POW(10,20)),X4));
G4:=F4>REF(F4,1);
I4:=BACKSET(G4,2);
HZ:=I4>REF(I4,1);
K1:=BACKSET(BARSTATUS=2,MIN(BARSLAST(HZ),BARSLAST(LZ))+1);
K2:=K1>REF(K1,1);
UU:=BACKSET(BARSTATUS=2,BARSLAST(LD)+1);
VV:=UU>REF(UU,1);
WW:=BACKSET(VV,REF(BARSLAST(LD),1)+2);
XX:=WW>REF(WW,1);
WWQ:=BACKSET(XX,REF(BARSLAST(LD),1)+2);
XXQ:=WWQ>REF(WWQ,1);
下轨:=TRENDLINES(XX,L,VV,L)*画趋势,COLORMAGENTA,LINETHICK1;
{画趋势线}
UU2:=BACKSET(BARSTATUS=2,BARSLAST(HD)+1);
VV2:=UU2>REF(UU2,1);
WW2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2);
XX2:=WW2>REF(WW2,1);
WW3Q:=BACKSET(XX2,REF(BARSLAST(HD),1)+2);
XX3Q:=WW3Q>REF(WW3Q,1);
WW4Q:=BACKSET(XX3Q,REF(BARSLAST(HD),1)+2);
XX4Q:=WW4Q>REF(WW4Q,1);
上轨:=TRENDLINES(XX2,H,VV2,H)*画趋势,COLORMAGENTA,LINETHICK1;
{画趋势线}
Q0:=BARSLAST(XX2>0);
Q1:=BARSLAST(XX>0);
Q2:=BARSLAST(WW2>0);
Q3:=BARSLAST(VV>0);
Q4:=BARSLAST(XXQ>0);
Q5:=BARSLAST(XX3Q>0);
Q6:=BARSLAST(XX4Q>0);
低1:REF(L,BARSLAST(VV)),LINETHICK2,COLORGREEN;
低壹:=REF(C,BARSLAST(VV));
低壹1:=REF(C,BARSLAST(VV)+1);
高1:REF(H,BARSLAST(VV2)),LINETHICK2,COLORRED;
高壹:=REF(C,BARSLAST(VV2));
高壹1:=REF(C,BARSLAST(VV2)+1);
低2:REF(L,BARSLAST(XX)),DOT,COLORGREEN;
低贰:=REF(C,BARSLAST(XX));
低贰2:=REF(C,BARSLAST(XX)+1);
高2:REF(H,BARSLAST(XX2)),DOT,COLORRED;
高贰:=REF(C,BARSLAST(XX2));
高贰2:=REF(C,BARSLAST(XX2)+1);
ABC:=IF(Q5>Q4,REF(L,BARSLAST(XXQ)),0),DOT,COLORCYAN;
中位1:低1-(低1-高1)*(0.01*半分位),COLORRED;
①②③:=IF(Q5<Q4,REF(H,BARSLAST(XX3Q)),0),DOT,COLORCYAN;
DRAWLINE1(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),DOT,COLORYELLOW,LINETHICK1;
笔:TRENDLINES(J2,IF(HD,H,L),BARSTATUS=2,IF(BARSLAST(HD)>BARSLAST(LD),H,L)),DOT,COLORYELLOW,LINETHICK1;
OA幅:=(低贰-高贰2)/高贰2*100;
AB幅:=(高壹-低贰2)/低贰2*100;
BC幅:=(低壹-高壹1)/高壹1*100;
AO幅:=(C-低壹1)/低壹1*100;
D01:=(高贰-低贰2)/低贰2*100;
D12:=(低壹-高贰2)/高贰2*100;
D23:=(高壹-低壹1)/低壹1*100;
D30:=(C-高壹1)/高壹1*100;
DRAWTEXT( VV=1 AND Q0>Q1,L,'C'),COLORMAGENTA;
DRAWTEXT(VV2=1 AND Q0>Q1,H,'B'),COLORMAGENTA;
DRAWTEXT( XX=1 AND Q0>Q1,L,'A'),COLORMAGENTA;
DRAWTEXT(XX2=1 AND Q5>Q4 ,H,'◆'),COLORMAGENTA;
DRAWTEXT(XXQ=1 AND Q5>Q4 ,L,'★'),COLORMAGENTA;
DRAWTEXT( VV=1 AND Q0<Q1,L,'?'),COLORMAGENTA;
DRAWTEXT(VV2=1 AND Q0<Q1,H,'?'),COLORMAGENTA;
DRAWTEXT(XX2=1 AND Q0<Q1,H,'?'),COLORMAGENTA;
DRAWTEXT(XX=1 AND Q5<Q4,L,'◎'),COLORMAGENTA;
DRAWTEXT(XX3Q=1 AND Q5<Q4,H,'☆'),COLORMAGENTA;
V00:= HIGH<REF(HIGH,1) AND LOW<REF(LOW,1);
V01:= HIGH<REF(HIGH,1) AND LOW>REF(LOW,1);
V02:= HIGH>REF(HIGH,1) AND LOW<REF(LOW,1);
V03:= HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);
V04:= REF(HIGH,2) < HIGH AND REF(LOW,2) < LOW AND REF(HIGH,2) > REF(HIGH,1) AND REF(LOW,2) < REF(LOW,1);
V1:= COUNT(V00,3)>=1 AND LLVBARS(LOW,3) = 1 AND V03;
V2:= COUNT(V00,4)>=1 AND LLVBARS(LOW,4) = 2 AND V04;
V3:= COUNT(V00,4)>=1 AND COUNT(V01 OR V02,4)=1 AND LLVBARS(LOW,4) = 1 AND V03;
V4:= COUNT(V00,5)>=1 AND COUNT(V01 OR V02,5)=2 AND LLVBARS(LOW,5) = 2 AND V04;
XG1:= V1 OR V2 OR V3 OR V4;
XG2:= C > REF(HIGH,1);
XG:=XG1 AND XG2;
一阳定势:=CROSS(C,高1) AND CROSS(C,高2) AND CROSS(C,①②③),COLORYELLOW,NODRAW;
STICKLINE(一阳定势,OPEN,CLOSE,2.8,1),COLORMAGENTA;
DRAWTEXT(一阳定势=1,L,'一阳定势'),COLORYELLOW;
收敛:=ABC>0 AND ABC<低2 AND 低2<低1 AND 高2>高1 AND CROSS(C,上轨);
STICKLINE(收敛,OPEN,CLOSE,2.8,1),COLORMAGENTA;
DRAWTEXT(收敛=1,L,'收敛'),COLORYELLOW;
强势:=ABC>0 AND ABC<低2 AND 低2<低1 AND 高2<高1 AND CROSS(C,高1);
STICKLINE(强势,OPEN,CLOSE,2.8,1),COLORMAGENTA;
DRAWTEXT(强势=1,L,'强势'),COLORYELLOW;
三买:=(低1>高2 AND 中位1>低1 AND XG>0 AND C>O),COLORYELLOW,NODRAW;
STICKLINE(三买,OPEN,CLOSE,2.8,1),COLORMAGENTA;
DRAWTEXT(三买=1,L,'三买'),COLORYELLOW;
涨停线:=REF(L+(H-L)*(0.01*涨停位),BARSLAST(REFX1(BARSLAST(IF(CURRBARSCOUNT<=30*日线,涨停,0)),10000)+1=CURRBARSCOUNT)),DOT,COLORYELLOW;
涨停幅:=(L-涨停线)/涨停线*100,NODRAW;
联系客服