MA5:MA(CLOSE,5);
MA10:MA(CLOSE,10);
MA20:MA(CLOSE,20);
MA60:MA(CLOSE,60);
MA120:MA(C,120);
MA240:MA(C,240);
{MACD金叉 }
DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:= EMA(DIFF,9);
MACD:= 2*(DIFF-DEA);
ZB:=CROSS(DIFF,DEA)AND MACD>0;
DRAWICON(CROSS(MA10,MA20),MA20,1); {10日上穿20日做记号}
DRAWICON(CROSS(MA20,MA60),MA60,1); {20日上穿60日做记号}
DRAWICON(CROSS(MA20,MA120),MA120,1); {20日上穿60日做记号}
DRAWICON(CROSS(MA20,MA240),MA240,1);{20日上穿120日做记号}
DRAWICON(CROSS(MA60,MA120),MA60,1); {60日上穿120日做记号}
DRAWICON(CROSS(MA60,MA240),MA240,1); {60日上穿240日做记号}
DRAWICON(CROSS(MA120,MA240),MA240,1);{120日上穿240日做记号}
DRAWICON(CROSS(MA10,MA5),MA10,2); {5日下穿10日做记号}
DRAWICON(CROSS(MA20,MA10),MA20,2); {10日下穿20日做记号}
DRAWICON(CROSS(MA60,MA20),MA60,6); {20日下穿60日做记号}
DRAWICON(CROSS(MA120,MA60),MA60,6); {60日下穿120日做记号}
反弹托:=MA5>MA20 AND MA5>MA20 AND MA20<MA60 AND MA60<MA120 AND CROSS(MA10,MA20);
月价托:=MA5>MA20 AND MA20>MA60 AND MA60>MA120 AND MA5>MA20 AND CROSS(MA10,MA20);
季价托:=MA20>MA60 AND MA20>MA60 AND CROSS(MA20,MA60);
短长价托:=MA5>MA60 AND MA5>MA10 AND CROSS(MA10,MA60);
半年托:=MA60>MA120 AND MA60>MA120 AND CROSS(MA60,MA120);
熊来:=MA60<MA120 AND MA60<MA120 AND CROSS(MA120,MA60);
年托:=MA120>MA240 AND MA120>MA240 AND CROSS(MA120,MA240);
月蜘蛛:=MA5>MA10 AND MA10>MA20 AND CROSS(MA5,MA20);
DRAWTEXT(月蜘蛛,MA20-0.012,'金蜘蛛'),COLORMAGENTA;
DRAWTEXT(反弹托,MA20-0.08,'反弹托'),COLORMAGENTA;
DRAWTEXT(月价托 ,MA20-0.2,'月托'),COLORMAGENTA;
DRAWTEXT(季价托,MA60-0.0.08,'季托'),COLORMAGENTA;
DRAWTEXT(短长价托,L+0.015,'短长托'),COLOR36C0C1;
DRAWTEXT(半年托,MA120-0.08,'牛来'),COLORRED;
DRAWTEXT(熊来,MA60+0.08,'小心熊'),COLORGREEN;
DRAWTEXT(年托,MA240-0.08,'年托'),COLORRED;
压:=MA10<MA20 AND MA20>MA10 AND CROSS(MA20,MA10);
DRAWTEXT(压,MA20+0.012,'压'),COLORYELLOW;
VOL5:=MA(VOL,5),COLORWHITE;
VOL10:=MA(VOL,10),COLORYELLOW;
VOL40:=MA(VOL,40),COLORFF00FF ;
量托:=VOL5>=VOL40 AND CROSS(VOL10,VOL40) AND REF(VOL10,1)<REF(VOL40,1);
DRAWTEXT(量托,L-0.012,'量托'),COLORWHITE;
AA:=BARSLAST(MA60>MA20 AND (MA20=MA10 OR MA20>MA10));
BB:=REF(COUNT(C<MA60,AA)=AA,1);
CC:=CROSS(C,MA60) AND VOL>MA(VOL,5) AND (C-REF(C,1))/REF(C,1)*100>3;
芙蓉出水:=BB AND CC,COLOR00FF00;
DRAWTEXT(芙蓉出水,H+0.12,'芙蓉出水'),COLORFF00FF;
STICKLINE(芙蓉出水,H,L,0.5,1),COLORFF00FF;
STICKLINE(芙蓉出水,O,C,4,1),LINETHICK2,COLORFF00FF;
MA1:=MA(CLOSE,5);
MA2:=MA(CLOSE,10);
MA3:=MA(CLOSE,30);
ZJ:=AMOUNT/10000;{资金}
TM:=V-MA(V,10);{量填满}
一穿三:=MA1>O AND MA2>O AND MA3>O AND MA1<C AND MA2<C AND MA3<C AND CLOSE>OPEN ;
DRAWTEXT(一穿三,L-0.012,'穿三线'),COLORFF00FF;
C6:=REF(C,1);
涨停:=IF((C-C6)*100/C6>=(10-0.01*100/C6),1,0);
STICKLINE(涨停,OPEN,CLOSE,2,0),COLORMAGENTA;
STICKLINE(涨停,H,L,0,0),COLORLIRED;
{精准峰谷线主图公式: 不懂设立参数的，就不要用了，否则出错，含未来，不喜勿用！}
{设立参数:百分比(2,20,5), 右数峰序(2,20,2)}
{ZIG(3,5);}
{百分比:=5};
{右数峰序:=2;}
波谷值: CONST(TROUGH(2,百分比,1)),NODRAW;{前M个ZIG转向波谷值}
波谷距离:= 1+CONST(TROUGHBARS(2,百分比,1)),NODRAW;{前M个ZIG转向波谷到当前距离}
{例如:TROUGH(2,5,2)表示%5最低价ZIG转向的前2个波谷到当前的周期数};
波峰值:= CONST(PEAK(1,百分比,右数峰序));
{例如EAK(1,5,1)表示%5最高价ZIG转向的上一个波峰的数值}
允许误差:=0.024;
XG:= ABS(波峰值-波谷值)<=允许误差 {AND BARSCOUNT(V)>60};
波峰距离:= 1+CONST(PEAKBARS(1,百分比,右数峰序)),NODRAW;
{PEAKBARS(K,N,M)表示之字转向ZIG(K,N)的前M个波峰到当前的周期数,M必须大于等于1}
距离:=CURRBARSCOUNT;
DRAWLINE(距离=波峰距离 AND XG,波谷值,距离=1,波谷值,1),COLORMAGENTA;
DRAWTEXT(距离=波谷距离 AND XG,L*0.98,' 精准峰谷线'),COLORYELLOW;
DRAWICON(距离=波峰距离,H*1.01,2);{波峰位置}
DRAWICON(距离=波谷距离,L*0.985,1);{波谷位置}
精准点:=(ABS(H-波谷值)<=允许误差 OR ABS(L-波谷值)<=0.024) {AND 距离<=120};
STICKLINE(精准点,波谷值,波谷值,3,1),COLORYELLOW;
{画精准谷底线}
波谷值2:= CONST(TROUGH(2,百分比,2));
波谷值3:= CONST(TROUGH(2,百分比,3));
波谷值4:= CONST(TROUGH(2,百分比,4));
波谷距离2:= 1+CONST(TROUGHBARS(2,百分比,2));
波谷距离3:= 1+CONST(TROUGHBARS(2,百分比,3));
波谷距离4:= 1+CONST(TROUGHBARS(2,百分比,4));
XG2:= ABS(波谷值-波谷值2)<=允许误差;
XG3:= ABS(波谷值-波谷值3)<=允许误差;
XG4:= ABS(波谷值-波谷值4)<=允许误差;
XGL:=(距离=波谷距离2 AND XG2) OR (距离=波谷距离3 AND XG3)
OR (距离=波谷距离4 AND XG4);
DRAWLINE(XGL,波谷值,距离=1,波谷值,1),COLORLIGREEN;
DRAWTEXT(XGL,L*0.98,' 精准谷底线'),COLORYELLOW;
{低价精准线}
TT1:=CONST(L);
BB1:=O=TT1;
CC1:=O=TT1-0.01;
DD1:=O=TT1+0.01;
EE1:=BB1=0 AND CC1=1;
FF1:=BB1=0 AND DD1=1;
BB2:=C=TT1;
CC2:=C=TT1-0.01;
DD2:=C=TT1+0.01;
EE2:=BB2=0 AND CC2=1;
FF2:=BB2=0 AND DD2=1;
BB3:=L=TT1;
CC3:=L=TT1-0.01;
DD3:=L=TT1+0.01;
EE3:=BB3=0 AND CC3=1;
FF3:=BB3=0 AND DD3=1;
BB4:=H=TT1;
CC4:=H=TT1-0.01;
DD4:=H=TT1+0.01;
EE4:=BB4=0 AND CC4=1;
FF4:=BB4=0 AND DD4=1;
QQ1:=BB1 OR BB2 OR BB3 OR BB4;
QQ2:=CC1 OR CC2 OR CC3 OR CC4;
QQ3:=DD1 OR DD2 OR DD3 OR DD4;
低价严格精准:STICKLINE(QQ1=1,TT1,0.975*TT1,1.25,1),COLORYELLOW;
低价加值精准:STICKLINE(QQ2=1 AND QQ1=0,TT1,0.975*TT1,1.25,1),COLORMAGENTA;
低价减值精准:STICKLINE(QQ3=1 AND QQ1=0,TT1,0.975*TT1,1.25,1),COLORGREEN;
低价精准线:TT1, COLORGREEN;
(其中精准线与峰谷线来自 wen98老师原码)
111.jpg (42.45 KB)
下载次数:11
2011-5-5 18:01
参数必须设置,主图才能成功
011.jpg (157.46 KB)
下载次数:4
2011-5-5 18:02
通达信例图
转载请注明出自股海明灯论坛 http://www.178448.com/,本贴地址:http://www.178448.com/thread-272669-1-1.html |
IP卡
狗仔卡
发表于 2011-5-6 14:19
显身卡