{以下语句为新结构波浪 n=3}
A1:=REF(HIGH,3)=HHV(HIGH,2*n+1); B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1); D1:=FILTER(C1,3);{高点} A2:=REF(LOW,3)=LLV(LOW,2*n+1); B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1); D2:=FILTER(C2,3);{低点} E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; E2:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍} H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1; L1:=(D2 AND NOT(D1 AND E1<E2)); H2:=D1 AND NOT(D2 AND E1>=E2); X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,10000),X1)); G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); 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(IF(H2,HIGH,0),X2)); G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);{过滤后高点} DRAWLINE(LD,L,HD,H,0),COLORWHITE,LINETHICK1; DRAWLINE(HD,H,LD,L,0),COLORWHITE,LINETHICK1; J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1); DRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1; {以上语句为新结构波浪} A3:=H<REF(H,REF(BARSLAST(HD),1)+1); 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)<REF(L,REF(BARSLAST(LD),1)+2+REF(BARSLAST(LD),REF(BARSLAST(LD),1)+2)); D4:=A4 AND B4 AND LD; E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2); LL:=E4>REF(E4,1);{找出全部长期低点} {DRAWICON(Hd,H,10),ALIGN1; DRAWICON(Ld,L,12),ALIGN1;} H3:=HH OR ISLASTBAR OR BARSCOUNT(C)=1; {后面进行过滤,方法同前。只是不用考虑高低点出现在同一K线} 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 ISLASTBAR 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),LINETHICK0;{长期高点,也可供引用} DRAWLINE(HZ,H,LZ,L,0),COLORGREEN,LINETHICK2; DRAWLINE(LZ,L,HZ,H,0),COLORGREEN,LINETHICK2;{长期连线} K1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ))+1); K2:=K1>REF(K1,1); DRAWLINE(K2,IF(HZ,H,L),ISLASTBAR,h,0),COLORGREEN,LINETHICK2; {最后的长期连线,连在收盘价上} {以下是两条趋势线原码} 低1:=BACKSET(ISLASTBAR,BARSLAST(LD)+1); 一低:=低1>REF(低1,1); 低2:=BACKSET(一低,REF(BARSLAST(LD),1)+2); 二低:=低2>REF(低2,1); 低3:=BACKSET(二低,REF(BARSLAST(LD),1)+2); 三低:=低3>REF(低3,1); 低4:=BACKSET(三低,REF(BARSLAST(LD),1)+2); 四低:=低4>REF(低4,1); 低5:=BACKSET(四低,REF(BARSLAST(LD),1)+2); 五低:=低5>REF(低5,1); 低6:=BACKSET(五低,REF(BARSLAST(LD),1)+2); 六低:=低6>REF(低6,1); 低7:=BACKSET(六低,REF(BARSLAST(LD),1)+2); 七低:=低7>REF(低7,1); 低8:=BACKSET(七低,REF(BARSLAST(LD),1)+2); 八低:=低8>REF(低8,1); 低9:=BACKSET(八低,REF(BARSLAST(LD),1)+2); 九低:=低9>REF(低9,1); 高1:=BACKSET(ISLASTBAR,BARSLAST(HD)+1); 一高:=高1>REF(高1,1); 高2:=BACKSET(一高,REF(BARSLAST(HD),1)+2); 二高:=高2>REF(高2,1); 高3:=BACKSET(二高,REF(BARSLAST(HD),1)+2); 三高:=高3>REF(高3,1); 高4:=BACKSET(三高,REF(BARSLAST(HD),1)+2); 四高:=高4>REF(高4,1); 高5:=BACKSET(四高,REF(BARSLAST(HD),1)+2); 五高:=高5>REF(高5,1); 高6:=BACKSET(五高,REF(BARSLAST(HD),1)+2); 六高:=高6>REF(高6,1); 高7:=BACKSET(六高,REF(BARSLAST(HD),1)+2); 七高:=高7>REF(高7,1); 高8:=BACKSET(七高,REF(BARSLAST(HD),1)+2); 八高:=高8>REF(高8,1); 高9:=BACKSET(八高,REF(BARSLAST(HD),1)+2); 九高:=高9>REF(高9,1); DRAWLINE(二低 and n=1,L,一低,L,1),COLORYELLOW,LINETHICK1; DRAWLINE(三低 and n=1,L,二低,L,1),COLORYELLOW,LINETHICK1; DRAWLINE(四低 and n=1,L,三低,L,1),COLORYELLOW,LINETHICK1; DRAWLINE(五低 and n=1,L,四低,L,1),COLORYELLOW,LINETHICK1; DRAWLINE(六低 and n=1,L,五低,L,1),COLORYELLOW,LINETHICK1; DRAWLINE(七低 and n=1,L,六低,L,1),COLORYELLOW,LINETHICK1; DRAWLINE(八低 and n=1,L,七低,L,1),COLORYELLOW,LINETHICK1; DRAWLINE(九低 and n=1,L,八低,L,1),COLORYELLOW,LINETHICK1; DRAWLINE(二高 and n=1,H,一高,H,1),COLORRED,LINETHICK1; DRAWLINE(三高 and n=1,H,二高,H,1),COLORRED,LINETHICK1; DRAWLINE(四高 and n=1,H,三高,H,1),COLORRED,LINETHICK1; DRAWLINE(五高 and n=1,H,四高,H,1),COLORRED,LINETHICK1; DRAWLINE(六高 and n=1,H,五高,H,1),COLORRED,LINETHICK1; DRAWLINE(七高 and n=1,H,六高,H,1),COLORRED,LINETHICK1; DRAWLINE(八高 and n=1,H,七高,H,1),COLORRED,LINETHICK1; DRAWLINE(九高 and n=1,H,八高,H,1),COLORRED,LINETHICK1; 前一低:REF(L,BARSLAST(一低)),COLORGREEN,POINTDOT,LINETHICK2; 前二低:REF(L,BARSLAST(二低)),COLORGREEN,POINTDOT,LINETHICK2; 前三低:REF(L,BARSLAST(三低)),COLORGREEN,POINTDOT,LINETHICK2; 前四低:REF(L,BARSLAST(四低)),COLORGREEN,POINTDOT,LINETHICK2; 前五低:REF(L,BARSLAST(五低)),COLORGREEN,POINTDOT,LINETHICK2; 前六低:REF(L,BARSLAST(六低)),COLORGREEN,POINTDOT,LINETHICK2; 前七低:REF(L,BARSLAST(七低)),COLORGREEN,POINTDOT,LINETHICK2; 前八低:REF(L,BARSLAST(八低)),COLORGREEN,POINTDOT,LINETHICK2; 前九低:REF(L,BARSLAST(九低)),COLORGREEN,POINTDOT,LINETHICK2; 前一高:REF(H,BARSLAST(一高)),COLORRED,POINTDOT,LINETHICK2; 前二高:REF(H,BARSLAST(二高)),COLORRED,POINTDOT,LINETHICK2; 前三高:REF(H,BARSLAST(三高)),COLORRED,POINTDOT,LINETHICK2; 前四高:REF(H,BARSLAST(四高)),COLORRED,POINTDOT,LINETHICK2; 前五高:REF(H,BARSLAST(五高)),COLORRED,POINTDOT,LINETHICK2; 前六高:REF(H,BARSLAST(六高)),COLORRED,POINTDOT,LINETHICK2; 前七高:REF(H,BARSLAST(七高)),COLORRED,POINTDOT,LINETHICK2; 前八高:REF(H,BARSLAST(八高)),COLORRED,POINTDOT,LINETHICK2; 前九高:REF(H,BARSLAST(九高)),COLORRED,POINTDOT,LINETHICK2; |
|