日:=2000;
昨前:=1;
高1:=REF(HHV(H,日),昨前);
低1:=REF(LLV(L,日),昨前);
顶:HHV(IF(ISLASTBAR,高1,0),0),COLORCYAN,DOT,LINETHICK1;
低:HHV(IF(ISLASTBAR,低1,0),0),COLORCYAN,DOT,LINETHICK2;
CC2:=REF(C,1);
高:=HHV(H,日);
低A:=LLV(L,日);
H111:=高-(高-低A)*0.191;
H222:=高-(高-低A)*0.382;
H333:=高-(高-低A)*0.5;
H444:=高-(高-低A)*0.618;
H555:=高-(高-低A)*0.809;
//QHQQW.COM 
STICKLINE1(ISLASTBAR,高,高,200,0),COLORGREEN;
STICKLINE1(ISLASTBAR,H111,H111,200,0),COLORCYAN;
STICKLINE1(ISLASTBAR,H222,H222,200,0),COLORCCCCCC;
DRAWTEXT(ISLASTBAR,高,' 高'),COLORGREEN;
DRAWTEXT(ISLASTBAR,H111,' 809'),COLORCYAN;
DRAWTEXT(ISLASTBAR,H222,' 618'),COLORFFFFFF;
DRAWTEXT(ISLASTBAR,H333,' 中'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,H444,' 382'),COLORRED;
DRAWTEXT(ISLASTBAR,H555,' 191'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,低A,' 低A'),COLORRED;
STICKLINE1(ISLASTBAR,H333,H333,200,0),COLORYELLOW;
STICKLINE1(ISLASTBAR,H444,H444,200,0),COLORRED;
STICKLINE1(ISLASTBAR,H555,H555,200,0),COLORMAGENTA;
STICKLINE1(ISLASTBAR,低A,低A,200,0),COLORRED;

周上轨:MA(H,120),COLORYELLOW;
周下轨:MA(L,120),COLORBLUE;
月上轨:MA(H,528),DOT,COLORRED;
月下轨:MA(L,528),DOT,COLORRED;
DRAWCOLORLINE(周上轨>REF(周上轨,1),周上轨,RGB(255,0,255),RGB(0,255,0)),LINETHICK2;
DRAWCOLORLINE(周下轨>REF(周下轨,1),周下轨,RGB(255,0,255),RGB(0,255,0)),LINETHICK2;
DRAWCOLORLINE(月上轨>REF(月上轨,1),月上轨,RGB(255,0,0),RGB(0,128,255)),LINETHICK2;
DRAWCOLORLINE(月下轨>REF(月下轨,1),月下轨,RGB(255,0,0),RGB(0,128,255)),LINETHICK2;

Q:=(3*CLOSE+LOW+OPEN+HIGH)/6;
操盘线:(26*Q+25*REF(Q,1)+24*REF(Q,2)+23*REF(Q,3)+22*REF(Q,4)+21*REF(Q,5)
 +20*REF(Q,6)+19*REF(Q,7)+18*REF(Q,8)+17*REF(Q,9)+16*REF(Q,10)+15*REF(Q,11)+14*REF(Q,12)+13*REF(Q,13)+12*REF(Q,14)+11*REF(Q,15)
 +10*REF(Q,16)+9*REF(Q,17)+8*REF(Q,18)+7*REF(Q,19)+6*REF(Q,20)+5*REF(Q,21)+4*REF(Q,22)+3*REF(Q,23)+2*REF(Q,24)+REF(Q,26))/351,COLORRED;
空头线:=EMA(操盘线,7);
STICKLINE(操盘线>空头线,操盘线,空头线,8,0),COLORYELLOW;
STICKLINE(操盘线<空头线,操盘线,空头线,8,0),COLORBLUE;

MA11:EMA(EMA(EMA((C+C+H+L)/4,1),2),2);
MA22:EMA(EMA(EMA((C+C+H+L)/4,2),2),2);
FILLRGN(MA11>MA22,MA11,MA22,RGB(200,50,255));
FILLRGN(MA11<MA22,MA11,MA22,RGB(0,128,255));

M:=144;
TH:=H;
TL:=L;
HH:=FILTER(BACKSET(FILTER(REF(TH,M)=HHV(TH,2*M+1),M),M+1),M);
LL:=FILTER(BACKSET(FILTER(REF(TL,M)=LLV(TL,2*M+1),M),M+1),M);
HBAR:=BARSLAST(HH);
LBAR:=BARSLAST(LL);
HZ:=REF(H,HBAR);
LZ:=REF(L,LBAR);
STICKLINE(C>0,HZ,HZ,1,0),COLOR80FF00,POINTDOT,LINETHICK2;  
STICKLINE(C>0,LZ,LZ,1,0),COLORFF00FF,POINTDOT,LINETHICK2;

N:=43;
A1:=REF(H,N)=HHV(H,2*N+1);
B1:=FILTER(A1,N);
C1:=BACKSET(B1,N+1);
D1:=FILTER(C1,N);
A2:=REF(L,N)=LLV(L,2*N+1);
B2:=FILTER(A2,N);
C2:=BACKSET(B2,N+1);
D2:=FILTER(C2,N);
E1:=(REF(LLV(L,2*N),1)+REF(HHV(H,2*N),1))/2;
E2:=(H+L)/2;
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARPOS=1;
L1:=(D2 AND NOT(D1 AND E1<E2));
H2:=D1 AND NOT(D2 AND E1>=E2);
X1:=REF(BARSLAST(H1),1)+1;
F11:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,L,1000000),X1));
F1:=IF(F11=1,1,0);
G1:=F1>REF(F1,1);
I1:=BACKSET(G1,2);
LD:=I1>REF(I1,1);
L2:=LD OR ISLASTBAR OR BARPOS=1;
X2:=REF(BARSLAST(L2),1)+1;
F22:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,H,0),X2));
F2:=IF(F22=1,1,0);
G2:=F2>REF(F2,1);
I2:=BACKSET(G2,2);
HD:=I2>REF(I2,1);
LJZ:=IF(HD,H,L);
POLYLINE(HD OR LD,LJZ,COLORYELLOW);

R1:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
S1:=R1>REF(R1,1);
T1:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
U1:=T1>REF(T1,1);
R2:=BACKSET(S1,REF(BARSLAST(HD),1)+2);
S2:=R2>REF(R2,1);
T2:=BACKSET(U1,REF(BARSLAST(LD),1)+2);
U2:=T2>REF(T2,1);
DRAWLINE1(S2,H,S1,H,1),COLORGREEN,LINETHICK2;
DRAWLINE1(U2,L,U1,L,1),COLORRED,LINETHICK2;