通达信实用看盘主图未加密选股指标公式源码

通达信实用看盘主图未加密选股指标公式源码

源码正文：

MID:=(3*CLOSE+LOW+OPEN+HIGH)/6{XG51};
B1:(20*MID+19*REF(MID,1)+18*REF(MID,2)
+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)
+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)
+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)
+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)
+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)
+2*REF(MID,18)+REF(MID,20))/210,COLORWHITE,LINETHICK2{XG51};
B2:=ema(FORCAst(Ema(MID,8),8),9){XG51};
B3:=EMA(FORCAST(EMA(MID,7),7),8){XG51};
B4:=EMA(FORCAST(EMA(MID,6),6),7){XG51};
B5:=EMA(FORCAST(EMA(MID,5),5),6){XG51};
B6:=EMA(FORCAST(EMA(MID,4),4),5){XG51};
B7:=EMA(FORCAST(EMA(MID,3),3),4){XG51};
B8:=EMA(FORCAST(EMA(MID,2),2),3){XG51};
MA5:EMA(FORCAST(MA(MID,4),4),2)COLORBLUE,LINETHICK2{XG51};
IF(C,REF(B2,8),DRAWNULL),COLORF0F000{XG51};
IF(C,REF(B3,7),DRAWNULL),COLORF0F000{XG51};
IF(C,REF(B4,6),DRAWNULL),COLORF0F000{XG51};
IF(C,REF(B5,5),DRAWNULL),COLORF0F000{XG51};
IF(C,REF(B6,4),DRAWNULL),COLORF0F000{XG51};
IF(C,REF(B7,3),DRAWNULL),COLORF0F000{XG51};
IF(C,REF(B8,2),DRAWNULL),COLORF0F000{XG51};
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1)) AND C=H,1,0){XG51};
STICKLINE(涨停,O,C,2.5,0),COLORFF00FF{XG51};
STICKLINE(涨停,H,L,0,1),COLORFF00FF{XG51};
跌停:=IF((REF(C,1)-C)*100/REF(C,1)>=(10-0.01*100/REF(C,1)) AND C=L,1,0){XG51};
STICKLINE(跌停,O,C,2.5,0),COLOR00FF00{XG51};
STICKLINE(跌停,H,L,0,1),COLOR00FF00{X_G+5!1_C_N_{};

通达信富力提示对比未加密选股指标公式源码

源码正文：

difF:=Wma(CLOSE,12)-WMA(CLOSE,26){XG51};
DEA:=WMA(DIFF,9){XG51};
macd:2*(DIFF-DEA),LINETHICK0{XG51};
Q:=2.5{XG51};
SZ:=MacD>REF(MACD,1){XG51};
stICKLINE(SZ,0,MACD*1*Q,1.0.05,0),COLOR8F8F5F{XG51};
XD:=MACD<REF(MACD,1){XG51};
STICKLINE(XD,0,MACD*1*Q,1.0.05,1),COLORFF2400{XG51};
M:=7{XG51};
N:=11{XG51};
VAR1:=ema(SLOPE(C,21)+C,34){XG51};
VAR5:=EMA(C,2){XG51};
VAR9:=VAR5-VAR1{XG51};
ZJC:=VAR9{XG51};
ZJH:=IF(C>O,(H-C)/(C-L)*(C-L)+ZJC,(H-C)/(O-L)*(O-L)+ZJC){XG51};
ZJO:=IF(C>O,ZJH-(H-O)/(C-L)*(C-L),ZJH-(H-O)/(O-L)*(O-L)){XG51};
ZJL:=IF(C>O,ZJH-(H-L)/(H-O)*(H-O),ZJH-(H-L)/(H-C)*(H-C)){XG51};
STICKLINE(C> O,ZJH,ZJL,0.01,0),COLORFF66FF;
STICKLINE(C> O,ZJC,ZJO,2.1,0),COLORAA00AA{XG51};
STICKLINE(C> O,ZJC,ZJO,1.9,0),COLORCC11CC{XG51};
STICKLINE(C> O,ZJC,ZJO,1.6,0),COLORFF22FF{XG51};
STICKLINE(C> O,ZJC,ZJO,1.2,0),COLORFF44FF{XG51};
STICKLINE(C> O,ZJC,ZJO,0.7,0),COLORFF66FF{XG51};
STICKLINE(C> O,ZJC,ZJO,0.2,0),COLORFF99FF{XG51};
STICKLINE(C<=O OR C<REF(C,1),ZJH,ZJL,0.01,0),COLORCYAN{XG51};
STICKLINE(C<=O OR C<REF(C,1),ZJO,ZJC,2.1,0),COLOR005500{XG51};
STICKLINE(C<=O OR C<REF(C,1),ZJO,ZJC,1.9,0),COLOR007700{XG51};
STICKLINE(C<=O OR C<REF(C,1),ZJO,ZJC,1.6,0),COLOR009900{XG51};
STICKLINE(C<=O OR C<REF(C,1),ZJO,ZJC,1.2,0),COLOR00BB00{XG51};
STICKLINE(C<=O OR C<REF(C,1),ZJO,ZJC,0.7,0),COLOR00DD00{XG51};
STICKLINE(C<=O OR C<REF(C,1),ZJO,ZJC,0.2,0),COLOR44FF00{XG51};
ZTB:=(C-REF(C,1))/REF(C,1)*100>9.91&&(C-REF(C,1))/REF(C,1)*100<10.6{XG51};
STICKLINE(C=H,ZJH,ZJL,0.0,0),COLORBLUE{XG51};
STICKLINE(ZTB,ZJC,ZJO,2.1,0),COLOR006666{XG51};
STICKLINE(ZTB,ZJC,ZJO,1.9,0),COLOR008888{XG51};
STICKLINE(ZTB,ZJC,ZJO,1.6,0),COLOR00AAAA{XG51};
STICKLINE(ZTB,ZJC,ZJO,1.2,0),COLOR00CCCC{XG51};
STICKLINE(ZTB,ZJC,ZJO,0.7,0),COLOR00EEEE{XG51};
STICKLINE(ZTB,ZJC,ZJO,0.2,0),COLOR33FFFF{XG51};
DTB:=(C-REF(C,1))/REF(C,1)*100<-9.9&&(C-REF(C,1))/REF(C,1)*100>-10.6{XG51};
STICKLINE(DTB,ZJO,ZJC,2.1,0),COLORFF0000{XG51};
STICKLINE(DTB,ZJO,ZJC,1.9,0),COLORFF2200{XG51};
STICKLINE(DTB,ZJO,ZJC,1.6,0),COLORFF4400{XG51};
STICKLINE(DTB,ZJO,ZJC,1.2,0),COLORFF6600{XG51};
STICKLINE(DTB,ZJO,ZJC,0.7,0),COLORFF8800{XG51};
STICKLINE(DTB,ZJO,ZJC,0.2,0),COLORFFAA00{XG51};
DRAWTEXT_FIX(1,0,0.07,0,'A:0轴以上，与主图相比，阴k线若高收，后市下跌。'),COLORFFFFFF{XG51};
DRAWTEXT_FIX(1,0,0.13,0,'B:0轴以上，与主图相比，阳K线若下挫，后市下跌。'),COLORFFFFFF{XG51};
DRAWTEXT_FIX(1,0,0.19,0,'C:0轴以上，股价创新高但MACD柱状线缩短，后市下调或下跌。'),COLORFFFFFF{XG51};
DRAWTEXT_FIX(1,0,0.25,0,'D:0轴以下，与主图相比，阴K线若上移，后市上涨。'),COLORFFFFFF{XG51};
DRAWTEXT_FIX(1,0,0.31,0,'E:0轴以下，与主图相比，阳K线若下移，后市上涨。'),COLORFFFFFF{XG51};
DRAWTEXT_FIX(1,0,0.37,0,'F:0轴以下，股价创新低但MACD柱状线缩短或翻红，后市上涨。'),COLORFFFFFF{XG51};
套牢盘％:=100*(1-WINNER(C)){XG51};
获利盘％:=100*WINNER(C){XG51};
集中度90％:=(COST(95)-COST(5))/(COST(100))*100{XG51};
集中度70％:=(COST(85)-COST(15))/(COST(100))*100{XG51};
平均成本:=COST(50){XG51};
主力成本:=COST(4){XG51};
短期压力:=HHV(H,20){XG51};
短期支撑:=LLV(L,20){XG51};
PQ:=REF(HIGH,1)-REF(LOW,1){XG51};
中价:=(H+L+C)/3{XG51};
近高:=2*中价-LOW{XG51};
近低:=2*中价-HIGH{XG51};
最高:=中价+PQ{XG51};
最低:=中价-PQ{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.8,0.05,0, '【富力动态读盘提示】'),COLORFFFFFF{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.8,0.1,0,'套牢盘％----'),COLORLICYAN{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.9,0.1,0,套牢盘％),COLOR9F9F5F{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.8,0.15,0,'获利盘％----'),COLORLICYAN{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.9,0.15,0,获利盘％),COLOR9F9F5F{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.8,0.2,0,'集中度90％--'),COLORWHITE{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.9,0.2,0,集中度90％),COLOR9F9F5F{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.8,0.25,0,'集中度70％--'),COLORWHITE{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.9,0.25,0,集中度70％),COLOR9F9F5F{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.8,0.3,0,'平均成本----'),COLORLICYAN{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.9,0.3,0,平均成本),COLOR9F9F5F{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.8,0.35,0,'主力成本----'),COLORLICYAN{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.9,0.35,0,主力成本),COLOR9F9F5F{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.8,0.4,0,'短期压力----'),COLORLICYAN{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.9,0.4,0,短期压力),COLOR9F9F5F{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.8,0.45,0,'短期支撑----'),COLORLICYAN{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.9,0.45,0,短期支撑),COLOR9F9F5F{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.8,0.5,0,'中价--------'),COLORLICYAN{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.9,0.5,0,中价),COLOR9F9F5F{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.8,0.55,0,'近高--------'),COLORLICYAN{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.9,0.55,0,近高),COLOR9F9F5F{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.8,0.6,0,'近低--------'),COLORLICYAN{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.9,0.6,0,近低),COLOR9F9F5F{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.8,0.65,0,'最高--------'),COLORLICYAN{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.9,0.65,0,最高),COLOR9F9F5F{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.8,0.7,0,'最低--------'),COLORLICYAN{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.9,0.7,0,最低),COLOR9F9F5F{X.G.5_1.C.N.{};