大智慧见顶主图未加密选股指标公式源码

大智慧见顶主图未加密选股指标公式源码

源码正文：

ma5:ma(close,5);ma10:ma(close,10);ma20:ma(close,20);ma60:ma(close,60){XG51};
LC:=REF(CLOSE,1);rsi:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(Abs(CLOSE-LC),6,1)*100{XG51};
DRAWTEXT(crOSS(80,RSI) ,high*1.02,'见 顶'),coloryellow{XG51};
DRAWicon(CROSS(80,RSI) ,high*1.02,2){XG51};
Varb:=SMA(MAX(CLOSE-LC,0),7,1)/SMA(ABS(CLOSE-LC),7,1)*100{XG51};
Varc:=SMA(MAX(CLOSE-LC,0),13,1)/SMA(ABS(CLOSE-LC),13,1)*100{XG51};
Vard:=BARSCOUNT(CLOSE){XG51};
Var1:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100-60{XG51};
Var2:=SMA(Var1,3,1)+100{XG51};
Var3:=(CLOSE-LLV(LOW,3))/(HHV(HIGH,3)-LLV(LOW,3))*1000{XG51};
Var4:=SMA(Var3,3,1); Var5:=SMA(Var4,3,1)+100;Var6:=Var5-Var2{XG51};
主力:=ema( (CLOSE-MA(CLOSE,3))/MA(CLOSE,3)*4800,2){XG51};
散户:=EMA( (CLOSE-MA(CLOSE,20))/MA(CLOSE,20)*4800,7){XG51};
drawtext(cross(主力,散户) and 主力<0 and 散户<0,low,'见 底'),colorred{XG51};
drawicon(cross(主力,散户) ,low,1){XG51};
drawtext(cross(散户,主力) and 主力<0 and 散户<0,high*1.02,'熊市○清仓'),colorgreen{X~G?5*1~C~N~{};

大智慧黄金分割+菲波拉契主图未加密选股指标公式源码

源码正文：

input:K(1,1,3);
A:=BArslAst(DISPSTATUS=1)+1{XG51};
HH:=HHV(H,A){XG51};
LL:=LLV(L,A){XG51};
上涨:BARSSINCE(BacKSET(DISPSTATUS=2,BARSLAST(L=LL)+1)),COLOR0000FF,linethick0{XG51};
↑空间％:(C/REF(L,上涨)-1)*100,COLOR00FFFF,linethick0{XG51};
最高％:(HHVALL(HH)/REF(L,上涨)-1)*100,COLORFF00FF,linethick0{XG51};
下跌:BARSSINCE(BACKSET(DISPSTATUS=2,BARSLAST(H=HH)+1)),COLOR00FF00,linethick0{XG51};
↓空间％:(C/REF(H,下跌)-1)*100,COLOR998888,linethick0{XG51};
最低％:(LLVALL(LL)/REF(H,下跌)-1)*100,COLORFF0000,linethick0{XG51};
高:REF(H,下跌),COLOR0000FF,DOTLINE{XG51};
低:REF(L,上涨),COLOR00FF00,DOTLINE{XG51};
VERTLINE(上涨=0,4),COLOR0000FF{XG51};
VERTLINE(下跌=0,3),COLOR00FF00{XG51};
DRAWTEXT(上涨=0 AND 最高％>10,LL*1.1,'-10%'),COLORBLUE{XG51};
DRAWTEXT(上涨=0 AND 最高％>10,LL*1.15,'-15%'),COLORFFFFFF{XG51};
DRAWTEXT(上涨=0 AND 最高％>20,LL*1.2,'-20%'),COLOR00FF00{XG51};
DRAWTEXT(上涨=0 AND 最高％>25,LL*1.25,'-25%'),COLORFF00FF{XG51};
DRAWTEXT(上涨=0 AND 最高％>30,LL*1.3,'-30%'),COLOR0000FF{XG51};
DRAWTEXT(上涨=0 AND 最高％>40,LL*1.4,'-40%'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=0 AND 最高％>50,LL*1.5,'-50%'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=0 AND 最高％>60,LL*1.6,'-60%'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=0 AND 最高％>70,LL*1.7,'-70%'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=0 AND 最高％>80,LL*1.8,'-80%'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=0 AND 最高％>90,LL*1.9,'-90%'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=0 AND 最高％>100,LL*2,'-100%'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=0 AND 最高％>125,LL*2.25,'-125%'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=0 AND 最高％>150,LL*2.5,'-150%'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=0 AND 最高％>180,LL*2.8,'-180%'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=0 AND 最高％>200,LL*3,'-200%'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=0 AND 最高％>250,LL*3.5,'-250%'),COLOR00FFFF{XG51};
DRAWTEXT(下跌=0 AND 最低％<-10,HH*0.9,'-10%'),COLORBLUE{XG51};
DRAWTEXT(下跌=0 AND 最低％<-15,HH*0.85,'-15%'),COLORFFFFFF{XG51};
DRAWTEXT(下跌=0 AND 最低％<-20,HH*0.8,'-20%'),COLOR00FF00{XG51};
DRAWTEXT(下跌=0 AND 最低％<-25,HH*0.75,'-25%'),COLORFF00FF{XG51};
DRAWTEXT(下跌=0 AND 最低％<-30,HH*0.7,'-30%'),COLORFF0000{XG51};
DRAWTEXT(下跌=0 AND 最低％<-40,HH*0.6,'-40%'),COLORFFFFFF{XG51};
DRAWTEXT(下跌=0 AND 最低％<-50,HH*0.5,'-50%'),COLORFFFFFF{XG51};
DRAWTEXT(下跌=0 AND 最低％<-60,HH*0.4,'-60%'),COLORFFFFFF{XG51};
DRAWTEXT(下跌=0 AND 最低％<-70,HH*0.3,'-70%'),COLORFFFFFF{XG51};
DRAWTEXT(下跌=0 AND 最低％<-80,HH*0.2,'-80%'),COLORFFFFFF{XG51};
DRAWTEXT(下跌=0 AND 最低％<-90,HH*0.1,'-90%'),COLORFFFFFF{XG51};
DRAWTEXT(上涨=2,L,'3天'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=4,L,'5天'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=7,L,'8天'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=12,L,'13天'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=20,L,'21天'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=33,L,'34天'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=54,L,'55天'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=88,L,'89天'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=143,L,'144天'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=179,L,'180天'),COLOR00FFFF{XG51};
DRAWTEXT(上涨=249,L,'250天'),COLOR00FFFF{XG51};
DRAWTEXT(下跌=2,L,'-3天'),COLOR00FF00{XG51};
DRAWTEXT(下跌=4,L,'-5天'),COLOR00FF00{XG51};
DRAWTEXT(下跌=7,L,'-8天'),COLOR00FF00{XG51};
DRAWTEXT(下跌=12,L,'-13天'),COLOR00FF00{XG51};
DRAWTEXT(下跌=20,L,'-21天'),COLOR00FF00{XG51};
DRAWTEXT(下跌=33,L,'-34天'),COLOR00FF00{XG51};
DRAWTEXT(下跌=54,L,'-55天'),COLOR00FF00{XG51};
DRAWTEXT(下跌=88,L,'-89天'),COLOR00FF00{XG51};
DRAWTEXT(下跌=143,L,'-144天'),COLOR00FF00{XG51};
DRAWTEXT(下跌=179,L,'-180天'),COLOR00FF00{XG51};
DRAWTEXT(下跌=249,L,'-250天'),COLOR00FF00;
T := BARSLAST(DISPSTATUS=1)+1{XG51};
Aa:= DISPSTATUS=2{XG51};
HH1 := HHV(H, T){XG51};
LL1 := LLV(L, T){XG51};
HL := HH1-LL1{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 := (HH1-LL1)*0.191{XG51};
HL382 := (HH1-LL1)*0.382{XG51};
HL618 := (HH1-LL1)*0.618{XG51};
HL809 := (HH1-LL1)*0.809{XG51};
if KK<0 then begin
a1 := HH1-HL191{XG51};
a2 := HH1-HL382{XG51};
a3 := HH1-HL618{XG51};
a4 := HH1-HL809{XG51};
end else begin
a1 := LL1+HL191{XG51};
a2 := LL1+HL382{XG51};
a3 := LL1+HL618{XG51};
a4 := LL1+HL809{XG51};
end
end
if k=1 then begin
HL125 := (HH1-LL1)*0.125{XG51};
HL250 := (HH1-LL1)*0.25{XG51};
HL375 := (HH1-LL1)*0.375{XG51};
HL625 := (HH1-LL1)*0.625{XG51};
HL750 := (HH1-LL1)*0.75{XG51};
HL875 := (HH1-LL1)*0.875{XG51};
if kk<0 then begin
b1 := HH1-HL125{XG51};
b2 := HH1-HL250{XG51};
b3 := HH1-HL375{XG51};
b4 := HH1-HL625{XG51};
b5 := HH1-HL750{XG51};
b6 := HH1-HL875{XG51};
end else begin
b1 := LL1+HL125{XG51};
b2 := LL1+HL250{XG51};
b3 := LL1+HL375{XG51};
b4 := LL1+HL625{XG51};
b5 := LL1+HL750{XG51};
b6 := LL1+HL875{XG51};
end
end
DRAWTEXT(Aa and K<>3,HH1, ' 最高价：'+HH1),ALIGN2,colorgreen{XG51};
DRAWTEXT(Aa and K<>3,LL1, ' 最低价：'+ll1),ALIGN2,VALIGN2,colorgreen{XG51};
DRAWTEXT(Aa and K<>3,mHL,' 50%：'+mHL),ALIGN2,ColorC0C0C0{XG51};
DRAWTEXT(Aa and K=1, a1, ' 0.191：'+NUMTOSTRN(a1,2)),ALIGN2,ColorC0C0C0{XG51};
DRAWTEXT(Aa and K=1, a2, ' 0.382：'+NUMTOSTRN(a2,2)),ALIGN2,ColorC0C0C0{XG51};
DRAWTEXT(Aa and K=1, a3, ' 0.618：'+NUMTOSTRN(a3,2)),ALIGN2,ColorC0C0C0{XG51};
DRAWTEXT(Aa and K=1, a4, ' 0.809：'+NUMTOSTRN(a4,2)),ALIGN2,ColorC0C0C0{XG51};
DRAWTEXT(Aa and K<>3,HH1, '￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorred,linethick7{XG51};
DRAWTEXT(Aa and K<>3,LL1, '￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorred,linethick7{XG51};
DRAWTEXT(Aa and K<>3,mHL,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorff0000,linethick7{XG51};
DRAWTEXT(Aa and K=1, a1, '﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),ALIGN2,color208FFF,linethick0{XG51};
DRAWTEXT(Aa and K=1, a2, '﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),ALIGN2,color208FFF,linethick0{XG51};
DRAWTEXT(Aa and K=1, a3, '﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),ALIGN2,color208FFF,linethick0{XG51};
DRAWTEXT(Aa and K=1, a4, '﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),ALIGN2,color208FFF,linethick0{X.G^5-1.C.N.{};