来自：理想论坛() 作者：人得而诛之
Var1:=(CLOSE+HIGH+LOW)/3; 人间大炮
Var2:=(CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*50;
Var3:=SMA(Var2,20,1);
Var4:=SMA(Var3,50,1);
ADD:=(HHV(HIGH,40)-CLOSE)/HHV(HIGH,40)-LLV(LOW,40);
TRY:=MA(Var2,40);
Var6:=LLV(LOW,30);
ADD2:=HHV(HIGH,80);
Var5:=HHV(HIGH,60);
Var7:=EMA((HIGH-Var6)/(Var5-Var6)*50,10)/100;
大炮一级准备: (100-3*Var3+2*Var4)/100;
大炮二级准备: EMA(Var1,20)-EMA(Var1,60);
大炮三级准备:(2*Var3+3*Var2)/100;
人间大炮发射:if(cross((EMA(Var1,20)-EMA(Var1,50)),(100-3*Var3+2*Var4/100)),2,-1),color00ff00;
时间停止吧:if(cross((100-3*Var3+2*Var4)/100,EMA(Var1,50)-EMA(Var1,10)),2,-1),colorred;
创造百万富翁的绝顶公式
Var1:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE < REF(CLOSE,1),0-VOL,0)),0);
Var2:=SUMBARS(VOL,CAPITAL);
Var3:=IF(CLOSE>LLV(CLOSE,Var2),1,-1)*IF(Var1>LLV(Var1,Var2),1,-1);
Var4:=IF(Var3=-1,1,0);
Var5:=COUNT(Var4=1,8)>3;
Var6:=SUM(AMOUNT,13)/(AMOUNT/VOL/100)/100;
Var7:=DMA((OPEN+HIGH+LOW+CLOSE)/4,VOL/Var6);
Var8:=(CLOSE-Var7)/Var7*100<-17;
Var9:=(CLOSE-MIN(REF(CLOSE,5)*0.830,REF(CLOSE,21)*0.720))/CLOSE<0.05;
RSW: Var8 AND Var9 AND Var5;
DRAWTEXT(RSW>0 AND REF(RSW,1)=0,0.5,"出现信号,待RSW=0及收盘日线站在八日均线上时买入！");
适用于分析家.飞狐.大智慧
绝顶公式85%+收盘日线站在八日均线上买入15%=成功率100%
注意事项：1.均线系统使用821345589144；
2.st股票不做；
3.连续跌停的股票不做；
4.出现信号后必须等到收盘线站在八日均线上才能买入。
陈琛：
同学们说信号少，
有的说.......................。
现在将修改的源码公布：
Var1:=SUM(IF(C>REF(C,1),VOL,IF(CLOSE < REF(C,1),0-VOL,0)),0);
Var2:=SUMBARS(VOL,CAPITAL);
Var3:=IF(C>LLV(C,Var2),1,-1)*IF(Var1>LLV(Var1,Var2),1,-1);
Var4:=IF(Var3=-1,1,0);
Var5:=COUNT(Var4=1,13)>5;
Var6:=SUM(AMOUNT,13)/(AMOUNT/VOL/100)/100;
Var7:=DMA((O+H+L+C)/4,VOL/Var6);
Var8:=(C-Var7)/Var7*100<-8;
Var9:=(C-MIN(REF(C,5)*0.830,REF(C,21)*0.720))/C<0.18;
RSW: Var8 AND Var9 AND Var5;
DRAWTEXT(RSW>0 AND REF(RSW,1)=0,0.5,"八日均线上时买入！");
Var1:=(CLOSE+HIGH+LOW)/3;
Var2:=EMA(Var1,10);
Var3:=REF(Var2,1);
终极黄金: if(Var2>Var3,Var2,0), pointdot,linethick5, COLORYELLOW;
一卸千里: if(Var2<Var3,Var3,0),pointdot,linethick5 , COLORBLUE;
M1: EMA(CLOSE,5);
M2: EMA(CLOSE,8);
M3: EMA(M2,10);
M4: EMA(M2,55);
Var4:=EMA(M3,55);
M5: EMA(M4,81);
M6: EMA(Var4,144), ,colorff00ff;
Var5:=(REF(HIGH,1)+REF(LOW,1))/2;
Var6:=MA(CLOSE,N)+2*STD(CLOSE,N);
Var7:=REF(CLOSE,1);
Var8:=SMA(MAX(CLOSE-Var7,0),N1,1)/SMA(ABS(CLOSE-Var7),N1,1)*100;
Var9:=CROSS(N2,Var8);
VarA:=FILTER(Var9,4);
VarB:=(2*CLOSE+HIGH+LOW)/4;
VarC:=LLV(LOW,34);
VarD:=HHV(HIGH,34);
VarE:=EMA((VarB-Var4)/(Var5-Var4)*100,7);
VarF:=EMA(0.667*REF(VarE,1)+0.333*VarE,5);
买进1:if(IF(COUNT(CLOSE<REF(CLOSE,1),8)/8>0.6 AND VOL>=1.5*MA(VOL,5) AND COUNT(VarE>=VarF,3) AND REF(LOW,1)=LLV(LOW,120),1,0),HIGH*1.02,0), , COLORYELLOW;
买进2:if(IF(COUNT(CLOSE<REF(CLOSE,1),13)/13>0.6 AND COUNT(VarE>VarF,6) AND REF(LOW,5)=LLV(LOW,120) AND REF(CLOSE>=OPEN,4) AND REF(CLOSE>OPEN,3) AND REF(CLOSE>OPEN,2) AND REF(OPEN>CLOSE,1) AND OPEN>REF(CLOSE,1),1,0),HIGH*1.02,0), , COLORf00ff0;
Var10:=MA(CLOSE,80)-MA(CLOSE,10)/3;
抄底 :if(IF(CLOSE<Var10 AND VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08 AND CLOSE<MA(CLOSE,13)*1.3,1,0),HIGH*1.02,0), , COLORred;
大智慧:
VAR11:=MA(CLOSE,5);
VAR12:=(2.11)*(REF(MA(CLOSE,55),1));
VAR13:=VAR11+VAR12;
VAR14:=(CLOSE<(VAR13)*(0.28)) AND (COUNT((HIGH=LOW) AND (CLOSE=OPEN) AND (CLOSE<REF(CLOSE,1)),3)<=1);
VAR15:=(CLOSE<(COST(17))*(0.87099999));
AAA:=VAR14 AND VAR15;
一年可以翻三番:=(CLOSE)/(LOW)>1.04,ColorF00FF0;
启明星儿优化A:AAA AND 一年可以翻三番,Color00FFFF
[转帖]买入大涨源码
V1:=EMA(CLOSE,60)-EMA(CLOSE,300);
V2:=EMA(V1,300);
V3:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
V4:SMA(V3,2,1);
V5:SMA(V4,2,1);
V6:=CLOSE/REF(CLOSE,3)>=1.1;
V7:=BACKSET(V6,3);
买入:if((V7 AND COUNT(V7,3)=1),30,0),color009090;
DRAWTEXT(买入,35,"买入 "),COLOR009090;
收盘价逃顶
V1:=MA(C,5)=HHV(MA(C,5),20);
V2:=MA(C,5)>MA(C,10);
V3:=MA(V,5)>MA(V,40)*1.01;
V4:=COUNT(MA(C,1)>REF(C,1),2)=2;
收盘价逃顶:IF(V1 AND V2 AND V3 AND V4,90,0),LINETHICK2,COLORBLUE;
DRAWTEXT(收盘价逃顶,80,"收盘价逃顶"),COLOR000999;
M20:MA(CLOSE,20),linethick2;
HH: HHV(HIGH,20),colorcyan;
LL: LLV(LOW,20),colorcyan;
HL:=HH-LL;
A: HL*0.618+LL,coloryellow;
B: HL*0.382+LL,coloryellow;
{我卖}
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;
{底部买入}
买入: 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;
--------------------------------------------------------------------------------
寻庄雷达及时出击（大智慧公式）
己转换成大智慧公式如下（原公式中的时间限制己解除掉）：
{寻庄雷达及时出击}
{发财x=9m1=3m2=3 n=8}
x:=9;
m1:=3;
m2:=3;
n:=8;
m:=1;
RSV:= (HHV(HIGH,x)-CLOSE)/(HHV(HIGH,x)-LLV(LOW,x))*100;
LWR1:SMA(RSV,M1,1);
LWR2:SMA(LWR1,M2,1);
Var1:=MA(HHV(HIGH,485),17);
Var2:=MA(HHV(HIGH,222),17);
Var3:=MA(HHV(HIGH,96),17);
Var4:=MA(LLV(LOW,485),17);
Var5:=MA(LLV(LOW,222),17);
Var6:=MA(LLV(LOW,96),17);
Var7:=MA((Var4*0.96+Var5*0.96+Var6*0.96+Var1*0.558+Var2*0.558+Var3*0.558)/6,17);
Var8:=MA((Var4*1.25+Var5*1.23+Var6*1.2+Var1*0.55+Var2*0.55+Var3*0.65)/6,17);
Var9:=MA((Var4*1.3+Var5*1.3+Var6*1.3+Var1*0.68+Var2*0.68+Var3*0.68)/6,17);
VarA:=MA((Var7*3+Var8*2+Var9)/6*1.738,17);
VarB:=VarA;
VarC:=LOW;
VarD:=REF(LOW,1);
VarE:=SMA(ABS(VarC-VarD),3,1)/SMA(MAX(VarC-VarD,0),N,1)*100;
VarF:=MA(IF(CLOSE*1.35<=VarB,VarE*10,VarE/10),N);
Var10:=LLV(LOW,30);
Var11:=HHV(VarF,30);
Var12:=1020630;
A: EMA(WINNER(CLOSE)*M,10);
{短庄: IF(DATE<=Var12,MA(IF(LOW<=Var10,(VarF+Var11*2)/2,0),N),100000000)/4;}
短庄: MA(IF(LOW<=Var10,(VarF+Var11*2)/2,0),N)/4;
B: EMA(A,5), COLORSTICK;
长庄:1/WINNER(CLOSE)*0.2;
D: EMA(B,5);
筑底指标大集
底部:LLV(L,4)=LLV(L,120),POINTDOT,ColorFF0000;
STICKLINE(底部>0,-8,-12,8,0),ColorFF0000;
牛市底部:(close-ma(close,58))/ma(close,58)<-0.07,POINTDOT,ColorFF9700;
STICKLINE(牛市底部>0,-4,-8,8,0),ColorFF9700;
LL:=(INDEXC-HHV(INDEXC,8))/HHV(INDEXC,8)<-0.05 and MA(INDEXA,125)/MA(INDEXV,125)/(MA(INDEXA,5)/MA(INDEXV,5))>1.12;
大盘底区:BARSLAST(LL)<10,POINTDOT,ColorEC93BC;
STICKLINE(大盘底区>0,0,-4,8,0),ColorEC93BC;
L1:=MA(CLOSE,27);
L2:=(CLOSE-L1)/L1*100;
L3:=MA(L2,2);
L4:=BARSLAST(CROSS(-10,L3)=1);
L5:=L3<-10 AND L4>3;
LK:=ABS( IF(L5,L3,0));
金坑:LK>0,POINTDOT,Color007FFF;
STICKLINE(金坑>0,0,4,8,0),Color007FFF;
Var1q:=(MA(CLOSE,80)-MA(CLOSE,13)/3);
神奇线:=MA((CLOSE-Var1q)/Var1q,1);
xa:=ema(神奇线,12)*0.5;
xb:=ema(神奇线,3);
底部即成:ABS(if(llv(xb-xa,12)>0,0,1)),POINTDOT,Color00FFFF;
STICKLINE(底部即成>0,4,8,8,0),Color00FFFF;
抄底:close/(ema(ema((c+l+h)/3,3),26)*0.9)<0.95,POINTDOT,ColorE4A8FF;
STICKLINE(抄底>0,8,12,8,0),ColorE4A8FF;
JD:=ma((CLOSE-MA(CLOSE,21))/MA(CLOSE,21),3)*100;
见底区:JD<-15,POINTDOT,ColorFF00FF;
STICKLINE(见底区>0,12,16,8,0),ColorFF00FF;
底成:(CLOSE-MA(CLOSE,28))/MA(CLOSE,28)*100<-23,POINTDOT,Color0000FF;
STICKLINE(底成>0,16,20,8,0),Color0000FF;
0,POINTDOT,ColorFFFFFF,LINETHICK2;
LC:=REF(CLOSE,1);
av:=if(c>o,v/ref(v,1),0);
bv:=if(c<o,v/ref(v,1),0);
cv:=if(c=o,v/ref(v,1),0);
avs:=sum(av,26);
bvs:=sum(bv,26);
cvs:=sum(cv,26);
vvr:=100*(avs+0.5*cvs)/(bvs+0.5*cvs);
vvr2:=100*(avs+0.5*cvs)/(bvs+0.5*cvs);
vvr3:=10000/vvr2;
STICKLINE(c>0,0,vvr2 ,4,0)COLORred;
stickline(c>0,0,vvr3,4,0)colorgreen;
vvr4:=min(vvr2,vvr3);
stickline(c>0,0,vvr4,4,0)colorblue;
vvr5:=max(vvr2,vvr3);
var2:=REF(LOW,1);
var3:=SMA(ABS(LOW-var2),3,1)/SMA(MAX(LOW-var2,0),3,1)*100;
var4:=EMA(IF(CLOSE*1.2,var3*10,var3/10),3);
var5:=LLV(LOW,30);
var6:=HHV(var4,30);
var7:=IF(LLV(LOW,58),1,0);
var8:EMA(IF(LOW<=var5,(var4+var6*2)/2,0),3)/618*var7;
底部吸筹指标:= (CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100,color00ff00;
STICKLINE(var8,0,var8,6,0),COLORwhite;
aa:=100*(ref(vvr3,1)>ref(vvr2,1) and vvr3<vvr2);
bb:=100*(cross("macd.diff","macd.dea"));
500*(filter((barslast(aa)<=5 and barslast(bb)<=5),10));
大于400线:400*(vvr2>=400) colorwhite;
close2:=c;h2:=h;l2:=l;o2:=o;
ma1:=ma(c,5),colorff00ff;
ma2:=ma(c,10),color00ff00;
ma3:=ma(c,30),colorffff00;
B1:=REF(close2,1);B2:=REF(close2,2);
SS:=IF(close2>REF(close2,1) AND REF(close2,1)>=REF(close2,2),1,IF(C<REF(close2,1) AND REF(close2,1)<=REF(close2,2),-1,IF(close2>REF(close2,2) AND REF(close2,2)>REF(close2,1),2,IF(close2<REF(close2,2) AND REF(close2,2)<REF(close2,1),-2,0))));
SM:=IF(REF(SS,1)<>0,REF(SS,1),IF(REF(SS,2)<>0,REF(SS,2),IF(REF(SS,3)<>0,REF(SS,3),IF(REF(SS,5)<>0,REF(SS,5),IF(REF(SS,6)<>0,REF(SS,6),IF(REF(SS,7)<>0,REF(SS,7),0))))));
mc:=IF(REF(SS,1)<>0,B2,IF(SM>0,MIN(B1,B2),MAX(B1,B2))),COLOR000000;
aa:=Close > Ref(Close, 1) and Ref(Close, 1) > Ref(Close, 2) and Ref(Close, 1) < Ref(Close, 3) and If(Ref(Close, 3) < Ref(Close, 4), 1, If(Ref(Close, 4) < Ref(Close, 5),Ref(Close, 1) < Ref(Close, 4) or( Ref(Close, 2) < Ref(Close, 4) and Ref(Close, 3) >= Ref(Close, 5) ),If(Ref(Close, 5) < Ref(Close, 6), 1,Ref(Close, 6) < Ref(Close, 7))));
bb:=Close < Ref(Close, 1) and Ref(Close, 1) < Ref(Close, 2) and Ref(Close, 1) > Ref(Close, 3) and If(Ref(Close, 3) > Ref(Close, 4), 1, If(Ref(Close, 4) > Ref(Close, 5),Ref(Close, 1) > Ref(Close, 4) or( Ref(Close, 2) > Ref(Close, 4) and Ref(Close, 3) <= Ref(Close, 5) ),If(Ref(Close, 5) > Ref(Close, 6), 1,Ref(Close, 6) > Ref(Close, 7))));
drawicon(aa and close>ref(open,2),vvr5+50,4);
drawicon(bb and close<ref(close,2),vvr5+50,5);
{上升}
A1:=WINNER(C)*100;
A:=EMA(A1,S) - EMA(A1,S1);
R:(A-LLV(A,N))/(HHV(A,N)-LLV(A,N))*100;
K:EMA(R,3);
D:EMA(R,9);
D1:=EMA(K,3);
DRAWTEXT((R>0 AND REF(R,1)<=0),50,"↑") ;
看:R>0 AND REF(R,1)<=0 and d<20,pointdot;
--------------------------------------------------------------------------------
月周KDJ原码
发过贴子：在日线图上显示月周均线的方法，还记得吧？文中提到将MA（C，5）*5，相当于周均线。其实，这是一个思路。均线如此，KDJ。。。。。。指标也如此。下面是我自己用的月周KDJ原码，只是将参数分别扩大5倍、20倍，当然，完全可根据自己需要调整的快一些，对快速KDJ、慢速KDJ或你自己编的改造后的KDJ，同样可以这样设置的。
{月}
RSV7:=(CLOSE-LLV(LOW,180))/(HHV(HIGH,180)-LLV(LOW,180))*100;
K7:=SMA(RSV7,60,1),linethick1,coloryellow;
D7:=SMA(K7,60,1),linethick1,colorgreen;
J7:=3*K7-2*D7,linethick1,colorred;
FILLRGN(J7>D7,J7,D7),Color32608E;
FILLRGN(J7<D7,J7,D7),ColorBLUE;
{周}
RSVq:=(CLOSE-LLV(LOW,45))/(HHV(HIGH,45)-LLV(LOW,45))*100;
Kq:SMA(RSVq,15,1),linethick1,coloryellow;
Dq:SMA(Kq,15,1),linethick1,colorgreen;
Jq:3*Kq-2*Dq,linethick1,colorred;
字体 7pt 8pt 9pt 10pt 12pt 15pt 18pt 20pt 25pt 30pt
★ ★财经博客★国内财经原创基地，股市高手汇集地！
--------------------------------------------------------------------------------
优化的中华方圆图源码!!!!!!!!!!!独家推出!!!
本人根据上述用法，增添了安全等级。
X:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);
Y:=EMA(CLOSE,10);
LL:=REF(CLOSE,2);
MM:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(ABS((CLOSE - LL)),6,1)) * 100);
DB:=IF(((MM < REF(MM,1)) AND (MM > 79)),MM,0);
DRAWTEXT(CROSS(Y,X),(LOW * 0.985),"▲"),LINETHICK2,colorFF;
DRAWTEXT(CROSS(Y,X),(LOW * 0.95),"安全C级"),LINETHICK2,colorFF;
DRAWTEXT(CROSS(X,Y),(HIGH * 1.015),"◆"),colorFF6699;
DRAWTEXT(CROSS(X,Y),(HIGH * 1.05),"绝对快逃"),LINETHICK2,colorFF6699;
DRAWicon(DB,(HIGH * 1.005),2);
DRAWTEXT(DB,(HIGH * 1.05),"快逃"),LINETHICK2,colorFF6699;
VAR1:=LLV(LOW,22);
VAR2:=HHV(HIGH,22);
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
DD:=EMA(((0.667 * REF(AK1,1)) + (0.333 * AK1)),2);
VAR3:=LLV(LOW,55);
VAR4:=HHV(HIGH,34);
VAR5:=EMA((((CLOSE - VAR3) / (VAR4 - VAR3)) * 100),3);
VAR6:=((AK + VAR5) / 2);
VAR7:=EMA(((0.667 * REF(VAR5,1)) + (0.333 * AK1)),2);
VAR8:=EMA(VAR6,5);
BB:=EMA(((0.667 * REF(VAR8,1)) + (0.333 * VAR8)),2);
AB:=CROSS(AK1,AK);
BB1:=(CROSS(AK1,BB) AND (BB < 30));
CD:=(BB1 * 0.6);
DRAWTEXT((CD = 0.6),(LOW * 0.99),"□"),LINETHICK2,colorFFFFFF;
DRAWTEXT((CD = 0.6),(h * 1.05),"安全A级"),colorFFFFFF;
DRAWTEXT((AB = 1),(LOW * 0.99),"■"),LINETHICK2,color33CC99;
DRAWTEXT((AB = 1),(LOW * 0.97),"安全 B 级"),color33CC99;
字体 7pt 8pt 9pt 10pt 12pt 15pt 18pt 20pt 25pt 30pt
★ 焦点关注：股改加速消耗财富？股市正步入危险循环
--------------------------------------------------------------------------------
简单公式：贝塔系数原码奉献
用法自己体会吧?这是短线公式。
简单介绍一点：从代码上知道，这是比较个股与大盘强弱用的。当系数大于1时，表示强于大盘，反之为强度小于大盘。如果不是抄底，而是喜欢追涨的话，首先要找强势股票，也就是要找到贝塔系数大于1的股票，对不对？这是它的基本用法。那么它比大盘强多少？强到弱市可以涨停不误：这时你如果想做个追涨公式的话，可以对照一下涨停的股票，记下它的值是多少，划一条线或二条线，越过某条线，预警，再越过第二条线，追杀不客气。这是我的用法。当然，弱市追涨还是小心一点。
我喜欢简单而经典的公式，用起来放心。不喜欢改变的太多。
{贝塔系数}
贝塔系数:CLOSE/REF(CLOSE,1)/(INDEXC/REF(INDEXC,1));
1;
。
三线判势
保守线:HHV(FORCAST(C,10),18),coloryellow;
信号线:HHV(FORCAST(C,10),8),colorff00ff;
合力线:FORCAST(C,10),color00ff00,linethick2;
庄家行踪
Var1:=EMA(EMA(CLOSE,13),13);
控盘:= (Var1-REF(Var1,1))/REF(Var1,1)*1000,colorffcccc,pointdot;
STICKLINE(控盘<0,控盘,0,4,0),colorwhite;
无庄控盘:0,colorwhite;
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,4,1),colorred;
有庄控盘: 0,colorred;
Var2:=100*WINNER(CLOSE*0.95);
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,4,0),color00ff00;
主力出货: 0,color00ff00;
STICKLINE(Var2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,4,0),colorff00ff;
高度控盘: 0,colorff00ff;
a10:=CROSS(控盘,0);
开始控盘:if(a10,3,0),coloryellow;
M波段之王
M波段之王
Var3:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
Var4:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
Var5:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;
Var6:=(Var3+Var4+Var5)/3;
改编优化提供⊙:ema(var6,5),COLORSTICK;
哼★激进型抄底:if(var6<=-20,10,0),linethick2;
var7:=hhv(哼★激进型抄底,10);
STICKLINE(哼★激进型抄底=10,20,10,1,0);
哈☆安全型兜底:if(CROSS(ma(c,3),ma(c,5)) and var7,20,0),linethick2,STICK,colorred;
多头线:ema(改编优化提供⊙,5)*2,COLORWHITE;
--------------------------------------------------------------------------------
低位买进！
Var3:=1/WINNER(CLOSE);
Var4:=MA(CLOSE,13);
Var5:=100-ABS((CLOSE-Var4)/Var4*100);
Var6:=LLV(LOW,75);
Var7:=HHV(HIGH,75);
Var8:=(Var7-Var6)/100;
Var9:=SMA((CLOSE-Var6)/Var8,20,1);
VarA:=SMA((OPEN-Var6)/Var8,20,1);
VarB:=3*Var9-2*SMA(Var9,15,1);
VarC:=3*VarA-2*SMA(VarA,15,1);
VarD:=100-VarC;
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,55)-CLOSE)/(HHV(HIGH,55)-LLV(LOW,55))+100;
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;
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<55 AND Var17>50;
低位买进: IF(CROSS(Var20,0.5),8,0),Color00FFFF ,LINETHICK2;
字体 7pt 8pt 9pt 10pt 12pt 15pt 18pt 20pt 25pt 30pt
★ 超级短线：第一时间助你抓住短线最剽悍的黑马！
--------------------------------------------------------------------------------
成功率>90% ，信号>3000 原码
Var1:=DMA(CLOSE,VOL/MA(VOL,4)/4);
Var2:=DMA(CLOSE,VOL/MA(VOL,31)/31);
Var3:=(CLOSE-Var1)/Var1*100<-10;
Var4:=(Var1-Var2)/Var2*100<-16;
Var5:=(CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100<-23;
Var6:=SMA(MAX(CLOSE-REF(CLOSE,1),0),3,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),3,1)*100>16;
Var7:=100*(HHV(HIGH,27)-CLOSE)/(HHV(HIGH,27)-LLV(LOW,27));
Var8:=INDEXC;
Var9:=MA(Var8,6);
VarA:=MA(Var8,24);
VarB:=MA(Var8,32);
VarC:=VarB>Var9*1.11 AND VarA>Var9*1.095;
(Var3 AND Var4 AND (OPEN-REF(CLOSE,1))/REF(CLOSE,1)>-0.07 OR Var5 AND Var6 AND CROSS(Var7,79) OR VarC AND CLOSE/COST(8)<=0.8)*100;
字体 7pt 8pt 9pt 10pt 12pt 15pt 18pt 20pt 25pt 30pt
★ 主力异动:破解主力赚钱的真正秘密！
--------------------------------------------------------------------------------
选股公式(自用极品,90%成功率）!!!
选股公式(自用极品,90%成功率）!!!
DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);
DEA := EMA(DIFF,27);
MACD := 2*(DIFF-DEA);
DIFF<0 AND DEA<0 AND CROSS(DIFF,DEA) AND VOL>MA(VOL,5) AND MA(VOL,5)>MA(VOL,34) AND MA(C,30)>=REF(MA(C,30),1);
-----------------------------------------------
字体 7pt 8pt 9pt 10pt 12pt 15pt 18pt 20pt 25pt 30pt
★ 收藏到： Vivi| 狐摘| 天极| 亿友| 365k| POCO| 凌乱| YouN| 加加| 和讯| 博采| 我摘| 全部
--------------------------------------------------------------------------------
判断“顶－底”的绝顶公式---------严重奉献
原码：
Var6:=(2*C+H+L)/4;
Var8:=LLV(LOW,30);
VarA:=HHV(HIGH,30);
B:=EMA((Var6-Var8)/(VarA-Var8)*100,8);
B1:=EMA(B,5);
STICKLINE(B>0 AND B-B1>=0,79,80,6,0),COLOR00FF00;
STICKLINE(B>0 AND B-B1<0,79,80,6,0),COLORRED;
STICKLINE(B>0 AND B-B1>=0,49,50,6,0),COLORCYAN;
STICKLINE(B>0 AND B-B1<0,49,50,6,0),COLORRED;
STICKLINE(B>0 AND B-B1>=0,19,20,6,0),COLOR00FF00;
STICKLINE(B>0 AND B-B1<0,19,20,6,0),COLORRED;
STICKLINE(B-B1>0,B,B1,8,1),COLORCYAN;
STICKLINE(B-B1<0,B,B1,8,1),COLORRED;
注释：
判断顶－底使用方法：
1：兰色方块上穿底线买入，
2：兰色方块上穿顶线卖出，
3：上穿顶线回调不破顶线强势持股，下穿顶线卖出，能及时返回顶线再次买入，
4：使用顶底公式可看长做短，用15分钟线每天博取短线差。股票论坛
如果觉得《公式可看长做短》对你有帮助，请点赞、收藏，并留下你的观点哦！
