最强选股战法推荐:
源码正文:
ma5:MA(CLOSE,5),pointdot,color000000,linethick1{XG51};
MA21:=ema(CLOSE,21){XG51};
MID:MA(CLOSE,21),color000000,linethick0{XG51};
止损线:MA(CLOSE,27),linethick0,Coloree00ee{XG51};
UPPER:MID + 2*stD(C,20),LINETHICK0,COLORFFFFFF{XG51};
LOWER:MID - 2*STD(C,20),LINETHICK0,COLORFFFFFF{XG51};
H1:=EMA(SLOPE(CLOSE,34)*20+CLOSE,75){XG51};
H2:=EMA(CLOSE,8){XG51};
Var1d:=H2-H1{XG51};
a:=(3*c+l+o+h)/6{XG51};
b:=(20*a+19*ref(a,1)+18*ref(a,2)+17*ref(a,3)+16*ref(a,4)+15*ref(a,5)+14*ref(a,6)+13*ref(a,7)+12*ref(a,8)+11*ref(a,9)+10*ref(a,10)+9*ref(a,11)+8*ref(a,12)+7*ref(a,13)+6*ref(a,14)+5*ref(a,15)+4*ref(a,16)+3*ref(a,17)+2*ref(a,18)+ref(a,20))/210{XG51};
d:=ma(b,10){XG51};
STICKLINE((MA21 > REF(MA21,1)),MA21,MA21,5,6),LINETHICK2,Color00FFFF{XG51};
STICKLINE(C>=MID AND C>=O,C,O,5,0),COLORWHITE{XG51};
STICKLINE(C>=MID AND C>=O,H,L,0,0),COLORWHITE{XG51};
STICKLINE(C>=MID AND C<O,C,O,5,1),COLORWHITE{XG51};
STICKLINE(C>=MID AND C<O,O,H,0,0),COLORWHITE{XG51};
STICKLINE(C>=MID AND C<O,C,L,0,0),COLORWHITE{XG51};
STICKLINE(C<MID AND C>O,C,O,5,1),COLORffff00{XG51};
STICKLINE(C<MID AND C<=O,C,O,5,1),COLORffff00{XG51};
STICKLINE(C<MID AND C<=O,H,L,0,1),COLORffff00{XG51};
STICKLINE(C<MID AND C>O,C,H,0,1),COLORffff00{XG51};
STICKLINE(C<MID AND C>O,O,L,0,1),COLORffff00{XG51};
牛熊线:EMA(C,250),CIRCLEDOT,color999999{XG51};
界:MA(CLOSE,21),pointdot,color000000{XG51};
STICKLINE(C>=界 AND C>=O,C,O,5,0),COLORWHITE{XG51};
STICKLINE(C>=界 AND C>=O,H,L,0,0),COLORWHITE{XG51};
STICKLINE(C>=界 AND C<O,C,O,5,1),COLORWHITE{XG51};
STICKLINE(C>=界 AND C<O,O,H,0,0),COLORWHITE{XG51};
STICKLINE(C>=界 AND C<O,C,L,0,0),COLORWHITE{XG51};
STICKLINE(C<界 AND C>O,C,O,5,1),COLORffff00{XG51};
STICKLINE(C<界 AND C<=O,C,O,5,1),COLORffff00{XG51};
STICKLINE(C<界 AND C<=O,H,L,0,1),COLORffff00{XG51};
STICKLINE(C<界 AND C>O,C,H,0,1),COLORffff00{XG51};
STICKLINE(C<界 AND C>O,O,L,0,1),COLORffff00{XG51};
DRAWTEXT(CROSS(MA5,界),(LOW * 0.90),'★抄底'),coloryellow{X-G*5?1-C-N-{};
源码正文:
input:K(1,1,3);
DRAWGBKLAst(C>0,STRIP(RGB(90,90,90),RGB(0,0,0),0)){XG51};
ema13:ema(c,13),colorblue,linethick2{XG51};
ema34:ema(c,34),colorred,linethick2{XG51};
ema55:ema(c,55),coloryellow,linethick2{XG51};
ema89:ema(c,89),colorwhite,linethick2{XG51};
T := BArslAST(DISPSTATUS=1)+1{XG51};
A := DISPSTATUS=2{XG51};
HH := HHV(H, T){XG51};
LL := LLV(L, T){XG51};
HL := HH-LL{XG51};
wH := HHVBARS(H, T){XG51};
wL := LLVBARS(L, T){XG51};
KK := wH-wL{XG51};
mHL := HH-HL*0.5{XG51};
if K=1 then begin
HL191 := (HH-LL)*0.191{XG51};
HL382 := (HH-LL)*0.382{XG51};
HL618 := (HH-LL)*0.618{XG51};
HL809 := (HH-LL)*0.809{XG51};
if KK<0 then begin
a1 := HH-HL191{XG51};
a2 := HH-HL382{XG51};
a3 := HH-HL618{XG51};
a4 := HH-HL809{XG51};
end else begin
a1 := LL+HL191{XG51};
a2 := LL+HL382{XG51};
a3 := LL+HL618{XG51};
a4 := LL+HL809{XG51};
end
end
if k=1 then begin
HL125 := (HH-LL)*0.125{XG51};
HL250 := (HH-LL)*0.25{XG51};
HL375 := (HH-LL)*0.375{XG51};
HL625 := (HH-LL)*0.625{XG51};
HL750 := (HH-LL)*0.75{XG51};
HL875 := (HH-LL)*0.875{XG51};
if kk<0 then begin
b1 := HH-HL125{XG51};
b2 := HH-HL250{XG51};
b3 := HH-HL375{XG51};
b4 := HH-HL625{XG51};
b5 := HH-HL750{XG51};
b6 := HH-HL875{XG51};
end else begin
b1 := LL+HL125{XG51};
b2 := LL+HL250{XG51};
b3 := LL+HL375{XG51};
b4 := LL+HL625{XG51};
b5 := LL+HL750{XG51};
b6 := LL+HL875{XG51};
end
end
DRAWTEXT(A and K<>3,HH, ' 最高价:'+HH),ALIGN2,colorgreen{XG51};
DRAWTEXT(A and K<>3,LL, ' 最低价:'+ll),ALIGN2,VALIGN2,colorgreen{XG51};
DRAWTEXT(A and K<>3,mHL,' 50%:'+mHL),ALIGN2,color00ffff{XG51};
DRAWTEXT(A and K=1, a1, ' 0.191:'+NUMTOSTRN(a1,2)),ALIGN2,color00ffff{XG51};
DRAWTEXT(A and K=1, a2, ' 0.382:'+NUMTOSTRN(a2,2)),ALIGN2,color00ffff{XG51};
DRAWTEXT(A and K=1, a3, ' 0.618:'+NUMTOSTRN(a3,2)),ALIGN2,color00ffff{XG51};
DRAWTEXT(A and K=1, a4, ' 0.809:'+NUMTOSTRN(a4,2)),ALIGN2,color00ffff{XG51};
DRAWTEXT(A and K=1, b1, ' 1/8:'+NUMTOSTRN(b1,2)),ALIGN2,colorgreen{XG51};
DRAWTEXT(A and K=1, b2, ' 1/4:'+NUMTOSTRN(b2,2)),ALIGN2,colorgreen{XG51};
DRAWTEXT(A and K=1, b3, ' 3/8:'+NUMTOSTRN(b3,2)),ALIGN0,colorgreen{XG51};
DRAWTEXT(A and K=1, b4, ' 5/8:'+NUMTOSTRN(b4,2)),ALIGN0,colorgreen{XG51};
DRAWTEXT(A and K=1, b5, ' 3/4:'+NUMTOSTRN(b5,2)),ALIGN2,colorgreen{XG51};
DRAWTEXT(A and K=1, b6, ' 7/8:'+NUMTOSTRN(b6,2)),ALIGN2,colorgreen{XG51};
DRAWTEXT(A and K<>3,HH, ' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),ALIGN2,colorred,linethick7{XG51};
DRAWTEXT(A and K<>3,LL, ' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),ALIGN2,colorred,linethick7{XG51};
DRAWTEXT(A and K<>3,mHL,' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),ALIGN2,colorff0000,linethick7{XG51};
DRAWTEXT(A and K=1, a1, '﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),ALIGN2,color208FFF,linethick0{XG51};
DRAWTEXT(A and K=1, a2, '﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),ALIGN2,color208FFF,linethick0{XG51};
DRAWTEXT(A and K=1, a3, '﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),ALIGN2,color208FFF,linethick0{XG51};
DRAWTEXT(A and K=1, a4, '﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),ALIGN2,color208FFF,linethick0{XG51};
DRAWTEXT(A and K=1, b1, ' ﹉﹉﹉﹉'),ALIGN2,color00FF00{XG51};
DRAWTEXT(A and K=1, b2, ' ﹉﹉﹉﹉'),ALIGN2,color00ff00{XG51};
DRAWTEXT(A and K=1, b3, '﹉﹉'),ALIGN0,color00ff00{XG51};
DRAWTEXT(A and K=1, b4, '﹉﹉'),ALIGN0,color00ff00{XG51};
DRAWTEXT(A and K=1, b5, ' ﹉﹉﹉﹉'),ALIGN2,color00ff00{XG51};
DRAWTEXT(A and K=1, b6, ' ﹉﹉﹉﹉'),ALIGN2,color00FF00{XG51};
DRAWTEXTAbs(5,5,'选股无忧网 www.xg51.cn'),linethick1,COLOR00EEff{XG51};
OO:=ma(O,22);j:="kdj.j#DAY"{XG51};
CC:=ma(c,22);hs:=vol/CAPITAL*100{XG51};
jj:=(H+L+C)/3;qj0:=VOL/IF(H=L,4,H-L){XG51};
qj1:=IF(CAPITAL=0,qj0*(jj-MIN(C,O)),qj0*(MIN(O,C)-L)){XG51};
qj2:=IF(CAPITAL=0,qj0*(MIN(O,C)-L),qj0*(jj-MIN(C,O))){XG51};
qj3:=qj0*(H-MAX(O,C));qj4:=qj0*(MAX(C,O)-jj){XG51};
qj5:=qj1+qj2;qj6:=qj3+qj4;DD:=(qj5-qj6)/(qj5+qj6)*100{XG51};
ddx:=((qj1+qj2)-(qj3+qj4))/sum(vol,10)*100;DDZ:=DD*17{XG51};
DDY:=((qj2+qj4)-(qj1+qj3))/sum(vol,10)*100{XG51};
bb:=(cross(j,0)and ((ddx>0 and ddy>0) or DDZ>400)){XG51};
bbd:=EMA("总0#WEEK",2)/sum(IF(CAPITAL=0,ref(INDEXA,1),ref(vol,1)),5)*100{XG51};
XH1:=ref(bbd,1)<-15 and bbd>ref(bbd,1) and bbd>-10{XG51};
XH2:=ref(bbd,1)>=15 and bbd<ref(bbd,1) and bbd<10{XG51};
Q6:=atan((MA(C,5)/ref(MA(C,5),1)-1)*100)*57.3;Q2:=atan((MA(C,13)/ref(MA(C,13),1)-1)*100)*57.3{XG51};
Q1:=atan((MA(C,23)/ref(MA(C,23),1)-1)*100)*57.3;Q:=atan((MA(C,34)/ref(MA(C,34),1)-1)*100)*57.3{XG51};
Q3:=atan((MA(C,68)/ref(MA(C,68),1)-1)*100)*57.3;Q5:=atan((MA(C,250)/ref(MA(C,250),1)-1)*100)*57.3{XG51};
STICKLINE(C>=REF(c,1),H,L,0,0),COLOR0000FF{XG51};
STICKLINE(C>=REF(c,1),C,O,8,0),COLOR0000bb{XG51};
STICKLINE(C>=REF(c,1),C,O,5,0),COLOR0000dd{XG51};
STICKLINE(C>=REF(c,1),C,O,3,0),COLOR0000ee{XG51};
STICKLINE(C>=REF(c,1),C,O,1,0),COLOR0000ff{XG51};
STICKLINE(C<REF(c,1),H,L,0,0),COLORFFFF00{XG51};
STICKLINE(C<REF(c,1),C,O,8,0),COLOR999900{XG51};
STICKLINE(C<REF(c,1),C,O,5,0),COLORbbbb00{XG51};
STICKLINE(C<REF(c,1),C,O,3,0),COLORdddd00{XG51};
STICKLINE(C<REF(c,1),C,O,1,0),COLORFFFF00{XG51};
STICKLINE(bbd>0,CC,OO,8,0),COLORFF00FF{XG51};
STICKLINE(bbd<0,CC,OO,8,0),COLOR00FF00{XG51};
DRAWICON(XH1,l*0.98,7);DRAWICON(XH2,h*1.02,8){XG51};
DRAWTEXT(bb,L*0.98,'点钱'),COLOR00FFFF{XG51};
DRAWTEXTREL(20,0,'上涨家数:'+NUMTOSTRN(DYNAINFO(69),0)+' 家'),COLOR0066FF{XG51};
DRAWTEXTREL(180,0,'下跌家数:'+NUMTOSTRN(DYNAINFO(70),0)+' 家'),COLOR99FF99{XG51};
DRAWTEXTREL(340,0,'平盘家数:'+NUMTOSTRN(DYNAINFO(71),0)+' 家'),COLOREEEEEE{XG51};
DRAWTEXTREL(20,50,STKLABEL+' '+STKNAME+' '+STRLEFT(BKNAME,40)),ColorFFB060{XG51};
x:=BARSLAST(DISPSTATUS=1)+1;
ah:=hhvall(hhv(h,x));
al:=llvall(llv(l,x)){XG51};
x1:=(C+L+H)/3{XG51};
bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10{XG51};
ema8:=ema(c,8){XG51};
x1:=(C+L+H)/3{XG51};
bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10{XG51};
ema8:=ema(c,8){XG51};
AA1:=AMOUNT/V{XG51};
BB1:=L<AA1*0.9{XG51};
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2{XG51};
DD1:=L<MA(C,5)*0.921{XG51};
EE1:=V<MA(V,5)*1.5{XG51};
FF1:=BB1 AND CC1 AND DD1 AND EE1{XG51};
DRAWTEXT(ff1,(LOW* 0.99),'老鼠仓'),Color4080FF{XG51};
A51:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1){XG51};
黑马线:=EMA(A51,5){XG51};
A54:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100{XG51};
趋势线:=(MA(3*SMA(A54,6,1)-2*SMA(SMA(A54,5,1),5,1),2)){XG51};
DRAWTEXT(CROSS(趋势线,0)AND 黑马线<40,(HIGH* 0.97),'▲大黑马'),COLORBLUE{XG51};
LC:=REF(CLOSE,1){XG51};
rsi:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100){XG51};
FF:=EMA(CLOSE,3){XG51};
MA15:=EMA(CLOSE,21){XG51};
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'底背离'),ColorA6E500{XG51};
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),'顶背离'),Color1880FF{XG51};
VAR2:=LLV(LOW,27){XG51};
VAR3:=HHV(HIGH,34){XG51};
VAR4:=EMA((CLOSE-Var2)/(Var3-Var2)*4,4)*25{XG51};
注意买:=IF((Var4<10),80,100){XG51};
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:=3*K-2*D{XG51};
超跌:=IF(J<0,10,0){XG51};
BDDD:=LLV(J,2)=LLV(J,8){XG51};
买入:=IF(CROSS(J,REF(J+0.01,1)) AND BDDD AND J<20,30,0){XG51};
DRAWTEXT(买入 AND 注意买=100 AND 超跌=0,low,'短线'),Color8000FF{XG51};
mtm:=C-REF(C,1){XG51};
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6){XG51};
买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0){XG51};
DRAWTEXT(filter(买=1,5),LOW-0.03,'点钱'),ColorFFDE00{X_G+5!1_C_N_{};
重要申明:本站所有的文章、图片、评论等,均由网友发表或上传并维护或收集自网络,属个人行为,与本站立场无关。
如果侵犯了您的权利,请与我们联系,我们将在24小时内进行处理、任何非本站因素导致的法律后果,本站均不负任何责任。
选股无忧网是股票软件指标公式分享平台,不开展相关证券业务,平台展示的所有股票资料由网络收集,不保障实时性和真实性,请勿以此为依据进行股票交易。
联系QQ:875328188 | 邮箱:875328188@qq.com
Copyright © 2002-2021 选股无忧网桂ICP备18001383号-7