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

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

源码正文：

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.{};

通达信涨停十字星未加密选股指标公式源码

源码正文：

V2G:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100){XG51};
V3G:=(ma(vol,2) / MA(VOL,10)){XG51};
V4G:=(VOL / CAPITAL){XG51};
A1G:=((((0.0068 * V2G) - (0.0072 * V3G)) - (0.5676 * V4G)) - 0.0105){XG51};
A2G:=((((0.0015 * V2G) - (0.0124 * V3G)) + (1.7461 * V4G)) - 0.0074){XG51};
GGHX:=((((0 - (12.2401 * A1G)) - (1 * A2G)) + 0.321) < 0){XG51};
AA1:=MA(HHV(H,485),17);
AA2:=MA(HHV(H,222),17);
AA3:=MA(HHV(H,96),17);
AA4:=MA(LLV(L,485),17);
AA5:=MA(LLV(L,222),17);
AA6:=MA(LLV(L,96),17);
AA7:=MA((AA4*0.96+AA5*96+AA6*0.96+AA1*0.558+AA2*0.558+AA3*0.558)/6,17);
AA8:=MA((AA4*1.25+AA5*1.23+AA6*1.2+AA1*0.55+AA2*0.55+AA3*0.65)/6,17);
AA9:=MA((AA4*1.3+AA5*3+AA6*1.3+AA1*0.68+AA2*0.68+AA3*0.68)/6,17);
AAA:=MA((AA7*3+AA8*2+AA9)/6*1.738,17){XG51};
AAB:=IF(DATE<=1341231,AAA,AAA*DAY);
Aac:=L;
AAD:=REF(L,1);
AAE:=SMA(Abs(AAC-AAD),3,1)/SMA(MAX(AAC-AAD,0),3,1)*100;
AAF:=MA(IF(C*1.35<=AAB,AAE*10,AAE/10),3);
AA10:=LLV(L,30);
AA11:=HHV(AAF,30);
AA12:=1341231;
CM:=IF(DATE<=AA12,MA(IF(L<=AA10,(AAF+AA11*2)/2,0),3),100000000){XG51};
AA13:=4*SMA((C-LLV(L,10))/(HHV(H,10)-LLV(L,10))*100,5,1)
-3*SMA(SMA((C-LLV(L,10))/(HHV(H,10)-LLV(L,10))*100,5,1),3.2,1);
BBGX:=CM AND crOSS(AA13,8){XG51};
FGXG:=REF(C,2)/REF(C,1)>1.09 AND C/REF(C,1)>1.09 AND H=C AND V>REF(V,1){XG51};
XG:BBGX AND GGHX AND FGXG{X?G-5=1?C?N?{};