大智慧握手金叉主图未加密选股指标公式源码

大智慧握手金叉主图未加密选股指标公式源码

源码正文：

RSV:=((HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13)))*(100){XG51};
Lwr1:=SMA(RSV,3,1){XG51};
LWR2:=Sma(LWR1,5,1){XG51};
stICKLINE((LWR1>=LWR2),HIGH,LOW,0.05,0),ColorFFDDC0{XG51};
STICKLINE((LWR1>=LWR2),OPEN,CLOSE,5,0),ColorFFDDC0{XG51};
STICKLINE((LWR1<LWR2),HIGH,LOW,0.05,0),Color0000FF{XG51};
STICKLINE((LWR1<LWR2),OPEN,CLOSE,5,1),Color0000FF{XG51};
VAR3aa:=IF((CLOSE>REF(CLOSE,1)),88,0){XG51};
VAR4aa:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR3aa>0),91,0){XG51};
DRAWTEXT(FILTER((VAR4aa>90),34),(LOW)*(0.94999998),'买'),Color00FFFF{XG51};
DRAWTEXT(FILTER((VAR4aa>90),34),(LOW)*(0.99000001),'▲'),Color00FFFF{XG51};
ema30:EMA(C,30),COLORBLUE{XG51};
EMA60:EMA(C,60),Color4080FF{XG51};
EMA90:EMA(C,90),ColorC08000{XG51};
EMA120:EMA(C,120),Color008080{XG51};
ss:=cross(EMA30,EMA60) AND c>o AND c>REF(C,1) AND C/REF(C,1)>=1.018
or cross(EMA30,EMA120) AND c>o AND c>REF(C,1) AND C/REF(C,1)>=1.018
or cross(EMA60,EMA90) AND c>o AND c>REF(C,1) AND C/REF(C,1)>=1.018
or cross(EMA30,EMA90) AND c>o AND c>REF(C,1) AND C/REF(C,1)>=1.018 {XG51};
DRAWICON(SS,L-0.04,1){XG51};
fa:=barslast(cross(ma(c,60),ma(c,20))) and cross(ma(c,20),ma(c,60)){XG51};
STICKLINE(fa,ma(c,20),ma(c,20)-0.09,4,0),colorwhite{XG51};
DRAWTEXT(fa,ma(c,20)-0.13,'握↑手'),colorwhite{XG51};
tt1:=cross(ma(c,20),ma(c,120)) and cross(ma(c,20),ma(c,250)) and v>ref(v,1){XG51};
tt2:=ma(c,20)>ref(ma(c,20),2) and v>ref(v,1) and cross(c,ma(c,20)){XG51};
DRAWTEXT(TT1,l-0.13,'金叉'),coloryellow{XG51};
STICKLINE(tt2,l,l-0.09,4,0),coloryellow{XG51};
DRAWTEXT(tt2,l-0.13,'买'),coloryellow{XG51};
STICKLINE(ma(c,120)>=ref(ma(c,120),1) and cross(c,ma(c,20)) and cross(c,ma(c,120)) and v>ref(v,1),l,l-
0.09,4,0),colorff00ff{XG51};
DRAWTEXT(ma(c,120)>=ref(ma(c,120),1) and cross(c,ma(c,20)) and cross(c,ma(c,120)) and v>ref(v,1),l-
0.13,'买'),colorff00ff{X.G_5?1.C.N.{};

大智慧七种K线图主图未加密选股指标公式源码

源码正文：

INPUT:N(1,0,1),P(1,0,1),P1(1,0,1),M(1,0,1),Y(1,0,1),W(1,0,1);{XG51};
stICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),LOW,HIGH,0.1,0),colorred{XG51};
STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),OPEN,CLOSE,8,0),colorred{XG51};
STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),LOW,HIGH,0.1,0),colorcyan{XG51};
STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),OPEN,CLOSE,8,0),colorcyan{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR008800{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00AA00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR00CC00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00EE00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLOR000066{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000088{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR0000AA{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR0000BB{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR0000CC{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000DD{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000EE{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLOR0000FF{XG51};
LC:=REF(C,1){XG51};
卖黄金:((SMA(maX((C - LC),0),3,1) / SMA(Abs((C - LC)),3,1)) * 100),LINETHICK0{XG51};
STICKLINE(crOSS(80,卖黄金) AND C<O,H,L,2,0),COLOR00ffff,LAYER0{XG51};
STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,9,0 ),COLOR007777,LAYER0{XG51};
STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,8,0 ),COLOR009999,LAYER0{XG51};
STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,6,0 ),COLOR00BBBB,LAYER0{XG51};
STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,4,0 ),COLOR00DDDD,LAYER0{XG51};
STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,2 ,0 ),COLOR00ffff,LAYER0{XG51};
Y5:ema(cyc(3),5),COLORFFFFFF,LINETHICK1{XG51};
PARTLINE(Y5 ,(Y5>REF(Y5,1))-1,rgb(0,255,0),1,rgb(255,0,0) ),LINETHICK2,LAYER0{XG51};
IF N=1 THEN BEGIN
CYC1:COST(1),COLORFF66CC{XG51};
CYC5:COST(5),COLORFF00CC{XG51};
CYC13:COST(13),COLOR00CCCC{XG51};
CYC34:COST(34),COLOR00DEEE{XG51};
CYC55:COST(55),COLOR00acCC,LINETHICK2{XG51};
CYC79:COST(79),COLORAACC22{XG51};
CYC95:COST(95),COLORCYAN{XG51};
END
IF P=1 THEN BEGIN
cyc5B:CYC(5),DOTLINE{XG51};
cyc13B:cyc(13),DOTLINE{XG51};
cyc34B:cyc(34),DOTLINE{XG51};
cyc55B:cyc(55),DOTLINE{XG51};
cyc89B:cyc(89),DOTLINE{XG51};
cyc144B:cyc(144),DOTLINE{XG51};
cyc0B:MAXCYC,colorff9900,DOTLINE{XG51};
END
IF P1=1 THEN BEGIN
MA5:MA(CLOSE,5),COLOR0000ff{XG51};
MA10:MA(CLOSE,10),COLOR00ffff{XG51};
MA20:MA(CLOSE,20),COLORff00ff{XG51};
MA30:MA(CLOSE,30),COLORff99ff{XG51};
MA60:MA(CLOSE,60),COLOR00ff00{XG51};
MA120:MA(CLOSE,120),COLORff9900{XG51};
END
IF M=1 THEN BEGIN
MA3B:MA(CLOSE,3){XG51};
MA5B:MA(CLOSE,5){XG51};
MA8B:MA(CLOSE,8){XG51};
MA13B:MA(CLOSE,13){XG51};
MA21B:MA(CLOSE,21){XG51};
MA34B:MA(CLOSE,34){XG51};
MA55B:MA(CLOSE,55){XG51};
MA89B:MA(CLOSE,89){XG51};
MA144B:MA(CLOSE,144){XG51};
END
IF Y=1 THEN BEGIN
X:=BArslAST(DISPSTATUS=1)+1{XG51};
ah:=hhvall(hhv(h,X));
al:=llvall(llv(l,X)){XG51};
nnl:=DISPSTATUS=2{XG51};
ahl:=ah-al{XG51};
q191:=al+ahl*0.191{XG51};
q382:=al+ahl*0.382{XG51};
q500:=al+ahl*0.500{XG51};
q618:=al+ahl*0.618{XG51};
q809:=al+ahl*0.809{XG51};
DRAWTEXT(nnl,ah,'￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLOR0000ff{XG51};
DRAWTEXT(nnl,q809,'￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLORddaa00{XG51};
DRAWTEXT(nnl,q618,'￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLORddaa00{XG51};
DRAWTEXT(nnl,q500,'￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLOR00ffff{XG51};
DRAWTEXT(nnl,q382,'￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLORddaa00{XG51};
DRAWTEXT(nnl,q191,'￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLORddaa00{XG51};
DRAWTEXT(nnl,al,'￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLOR00ff00{XG51};
DRAWTEXT(nnl,ah*0.998,'最高.'+ah+''),ALIGN0,Color0047FF,LINETHICK1{XG51};
DRAWTEXT(nnl,q809,'80.9%.' +q809+''),ALIGN0,Color00FFff,LINETHICK1{XG51};
DRAWTEXT(nnl,q618,'61.8%.'+q618+''),ALIGN0,Color0047FF,LINETHICK1{XG51};
DRAWTEXT(nnl,q500,'50%.'+q500+''),ALIGN0,Color00FFff,LINETHICK1{XG51};
DRAWTEXT(nnl,q382,'38.2%.'+q382+''),ALIGN0,Color0047FF,LINETHICK1{XG51};
DRAWTEXT(nnl,q191,'19.1%.'+q191+''),ALIGN0,Color00FFff,LINETHICK1{XG51};
DRAWTEXT(nnl,al*1.01,'最低.'+al+''),ALIGN0,VALIGN2,Color0047FF,LINETHICK1{XG51};
END{XG51};
IF W=1 THEN BEGIN
bbi:=(3*C+H+L)/5{XG51};
MID:EMA(BBI,26),COLOR00ff00,DOTLINE{XG51};
UPPER:MID+2*STD(BBI,26),COLORWHITE,DOTLINE{XG51};
LOWER:MID-2*STD(BBI,26),COLORFF9900,DOTLINE{XG51};
END{X~G-5^1~C~N~{};