var1:=SUMBARS(vol,capital);
var2:=dma(close,30/var1)colorff6600;
var3:=ma(var2,5)color00ff00;
Var4:=100*VOL/CAPITAL*10;
STICKLINE(var2>var3,Var2,var3,Var4,1)colorff00ff;
STICKLINE(var2<var3,Var2,var3,Var4,1)color00cc00;
绝对市场成本:cost(50),color00ffff,POINTDOT;
主力资金方向:dma(close,1/var1)color6600ff;
主力资金速动:dma(close,5/var1);

只买主升浪
Var3:=LLV(HIGH,240);
Var4:=100*(CLOSE-Var3)/Var3;
Var5:=REF(LLV(CLOSE,480),1);
Var6:=REF(HHV(CLOSE,480),1);
Var7:=100*(CLOSE-Var5)/(Var6-Var5);
Var8:=(CLOSE-LLV(CLOSE,981))/(HHV(CLOSE,981)-LLV(CLOSE,981))*100;
Var9:=(CLOSE-LLV(CLOSE,393))/(HHV(CLOSE,393)-LLV(CLOSE,393))*100;
VarA:=(CLOSE-LLV(LOW,981))/(HHV(HIGH,981)-LLV(LOW,981))*100;
VarB:=(CLOSE-LLV(LOW,393))/(HHV(HIGH,393)-LLV(LOW,393))*100;
VarC:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),5)/4;
VarD:=IF(DATE<1031231,IF(VarC>23.16,VarC,0),0);
VarE:=VarC<1;
VarF:=VarD;
Var10:=Var4<0 AND Var7<0;
Var11:=1;
Var12:=(HIGH+LOW+CLOSE*2)/4*Var11;
Var13:=EMA(Var12,21);
Var14:=STD(Var12,21);
Var15:=((Var12-Var13)/Var14*100+200)/4*Var11;
Var16:=(EMA(Var15,89)-25)*1.56*Var11;
Var17:=EMA(Var16,5)*1.22*Var11;
Var18:=EMA(Var17,3)*Var11;
Var19:=3*Var17-2*Var18*Var11;
Var1A:=IF(CROSS(Var19,Var17) AND CROSS(Var19,Var18) AND CROSS(Var17,Var18),1,0);
Var1B:=IF(CROSS(Var17,Var19) AND CROSS(Var18,Var19) AND CROSS(Var18,Var17),1,0);
买点: IF(FILTER(Var8=0 AND VarE AND Var10 AND Var1A,5)=1,10,0), colorred;
卖点: IF(FILTER(Var8=100 AND VarF AND Var1B,5)=1,10,0),  colorgreen;
Var1C:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),13)/4;
Var1D:=EMA(CLOSE,2)-EMA(CLOSE,89);
Var1E:=EMA(Var1D,30);
Var1F:=2*(Var1D-Var1E)*10;
Var20:=POW(Var1F,3)*0.1+POW(Var1F,2);
Var21:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));
Var22:=EMA(Var21*0.97,3);
Var23:=(HIGH+LOW+CLOSE)/3;
Var24:=(Var23-MA(Var23,14))/(0.015*AVEDEV(Var23,14));
Var25:=IF(YEAR<2008 AND Var1F>0.015,Var20,0)/45;
庄拉线: Var25,coloryellow ;
Var26:=EMA(CLOSE,2)-EMA(CLOSE,150);
Var27:=EMA(Var26,100);
Var28:=2*(Var26-Var27);
Var29:=POW(Var28,3)*0.1+POW(Var28,1);
Var2A:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));
Var2B:=EMA(Var2A*0.97,3);
Var2C:=(HIGH+LOW+CLOSE)/3;
Var2D:=(Var2C-MA(Var2C,14))/(0.015*AVEDEV(Var2C,14));
黑马线: IF( Var28>0.1,Var29,0)*5,  colorred;
量价线: (CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100,  colorwhite;
Var2E:=IF(FILTER(量价线>0 AND 量价线<3,5)=1,12,0);
涨幅前兆: IF(FILTER(庄拉线>0 AND 庄拉线<0.5 AND Var2E AND Var1C<3,10)=1,10,0), colorwhite;
选股利器: IF(FILTER(Var2E>0 AND Var1C<2 AND 庄拉线>0 AND 庄拉线<1
AND 黑马线>0 AND 黑马线<1.5 AND Var2E>0,5)=1,10,0),colormagenta;
DRAWICON(买点>0,10,1);
DRAWICON(卖点>0,10,2);
DRAWICON(涨幅前兆>0,10,1);
DRAWICON(选股利器>0,10,1);

http://bbs.fjfox.com/viewthread. ... id=vD9LkG#pid205389需要的赶快下载

a0:=MA(CLOSE,3);
a1:=(h+l+c)/3;
a2:=hhv(a1,15);
a3:=llv(a1,15);
a4:=a2-a3;
a5:ma((a1-a3)/a4,2)*100;
a6:=hhv(a1,4*15);
a7:=llv(a1,4*15);
a8:=a6-a7;
a9:ma((a1-a7)/a8,2)*100;
aA:=hhv(a1,16*15);
aB:=llv(a1,16*15);
aC:=aA-aB;
aD:ma((a1-aB)/aC,2)*100;
顶线:97;
底线:1;
STICKLINE(cross(a5,底线)and a0-ref(a0,1)>0 and c>=o,底线,60,4,0),colorred;
DRAWICON(cross(a5,底线)and a0-ref(a0,1)>0 and c>=o,60,0);

{A00:=(DATE <  1040331.000);}
A00:=1;
A01: (A00 * POW((VOL * CLOSE), 2.000));
A02: (A00 * POW((OPEN * AMOUNT), 2.000));
A03: (A00 * POW((HIGH * LOW), 2.000));

jc:=STKINDI('','fj.jc',0,1);
jo:=STKINDI('','fj.jo',0,1);
jh:=STKINDI('','fj.jh',0,1);
jL:=STKINDI('','fj.jL',0,1);
STICKLINE(jc>jo or (jc=jo and jc>ref(jc,1)),jh,jL,0.1,0),colorred;
STICKLINE(jc>jo or (jc=jo and jc>ref(jc,1)),jo,jc,6,0),colorred;
STICKLINE(jc<jo or (jc=jo and jc<ref(jc,1)),jh,jL,0.1,0),colorcyan;
STICKLINE(jc<jo or (jc=jo and jc<ref(jc,1)),jo,jc,6,0),colorcyan;

DRAWGBK(DATE>900101,STRIP(RGB(100,0,0),RGB(30,30,0),1));
Var1:=EMA(MA(IF(CLOSE>OPEN,(CLOSE-OPEN)*VOL,IF(CLOSE<OPEN,(CLOSE-OPEN)*VOL,0)),5),1);
Var2:=EMA(MA(IF(CLOSE>REF(CLOSE,1),(CLOSE-REF(CLOSE,1))*VOL,IF(CLOSE<REF(CLOSE,1),(CLOSE-REF(CLOSE,1))*VOL,0)),5),1);
Var3:=EMA(MA(IF(OPEN>REF(CLOSE,1),(OPEN-REF(CLOSE,1))*VOL,IF(OPEN<REF(CLOSE,1),(OPEN-REF(CLOSE,1))*VOL,0)),5),1);
Var4:=EMA(MA(IF(CLOSE<OPEN,(OPEN-CLOSE)*VOL,IF(CLOSE>OPEN,(OPEN-CLOSE)*VOL,0)),10),1);
Var5:=EMA(MA(IF(CLOSE<REF(CLOSE,1),(REF(CLOSE,1)-CLOSE)*VOL,IF(CLOSE>REF(CLOSE,1),(REF(CLOSE,1)-CLOSE)*VOL,0)),10),1);
Var6:=EMA(MA(IF(OPEN<REF(CLOSE,1),(REF(CLOSE,1)-OPEN)*VOL,IF(OPEN>REF(CLOSE,1),(REF(CLOSE,1)-OPEN)*VOL,0)),10),1);
Var7:=CLOSE>OPEN;
Var8:=CLOSE>REF(CLOSE,1);
Var9:=OPEN>REF(CLOSE,1);
多头:(Var1+Var2+Var3)/3/100,COLORWHITE;
空头:(Var4+Var5+Var6)/3/100,COLORYELLOW ;
一次警报:EMA(EMA((Var1+Var2+Var3)/3-(Var4+Var5+Var6)/3,5),5)*1/100,COLORMAGENTA;
二次警报:EMA((COUNT(Var8,12)/12+COUNT(Var7,12)/12+COUNT(Var9,12)/12)/3*MA(多头,5)*2*1.1,2),COLORBLUE;
STICKLINE(空头>0,0,空头,1,0),COLORCYAN;
STICKLINE(空头<0,0,空头,1,0),COLORRED;
破解:EMA(EMA((Var1+Var2+Var3)/3-(Var4+Var5+Var6)/3,5),5)*1/100,POINTDOT,Color9587FF;

谢谢·！

谢谢·！

i:=MA(BARSLAST(HIGH=HHV(HIGH,16))*IF(CLOSE<OPEN,VOL,1),3);
r:=MA(BARSLAST(LOW=LLV(LOW,18))*IF(CLOSE>OPEN,VOL,1),4);
短线逃顶:=IF(i,0,1),colorgreen;
DRAWICON(短线逃顶,98,8);
Var1k:=EMA(C,12)-EMA(C,20);
Var2k:=EMA(Var1k,9);
牛魔王a:=(OPEN<=MA(CLOSE,5) AND OPEN<=MA(CLOSE,10) AND OPEN<=MA(CLOSE,30) AND CLOSE>=MA(CLOSE,5) AND CLOSE>=((SUM(CLOSE*VOL*100,28)/SUM(VOL*100,28))*100)/100 AND (Var2k-REF(Var2k,1))>0 AND (Var1k-REF(Var1k,1))>0);
drawicon(牛魔王a,98,6);
易股:=(Var1k>Var2k AND REF(Var1k,1)<=REF(Var2k,1) AND Var1k<0 AND Var2k<-0.2 AND (-100*(HHV(CLOSE,10)-CLOSE)/(HHV(CLOSE,10)-LLV(LOW,10))+100)>45 AND (Var2k-REF(Var2k,1))>0);
drawicon(易股,90,4);
Var1jo:=IF(DATE<1090830 AND DATE>900101,1,0);
Var2jo:=LLV(LOW,10);
Var3jo:=HHV(HIGH,25);
警戒线:= 2.8*Var1jo;
减仓线:= 3.2*Var1jo;
动力线:=EMA((CLOSE-Var2jo)/(Var3jo-Var2jo)*4,4)*Var1jo;
DRAWICON(CROSS(动力线,警戒线),99,5);
{黑马发现的底部}{}
Vaz4:=(CLOSE-LLV(CLOSE,126))/(HHV(CLOSE,126)-LLV(CLOSE,126))*100;
Vaz24:=Vaz4=0;
STICKLINE(Vaz24>0,-3,-9,1,2), ,colorred,linethick3 ;
Vaz25:=Vaz4=100;
STICKLINE(Vaz25>0,101,105,1,2), ,colorgreen,linethick2;
{睡猫买入}
{nMA(AMOUNT/VOL/100,VOL/CAPITAL)/close;}{n日平均:ema(成本比,n);}
睡猫:if(c<MA(EMA(CLOSE,34)*0.82,5) and close/DMA(AMOUNT/VOL/100,VOL/CAPITAL)<0.64{下轴成本为0.64},38,0)linethick2,COLORffff00;
{}{地瓜八号}
j:=(ref(c,1)+ref(c,2)+ref(c,3)+ref(c,4)+ref(c,5))/5;
j1:=j<cost(10) and c/j>1.025 and (hhv(c,5)-llv(c,5))/llv(c,5)*100>7 ;
j2:= j1 and ref(c,5)/ref(c,1)>1.003 and ma(indexc,3)>=ref(ma(indexc,3),1);
地瓜:(filter(j2,10))*38,linethick2,color99cccc;
{精品出山}
Varp3:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
Varp4:=SMA(Varp3,3,1);
Varp5:=SMA(Varp4,3,1);
Varp6:=3*Varp4-2*Varp5;
Varp7:=SMA(CLOSE/HHV(HIGH,120),3,1)*100;
Varp9:=Varp7>REF(Varp7,20) AND Varp7>75 AND FILTER(Varp7/REF(LLV(LOW,20),10)>1.18,20);
VarpC:=SMA(MAX(CLOSE-(REF(CLOSE,1)),0),6,1)/SMA(ABS(CLOSE-(REF(CLOSE,1))),6,1)*100;
坚决买进:(Varp7<68 AND BARSLAST(CROSS(68,Varp7))>2 AND Varp5<30 AND CROSS(Varp6,Varp5))*38,color33ffcc;
DRAWTEXT(Varp7<68 AND BARSLAST(CROSS(68,Varp7))>2 AND Varp5<30 AND CROSS(Varp6,Varp5),-5,'★'),coloryellow;
{南极}
南极:((((MA(CLOSE,5))-CLOSE)/CLOSE>3/100) AND (((MA(CLOSE,10))-(MA(CLOSE,5)))/(MA(CLOSE,5))>0.03) AND (LLV(CLOSE,30)=LLV(CLOSE,120)))*38,linethick2,color33ffcc;
{一剑封喉}
Var9a:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),0-VOL,0)),0);
Var9b:=SUMBARS(VOL,CAPITAL);
Var9c:=IF(CLOSE>LLV(CLOSE,Var9b),1,-1);
Var9d:=IF(Var9a>LLV(Var9a,Var9b),1,-1);
Var9e:=Var9c*Var9d;
var9f:=IF(Var9e=-1,1,0);
yjfh:(var9f AND CLOSE=LLV(CLOSE,120))*48,color3300cc, linethick1,stick,colorred;
{牛魔王}
Vari1:=(CLOSE+HIGH+LOW+OPEN)/4;
Vari8:=MA(Vari1,34);
Vari9:=(Vari1-Vari8)/Vari8*10;
VariB:=0.6*VOL/WINNER(CLOSE) ;
牛魔王: IF(VariB>=1000000 AND Vari9<-1.618,70,0), , coloryellow;
DRAWICON(VariB>=1000000 AND Vari9<-1.618,70,0) ;
{定海神针}
Va1:=REF(CLOSE,1);
Va2:=SMA(MAX(CLOSE-Va1,0),7,1)/SMA(ABS(CLOSE-Va1),7,1)*100;
Va3:=SMA(MAX(CLOSE-Va1,0),13,1)/SMA(ABS(CLOSE-Va1),13,1)*100;
Va4:=BARSCOUNT(CLOSE);
Va6:=Va2<20 AND Va3<25 AND Va4>50;
dhsz:( Va6)*70,linethick2,colorff9933;
{出手-赢}
Var3:=REF(HIGH,1)*1.1;
Var4:=HIGH*1.1;
Var5:=(Var4*VOL+Var3*(CAPITAL-VOL))/CAPITAL;
Var6:=REF(LOW,1)*0.9;
Var7:=LOW*0.9;
Var8:=(Var7*VOL+Var6*(CAPITAL-VOL))/CAPITAL;
Var9:=EMA(Var8,30);
VarA:=EMA(Var5,30);
VarB:=VarA-2;
VarC:=IF(CLOSE<=Var9,VarB,VarA);
VarD:=MA(CLOSE,80)-MA(CLOSE,10)/17;
{出手:}STICKLINE(VarC-VarB=0 AND  CROSS((EMA(EMA(EMA(CLOSE,3),3),3)-REF(EMA(EMA(EMA(CLOSE,3),3),3),1))/REF(EMA(EMA(EMA(CLOSE,3),3),3),1)*100,MA((EMA(EMA(EMA(CLOSE,3),3),3)-REF(EMA(EMA(EMA(CLOSE,3),3),3),1))/REF(EMA(EMA(EMA(CLOSE,3),3),3),1)*100,2)),80,0,3,0),linethick3,COLORcc6699 , ;
{赢:}DRAWTEXT(FILTER(VarC-VarB=0 AND CROSS((EMA(EMA(EMA(CLOSE,3),3),3)-REF(EMA(EMA(EMA(CLOSE,3),3),3),1))/REF(EMA(EMA(EMA(CLOSE,3),3),3),1)*100,MA((EMA(EMA(EMA(CLOSE,3),3),3)-REF(EMA(EMA(EMA(CLOSE,3),3),3),1))/REF(EMA(EMA(EMA(CLOSE,3),3),3),1)*100,2)),4),78,'★-赢'), ,COLORred ;
{等待底部买入}
买入: IF(CROSS((4*SMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5,1)-
3*SMA(SMA((CLOSE-LLV(LOW,25))/(HHV(HIGH,25)-LLV(LOW,25))*100,5,1),3,1)),(8)),58,0),stick,color0099ff,linethick3;
drawtext(买入,45,'-我买'),color66ffcc;
{导弹}
Var1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
Var1B:=SMA((SMA(Var1A,4,1)-50)*2,3,1);
Var1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
Var1D:=SMA(Var1C,4,1);
Var1E:=SMA(Var1D,3,1);
Var1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
VarE:=REF(LOW,1)*0.9;
VarF:=LOW*0.9;
Var10:=(VarF*VOL+VarE*(CAPITAL-VOL))/CAPITAL;
Var11:=EMA(Var10,30);
Var12:=CLOSE-REF(CLOSE,1);
Var13:=MAX(Var12,0);
Var14:=ABS(Var12);
Var15:=SMA(Var13,7,1)/SMA(Var14,7,1)*100;
Var16:=SMA(Var13,13,1)/SMA(Var14,13,1)*100;
Var17:=BARSCOUNT(CLOSE);
Var18:=SMA(MAX(Var12,0),6,1)/SMA(ABS(Var12),6,1)*100;
Var19:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;
Var20:=Var18<=25 AND Var19<-95 AND Var1F>20 AND Var1B<-30 AND Var1E<30 AND Var11-CLOSE>=-0.25 AND Var15<22 AND Var16<28 AND Var17>50;
STICKLINE(Var20,0,95,5,0),LINETHICK2,COLORRED,;
DRAWTEXT(CROSS(Var20,0.5) AND COUNT(Var20=1,10)=1,60,'--→发射导弹 '),LINETHICK7 , COLORwhite;
{我卖}{}
Vat3:=REF(CLOSE,1);
Vat4:=SMA(MAX(CLOSE-Vat3,0),6,1)/SMA(ABS(CLOSE-Vat3),6,1)*100;
我卖:(CROSS(80,Vat4))*82,stick,LINETHICK3,color9900CC ;
drawtext(我卖,80,'→我卖'),colorred;
{玄黄卖出}
快逃: IF(CROSS((3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1)),90),60,0),stick,linethick4,colorgreen;
drawtext(快逃,50,'→快逃'),colorwhite;
{底部雷达}
Varo2:=(CLOSE-LLV(LOW,26))/(HHV(HIGH,26)-LLV(LOW,26))*100;
Varo3:=SMA(SMA(Varo2,3,1),3,1);
Varo4:=EMA(Varo3,5);
Varo5:=LLV(LOW,26);
Varo6:=HHV(HIGH,34);
Varo7:=EMA((CLOSE-Varo5)/(Varo6-Varo5)*4,4)*25;
STICKLINE(CROSS(Varo4,10) AND Varo4>10,25,0,8,0),coloryellow,;
建仓区: IF((Varo7<10),80,100), ,linethick2 color00ccff;
派发区: IF((Varo7>90),20,0), , linethick2 color6699ff;
{庄家踪迹中的买卖信号成功率为80-95 %}
Vay3:=(CLOSE-MA(CLOSE,30))/STD(CLOSE,15)*100;
VayA:=MA(CLOSE,60)-MA(CLOSE,5)/3.2;
DRAWTEXT(CROSS(((CLOSE-MA(CLOSE,30))/STD(CLOSE,15)*100),(EMA(Vay3,18))) AND CLOSE<VayA,high+82,'★←-买卖信号成功率为80-95%')coloryellow;
{Z马神君}
天马行空线:=ma(cost(85),5);
训马线:=ma(cost(15),5);
黑马线:=ma(cost(50),5);
天马踏地线:=ma(cost(1),7);
牵马绳:=ema(close,3);
DRAWICON(cross(牵马绳,天马踏地线) ,-5, 6);
DRAWICON(count(cross(天马行空线,牵马绳),20)=2 and 天马行空线/天马踏地线>1.6 ,95 , 10)

tj1:=CLOSE>REF(CLOSE,1);
tj2:=month=1;
总天数:=COUNT(tj2,0);
上涨天数:=COUNT(tj1  and tj2,0);
一月上涨比率:上涨天数/总天数*100,colorwhite;
tj3:=month=2;
总天数1:=COUNT(tj3,0);
上涨天数1:=COUNT(tj1  and tj3,0);
二月上涨比率:上涨天数1/总天数1*100,coloryellow;
tj4:=month=3;
总天数2:=COUNT(tj4,0);
上涨天数2:=COUNT(tj1  and tj4,0);
三月上涨比率:上涨天数2/总天数2*100,colorred;
tj5:=month=4;
总天数3:=COUNT(tj5,0);
上涨天数3:=COUNT(tj1  and tj5,0);
四月上涨比率:上涨天数3/总天数3*100,colorgreen;
tj6:=month=5;
总天数4:=COUNT(tj6,0);
上涨天数4:=COUNT(tj1  and tj6,0);
五月上涨比率:上涨天数4/总天数4*100,colorblue;
tj7:=month=6;
总天数5:=COUNT(tj7,0);
上涨天数5:=COUNT(tj1  and tj7,0);
六月上涨比率:上涨天数5/总天数5*100,colormagenta;
tj8:=month=7;
总天数6:=COUNT(tj8,0);
上涨天数6:=COUNT(tj1  and tj8,0);
七月上涨比率:上涨天数6/总天数6*100,colorcc99cc;
tj9:=month=8;
总天数7:=COUNT(tj9,0);
上涨天数7:=COUNT(tj1  and tj9,0);
八月上涨比率:上涨天数7/总天数7*100,color99ff99;
tj10:=month=9;
总天数8:=COUNT(tj10,0);
上涨天数8:=COUNT(tj1  and tj10,0);
九月上涨比率:上涨天数8/总天数8*100,color006600;
tj11:=month=10;
总天数9:=COUNT(tj11,0);
上涨天数9:=COUNT(tj1  and tj11,0);
十月上涨比率:上涨天数9/总天数9*100,colorccff33;
tj12:=month=11;
总天数10:=COUNT(tj12,0);
上涨天数10:=COUNT(tj1  and tj12,0);
十一月上涨比率:上涨天数10/总天数10*100,colorff66ff;
tj13:=month=12;
总天数11:=COUNT(tj13,0);
上涨天数11:=COUNT(tj1  and tj13,0);
十二月上涨比率:上涨天数11/总天数11*100,colorff6699;