通达信四色谱指数平主图未加密选股指标公式源码

通达信四色谱指数平主图未加密选股指标公式源码

源码正文：

DRAWGBK(C>0, RGB(00,00,00),RGB(54,0,0),0,'11',0){XG51};
Z1:=stRCAT(HYBLOCK,'----');
Z2:=STRCAT(Z1,FGBLOCK){XG51};
Z3:=STRCAT(Z2,DYBLOCK);
Z4:=STRCAT(Z3,'----');
DRAWTEXT_FIX(1,0.00,0.06,0,CLOSE)COLORGREEN{XG51};
ma1:=ema(C,8){XG51};
MA2:=EMA(C,48){XG51};
MA3:=EMA(C,34){XG51};
MA4:=EMA(C,7){XG51};
MA5:=EMA(C,20){XG51};
MA6:=EMA(C,10){XG51};
difF:=EMA(CLOSE,5)-EMA(CLOSE,13){XG51};
DEA:=EMA(DIFF,9){XG51};
N1:=BArslAST(crOSS(DIFF,DEA))+1{XG51};
N2:=BARSLAST(CROSS(DEA,DIFF))+1{XG51};
A1:=BacKSET(ISLASTBAR && N1<N2,REF(REF(HHVBARS(H,N1)+1,N2),N2)+REF(N2,N2)+N2){XG51};
B1:=BACKSET(ISLASTBAR && N1<N2,REF(HHVBARS(H,N1),N2)+N2+1){XG51};
A2:=BACKSET(ISLASTBAR && N1<N2,REF(REF(LLVBARS(L,N2)+1,N1),N2)+REF(N1,N2)+N2){XG51};
B2:=BACKSET(ISLASTBAR && N1<N2,REF(LLVBARS(L,N2)+1,N1)+N1){XG51};
A3:=BACKSET(ISLASTBAR && N1>N2,REF(REF(LLVBARS(L,N2)+1,N1),N1)+REF(N1,N1)+N1){XG51};
B3:=BACKSET(ISLASTBAR && N1>N2,REF(LLVBARS(L,N2),N1)+N1+1){XG51};
A4:=BACKSET(ISLASTBAR && N1>N2,REF(REF(HHVBARS(H,N1)+1,N2),N1)+REF(N2,N1)+N1){XG51};
B4:=BACKSET(ISLASTBAR && N1>N2,REF(HHVBARS(H,N1)+1,N2)+N2){XG51};
力:(ATAN((EMA(C,4)/REF(EMA(C,47),1)-1)*100)*180/3.1415926),NODRAW,COLORRED{XG51};
命:(ATAN((EMA(C,47)/REF(EMA(C,47),1)-1)*100)*180/3.1415926),NODRAW,,COLOR0080FF{XG51};
DRAWTEXT(命>1.5,LOW,'☆'),COLOR0080FF{XG51};

JZCSYL:=FINANCE(33)/ FINANCE(34)*100{XG51};
ZCbs:=IF(JZCSYL>50,8,IF(50>JZCSYL>=14,2.2+(JZCSYL-14)*0.16, 2.2+(JZCSYL-14)* 0.15)){XG51};
LTP:=CAPITAL{XG51};
LTPBS:=IF(LTP<1000000,(1000000-LTP)/1000000,0){XG51};
股价估值: FINANCE(34)*(ZCBS+LTPBS)*4,COLORWHITE,NODRAW{XG51};

盈利:FINANCE(30)/100000000,NODRAW{XG51};
上市天数:FINANCE(42),COLORBLUE,NODRAW{XG51};
同比增加:FINANCE(43),COLORWHITE,NODRAW{XG51};
收盘价:CLOSE,NODRAW{XG51};
STICKLINE(C>=MA1 AND C>=MA2 AND DIFF>=DEA ,H ,L-0.01 ,0 ,0 ),COLORWHITE{XG51};
STICKLINE(C>=MA1 AND C>=MA2 AND DIFF>=DEA ,O ,C ,2,0 )COLORWHITE{XG51};
STICKLINE(C>=MA1 AND C>=MA2 AND DIFF>=DEA ,O ,C ,1.5 ,0 ),COLORWHITE{XG51};
STICKLINE(C>=MA1 AND C>=MA2 AND DIFF>=DEA ,O ,C ,1 ,0 ),COLORWHITE{XG51};
STICKLINE(C>=MA1 AND C>=MA2 AND DIFF>=DEA ,O ,C ,0 ,0 ),COLORWHITE{XG51};
STICKLINE(C<MA1 AND C>=MA2 AND DIFF<DEA ,H ,L-0.008 ,0 ,0 ),COLORCYAN{XG51};
STICKLINE(C<MA1 AND C>=MA2 AND DIFF<DEA ,O ,C ,2.0 ,0 ),COLORCYAN{XG51};
STICKLINE(C<MA1 AND C>=MA2 AND DIFF<DEA ,O ,C ,1.5 ,0 ),COLORCYAN{XG51};
STICKLINE(C<MA1 AND C>=MA2 AND DIFF<DEA ,O ,C ,1 ,0 ),COLORCYAN{XG51};
STICKLINE(C<MA1 AND C>=MA2 AND DIFF<DEA ,O ,C ,0 ,0 ),COLORCYAN{XG51};
STICKLINE(C<MA1 AND C>=MA2 AND DIFF>=DEA ,H ,L-0.008 ,0 ,0 ),COLORBLUE{XG51};
STICKLINE(C<MA1 AND C>=MA2 AND DIFF>=DEA ,O ,C ,2 ,0 ),COLORBLUE{XG51};
STICKLINE(C<MA1 AND C>=MA2 AND DIFF>=DEA ,O ,C ,1.5 ,0 ),COLORBLUE{XG51};
STICKLINE(C<MA1 AND C>=MA2 AND DIFF>=DEA ,O ,C ,1 ,0 ),COLORBLUE{XG51};
STICKLINE(C<MA1 AND C>=MA2 AND DIFF>=DEA ,O ,C ,0 ,0 ),COLORBLUE{XG51};
STICKLINE(C>=MA1 AND C>=MA2 AND DIFF<DEA ,H ,L-0.008 ,0 ,0 ),COLORWHITE{XG51};
STICKLINE(C>=MA1 AND C>=MA2 AND DIFF<DEA ,O ,C ,2 ,0 ),COLORWHITE{XG51};
STICKLINE(C>=MA1 AND C>=MA2 AND DIFF<DEA ,O ,C ,1.5 ,0 ),COLORWHITE{XG51};
STICKLINE(C>=MA1 AND C>=MA2 AND DIFF<DEA ,O ,C ,1 ,0 ),COLORWHITE{XG51};
STICKLINE(C>=MA1 AND C>=MA2 AND DIFF<DEA ,O ,C ,0 ,0 ),COLORWHITE{XG51};
STICKLINE(C<MA1 AND C<MA2 AND DIFF<DEA ,H ,L-0.008 ,0 ,0 ),COLORCYAN{XG51};
STICKLINE(C<MA1 AND C<MA2 AND DIFF<DEA ,O ,C ,2 ,0 ),COLORCYAN{XG51};
STICKLINE(C<MA1 AND C<MA2 AND DIFF<DEA ,O ,C ,1.5 ,0 ),COLORCYAN{XG51};
STICKLINE(C<MA1 AND C<MA2 AND DIFF<DEA ,O ,C ,2 ,0 ),COLORCYAN{XG51};
STICKLINE(C<MA1 AND C<MA2 AND DIFF<DEA ,O ,C ,1 ,0 ),COLORCYAN{XG51};
STICKLINE(C<MA1 AND C<MA2 AND DIFF<DEA ,O ,C ,0 ,0 ),COLORCYAN{XG51};
STICKLINE(C<MA1 AND C<MA2 AND DIFF>=DEA ,H ,L-0.008 ,0 ,0 ),COLORBLUE{XG51};
STICKLINE(C<MA1 AND C<MA2 AND DIFF>=DEA ,O ,C ,2 ,0 ),COLORBLUE{XG51};
STICKLINE(C<MA1 AND C<MA2 AND DIFF>=DEA ,O ,C ,1.5 ,0 ),COLORBLUE{XG51};
STICKLINE(C<MA1 AND C<MA2 AND DIFF>=DEA ,O ,C ,1 ,0 ),COLORBLUE{XG51};
STICKLINE(C<MA1 AND C<MA2 AND DIFF>=DEA ,O ,C ,0 ,0 ),COLORBLUE{XG51};
STICKLINE(C>=MA1 AND C<MA2 AND DIFF>=DEA ,H ,L-0.008 ,0 ,0 ),COLORWHITE{XG51};
STICKLINE(C>=MA1 AND C<MA2 AND DIFF>=DEA ,O ,C ,2 ,0 ),COLORWHITE{XG51};
STICKLINE(C>=MA1 AND C<MA2 AND DIFF>=DEA ,O ,C ,1.5 ,0 ),COLORWHITE{XG51};
STICKLINE(C>=MA1 AND C<MA2 AND DIFF>=DEA ,O ,C ,1 ,0 ),COLORWHITE{XG51};
STICKLINE(C>=MA1 AND C<MA2 AND DIFF>=DEA ,O ,C ,0 ,0 ),COLORWHITE{XG51};
STICKLINE(C>=MA1 AND C<MA2 AND DIFF<DEA ,H ,L-0.008 ,0 ,0 ),COLORLIMAGENTA{XG51};
STICKLINE(C>=MA1 AND C<MA2 AND DIFF<DEA ,O ,C ,2 ,0 ),COLORLIMAGENTA{XG51};
STICKLINE(C>=MA1 AND C<MA2 AND DIFF<DEA ,O ,C ,1.5 ,0 ),COLORLIMAGENTA{XG51};
STICKLINE(C>=MA1 AND C<MA2 AND DIFF<DEA ,O ,C ,1 ,0 ),COLORLIMAGENTA{XG51};
STICKLINE(C>=MA1 AND C<MA2 AND DIFF<DEA ,O ,C ,0 ,0 ),COLORLIMAGENTA{XG51};
volUME:=MA(VOL,1)/VOL{XG51};
MID:=100*(HIGH+LOW-REF(HIGH+LOW,1))/(HIGH+LOW){XG51};
emv:=MA(MID*VOLUME*(HIGH-LOW)/MA(HIGH-LOW,9),9){XG51};
EMVA:=MA(EMV,14){XG51};
BB:=EMV-EMVA{XG51};
bias :=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100{XG51};
BIASMA :=MA(BIAS,6){XG51};
CC:=BIAS-BIASMA{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{XG51};
DD:=(K+D+J)/3{XG51};
KK:=J-DD{XG51};
DIFF2:=EMA(CLOSE,12)-EMA(CLOSE,26){XG51};
DEA2:=EMA(DIFF2,9){XG51};
SS:=DIFF2-DEA2{XG51};
AA:=MA(BB+CC+KK+SS,1)*0.01{XG51};
DRAWTEXT(CROSS(AA,0),L*0.95,'B'),LINETHICK4,COLORRED,NODRAW{XG51};
DRAWTEXT(CROSS(0,AA),H*1.06,'S'),LINETHICK4,COLORCYAN,NODRAW{XG51};
NOTEXT4:EMA(C,4),COLORRED{XG51};
NOTEXT8:EMA(C,8),COLORBLUE{XG51};
NOTEXT20:EMA(C,12),COLOR8000FF,NODRAW{XG51};
NOTEXT47:EMA(C,47),COLOR0080FF,LINETHICK2{XG51};
DRAWICON(CROSS(NOTEXT4,NOTEXT8),LOW,34){XG51};
DRAWICON(CROSS(NOTEXT8,NOTEXT4),HIGH,35){XG51};
DRAWICON(CROSS(NOTEXT4,NOTEXT47),LOW,9){XG51};
LC:=REF(CLOSE,1){XG51};
rsi5:=((SMA(MAX((CLOSE - LC),0),5,1) / SMA(ABS((CLOSE - LC)),5,1)) * 100){XG51};
TR1:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10){XG51};
HA:=(HIGH - REF(HIGH,1)){XG51};
LA:=(REF(LOW,1) - LOW){XG51};
DMP:=SUM(IF(((HA > 0) AND (HA > LA)),HA,0),10){XG51};
DMM:=SUM(IF(((LA > 0) AND (LA > HA)),LA,0),10){XG51};
pdi:=((DMP * 100) / TR1){XG51};
mdi:=((DMM * 100) / TR1){XG51};
ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5){XG51};
AV:=(RSI5 + ADX){XG51};
DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5){XG51};
wr10:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10))){XG51};
NEWVOL:=(RSI5 - WR10){XG51};
买:=(AV + NEWVOL){XG51};
卖:=(AV - NEWVOL){XG51};
MA10:=MA(CLOSE,3){XG51};
MA20:=MA(CLOSE,5){XG51};
X:=BARSLAST(CROSS(MA10,MA20)){X*G_5*1*C*N*{};

通达信价格变异率主图未加密选股指标公式源码

源码正文：

价格变异率:SAR.SAR,CIRCLEDOT,COLOR9AFF9A,LINETHICK2{XG51};
IF(CLOSE>=价格变异率,价格变异率,DRAWNULL),CIRCLEDOT,COLORBLUE,LINETHICK2{XG51};
X_1:=REF(LOW,1){XG51};
X_2:=REF(HIGH,1){XG51};
X_3:=LOW>X_2{XG51};
X_4:=HIGH<X_1{XG51};
stICKLINE(LOW>REF(HIGH,1),LOW,REF(HIGH,1),3.1,(-1)),COLORWHITE{XG51};
STICKLINE(REF(LOW,1)>HIGH,REF(LOW,1),HIGH,3.1,(-1)),COLORCYAN{XG51};
STICKLINE(OPEN>=CLOSE,HIGH,LOW,0,0),COLOR909090{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,3.1,0),COLOR606060{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.1,0),COLOR707070{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.2,0),COLORBROWN{XG51};
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,0.2,0),COLOR909090{XG51};
STICKLINE(OPEN<=CLOSE,HIGH,LOW,0,0),COLOR666B6F{XG51};
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3.1,1),COLOR666B6F{XG51};
X_5:=vol/REF(VOL,1)>=1.9 AND CLOSE>REF(CLOSE,1){XG51};
STICKLINE(X_5,HIGH,LOW,0,0),COLORBLUE{XG51};
STICKLINE(X_5,OPEN,CLOSE,3.1,0),COLOR0033FF{XG51};
STICKLINE(X_5,OPEN,CLOSE,2.1,0),COLOR0077FF{XG51};
STICKLINE(X_5,OPEN,CLOSE,1.1,0),COLOR00BBFF{XG51};
STICKLINE(X_5,OPEN,CLOSE,0.1,0),COLORBLUE{XG51};
X_6:=CLOSE/REF(CLOSE,1)>1.097{XG51};
ZT数:COUNT(X_6,BARSSINCE(X_6)),NODRAW{XG51};
X_7:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100{XG51};
STICKLINE(X_7>9.5,CLOSE,OPEN,3.1,0),COLOR0000CC{XG51};
STICKLINE(X_7>9.5,CLOSE,OPEN,2.1,0),COLOR0000DD{XG51};
STICKLINE(X_7>9.5,CLOSE,OPEN,1.2,0),COLOR0000EE{XG51};
STICKLINE(X_7>9.5,CLOSE,OPEN,0.2,0),COLORWHITE{XG51};
STICKLINE(X_7>9.5,HIGH,LOW,0,0),COLORWHITE{XG51};
STICKLINE(X_7<(-9.9),OPEN,CLOSE,3.1,0),COLOR66CC66{XG51};
STICKLINE(X_7<(-9.9),OPEN,CLOSE,2.1,0),COLOR77DD77{XG51};
STICKLINE(X_7<(-9.9),OPEN,CLOSE,1.2,0),COLOR88EE88{XG51};
STICKLINE(X_7<(-9.9),OPEN,CLOSE,0.2,0),COLOR99FF99{XG51};
STICKLINE(X_7<(-9.5),HIGH,LOW,0,0),COLOR99FF99{XG51};
X_8:=AMO.AMOW/VOL/100{XG51};
X_9:=CLOSE<OPEN AND CLOSE>=REF(MIN(CLOSE,OPEN),1) AND X_8>REF(X_8,1){XG51};
X_10:=X_9{XG51};
STICKLINE(X_10,HIGH,LOW,0,0),COLORFFAA00{XG51};
STICKLINE(X_10,OPEN,CLOSE,3,0),COLORFF3300{XG51};
STICKLINE(X_10,OPEN,CLOSE,2,0),COLORFF7700{XG51};
STICKLINE(X_10,OPEN,CLOSE,1,0),COLORFFAA00{XG51};
STICKLINE(X_10,OPEN,CLOSE,0.1,0),COLORGREEN{XG51};
X_11:=REF(OPEN,BArslAST(X_9)){XG51};
假阴实顶:X_11,NODRAW,COLORFF7700{XG51};
STICKLINE(VOL,X_11,X_11,1,0),COLORFF7700{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.5,0.05,0,CODE),COLORBLUE{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.55,0.05,0,STKNAME),COLORBLUE{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.6,0.05,0,HYBLOCK),COLORGREEN{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.6,0,0,DYBLOCK),COLORGREEN{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.55,0.85,0,GNBLOCK),COLORmaGENTA{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.55,0.9,0,FGBLOCK),COLORLIMAGENTA{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.55,0.95,0,ZSBLOCK){XG51};
X_12:=(3*CLOSE+LOW+OPEN+HIGH)/6{XG51};
X_13:=(20*X_12+19*REF(X_12,1)+18*REF(X_12,2)+17*REF(X_12,3)+16*REF(X_12,4)+15*REF(X_12,5)+14*REF(X_12,6)+13*REF(X_12,7)+12*REF(X_12,8)+11*REF(X_12,9)+10*REF(X_12,10)+9*REF(X_12,11)+8*REF(X_12,12)+7*REF(X_12,13)+6*REF(X_12,14)+5*REF(X_12,15)+4*REF(X_12,16)+3*REF(X_12,17)+2*REF(X_12,18)+REF(X_12,20))/210{XG51};
回调认同:ema(X_13,13),COLORCYAN{XG51};
X_14:=macd.MacD#WEEK(12,26,9){XG51};
X_15:=(EMA(回调认同,2)-REF(EMA(回调认同,2),2))/REF(EMA(回调认同,2),2)*100{XG51};
IF(X_15>=0,回调认同,DRAWNULL),COLORBLUE,LINETHICK2{XG51};
IF(MACD.dif>=0 AND X_14>=0,回调认同,DRAWNULL),COLORWHITE,LINETHICK3{XG51};
X_16:=MA(CLOSE,2){XG51};
X_17:=IF(CLOSE>X_16,VOL,0){XG51};
X_18:=IF(CLOSE<X_16,VOL,0){XG51};
X_19:=SUM(X_17,4){XG51};
X_20:=SUM(X_18,4){XG51};
X_21:=X_20/X_19{XG51};
X_22:=IF(HHV(X_21,5)>4 AND crOSS(2,X_21) AND CLOSE>=OPEN,1,0){XG51};
DRAWICON(X_22,LOW*0.99,9){X.G.5.1.C.N.{};