是在网页上看到的，觉得可以贴过来分享，大智慧1　的。
要顶啊！我是头一次发帖，分最少


《上出下买+三背离》指标源码：

A:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1));
B:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1);
分水岭:IF(MA(CLOSE,17)<B,B,MA(CLOSE,17)),COLORFF00FF,LINETHICK2;
操作线:分水岭-(EMA(C,3)-分水岭),COLOR00FFFF,LINETHICK2;
PM:Ma(C,5),COLORred,linethick2;
IF (PM>分水岭,PM,pm),Color0000FF,linethick2;
IF (PM>分水岭,分水岭,a),ColoR00ff00,POINTDOT,linethick4;
IF (C<PM,PM,PM),ColorFF9900,linethick2;
IF (PM<分水岭,分水岭,pm),Color0000FF,linethick2;
DRAWICON(CROSS(分水岭,操作线),分水岭-0.02,1);
{顶底背离}
A1:=BARSLAST(ref(cross("macd.diff"(12,26,9),"macd.dea"(12,26,9)),1));
B1:=ref(c,A1+1)>c and ref("macd.diff"(12,26,9),A1+1)<"macd.diff"(12,26,9) and cross("macd.diff"(12,26,9),"macd.dea"(12,26,9));
DRAWTEXT(FILTER(B1>0,5),L-0.12,'M底'),COLORRED;
A2:=BARSLAST(ref(cross("kdj.k"(9,9,3),"kdj.d"(9,9,3)),1));
B2:=ref(c,A2+1)>c and ref("kdj.k"(9,9,3),A2+1)<"kdj.k"(9,9,3) and cross("kdj.k"(9,9,3),"kdj.d"(9,9,3));
DRAWTEXT(FILTER(B2>0,5),L-0.08,'K底'),COLORFF00FF;
A3:=BARSLAST(ref(cross("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));
B3:=ref(c,A3+1)>c and ref("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) and cross("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));
DRAWTEXT(FILTER(B3>0,5),L-0.02,'R底'),COLORffcc66;
C1:=BARSLAST(ref(cross("macd.dea"(12,26,9),"macd.diff"(12,26,9)),1));
D1:=ref(c,C1+1)<c and ref("macd.diff"(12,26,9),C1+1)>"macd.diff"(12,26,9) and cross("macd.dea"(12,26,9),"macd.diff"(12,26,9));
DRAWTEXT(FILTER(D1>0,5),H+0.24,'M顶'),COLOR0066FF;
C2:=BARSLAST(ref(cross("kdj.d"(9,9,3),"kdj.k"(9,9,3)),1));
D2:=ref(c,C2+1)<c and ref("kdj.k"(9,9,3),C2+1)>"kdj.k"(9,9,3) and cross("kdj.d"(9,9,3),"kdj.k"(9,9,3));
DRAWTEXT(FILTER(D2>0,5),H+0.16,'K顶'),COLOR00FF00;
C3:=BARSLAST(ref(cross("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1));
D3:=ref(c,C3+1)<c and ref("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24) and cross("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24));
DRAWTEXT(FILTER(D3>0,5),H+0.08,'R顶'),COLORffffCC;

[ 本帖最后由 tangsanyuo 于 2008-5-26 21:22 编辑 ]

谢谢你的分享

又找到一个很利害的啊！
《探测主力》无未来　　　大智慧(副图)

m:=55;

n:=34;

LC:=REF(CLOSE,1);

RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);

FF:=EMA(CLOSE,3);

MA15:=EMA(CLOSE,21);

DRAWTEXT(CROSS(85,RSI),75,'减仓'),colorgreen;

Var1:=IF(YEAR>=2038 AND MONTH>=1,0,1);

Var2:=REF(LOW,1)*Var1;

Var3:=SMA(ABS(LOW-Var2),3,1)/SMA(MAX(LOW-Var2,0),3,1)*100*Var1;

Var4:=EMA(IF(CLOSE*1.3,Var3*10,Var3/10),3)*Var1;

Var5:=LLV(LOW,30)*Var1;

Var6:=HHV(Var4,30)*Var1;

Var7:=IF(MA(CLOSE,58),1,0)*Var1;

Var8:=EMA(IF(LOW<=Var5,(Var4+Var6*2)/2,0),3)/618*Var7*Var1;

吸筹:IF(Var8>100,100,Var8)*Var1,colorred;

庄家吸筹:STICKLINE(吸筹>-150,0,吸筹,8,0),colorred;

散户线: 100*(HHV(HIGH,M)-CLOSE)/(HHV(HIGH,M)-LLV(LOW,M)),ColorFFFF00,LINETHICK2;

RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;

K:=SMA(RSV,3,1);

D:=SMA(K,3,1);

J:=3*K-2*D;

庄家线:EMA(j,6),colorff00ff,LINETHICK2;

谢谢你

又弄到一个　主副图可以用。　行了。
谁可以给我发一个条件选股公式，选出来明天一买就涨那种，要吹糠见米、立竿见影才行啊

复制内容到剪贴板

代码:

超强的副图公式
zjhzcj1:=(CLOSE-LLV(LOW,80))/(HHV(HIGH,80)-LLV(LOW,80))*200;
zjhzcj2:=SMA(zjhzcj1,3,1);
zjhzcj3:=SMA(zjhzcj2,3,1);
zjhzcj4:=3*zjhzcj2-2*zjhzcj3;
zjhzcj5:=LLV(LOW,5);
zjhzcj6:=HHV(HIGH,5);
zjhzcj7:=EMA((CLOSE-zjhzcj5)/(zjhzcj6-zjhzcj5)*100,4)*2;
zjhzcj8:=EMA(0.667*REF(zjhzcj7,1)+0.333*zjhzcj7,2);
zjhzcj9:=3*zjhzcj7-2*zjhzcj8;
zjhzcjA:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
zjhzcjB:=POW(MA(LOW,5),2)+MA(LOW,5);
zjhzcjC:=POW(MA(HIGH,5),2)+MA(HIGH,5);
zjhzcjD:=(zjhzcjA-LLV(zjhzcjB,64))/(HHV(zjhzcjC,64)-LLV(zjhzcjB,64))*150+65-10;
zjhzcjE:=SMA(zjhzcjD,3,1)*1.5-100;
zjhzcjF:=SMA(zjhzcjE,3,1);
zjhzcj10:=3*zjhzcjE-2*zjhzcjF;
zjhzcj11:=(HIGH+LOW+CLOSE*2)/4;
zjhzcj12:=EMA(zjhzcj11,13);
zjhzcj13:=STD(zjhzcj11,13);
zjhzcj14:=(zjhzcj11-zjhzcj12)*100/zjhzcj13;
zjhzcj15:=EMA(zjhzcj14,5);
zjhzcj16:=EMA(zjhzcj15,13);
zjhzcj17:=EMA(zjhzcj15,13)+200-100;
zjhzcj18:=EMA(zjhzcj17,10);
zjhzcj19:=3*zjhzcj17-2*zjhzcj18;
zjhzcj1A:=zjhzcj2+zjhzcj7+zjhzcjE+zjhzcj17;
zjhzcj1B:=zjhzcj3+zjhzcj8+zjhzcjF+zjhzcj18;
zjhzcj1C:=zjhzcj4+zjhzcj9+zjhzcj10+zjhzcj19;
zjhzcj1D:=(HIGH+LOW+CLOSE)/3;
zjhzcj1E:=AMOUNT/VOL/100;
zjhzcj1F:=SUM(AMOUNT,5)/SUM(VOL,5)/100;
zjhzcj20:=(zjhzcj1D-MA(zjhzcj1D,34))/(0.015*AVEDEV(zjhzcj1D,34));
zjhzcj21:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
zjhzcj22:=(HIGH+LOW+CLOSE+zjhzcj1D)/4;
zjhzcj23:=EMA(zjhzcj22,24);
zjhzcj24:=STD(zjhzcj22,24);
zjhzcj25:=(zjhzcj22-zjhzcj23)/zjhzcj24*100;
zjhzcj26:=(zjhzcj1D-MA(zjhzcj1D,24))/(0.015*AVEDEV(zjhzcj1D,24));
zjhzcj27:=EMA(zjhzcj25,5);
zjhzcj28:=(zjhzcj1E-MA(zjhzcj1E,21))/(0.015*AVEDEV(zjhzcj1E,21));
zjhzcj29:=(zjhzcj1F-MA(zjhzcj1F,90))/(0.015*AVEDEV(zjhzcj1F,90));
zjhzcj2A:=((zjhzcj29+zjhzcj28+zjhzcj27+zjhzcj26+zjhzcj20)/3+165)/4;
zjhzcj2B:=(EMA(EMA(EMA(zjhzcj2A,15),10),5)-25)*2+zjhzcj21;
zjhzcj2C:=(zjhzcj1A+zjhzcj1B+zjhzcj1C*30)/32/5-15;
zjhzcj2D:=EMA(zjhzcj2C,13);{13}
zjhzcj2E:=(zjhzcj2A+zjhzcj2C)/2/1.1;  
dx1:=ema(zjhzcj2E,1),coloryellow;
dx2:=EMA(DX1,12),colorred;
zx:=ema((zjhzcj2B+zjhzcj2D)/2,2),color808080;
cj:=(3*c+l+o+h)/6;
多空线:(20*cj+19*ref(cj,1)+18*ref(cj,2)+17*ref(cj,3)+16*ref(cj,4)+15*ref(cj,5)+14*ref(cj,6)+13*ref(cj,7)+12*ref(cj,8)+11*ref(cj,9)+10*ref(cj,10)+9*ref(cj,11)+8*ref(cj,12)+7*ref(cj,13)+6*ref(cj,14)+5*ref(cj,15)+4*ref(cj,16)+3*ref(cj,17)+2*ref(cj,18)+ref(cj,20))/210;
AA20:=多空线;
STICKLINE(zx-ref(zx,1)>=0,AA20,REF(AA20,1),8,0),Coloryellow,LINETHICK3;
STICKLINE(zx-ref(zx,1)<0,AA20,REF(AA20,1),8,0),ColorF07600,LINETHICK3;
TY:=C;
A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);
A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);
A:=REF(C,BARSLAST(HD));
Z:=REF(L,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
顶:IF(T1,A,A),COLOR808080,linethick1,POINTDOT;
底:IF(T2,Z,Z),COLORgreen,linethick1,POINTDOT;
B11:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
B22:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
B33:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
MM:=(B11+2*B22+3*B33)/6;
MN:=MA(MM,3);
drawicon(FILTER(cross(dx1,zx) and COUNT(mn<-7,2)>=1 or (cross(dx1,dx2) and dx2<10),5),l*0.96,1);
D:=((MEMA(CLOSE,3) - MEMA(CLOSE,6)) * 5);
S:=MA(C,9);
Z1:=((EMA(D,7) + EMA(CLOSE,5))-S)*100;
P:=EMA(Z1,2);
x2:=Z1;
x3:=P;
stickline(x2>=x3,low,high,0.1,1),colorred;
stickline(x2>=x3,close,open,5,1),colorred;
stickline(x2<x3 ,low,high,0.1,0),colorffff54;
stickline(x2<x3,close,open,5,0),colorffff54;

使用方法：
主图的红色K线代表买入或增仓，蓝色K线代表减仓或卖出。黄色色块代表做多，天蓝色色块代表做空。原则上，卖点没有出现，红色K线区域都可以买入。如果黄色色块保持完好没有变色，你尽可以根据红蓝K线的指示，高抛低吸做差价，一直到波段的结束。股价跌破黄色阶梯色块表示波段的彻底结束，为最终止损位。

辛苦了谢谢

多谢 多谢

多谢 多谢.多谢你的分享

多谢.多谢你的分享!!!!!!!!!!

没有定义符，通不过。我改了一下可以通过了，但没看到什么黄色和兰色色块。

测试后出现错误　原因是 在作怪，你在错误的地方就是多空线的后面加上　：（　就通过了，不好意思了，因为本人不知道怎么把那个鬼仔去掉，

[ 本帖最后由 tangsanyuo 于 2008-5-23 11:53 编辑 ]

谢谢楼主热心解释。但 ：“黄色色块代表做多，天蓝色色块代表做空。原则上，卖点没有出现，红色K线区域都可以买入。如果黄色色块保持完好没有变色，你尽可以根据红蓝K线的指示，高抛低吸做差价，一直到波段的结束。股价跌破黄色阶梯色块表示波段的彻底结束，为最终止损位。” 我没看到黄色和兰色色块。

谢谢楼主，解决了。我错把这个指标当主图指标了

收下了，谢谢！。。。。

谢谢分享

{乖离出入}

Var1:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
Var2:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
Var3:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
Var4:=(Var1+2*Var2+3*Var3)/6;
Var5:=MA(Var4,3)-STD(Var4,3);
乖离36: STICKLINE(Var5<-36,125,110,6,0), ,COLOR95FBDD ;
乖离28: STICKLINE(Var5<-28 AND Var5>-36,115,100,6,0), ,COLORred ;
乖离24: STICKLINE(Var5<-24 AND Var5>-28,105,85,6,0), , COLORYELLOW;
乖离20: STICKLINE(Var5<-20 AND Var5>-24,95,65,6,0), , COLORRED;
乖离18: STICKLINE(Var5<-18 AND Var5>-20,85,55,6,0), ,COLORDDAA78 ;
乖离16: STICKLINE(Var5<-16 AND Var5>-18,75,45,6,0), ,COLORFFE0C0;
乖离14: STICKLINE(Var5<-14 AND Var5>-16,65,35,6,0), , ;
乖离12: STICKLINE(Var5<-12 AND Var5>-14,50,20,5,0), ,  COLORGREEN;
乖离9: STICKLINE(Var5<-9 AND Var5>-12,35,5,5,0), , COLORAAAE5D;
乖离6: STICKLINE(Var5<-6 AND Var5>-9,-2,-15,5,0), , COLORWHITE;
Var6:=STICKLINE(Var5<-4 AND Var5>-6,-17,-30,5,0);
Var7:=(EMA(CLOSE,12)-EMA(CLOSE,26))*100+50;
Var8:=EMA(Var7,9);
Var9:=2*(Var7-Var8);
VarA:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K: SMA(VarA,3,1), , COLORYELLOW;
VarB:=SMA(K,3,1);
J: 3*K-2*VarB, , COLORGREEN;
试探介入: IF(CROSS(J,VarB) AND COUNT(Var5<-9,4)>=1,65,-15),LINETHICK2 , COLOR6ACCFF;
果断介入: IF(CROSS(J,VarB) AND COUNT(Var5<-12,3)>=1,95,1), , COLORred;
主力介入: IF(CROSS(J,VarB) AND COUNT(Var5<-16,4)>=1,40,-15), , COLORWHITE;
VarC:=DRAWICON(CROSS(J,1),1,1);
98;

{高抛低吸}
Var1:=(HHV(HIGH,21)-CLOSE)/(HHV(HIGH,21)-LLV(LOW,21))*100-10;
Var2:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
Var3:=SMA(Var2,13,8);
高抛: 90, POINTDOT;
低吸: 0, POINTDOT;
多方能量: SMA(Var3,13,8);
空方能量: SMA(Var1,21,8);
买进: IF(CROSS(多方能量,45),18,-4);
卖出: IF(CROSS(45,多方能量),18,-4);
强弱分界: 45, CIRCLEDOT;

[ 本帖最后由 tangsanyuo 于 2008-5-25 00:09 编辑 ]

大智慧：殷保华密码线（主图）

大盘:=EMA(INDEXC,500)/EMA(C,500);
大盘线:INDEXC/大盘,LINETHICK1,colorblue;
工作线:ema(c,14),colorf00ff0,linethick1;
一号线:ema(CLOSE,144),pointdot,linethick2,Color0000FF;
二号线:ema(c,25),colorwhite,linethick2;
三号线:ema(c,318),Color0000FF,linethick2;
四黑马线:ema(c,453),pointdot,linethick2,coloryellow;
五号线:ema(c,550),COLORFFCC66;
六号线:ema(c,610),linethick2,coloryellow;
七号线:ema(c,730),COLORBLUE;
八号线:ema(c,99),pointdot,linethick2,colorwhite;
DIFF:=( EMA(CLOSE,7) - EMA(CLOSE,19)),COLORwhite;
DEA:=EMA(DIFF,9),COLORf00ff0 ;
MACD:=0.90*(DIFF-DEA), COLORSTICK;
tj:=(diff>=dea);
tj1:=(diff>=0);
stickline(tj,h,l,0.5,0),COLORyellow;
stickline(tj,o,c,4,0),COLORyellow;
stickline(tj1 and tj,h,l,0.5,0),colorf00ff0;
stickline(tj1 and tj,o,c,4,1),colorf00ff0;
stickline(diff<dea,h,l,0.5,0),colorf0f000;
stickline(diff<dea,o,c,4,0),colorf0f000;
Var1:=(CLOSE*2+HIGH+LOW)/4;
SK:= EMA(Var1,13)-EMA(Var1,73);
SD:= EMA(SK,2);
drawtext((cross(sk,sd) and sk<-0.04 and (c-ref(c,1))/ref(c,1)>=0.03) or (cross(sk,sd) and sk<=-0.14 ) or (cross(sk,sd) and sk<=0.05 and (v/ma(v,5)>2 or c/ref(c,1)>0.035)) ,l*0.99,'短线'),colorred;
stickline((cross(sk,sd) and sk<-0.04 and (c-ref(c,1))/ref(c,1)>=0.03) or (cross(sk,sd) and sk<=-0.14 ) or (cross(sk,sd) and sk<=0.05 and (v/ma(v,5)>2 or c/ref(c,1)>0.035)),h,l,0.5,0),colorred;
stickline((cross(sk,sd) and sk<-0.04 and (c-ref(c,1))/ref(c,1)>=0.03) or (cross(sk,sd) and sk<=-0.14 ) or (cross(sk,sd) and sk<=0.05 and (v/ma(v,5)>2 or c/ref(c,1)>0.035)),o,c,10,1),linethick3,colorred;

ss:=cross(二号线,八号线) AND c>1.5 AND c>REF(C,1.5) AND C/REF(C,1.5)>=0.98
or cross(二号线,三号线) AND c>1.5 AND c>REF(C,1.5) AND C/REF(C,1.5)>=0.98
or cross(二号线,一号线) AND c>1.5 AND c>REF(C,1.5) AND C/REF(C,1.5)>=0.98{AND CROSS(二号线,三号线)};
DRAWICON(SS,L-0.04,1);
DD:=cross(八号线,一号线) AND c>1.5 AND c>REF(C,1.5) AND C/REF(C,1.5)>=0.98
or cross(八号线,四黑马线) AND c>1.5 AND c>REF(C,1.5) AND C/REF(C,1.5)>=0.98
or cross(八号线,三号线) AND c>1.5 AND c>REF(C,1.5) AND C/REF(C,1.5)>=0.98
or cross(八号线,三号线) AND c>1.5 AND c>REF(C,1.5) AND C/REF(C,1.5)>=0.98 AND CROSS(二号线,四黑马线);
{DD:=CROSS(二号线,四黑马线);}
DRAWICON(DD,L-0.04,3);

{逃离苦海}
AA:MA(WINNER(C*0.95)*100,3),COLORYELLOW;
AA,stick,COLORYELLOW,linethick2;
Var1:=1/WINNER(CLOSE);
Var2:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
Var3:=100-ABS(Var2);
Var4:=3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)-2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
Var5:=3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)-2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
Var6:=100-Var5;
Var7:=100-Var4;
Var8:=MA(WINNER(CLOSE*0.95)*100,3);
Var9:=IF(Var1>5,IF(Var1<100,Var1,Var3-10),0);
VarA:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VarB:=SMA(VarA,3,1);
VarC:=SMA(VarB,3,1);
探索: EMA(3*VarB-2*VarC,3),colorwhite;
主力: (-1)*(EMA(Var7,1)-50)+50,COLORYELLOW,linethick2;
Z1: MA(主力,9),COLORRED,linethick2;
VarD:=(-1)*(EMA(Var7,1)-50)+50;
VarE:=(-1)*(EMA(Var7,12)-50)+50;
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
天涯:if(rsi1>93 or (AA>90 and rsi1>80),80,100),;
海角: 0,colorgreen;
苦海: EMA(100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14)),6),LINESTICK,;
ZS: MA(探索,3),COLORYELLOW;
ZM: MA(MA(探索,3),3),COLORGREEN,;