//友情提示,画线画法,含有未来函数。 M:=5; ZZ1:=5; ZZ2:=10; CLMA1:=MA(C,ZZ1); CLMA2:=MA(C,ZZ2); NNH:=BARSLAST(H=HHV(H,M)) ,NODRAW; NNL:=BARSLAST(L=LLV(L,M)) ,NODRAW; NN1:=IF(REF(CLMA1,NNH)>REF(CLMA2,NNH) AND NNH<=M-3,NNH,IF(REF(CLMA1,NNL)0,NN1,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; FD01:=BACKSET(L1,NNN+1)>BACKSET(L1,NNN) ,NODRAW; FG02:=FG01=FD01 AND CLMA1>CLMA2,NODRAW; FD02:=FG01=FD01 AND CLMA1=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)REF(L,REF(DT,1)+1),NODRAW; FG1:=BACKSET(REFX(GT,1)=0 AND GT
=REF(H,GT),GT+1),NODRAW; FD1:=BACKSET(REFX(DT,1)=0 AND DTREF(CLMA2,BARSLAST(L=LLV(L,M))),BARSLAST(L=LLV(L,M))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(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(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)3 AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)3 AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)REF(LLV(L,13),DT1) OR REF(FG231,GT1)=0),DT1+1),NODRAW; FDD23:=REF(H,GT1)3 AND GT1>DT1 AND GT1-DT1<4 AND REFX(H,1)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)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=REF(H,GT2),GT2+1),NODRAW; FD3:=BACKSET(REFX(DT2,1)=0 AND DT2REF(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=REF(H,GT3),GT3+1),NODRAW; FD4:=BACKSET(REFX(DT3,1)=0 AND DT3REF(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(HHH ,H,LLL,L,0),COLORGREEN,LINETHICK2; DRAWLINE1(LLL,L,HHH ,H,0),COLORRED,LINETHICK2; N1:=BARSLAST(HHH)+1; N2:=BARSLAST(LLL)+1; DRAWLINE3(ISLASTBAR&&MIN(N1,N2)=N2&&L>REF(L,N2-1),REF(L,N2-1),N2-1,ISLASTBAR,H,0,0),COLORRED,LINETHICK2; DRAWLINE3(ISLASTBAR&&MIN(N1,N2)=N1&&HN2,AAA-(AAA-BBB)*2.618,2.618,3,COLORWHITE),VALIGN0; DRAWNUMBER(ISLASTBAR&&N1N2,BBB,0,-MIN(N1,N2)+1,0,COLORYELLOW); DRAWSL(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*0.191,0,-MIN(N1,N2)+1,0,COLORYELLOW); DRAWSL(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*0.382,0,-MIN(N1,N2)+1,0,COLORYELLOW); DRAWSL(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*0.5,0,-MIN(N1,N2)+1,0,COLORYELLOW); DRAWSL(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*0.618,0,-MIN(N1,N2)+1,0,COLORYELLOW); DRAWSL(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*0.809,0,-MIN(N1,N2)+1,0,COLORYELLOW); DRAWSL(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*1,0,-MIN(N1,N2)+1,0,COLORYELLOW); DRAWSL(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*1.382,0,-MIN(N1,N2)+1,0,COLORGREEN); DRAWSL(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*1.618,0,-MIN(N1,N2)+1,0,COLORGREEN); DRAWSL(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*2.618,0,-MIN(N1,N2)+1,0,COLORGREEN); DRAWNUMBER(ISLASTBAR&&N1>N2,BBB,0,3,COLORWHITE),VALIGN0; DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*0.191,0.191,3,COLORWHITE),VALIGN0; DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*0.382,0.382,3,COLORWHITE),VALIGN0; DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*0.5,0.5,3,COLORWHITE),VALIGN0; DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*0.618,0.618,3,COLORWHITE),VALIGN0; DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*0.809,0.809,3,COLORWHITE),VALIGN0; DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*1,1,3,COLORWHITE),VALIGN0; DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*1.382,1.382,3,COLORWHITE),VALIGN0; DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*1.618,1.618,3,COLORWHITE),VALIGN0; DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*2.618,2.618,3,COLORWHITE),VALIGN0; DRAWNUMBER(ISLASTBAR&&N1>N2,BBB,BBB,0,COLORWHITE); DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*0.191,BBB+(AAA-BBB)*0.191,0,COLORWHITE); DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*0.382,BBB+(AAA-BBB)*0.382,0,COLORWHITE); DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*0.5,BBB+(AAA-BBB)*0.5,0,COLORWHITE); DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*0.618,BBB+(AAA-BBB)*0.618,0,COLORWHITE); DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*0.809,BBB+(AAA-BBB)*0.809,0,COLORWHITE); DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*1,BBB+(AAA-BBB)*1,0,COLORWHITE); DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*1.382,BBB+(AAA-BBB)*1.382,0,COLORWHITE); DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*1.618,BBB+(AAA-BBB)*1.618,0,COLORWHITE); DRAWNUMBER(ISLASTBAR&&N1>N2,BBB+(AAA-BBB)*2.618,BBB+(AAA-BBB)*2.618,0,COLORWHITE); N:=3; DRAWLINE1(H=PEAK(H ,N ,1,1 ) ,H ,L=TROUGH(L ,N ,1,1 ) ,L ,0),COLOR66BB00,LINETHICK2; DRAWLINE1(H=PEAK(H ,N ,1,1 ) ,H ,L=TROUGH(L ,N ,1,1 ) ,L+(PEAK(H ,N ,1 ,1)-TROUGH(L ,N ,1 ,1))/3,0 ),COLOR66BB00,LINETHICK2; DRAWLINE1(H=PEAK(H ,N ,1,1 ) ,H ,L=TROUGH(L ,N ,1,1 ) ,L+(PEAK(H ,N ,1 ,1)-TROUGH(L ,N ,1 ,1))/3*2,0 ),COLOR66BB00,LINETHICK2; 高1:TRENDLINES(H=PEAK(H ,N ,1,1 ) ,H ,L=TROUGH(L ,N ,1,1 ) ,L ),COLOR66BB00,NODRAW; 高2:TRENDLINES(H=PEAK(H ,N ,1,1 ) ,H ,L=TROUGH(L ,N ,1,1 ) ,L+(PEAK(H ,N ,1 ,1)-TROUGH(L ,N ,1 ,1))/3 ),COLOR66BB00,NODRAW; 高3:TRENDLINES(H=PEAK(H ,N ,1,1 ) ,H ,L=TROUGH(L ,N ,1,1 ) ,L+(PEAK(H ,N ,1 ,1)-TROUGH(L ,N ,1 ,1))/3*2 ),COLOR66BB00,NODRAW; DRAWLINE1(L=TROUGH(L , N,1,1 ) ,L ,H=PEAK(H ,N ,1 ,1) ,H ,0 ),RGB(153,0,0),LINETHICK2; DRAWLINE1(L=TROUGH(L ,N,1 ,1) ,L ,H=PEAK(H ,N ,1 ,1) ,H-(PEAK(H ,N ,1,1 )-TROUGH(L , N,1 ,1))/3*2 ,0 ),RGB(153,0,0),LINETHICK2; DRAWLINE1(L=TROUGH(L , N,1 ,1) ,L ,H=PEAK(H ,N ,1,1 ) ,H-(PEAK(H ,N ,1 ,1)-TROUGH(L , N,1 ,1))/3 ,0 ),RGB(153,0,0),LINETHICK2; 低1:TRENDLINES(L=TROUGH(L , N,1,1 ) ,L ,H=PEAK(H ,N ,1 ,1) ,H ),RGB(153,0,0),NODRAW; 低2:TRENDLINES(L=TROUGH(L ,N,1 ,1) ,L ,H=PEAK(H ,N ,1 ,1) ,H-(PEAK(H ,N ,1,1 )-TROUGH(L , N,1 ,1))/3*2 ),RGB(153,0,0),NODRAW; 低3:TRENDLINES(L=TROUGH(L , N,1 ,1) ,L ,H=PEAK(H ,N ,1,1 ) ,H-(PEAK(H ,N ,1 ,1)-TROUGH(L , N,1 ,1))/3 ),RGB(153,0,0),NODRAW; DD:=BARSLAST(H=PEAK(H ,N ,1,1 )); LL:=BARSLAST(L=TROUGH(L ,N ,1,1 )); DD1:=BACKSET(ISLASTBAR,IF(DD=E2)) OR ISLASTBAR OR BARSCOUNT(C)=1; L1ZZ:=(D2 AND NOT(D1 AND E1=E2); X1:=REF(BARSLAST(H1ZZ),1)+1; F1:=IF(BACKSET(H1ZZ AND COUNT(L1ZZ,X1)>0,LLVBARS(IF(L1ZZ,L,10000),X1)),1,0); G1:=CROSS(F1>REF(F1,1),0.5); I1:=IF(BACKSET(G1,2),1,0); LD:=CROSS(I1>REF(I1,1),0.5); L2:=LD OR ISLASTBAR OR BARSCOUNT(C)=1; X2:=REF(BARSLAST(L2),1)+1; F2:=IF(BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,H,0),X2)),1,0); G2:=CROSS(F2>REF(F2,1),0.5); I2:=IF(BACKSET(G2,2),1,0); HD:=CROSS(I2>REF(I2,1),0.5); R1:=IF(BACKSET(ISLASTBAR,BARSLAST(HD)+1),1,0); S1:=CROSS(R1>REF(R1,1),0.5); T1:=IF(BACKSET(ISLASTBAR,BARSLAST(LD)+1),1,0); U1:=CROSS(T1>REF(T1,1),0.5); R2:=IF(BACKSET(S1,REF(BARSLAST(HD),1)+2),1,0); S2:=CROSS(R2>REF(R2,1),0.5); T2:=IF(BACKSET(U1,REF(BARSLAST(LD),1)+2),1,0); U2:=CROSS(T2>REF(T2,1),0.5); T3:=IF(BACKSET(U2,REF(BARSLAST(LD),1)+2),1,0); U3:=CROSS(T3>REF(T3,1),0.5); T4:=IF(BACKSET(U3,REF(BARSLAST(LD),1)+2),1,0); U4:=CROSS(T4>REF(T4,1),0.5); R3:=IF(BACKSET(S2,REF(BARSLAST(HD),1)+2),1,0); S3:=CROSS(R3>REF(R3,1),0.5); R4:=IF(BACKSET(S3,REF(BARSLAST(HD),1)+2),1,0); S4:=CROSS(R4>REF(R4,1),0.5); DRAWLINE1(S2,H,S1,H,1),COLORGREEN; DRAWLINE1(U2,L,U1,L,1),COLORRED; DRAWLINE1(S3,H,S2,H,1),COLORYELLOW; DRAWLINE1(U3,L,U2,L,0),COLORRED; DRAWLINE1(S4,H,S3,H,1),COLORWHITE; DRAWLINE1(U4,L,U3,L,0),COLORRED; 前一高:REF(H,BARSLAST(S1)),COLORGREEN,DOT,LINETHICK1; 前一低:REF(L,BARSLAST(U1)),COLORRED,DOT,LINETHICK1; 前二高:REF(H,BARSLAST(S2)),COLORGREEN,DOT,LINETHICK1; 前二低:REF(L,BARSLAST(U2)),COLORRED,DOT,LINETHICK1; MA1:MA(CLOSE,21);