当前位置: 网站首页 > 股票软件公式 > 通达信公式 > 文章 当前位置: 通达信公式 > 文章

通达信源码精选:非妖不买和涨停妖,鳄鱼线新,超级OBV

点击: 次    来源:顶尖财经    作者:股市狙击 - 小 + 大

1、非妖不买和涨停妖,非妖不干,不妖不参与

经过不停在测试妖股,组合两个公式来捉妖的,选股+主图。
选股出的信号主图上显示黄色K线;
 
选股方法:可以直接开条件预警,盘中信号出来看得更直观,跑不掉;
 
既然捉妖铁的纪律是“非妖不干”,不妖不参与,选出来的股票一般多一条命,失败信号也有;
选出来的票也不多,今天就10来只吧,有的是一次性信号,有的是持续性信号,主图副图看的很清楚;
如果抓住了大妖股多恭喜你;
没抓住次日逢高卖一般小赚而已;
 
软件有个历史涨跌停我找前几天涨停票,仔细测试过了,大家也可以去各种妖股牛股上测试;
失败信号:即便不是妖股,次日只要逢高卖亏损几率不大的;
看图说话,今天的,曾经的,去年的都测试过了。
 
 
{非妖不买}
MA5:MA(C,5);
MA10:MA(C,10);
MA20:MA(C,20);
MA30:MA(C,30);
MA60:MA(C,60);
MA120:=MA(C,120);
MA200:=MA(C,200);
MA300:=MA(C,300);
VAR1:=MA5>MA300;
VAR2:=MA200>MA300;
VAR3:=MA120>MA200;
VAR4:=MA60>MA120;
VAR5:=MA30>MA60;
VAR6:=MA20>MA30;
VAR7:=MA10>MA20;
VAR8:=MA5>MA10;
VAT1:=MA10>REF(MA10,1);
VAT2:=MA20>REF(MA20,1);
VAT3:=MA30>REF(MA30,1);
VAT4:=MA60>REF(MA60,1);
VAT5:=MA120>REF(MA120,1);
VAT6:=MA200>REF(MA200,1);
VAT7:=MA300>REF(MA300,1);
VARB:=CLOSE-LLV(L,9);
VARBB:=HHV(H,9)-LLV(L,9);
VARBBB:=((CLOSE-LLV(L,9)+0.00001))/(HHV(H,9)-LLV(L,9))*100;
ZT:=C=ZTPRICE(REF(C,1),0.1) AND C=H;
ZT1:=C=ZTPRICE(REF(C,1),0.2) AND C=H;
VATA:=EMA(EMA(VARBBB,5),5); 
VATB:=VAR1+VAR2+VAR3+VAR4+VAR5+VAR6+VAR7+VAR8+VAT1+VAT2+VAT3+VAT4+VAT5+VAT6+VAT7,NODRAW;
AA:=VATA<80 AND VATB>=11 AND ZT AND LLV(L,20)<L;
STICKLINE(AA,O,C,-1,0),COLORYELLOW;
STICKLINE(AA,H,L,0,0),COLORYELLOW;
DRAWTEXT_FIX(1,0.00,0.00,0,'买卖纪律,次日涨停持有;次日不奔涨停的非妖,不管小赚大赚都要卖掉;不妖绝不持有,连续信号的可加仓')COLORYELLOW;

 {涨停妖}

MA5:=MA(C,5);
MA10:=MA(C,10);
MA20:=MA(C,20);
MA30:=MA(C,30);
MA60:=MA(C,60);
MA120:=MA(C,120);
MA200:=MA(C,200);
MA300:=MA(C,300);
VAR1:=MA5>MA300;
VAR2:=MA200>MA300;
VAR3:=MA120>MA200;
VAR4:=MA60>MA120;
VAR5:=MA30>MA60;
VAR6:=MA20>MA30;
VAR7:=MA10>MA20;
VAR8:=MA5>MA10;
VAT1:=MA10>REF(MA10,1);
VAT2:=MA20>REF(MA20,1);
VAT3:=MA30>REF(MA30,1);
VAT4:=MA60>REF(MA60,1);
VAT5:=MA120>REF(MA120,1);
VAT6:=MA200>REF(MA200,1);
VAT7:=MA300>REF(MA300,1);
VARB:=CLOSE-LLV(L,9);
VARBB:=HHV(H,9)-LLV(L,9);
VARBBB:=((CLOSE-LLV(L,9)+0.00001))/(HHV(H,9)-LLV(L,9))*100;
ZT:=C=ZTPRICE(REF(C,1),0.1) AND C=H;
ZT1:=C=ZTPRICE(REF(C,1),0.2) AND C=H;
VATA:=EMA(EMA(VARBBB,5),5); 
VATB:=VAR1+VAR2+VAR3+VAR4+VAR5+VAR6+VAR7+VAR8+VAT1+VAT2+VAT3+VAT4+VAT5+VAT6+VAT7;
AA:VATA<80 AND VATB>=11 AND ZT AND LLV(L,20)<L,COLORYELLOW;
{股 民 学 院 : http://www.58188.net 整理}



2、鳄鱼线新

 {鳄鱼线新}

Y:=(H+L)/2;
AA:=REF((SMA(Y,5,1)),3);
BB:=REF((SMA(Y,8,1)),5);
CC:=REF((SMA(Y,13,1)),8);
 
鳄:CC,COLORFF6600;
齿:BB,COLORRED;
唇:AA,COLORGREEN;
 
R2:=REF(齿,5);
KU1:=IF(HIGH=HHV(HIGH,3),1,0);
KD1:=IF(LOW=LLV(LOW,3),1,0);
UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0)));
DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0)));
上分形:IF(HIGH>=R2,UL,REF(UL,BARSLAST(HIGH>R2))),POINTDOT,LINETHICK3,,COLORMAGENTA;
下分形:IF(LOW<=R2,DL,REF(DL,BARSLAST(LOW<=R2))),POINTDOT,LINETHICK3,COLORYELLOW;
 
DRAWICON(CLOSE>上分形 AND REF(CLOSE,1)<REF(上分形,1),HIGH*1.03,1);
DRAWICON(CLOSE<下分形 AND REF(CLOSE,1)>REF(下分形,1),LOW*0.99,2);
 
AO:=MA(Y,5)-MA(Y,34);
MAO:=MA(AO,5);
AC:=AO-MAO;
AC1:=REF(AC,1);
AO1:=REF(AO,1);
KAC:=IF(AC>AC1 AND AO>AO1,1,0);
KAO:=IF(AC<AC1 AND AO<AO1,-1,0);
 
STICKLINE(KAC=1 AND CLOSE>=OPEN,OPEN,CLOSE,3,1),COLORRED;
STICKLINE(KAO=-1 AND CLOSE>=OPEN,OPEN,CLOSE,3,1),COLORGREEN;
STICKLINE(KAO=0 AND KAC=0 AND CLOSE>=OPEN,OPEN,CLOSE,3,1),COLORDDDDDD;
STICKLINE(CLOSE>=OPEN,HIGH,CLOSE,0.0.1,0),COLORRED;
STICKLINE(CLOSE>=OPEN,OPEN,LOW,0.0.1,0),COLORRED;
STICKLINE(KAC=1 AND CLOSE<OPEN,OPEN,CLOSE,3,0),COLORRED;
STICKLINE(KAO=-1 AND CLOSE<OPEN,OPEN,CLOSE,3,0),COLORGREEN;
STICKLINE(KAO=0 AND KAC=0 AND CLOSE<OPEN,OPEN,CLOSE,3,0),COLORDDDDDD;
{股 民 学 院 : http://www.58188.net 整理}



3、超级OBV

{超级OBV}

MOBV:=OBV-MA(OBV,30);
W1:STICKLINE(MOBV>0,MOBV,0,3,1),COLORRED;
W2:STICKLINE(MOBV<0,MOBV,0,3,1),COLORCYAN;
VA1:=HHVBARS(MOBV,BARSLAST(MOBV<0)+1);
VA2:=CROSS(BACKSET(CROSS(0,MOBV),REF(VA1,1)+2),0.5);
QG:=CROSS(BACKSET(CROSS(0,MOBV) OR (ISLASTBAR AND MOBV>0),REF(VA1,1)+2),0.5);
前高:DRAWLINE(VA2,MOBV,REF(VA2,1),REF(MOBV,1),1),COLORMAGENTA;
VA3:=LLVBARS(MOBV,BARSLAST(MOBV>0)+1);
VA4:=CROSS(BACKSET(CROSS(MOBV,0),REF(VA3,1)+2),0.5);
BD:=BARSLAST(FILTERX(CROSS(0,MOBV),BARSCOUNT(CLOSE)));
前低:DRAWLINE(VA4,MOBV,REF(VA4,1),REF(MOBV,1),1);
BDTJ:=IF(MOBV<0,FILTERX(MOBV=LLV(MOBV,BARSLAST(MOBV>0)),BARSCOUNT(CLOSE)),DRAWNULL);
TSBDTJ:=BARSLAST(BDTJ);
BDZH:=FILTERX(MOBV<CONST(LLV(MOBV,BD+1)),BARSCOUNT(CLOSE));
BDTS:=BARSLAST(BDZH);
本低:IF(BD+1>=1,CONST(LLV(MOBV,BD+1)),DRAWNULL);
BDCL:=CROSS(COUNT(CROSS(MOBV>本低/2 AND MOBV<0,0.5),TSBDTJ)=1,0.5) AND TSBDTJ>=0;
终点:=IF(ISLASTBAR AND MOBV>0 AND MOBV=HHV(MOBV,BARSLAST(MOBV<0)),1,IF(FILTERX(QG,BARSCOUNT(CLOSE)),2,DRAWNULL));
UU:=终点=1 OR 终点=2 AND MOBV>0;
ZZ:=FILTERX(UU,BARSCOUNT(CLOSE));
本高:DRAWLINE(ZZ,MOBV,REF(ZZ,1),REF(MOBV,1),1),COLORWHITE;
横线:=CONST(REF(MOBV,BARSLAST(ZZ)));
WW:=MOBV>横线;
起始点:=FILTERX(REFX(BARSLAST(WW),1)=1,BARSCOUNT(CLOSE));
天数:=BARSLAST(起始点);
上横线:=DRAWLINE(起始点,横线,ZZ,横线,0);
下横线:=DRAWLINE(BDZH,CONST(LLV(MOBV,BD+1)),BDTJ=1,MOBV,0);
TDXSTEP1219:DRAWNUMBER(BDTJ,CONST(LLV(MOBV,BD+1))*0.9,BDTS);
TDXSTEP1220:DRAWNUMBER(ZZ,上横线*1.1,天数);
TJ:=IF(起始点,BARSNEXT(ZZ),DRAWNULL);
红柱数量:=IF(天数>0 AND 天数<=REF(TJ,天数),SUM(MOBV>0,天数),DRAWNULL);
横线起始价:=REF(CLOSE,天数);
空间评估:=(横线起始价-CLOSE)/CLOSE*100;
TT:=BARSLAST(ZZ);
WQG:=CROSS(COUNT(CROSS(MOBV<本高/2 AND MOBV>0,0.5),ZZ)=1,0.5) AND ZZ>=0;
TDXSTEP1221:STICKLINE(MOBV>前高 AND 本高>前高 AND BARSLAST(CROSS(MOBV<本高/2,0.5))>0 AND MOBV>(前高+本高)/2,MOBV,前高,1,0),COLORYELLOW;
前高本高二分位:IF(MOBV>0 AND 本高!=前高,DRAWLINE(WQG,(前高+本高)/2,REF(WQG,1),REF((前高+本高)/2,1),1),DRAWNULL),DOTLINE,COLORLIBLUE;
AA:=STRCAT(STRCAT(STRCAT(53,54),55),CON2STR(IF(空间评估,空间评估,DRAWNULL),2));
TDXSTEP1222:STICKLINE(MOBV>前高,MOBV,前高,1,0),COLORYELLOW;
TDXSTEP1223:STICKLINE(WQG,MOBV,0,1,0),COLORGREEN;
TDXSTEP1224:STICKLINE(MOBV<0 AND MOBV<前低 AND 前低<0,MOBV,前低,1,0),COLORBLUE;
B1:=IF(CROSS(MOBV<0,0.5),BARSNEXT(BDTJ),DRAWNULL);
TSB1:=BARSLAST(MOBV>0)-1;
TDXSTEP1225:STICKLINE(BARSLAST(BDCL)>=0 AND MOBV<前低 AND MOBV<0,MOBV,前低,1,0),COLORGREEN;
TDXSTEP1226:STICKLINE(BDCL,MOBV,0,1,0),COLORWHITE;
TDXSTEP1227:STICKLINE(MOBV>前高 AND 本高>前高 AND BARSLAST(WQG)>0,MOBV,前高,1,0),COLORRED;
TDXSTEP1228:DRAWTEXT(VA2 AND VA2!=UU,MOBV/10*9,56);
TDXSTEP1229:DRAWTEXT(VA2 AND VA2!=UU,MOBV/10,57);
TDXSTEP1230:DRAWTEXT(ZZ,MOBV/10*7,58),COLORBLUE;
TDXSTEP1231:DRAWTEXT(ZZ,MOBV/10,57),COLORBLUE;
TDXSTEP1232:DRAWTEXT(BDTJ,MOBV/10*9,59),COLORRED;
TDXSTEP1233:DRAWTEXT(BDTJ,MOBV/10,58),COLORRED;
TDXSTEP1234:IF(BARSLAST(BDCL)>=0,本低/2,DRAWNULL),DOTLINE,COLORRED;
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J1:=DIFF;
J2:=DEA;
J3:=K;
J4:=D;
VL:=REF(LOW,1);
VH:=REF(HIGH,1);
VAR1:=SMA(ABS(HIGH-VH),13,1)/SMA(MAX(HIGH-VH,0),13,1)*100;
VAR2:=SMA(ABS(LOW-VL),13,1)/SMA(MAX(LOW-VL,0),13,1)*100;
VAR3:=REF(CLOSE,1);
VAR4:=MA(VAR2,13);
VAR5:=LLV(LOW,34);
VAR6:=SMA(MAX(CLOSE-VAR3,0),6,1)/SMA(ABS(CLOSE-VAR3),6,1)*100;
VAR7:=CROSS(93,VAR6);
VAR8:=EMA(IF(LOW<=VAR5,VAR4,0),3);
VAR9:=HIGH>LLV(LOW,0)*7;
VAR10:=SMA(SMA((CLOSE-LLV(LOW,54))/(HHV(HIGH,54)-LLV(LOW,54))*100,7,1),5,1);
VAR11:=SMA((CLOSE-LLV(LOW,54))/(HHV(HIGH,54)-LLV(LOW,54))*100,7,1)*16.18-VAR10*10.9;
T:=FILTER(IF(VAR11<=VAR10 AND VAR8>REF(VAR8,1),VAR8*8,0),20);
洗盘结束:IF(VAR11<=VAR10 AND VAR8>REF(VAR8,1),100000,0),COLORMAGENTA,LINETHICK2;
T0:FILTER(IF(CROSS(J4,J3) AND SUM(J1>REF(J1,1),3)>3,CROSS(J4,J3) AND CROSS(J2,J1),0),13),STICK,COLOR5E8262,LINETHICK3;
T1:FILTER(CROSS(J1,J2) AND VOL>REF(SUM(VOL,5),1),3),STICK,COLORYELLOW,LINETHICK3;
T2:FILTER(VAR7 AND CLOSE/(REF(CLOSE,1)-1)*100!=5 AND VAR9 AND VOL>REF(SUM(VOL,3),1),5),STICK,COLORCYAN,LINETHICK3;
T3:FILTER(VAR9 AND CROSS(J4,J3) AND CLOSE/(REF(CLOSE,1)-1)*100!=5,22),STICK,COLORGREEN,LINETHICK3;
TDXSTEP1235:DRAWTEXT(T0,T0,23),COLOR5E8262;
TDXSTEP1236:DRAWTEXT(T,120000,24),COLORMAGENTA;
TDXSTEP1237:DRAWTEXT(T1,T1*0.9,25),COLORYELLOW;
TDXSTEP1238:DRAWTEXT(T2,T2*0.9,26),COLORCYAN;
TDXSTEP1239:DRAWTEXT(T3,T3*0.9,27),COLORGREEN;
{股 民 学 院 : http://www.58188.net 整理}

上一篇:通达信源码精选:韭菜MACD副图,分时顶底王,变色布林均线

下一篇:通达信源码精选:财神买点 财神到 财神现