通达信 防套之【强势区间】(源码 副图 贴图 有未来数据)
2018-04-14原创 编 辑:翔博软件
公式源码:
M:=1;
VAR1:=FINANCE(30)>=REF(FINANCE(30),130);
VAR2:=VAR1;
VAR3:=IF(NAMELIKE(5),0,1);
VAR4:=IF(NAMELIKE(6),0,1);
VAR5:=DYNAINFO(17)>0;
VAR6:=9500;
VAR7:=EXIST((CLOSE/REF(CLOSE,1)-1)*100>5.6,60);
VAR8:=DYNAINFO(4)>0;
VAR9:=DYNAINFO(7)<150;
VAR10:=CAPITAL/5500000<10;
VAR11:=VAR7 AND VAR8 AND VAR9 AND VAR10 AND CLOSE<150 AND FINANCE(42)<VAR6 AND VAR3 AND VAR4;
VAR12:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
VAR13:=DYNAINFO(5)<0.01 OR DYNAINFO(6)<0.01;
VAR14:=IF(VAR13,1,VAR12<DYNAINFO(5)+0.01 AND VAR12>DYNAINFO(6)-0.01);
VAR15:=IF(VAR14,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120));
VAR16:=EVERY(VAR15>REF(VAR15,1),1);
VAR17:=IF(VAR16,VAR15,DRAWNULL);
VAR18:=STICKLINE(VAR17 AND EVERY(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,
-VOL)/100),0),30)>REF(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),
0),30),1),1) AND IF(MA(WINNER(CLOSE*0.9)*100*CLOSE,3)>10,MA(WINNER(CLOSE*0.9)*100*CLOSE,3),
0)/2/8>0 AND VAR11,REFDATE(HHV(HIGH,(-5)),DATE),REFDATE(LLV(LOW,(-5)),DATE),4,0);
VAR19:=STICKLINE(EVERY(EMA(SLOPE(CLOSE,15)*20+CLOSE,30)>REF(EMA(SLOPE(CLOSE,15)*20+CLOSE,30)
,1),1) AND EVERY(MA(10000*CLOSE/INDEXC,10)>REF(MA(10000*CLOSE/INDEXC,10),1),1)
AND EVERY(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),
30)>REF(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30),1),1)
AND VAR11,REFDATE(HHV(HIGH,(-5)),DATE),REFDATE(LLV(LOW,(-5)),DATE),6,0);
VAR20:=STICKLINE(EVERY(XMA(XMA(LOW,25),25)-(XMA(XMA(HIGH,25),25)-XMA(XMA(LOW,25),
25))*1>REF(XMA(XMA(LOW,25),25)-(XMA(XMA(HIGH,25),25)-XMA(XMA(LOW,25),25))*1,1),1)
AND COST(EMA(SLOPE(CLOSE,15)*20+CLOSE,30))>=REF(COST(EMA(SLOPE(CLOSE,15)*20+CLOSE,30)),1)
AND COST(20)>=REF(COST(20),1) AND EVERY(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),
VOL,-VOL)/100),0),30)>REF(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),
0),30),1),1) AND VOL/MA(VOL,55)*100>50 AND EVERY(EMA(EMA(CLOSE,12)-EMA(CLOSE,26),
9)>REF(EMA(EMA(CLOSE,12)-EMA(CLOSE,26),9),1),1) AND VAR11,REFDATE(HHV(HIGH,(-5)),DATE),
REFDATE(LLV(LOW,(-5)),DATE),4,0);
强势区:=STICKLINE(VAR11 AND EVERY(EMA(SLOPE(CLOSE,15)*20+CLOSE,30)>REF(EMA(SLOPE(CLOSE,15)*20+CLOSE,30),
1),1) AND EVERY(MA(10000*CLOSE/INDEXC,10)>REF(MA(10000*CLOSE/INDEXC,10),1),1)
AND EVERY(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),
30)>REF(EMA(SUM(IF(CLOSE=REF(CLOSE,1),0,IF(CLOSE>REF(CLOSE,1),VOL,-VOL)/100),0),30),1),1)
AND IF(MA(WINNER(CLOSE*0.9)*100*CLOSE,3)>10,MA(WINNER(CLOSE*0.9)*100*CLOSE,3),0)/2/8>0
AND VAR18 AND VAR19 AND VAR20 AND VAR11,REFDATE(HHV(HIGH,(-5)),DATE),REFDATE(LLV(LOW,(-5)),
DATE),4,0),COLOR001050;
STICKLINE(REF(NOT(强势区),1),0,10000,4,-1),COLORGREEN;
STICKLINE(强势区,0,10000,4,0),COLORRED;
每股总价值:IF(FINANCE(3),FINANCE(18)+FINANCE(32)+FINANCE(33)+FINANCE(34)+(FINANCE(13)+FINANCE(22)
+FINANCE(25))/FINANCE(1),DRAWNULL),COLORGREEN,NODRAW;
静值:IF(FINANCE(3),FINANCE(18)+FINANCE(32)+FINANCE(33)+FINANCE(34){+FINANCE(38)},DRAWNULL),COLORYELLOW,NODRAW;
应收款:IF(FINANCE(3),FINANCE(22)/FINANCE(1),DRAWNULL),COLORWHITE,NODRAW;
现金流:IF(FINANCE(3),FINANCE(25)/FINANCE(1),DRAWNULL),COLORMAGENTA,NODRAW;
无形资:IF(FINANCE(3),FINANCE(13)/FINANCE(1),DRAWNULL),COLORWHITE,NODRAW;DRAWTEXT_FIX(C>O,0.01,0.9,0,'微信订阅号:翔博软件工作室'),COLORyellow;
【提供服务】
一、新编通达信主图、附图、选股公式
二、主图,附图改选股 预警公式
三、破解通达信指标
特别提示:
选股预警指标编写 ,不同主流行情软件间指标转换。 请联系微信:396950280
一个聚百万原创指标公式圈子