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

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

源码正文：

input:N(1,1,9999),M(1,1,9999){XG51};
A1:=BARstATUS=2 {XG51};
C1:=BacKSET(a1,n){XG51};
D1:=FILTER(C1,n-1){XG51};
VERTLINE( d1,1 ){XG51};
A2:=BARSTATUS=2 {XG51};
C2:=BACKSET(a2,m){XG51};
D2:=FILTER(C2,m-1){XG51};
VERTLINE( d2,1 ){XG51};
周期:abs(n-m) + 1,linethick0{XG51};
结束点:=if(n>m,d2,d1){XG51};
成交额:=if(结束点,sum(amount,周期),0){XG51};
成交量:=if(结束点,sum(vol,周期),0){XG51};
区间均价:=if(CATEGORY=1, 成交额/成交量/100,ref(ma(c,abs(n-m)+1),min(m,n)-1)){XG51};
区间换手和:=成交量/CAPITAL*100{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};
区间换手:REF(区间换手和,BArslAST(结束点)),linethick0{XG51};
区间成本:REF(区间均价,BARSLAST(结束点)){XG51};
上界:REF(区间均价*n1,BARSLAST(结束点)),DOTLINE{XG51};
下界:REF(区间均价*n2,BARSLAST(结束点)),DOTLINE{XG51};
DRAWTEXTABS(588,20,'成本区间:'+NUMTOSTRN(下界,2)+' - ' +NUMTOSTRN(区间成本,2)
+' - ' + NUMTOSTRN(上界,2)),LAYER0,ColorFFC000{XG51};
DRAWTEXTABS(588,40,'区间换手:'+NUMTOSTRN(区间换手,2)),LAYER0,ColorFFC000{X_G~5=1_C_N_{};

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

源码正文：

INPUT:AM(1,0,1),AJ(1,0,1),ac(1,0,1),AR(1,0,1),AD(1,0,1),DM(1,0,1),ZL(1,0,1){XG51};
DRAWGBKlast(c>0,strip(RGB(0,0,0),RGB(0,0,120),0)){XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8.5,0) ,COLOR000011{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000033{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR000055{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR000077{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR000099{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000BB{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000DD{XG51};
STICKLINE((CLOSE >= OPEN),HIGH,LOW,1,0),color0000FF{XG51};
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,8.5,0),color006600{XG51};
STICKLINE((OPEN >= CLOSE),CLOSE,OPEN,7,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),HIGH,LOW,1,0),color00FF00{XG51};
LC:=REF(C,1){XG51};
卖黄金:((SMA(maX((C - LC),0),3,1) / SMA(Abs((C - LC)),3,1)) * 100),LINETHICK0{XG51};
DRAWTEXT(crOSS(80,卖黄金) ,high*1.04,'顶'),COLOR00ffFF,ALIGN1,LINETHICK1{XG51};
STICKLINE(CROSS(80,卖黄金) AND C<O,H,L,2,0),COLOR00ffff,LAYER0{XG51};
STICKLINE(CROSS(80,卖黄金) AND C<O,C,O,12,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};
DRAWTEXTABS(5,5,'基本指标:MA5波段'),Color00FFff,LINETHICK3{XG51};
BC:=(3*C+H+L)/5{XG51};
MA5:ema(MA(BC,5),5){XG51};
PARTLINE(MA5,(MA5>REF(MA5,1))-1,rgb(0,255,0),1,rgb(255,0,0) ),LINETHICK2,LAYER0{XG51};
XL:=BArslAST(DISPSTATUS=1)+1{XG51};
E:=llvall(llv(L,XL))*0.95{XG51};
IF AM=1 THEN BEGIN
DRAWTEXTABS(250,5,'技术指标:macd'),Color0000ff,LINETHICK4{XG51};
difF:=EMA( EMA(CLOSE,12) - EMA(CLOSE,26),3){XG51};
DEA:=EMA(DIFF,9){XG51};
MACD:2*(DIFF-DEA),Color0598FF,LINETHICK0;{XG51};
STICKLINE(MACD>0,E+MACD*2,E,12,0),Color0598FF{XG51};
STICKLINE(MACD<0,E+MACD*2,E,12,0),ColorFF5500{XG51};
END{XG51};
IF AJ=1 THEN BEGIN
DRAWTEXTABS(250,5,'技术指标:kdj'),Colorff00ff,LINETHICK4{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:=SMA(RSV,3,1){XG51};
D:=SMA(K,3,1){XG51};
J:(3*K-2*D),Color05FFFF,LINETHICK0{XG51};
if(CROSS(K,D) AND BARSLAST(CROSS(D,K))<3,E*1.09,E),ColorFF9910 {XG51};
STICKLINE(K>D,E+(K-D)/50,E,12,0),Color0000FF{XG51};
STICKLINE(K<D,E+(K-D)/50,E,12,0),Color00FF00{XG51};
END{XG51};
IF AC=1 THEN BEGIN
DRAWTEXTABS(200,5,'指标:cci'),Color00ffff,LINETHICK4{XG51};
TYP := (HIGH + LOW + CLOSE)/3{XG51};
CCI:(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)),Color05FF00,LINETHICK0;{XG51};
STICKLINE(CCI>0,E+CCI/350,E,12,0),Color0077FF{XG51};
STICKLINE(CCI<0,E+CCI/350,E,12,0),ColorFF9900{XG51};
END{XG51};
IF AR=1 THEN BEGIN
DRAWTEXTABS(250,5,'技术指标:rsi'),Color00ff00,LINETHICK4{XG51};
LC := REF(CLOSE,1){XG51};
RSI:SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100,ColorFF05FF,LINETHICK0{XG51};
CRSI:="RSI.RSI3#WEEK"{XG51};
金叉RSI:STICKLINE(CROSS("RSI.RSI2#WEEK","RSI.RSI3#WEEK"),E,E*1.1,0.6,0),ColorFF00FF{XG51};
DRAWTEXT(CROSS("RSI.RSI2#WEEK","RSI.RSI3#WEEK"),E*1.1,'金叉'),COLOR0000FF{XG51};
STICKLINE(RSI>CRSI,E+(RSI-CRSI)/50,E,12,0),Color0000FF{XG51};
STICKLINE(RSI<CRSI,E+(RSI-CRSI)/50,E,12,0),Color00FF00{XG51};
VAR1:=(CLOSE*2+HIGH+LOW)/4{XG51};
SK:=EMA(VAR1,13)-EMA(VAR1,73){XG51};
SD:=EMA(SK,2){XG51};
XG:=((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 )
OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)) OR 金叉RSI){XG51};
STICKLINE(XG,E,E*1.15,0.6,0),COLOR00FFFF{XG51};
DRAWTEXT(XG,E*1.15,'突破'),COLOR00FFBB{XG51};
END{XG51};
IF AD=1 THEN BEGIN
DRAWTEXTABS(250,5,'技术指标:DMI'),Color0598ff,LINETHICK4{XG51};
N:=21;M:=6;M1:=20{XG51};
TR1:=EMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N){XG51};
HD :=HIGH-REF(HIGH,1){XG51};
LD :=REF(LOW,1)-LOW{XG51};
DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),N){XG51};
DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),N){XG51};
pdi:= DMP*100/TR1{XG51};
mdi:DMM*100/TR1,Color05FFFF,LINETHICK0{XG51};
ADX:= EMA((PDI-MDI)/(MDI+PDI)*100,M)*2{XG51};
ADXR:=EMA(ADX,M){XG51};
Adma:=EMA(ADX,M1){XG51};
OMD:=(ADX-2*ADMA+ADXR)/2{XG51};
STICKLINE( OMD>0,E,E+OMD/100,12,0),COLORWHITE{XG51};
STICKLINE(OMD<0,E,E+OMD/100,12,0),COLORCYAN{XG51};
END{XG51};
IF DM=1 THEN BEGIN
DRAWTEXTABS(250,5,'技术指标:DMA'),ColorFF55ff,LINETHICK4{XG51};
DDD:=(MA(CLOSE,10)-MA(CLOSE,50)){XG51};
AMA:=MA(DDD,10){XG51};
STICKLINE( DDD>AMA,E,E+(DDD-AMA),12,0),COLORFF22FF{XG51};
STICKLINE(DDD<AMA,E,E+(DDD-AMA),12,0),COLOR99FF99{XG51};
END{XG51};
IF ZL=1 THEN BEGIN
DRAWTEXTABS(250,5,'技术指标:主力进出'),ColorFF55ff,LINETHICK4{XG51};
jcs:=ZLSHORT{XG51};
jcm:=ma(zlshort ,12){XG51};
STICKLINE(jcs>jcm,E,E+(jcs-jcm)/CAPITAL*5000,12,0),COLOR222299{XG51};
STICKLINE(jcs<jcm,E,E+(jcs-jcm)/CAPITAL*5000,12,0),COLORFFee00{XG51};
END{X^G*5.1^C^N^{};