|
以下是通达信量价齐升“五山荒野版”主图幅图选股源码（无源码的请下载附件导入）
这是五山荒野同学求助的，大概意思 5天内有涨停今天回踩5日线 今天的价格高于5天前的价格，量大于5天前的量， 10天内有涨停今天回踩10日线，今天的价高于10天前的价 量大于10天前的量。您提供的票我也看了。如果按照原作者的写，几百张票 没意思我改了。而且原作者的例子有几处明显量小于前面的量，所以 我放弃了按照他的意图去写 看看七月出票还可以
{主图}
ZT:=C>REF(C,1)*1.095 AND C=H;
M5:MA(C,5);
M10:MA(C,10);
YT:=BARSLAST(C>O);
LY:=REF(L,YT);
TJ1:=REF(EVERY(L>M5,2),1) AND REF(EXIST(ZT,5),1);
TJ2:=BETWEEN(L/M5,0.995,1.005) AND C>REF(C,5) AND V>REF(V,5) AND C>M5 AND H<REF(LY,1);
TJ3:=REF(EVERY(L>M5,2),1) AND REF(EXIST(ZT,10),1);
TJ4:=BETWEEN(L/M10,0.99,1.01) AND C>REF(C,10) AND V>REF(V,10) AND C>M10 AND H<REF(LY,1);
XG:=TJ1 AND TJ2;
XG1:=TJ3 AND TJ4;
DRAWICON(CROSS(XG OR XG1,0.5),L*0.95,1);
STICKLINE(CROSS(XG OR XG1,0.5),C,O,2,0),COLORYELLOW;
STICKLINE(CROSS(XG OR XG1,0.5),L,H,0,0),COLORYELLOW;
{幅图}
ZT:=C>REF(C,1)*1.095 AND C=H;
M5:=MA(C,5);
M10:=MA(C,10);
YT:=BARSLAST(C>O);
LY:=REF(L,YT);
TJ1:=REF(EVERY(L>M5,2),1) AND REF(EXIST(ZT,5),1);
TJ2:=BETWEEN(L/M5,0.995,1.005) AND C>REF(C,5) AND V>REF(V,5) AND C>M5 AND H<REF(LY,1);
TJ3:=REF(EVERY(L>M5,2),1) AND REF(EXIST(ZT,10),1);
TJ4:=BETWEEN(L/M10,0.99,1.01) AND C>REF(C,10) AND V>REF(V,10) AND C>M10 AND H<REF(LY,1);
XG2:=TJ1 AND TJ2;
XG1:=TJ3 AND TJ4;
XG:=XG1 OR XG2;
STICKLINE(CROSS(XG,0.5),0,6,1.2,0),COLORYELLOW;
{选股}
ZT:=C>REF(C,1)*1.095 AND C=H;
M5:=MA(C,5);
M10:=MA(C,10);
YT:=BARSLAST(C>O);
LY:=REF(L,YT);
TJ1:=REF(EVERY(L>M5,2),1) AND REF(EXIST(ZT,5),1);
TJ2:=BETWEEN(L/M5,0.995,1.005) AND C>REF(C,5) AND V>REF(V,5) AND C>M5 AND H<REF(LY,1);
TJ3:=REF(EVERY(L>M5,2),1) AND REF(EXIST(ZT,10),1);
TJ4:=BETWEEN(L/M10,0.99,1.01) AND C>REF(C,10) AND V>REF(V,10) AND C>M10 AND H<REF(LY,1);
XG2:=TJ1 AND TJ2;
XG1:=TJ3 AND TJ4;
XG:CROSS(XG1 OR XG2,0.5);
624588955.jpg
62544935.jpg
625100065.jpg
625177821.jpg
624388305.rar
(2.59 KB, 下载次数: 0, 售价: 3 金钱)
|
