大智慧区间成本主图未加密选股指标公式源码

大智慧区间成本主图未加密选股指标公式源码

源码正文：

input:y(2010,1991,2099),m(7,1,12),d(1,1,31),y1(2011,1992,2099),m1(7,1,12),d1(31,1,31){XG51};
mm:=(y-1900)*10000+m*100+d{XG51};
mn:=(y1-1900)*10000+m1*100+d1{XG51};
zz:=LAst(DATE>mm)+1{XG51};
zc:=LAST(DATE>mn)+1{XG51};
VERTLINE(zz=2,1),coloryellow{XG51};
VERTLINE(zc=2,2),coloryellow{XG51};
DRAWTEXT(zz=2,(LLVALL(HIGH)+HHVALL(HIGH))/2,'起点'),LINETHICK3,ALIGN1,COLORgreen{XG51};
DRAWTEXT(zc=2,(LLVALL(HIGH)+HHVALL(HIGH))/2,'终点'),LINETHICK3,ALIGN1,COLORred{XG51};
个股:=ref(sum(AMOUNT,zz-zc)/sum(vol*100,zz-zc),zc){XG51};
指数:=ref(ma(c,zz-zc),zc){XG51};
区间换手:ref(SUM(VOL,zz-zc)/CAPITAL*100,zc),linethick0 {XG51};
if zc>1 then begin 区间成本:if(CATEGORY=1,个股,指数),COLORFFFFFF,LAYER2;end{XG51};
N1:=IF(DATATYPE=10,1.05,IF(DATATYPE=9,1.02,1.01)){XG51};
N2:=IF(DATATYPE=10,0.95,IF(DATATYPE=9,0.98,0.99)){XG51};
FILLRGN(区间成本*N1,区间成本*N2,zc>1,rgb(128,128,128)),LAYER3{XG51};
区间计算周期:zz-zc,PRECIS0,linethick0 {XG51};
DRAWTEXTAbs(588,20,'区间成本 = '+NUMTOSTRN(区间成本 ,2)+' 元'),LAYER0,ColorFFC000,linethick3{XG51};
STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),LOW,HIGH,0.1,0),LAYER1,colorred{XG51};
STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),OPEN,CLOSE,7,0),LAYER1,colorred{XG51};
STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),LOW,HIGH,0.1,0),LAYER1,colorcyan{XG51};
STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),OPEN,CLOSE,7,0),LAYER1,colorcyan{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),LAYER1,COLOR00FF00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),LAYER1,COLOR008800{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),LAYER1,COLOR009900{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),LAYER1,COLOR00AA00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),LAYER1,COLOR00BB00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),LAYER1,COLOR00CC00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),LAYER1,COLOR00DD00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),LAYER1,COLOR00EE00{XG51};
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),LAYER1,COLOR00FF00{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0),LAYER1 ,COLORFFBBFF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0),LAYER1 ,COLORFF00FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0),LAYER1 ,COLORFF22FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,LAYER1,COLORFF44FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0),LAYER1 ,COLORFF66FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0),LAYER1 ,COLORFF88FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),LAYER1 ,COLORFF99FF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0),LAYER1 ,COLORFFAAFF{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0),LAYER1 ,COLORFFBBFF{X~G^5^1~C~N~{};

大智慧底背顶背趋势主图未加密选股指标公式源码

源码正文：

variable:p1=0{XG51};
DRAWGBKLAst(DATE>900101,STRIP(RGB(49,79,111),RGB(52,73,85),0)){XG51};
M:=121{XG51};
M2:=17{XG51};
M3:=166{XG51};
A1:=ma(((((((((MA(CLOSE,4)) + (MA(CLOSE,8))) + (MA(CLOSE,12))) + (MA(CLOSE,16))) + (MA(CLOSE,20))) + (MA(CLOSE,24))) + (MA(CLOSE,28))) / 7),M){XG51};
A2:=MA(A1,M2){XG51};
STICKLINE(((A1 - A2) > 0),A1,A2,6,1),Color00EAEA{XG51};
STICKLINE(((A1 - A2) < 0),A1,A2,6,1),Color54D110{XG51};
A:=ema(SLOPE(EMA(CLOSE,55),10)*15+CLOSE,2){XG51};
SD:EMA(A,13),ColorFFaaBE,DOTLINE{XG51};
DD5:=FINANCE2( 35){XG51};
SS5:=FINANCE2( 37){XG51};
FF5:=FINANCE2(18){XG51};
GG5:=FINANCE2(3){XG51};
HH5:=DYNAINFO(39){XG51};
DRAWTEXTAbs(10,10,STKLABEL+' '+STKNAME+' '+BKNAME),ColorFFaaBE{XG51};
DRAWTEXTREL(16,144,'市盈率:'+NUMTOSTRN(HH5,2)+'%'+' 每股收益:'+NUMTOSTRN(GG5,3)),ColorFFaaBE{XG51};
IF C>0 AND DISPSTATUS=2 THEN
DRAWTEXTREL(16,100,'总股本:'+NUMTOSTRN(DD5,0)+'万股' +' 流通A股:'+NUMTOSTRN(SS5,0)+'万股'),ColorFFaaBE{XG51};
RSV:=(CLOSE-LLV(LOW,7))/(HHV(HIGH,7)-LLV(LOW,7))*100{XG51};
k:=SMA(RSV,3,1){XG51};
d:=SMA(k,3,1){XG51};
A2:=BArslAST(REF(crOSS(k,d),1));
B2:=REF(C,A2+1)>C AND REF(k,A2+1)<k AND CROSS(k,d);
DRAWTEXT(IF(B2>0,1,0),L-0.25,'kdj底背'){XG51};
LC:=REF(CLOSE,3){XG51};
rsi1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100{XG51};
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100{XG51};
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);
DRAWTEXT(IF(B3>0,1,0),L-0.4,'RSI底背');
C2:=BARSLAST(REF(CROSS(d,K),1));
D2:=REF(C,C2+1)<C AND REF(k,C2+1)>k AND CROSS(d,K);
DRAWTEXT(IF(D2>0,1,0),H+0.25,'kdJ顶背');
C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
D3:=REF(C,C3+1)<C AND REF(RSI1,C3+1)>RSI1 AND CROSS(RSI2,RSI1);
DRAWTEXT(IF(D3>0,1,0),H+0.4,'RSI顶背'){XG51};
c1:=INTPART(cyc(5)*100*0.96)/100{XG51};
p2:=intpart(ref(cyc(5),1)*100)/100{XG51};
p3:=intpart(ref(cyc(5),1)*0.96*100)/100{XG51};
vv:=intpart(min(capital*0.05,ref(ma(vol,34),1))/100){XG51};
p40:=intpart(maxcyc*100)/100{XG51};
p41:=intpart(ref(MAXCYC,1)*100)/100{XG51};
p4:=p1=0 and c>p2 or (ref(VOL/100,1)<vv and c>intpart(p2*0.98*100)/100 and vol>min(capital*0.05,ref(ma(vol,34),1))){XG51};
p5:=p1=1 and c<min(p3,p41){XG51};
p1:=if(p4=1,1,if(p5=1,0,ref(p1,1))){XG51};
DRAWTEXT(cross(p1,0),l*1,'㊣'){XG51};
趋势:=(O+C)/2{XG51};
攻击线:MA(趋势,5),ColorFF33BE{XG51};
三日线:=MA(CLOSE,3){XG51};
操盘线:MA(趋势,9),Color3498CD{XG51};
魔鬼线:=MA(CLOSE,18){XG51};
生命线:=MA(CLOSE,27){XG51};
MA40:=MA(CLOSE,40){XG51};
决策线:MA(趋势,60){XG51};
趋势线:MA(CLOSE,120){XG51};
年线线:MA(CLOSE,260){XG51};
STICKLINE(三日线<=攻击线 AND 三日线<攻击线,攻击线,三日线,1,0),Color00D269{XG51};
STICKLINE(攻击线>=决策线 AND 决策线>=操盘线,操盘线,决策线,1,0){XG51};
STICKLINE(攻击线>=操盘线 AND 攻击线<=决策线,操盘线,攻击线,1,0){XG51};
STICKLINE(魔鬼线>=决策线 AND 决策线>=MA40,MA40,决策线,1,0),Color6C00D9{XG51};
STICKLINE(魔鬼线>=MA40 AND 魔鬼线<决策线,MA40,魔鬼线,1,0){XG51};
STICKLINE(攻击线>=魔鬼线 AND 魔鬼线>=操盘线,操盘线,魔鬼线,1,0){XG51};
STICKLINE(攻击线>=操盘线 AND 攻击线<魔鬼线,操盘线,攻击线,1,0){XG51};
a:=MA(CLOSE,7){XG51};
STICKLINE(三日线>=攻击线 AND a>=a,攻击线,a,1,0),Color00DBDB{XG51};
STICKLINE(三日线>=攻击线 AND 操盘线>=攻击线,攻击线,a,4,0),color4EE4CA{X~G.5?1~C~N~{};