- {设立参数:百分比(3,20,5), 右数峰序(2,20,2)}
- {ZIG(3,5);}
- {百分比:=5};
- {右数峰序:=2;}
- A1:=MA(CLOSE,5);
- A2:=MA(CLOSE,10);
- A3:=MA(CLOSE,20);
- A4:=MA(CLOSE,30);
- DT:=CLOSE>A1 AND A1>A2 AND A2>A3 AND A3>A4;
- {MA5:MA(C,5);}{HTTP://U.178448.COM/SPACE.PHP?UID=30578}
- MA10:=MA(C,10);{WEN98编写}
- MA20:=MA(C,20);
- 波谷值:=CONST(TROUGH(2,百分比,1)),NODRAW;{前M个ZIG转向波谷值}
- 波谷值1:=CONST(TROUGH(2,百分比,2)),NODRAW;
- 波谷值2:=CONST(TROUGH(2,百分比,3)),NODRAW;
- 波谷值3:=CONST(TROUGH(2,百分比,4)),NODRAW;
- 波谷值4:=CONST(TROUGH(2,百分比,5)),NODRAW;
- 波谷距离:= 1+CONST(TROUGHBARS(2,百分比,1)),NODRAW;{前M个ZIG转向波谷到当前距离}
- {例如:TROUGH(2,5,2)表示%5最低价ZIG转向的前2个波谷到当前的周期数};
- 波谷距离1:= 1+CONST(TROUGHBARS(2,百分比,2)),NODRAW;
- 波谷距离2:= 1+CONST(TROUGHBARS(2,百分比,3)),NODRAW;
- 波谷距离3:= 1+CONST(TROUGHBARS(2,百分比,4)),NODRAW;
- 波谷距离4:= 1+CONST(TROUGHBARS(2,百分比,5)),NODRAW;
- 波峰值:=CONST(PEAK(1,百分比,右数峰序));
- 波峰值1:=CONST(PEAK(1,百分比,3));
- 波峰值2:=CONST(PEAK(1,百分比,4));
- 波峰值3:=CONST(PEAK(1,百分比,5));
- 波峰值4:=CONST(PEAK(1,百分比,6));
- {例如:PEAK(1,5,1)表示%5最高价ZIG转向的上一个波峰的数值}
- N:=0.001;
- XG:=ABS(波峰值-波谷值)<=N {AND BARSCOUNT(V)>60};
- XG1:=ABS(波峰值1-波谷值1)<=N {AND BARSCOUNT(V)>60};
- XG2:=ABS(波峰值2-波谷值2)<=N {AND BARSCOUNT(V)>60};
- XG3:=ABS(波峰值3-波谷值3)<=N {AND BARSCOUNT(V)>60};
- XG4:=ABS(波峰值4-波谷值4)<=N {AND BARSCOUNT(V)>60};
- 波峰距离:= 1+CONST(PEAKBARS(1,百分比,右数峰序)),NODRAW;
- {PEAKBARS(K,N,M)表示之字转向ZIG(K,N)的前M个波峰到当前的周期数,M必须大于等于1}
- BFJL:=1+CONST(PEAKBARS(1,百分比,3)),NODRAW;
- BFJL1:=1+CONST(PEAKBARS(1,百分比,4)),NODRAW;
- BFJL2:=1+CONST(PEAKBARS(1,百分比,5)),NODRAW;
- BFJL3:=1+CONST(PEAKBARS(1,百分比,6)),NODRAW;
- 距离:=CURRBARSCOUNT;
- JZX:DRAWLINE(距离=波峰距离 AND XG,波谷值,距离=1,波谷值,1),COLORMAGENTA;
- JZX1:DRAWLINE(距离=BFJL AND XG1,波谷值1,距离=波谷距离,波谷值1,1),COLORMAGENTA;
- JZX2:DRAWLINE(距离=BFJL1 AND XG2,波谷值2,距离=波谷距离1,波谷值2,1),COLORMAGENTA;
- JZX3:DRAWLINE(距离=BFJL2 AND XG3,波谷值3,距离=波谷距离2,波谷值3,1),COLORMAGENTA;
- JZX4:DRAWLINE(距离=BFJL3 AND XG4,波谷值4,距离=波谷距离3,波谷值4,1),COLORMAGENTA;
- DRAWTEXT(距离=波谷距离 AND XG,L*0.98,' 峰谷线'),COLORYELLOW;
- DRAWTEXT(距离=波谷距离1 AND XG1,L*0.98,' 峰谷线'),COLORYELLOW;
- DRAWTEXT(距离=波谷距离2 AND XG2,L*0.98,' 峰谷线'),COLORYELLOW;
- DRAWTEXT(距离=波谷距离3 AND XG3,L*0.98,' 峰谷线'),COLORYELLOW;
- DRAWTEXT(距离=波谷距离4 AND XG4,L*0.98,' 峰谷线'),COLORYELLOW;
- DRAWICON(距离=波峰距离,H*1.01,2);{波峰位置}
- DRAWICON(距离=波谷距离,L*0.985,1);{波谷位置}
- DRAWICON(距离=BFJL,H*1.01,2);
- DRAWICON(距离=BFJL1,H*1.01,2);
- DRAWICON(距离=波谷距离1,L*0.985,1);
- DRAWICON(距离=波谷距离2,L*0.985,1);
- DRAWICON(距离=波谷距离3,L*0.985,1);
- DRAWICON(距离=波谷距离4,L*0.985,1);
- JZX0:DRAWLINE(距离=1+CONST(TROUGHBARS(2,百分比,2)) AND XG,
- 波谷值,距离=1,波谷值,1),COLORMAGENTA;
- 精准点:=(ABS(H-波谷值)<=N OR ABS(L-波谷值)<=N) {AND 距离<=120};
- 精准点1:=(ABS(H-波谷值1)<=N OR ABS(L-波谷值1)<=N);
- 精准点2:=(ABS(H-波谷值2)<=N OR ABS(L-波谷值2)<=N);
- 精准点3:=(ABS(H-波谷值3)<=N OR ABS(L-波谷值3)<=N);
- 精准点4:=(ABS(H-波谷值4)<=N OR ABS(L-波谷值4)<=N);
- STICKLINE(精准点,波谷值,波谷值,3,1),COLORYELLOW;
- DRAWTEXT(精准点,波谷值*0.98,'A');
- DRAWTEXT(精准点1,波谷值1*0.98,'A1');
- DRAWTEXT(精准点2,波谷值2*0.98,'A2');
- DRAWTEXT(精准点3,波谷值3*0.98,'A3');
- DRAWTEXT(精准点4,波谷值4*0.98,'A4');
- JZX5:DRAWLINE(精准点1,波谷值,精准点,波谷值,1),COLORBLUE;
- JZX6:DRAWLINE(精准点2,波谷值1,精准点1,波谷值1,1),COLORBLUE;
- JZX7:DRAWLINE(精准点3,波谷值2,精准点2,波谷值2,1),COLORBLUE;
- JZX8:DRAWLINE(精准点4,波谷值3,精准点3,波谷值3,1),COLORBLUE;
- {MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
- 主力:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+
- 16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+
- 13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+
- 10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+
- 7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+
- 4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED;};
- 精准点0:=(ABS(H-波峰值)<=N OR ABS(L-波峰值)<=N) {AND 距离<=120};
- 精准点A:=(ABS(H-波峰值1)<=N OR ABS(L-波峰值1)<=N);
- 精准点B:=(ABS(H-波峰值2)<=N OR ABS(L-波峰值2)<=N);
- 精准点C:=(ABS(H-波峰值3)<=N OR ABS(L-波峰值3)<=N);
- 精准点D:=(ABS(H-波峰值4)<=N OR ABS(L-波峰值4)<=N);
- STICKLINE(精准点0,波峰值,波峰值,3,1),COLORYELLOW;
- DRAWTEXT(精准点0,波峰值,'D');
- DRAWTEXT(精准点A,波峰值1,'D1');
- DRAWTEXT(精准点B,波峰值2,'D2');
- DRAWTEXT(精准点C,波峰值3,'D3');
- DRAWTEXT(精准点D,波峰值4,'D4');
- JZX51:DRAWLINE(精准点A,波峰值,精准点0,波峰值,1),COLORYELLOW;
- JZX61:DRAWLINE(精准点B,波峰值1,精准点A,波峰值1,1),COLORYELLOW;
- JZX71:DRAWLINE(精准点C,波峰值2,精准点B,波峰值2,1),COLORYELLOW;
- JZX81:DRAWLINE(精准点D,波峰值3,精准点C,波峰值3,1),COLORYELLOW;
- {4.咬住峰顶线}
- FDX:=PEAK(1,5,1);{REF(HHV(H,60),5)};{上一波峰值}
- TJ:=BETWEEN(MA(H,3),波峰值1*0.998,波峰值1*1.02);
- T1J:=BETWEEN(MA(H,3),波峰值2*0.998,波峰值2*1.02);
- T2J:=BETWEEN(MA(H,3),波峰值3*0.998,波峰值3*1.02);
- T3J:=BETWEEN(MA(H,3),波峰值*0.998,波峰值*1.02);
- 咬住峰顶线:=COUNT(TJ,3)>=2 OR COUNT(T1J,3)>=2 OR COUNT(T2J,3)>=2 OR
- COUNT(T3J,3)>=2;
- {DRAWTEXT(咬住峰顶线,L*0.98,'咬');}
- 异向并肩精准:= MIN(O,C)=REF(MAX(O,C),1) ;
- DRAWTEXT(异向并肩精准,L*0.95,'异向精准'),COLORRED;
复制代码 |