分享

T 0分时买卖指标分享(源码)

 风信子d0w17xnr 2019-09-11

大部分朋友在盘中找不准买点和卖点,分时买卖指标就能给大家一个相对准确的参考,当然指标不是绝对的,要理性对待和参考。

这个分时买卖指标是分时主图指标,是基于一段时间的数据,不只是一天的分时数据,所以使用时候一定要下载好数据,否则显示会错误或者不显示。

下面是指标显示效果图,源码在后面。

源码:(本源码包括分时买卖指标源码和调用指标源码,调用指标的名称必须命名为:SHBX,否则无法使用!

{分时买卖}

TT2:=1000;

JDFX:='SHBX.JX';

JXX:=IF(CLOSE>500,SUM(AMOUNT,0)/SUM(V,0),SUM(AMOUNT,0)/SUM(V,0)/100);

ZB0:=(BARSLAST(((HOUR = 9) AND (MINUTE = 31))) + 1);

ZB1:=JXX;

ZB2:=(SUM((CLOSE * VOL),0) / SUM(VOL,0));

ZB3:=(((SETCODE = 0) OR (SETCODE = 1)) AND (CLOSE < 500));

HHH:=IF(((SETCODE < 2) AND (CONST(ZB0) < 241)),CONST(IF((TIME < TT2),HHV(CLOSE,0),SUM((IF((TIME = TT2),1,0) * HHV(CLOSE,0)),0))),DRAWNULL);

LLL:=IF(((SETCODE < 2) AND (CONST(ZB0) < 241)),CONST(IF((TIME < TT2),LLV(CLOSE,0),SUM((IF((TIME = TT2),1,0) * LLV(CLOSE,0)),0))),DRAWNULL);

ZB6:=IF(ZB3,ZB1,ZB2);

ZB7BAK:='SHBX.MACS#DAY';

ZB7:='SHBX.SHBZF#DAY';

ZB8:=(ZB7 * 1.3);

ZB9:=((CLOSE>REF(CLOSE,1)) AND ((CLOSE/ZB6)>(1+(ZB7/100))));

ZB10:=((CLOSE < REF(CLOSE,1)) AND ((CLOSE / ZB6) < (1 - (ZB7 / 100))));

DRAWTEXT_FIX(1,0,0,0,' 微信公众号免费分享:WUAIZHIBIAO'),COLOR00FFFF;

HH1:((REF(SUM(ZB9,0),1) = 0) AND (SUM(ZB9,0) = 1)),NODRAW;

DRAWTEXT_FIX(1,0.5,0,0,CON2STR(HH1,2));

LL1:((REF(SUM(ZB10,0),1) = 0) AND (SUM(ZB10,0) = 1)),NODRAW;

ZB13:=(SUM(HH1,0) * CROSS(COUNT((CLOSE < REF(CLOSE,1)),BARSLAST(HH1)),0.5));

ZB14:=(SUM(LL1,0) * CROSS(COUNT((CLOSE > REF(CLOSE,1)),BARSLAST(LL1)),0.5));

CS1:CONST(SUM(IF(ZB13,REF(CLOSE,1),DRAWNULL),0)),LINETHICK2,COLORGREEN;

CB1:CONST(SUM(IF(ZB14,REF(CLOSE,1),DRAWNULL),0)),LINETHICK2,COLORMAGENTA;

HH2:=CROSS(SUM((ZB9 AND (CLOSE > (CS1 * (1 + (ZB8 / 100))))),0),0.5),NODRAW;

LL2:=CROSS(SUM((ZB10 AND (CLOSE < (CB1 * (1 - (ZB8 / 100))))),0),0.5),NODRAW;

ZB19:=(SUM(HH2,0) * CROSS(COUNT((CLOSE < REF(CLOSE,1)),BARSLAST(HH2)),0.5));

ZB20:=(SUM(LL2,0) * CROSS(COUNT((CLOSE > REF(CLOSE,1)),BARSLAST(LL2)),0.5));

CS2:CONST(SUM(IF(ZB19,REF(CLOSE,1),DRAWNULL),0)),COLORGREEN;

CB2:CONST(SUM(IF(ZB20,REF(CLOSE,1),DRAWNULL),0)),COLORMAGENTA;

DRAWTEXT((ZB13 OR ZB19),(REF(CLOSE,1) * 1.001),'卖'),COLORYELLOW;

DRAWTEXT((ZB14 OR ZB20),(REF(CLOSE,1)*0.999),'买'),COLORYELLOW;

-----------------------------------

{调用指标,名字必须设置为:SHBX}

X_1:=16;

X_2:=4;

X_3:=3;

X_4:=REF(CLOSE,1);

X_5:=REF(MAX(HIGH,X_4),1);

X_6:=REF(MIN(LOW,X_4),1);

JX:IF(CLOSE>500,SUM(AMOUNT,0)/SUM(VOL,0),SUM(AMOUNT,0)/SUM(VOL,0)/100);

MACS:MA((X_5-X_6)/REF(CLOSE,2)*100,5)/X_2;

X_7:=REF(VOL,1)/REF(MA(VOL,5),1)<1.5;

SHBZF:IF(X_7,100*MA((REF(HIGH,1)-REF(LOW,1))/REF(CLOSE,2),5),100*(REF(HIGH,1)-REF(LOW,1))/REF(CLOSE,2))/3;

EMACS:EMA((X_5-X_6)/REF(CLOSE,2)*100,5)/4;

NOTEXT前收盘价:REF(CLOSE,1);

NOTEXT上市周期:BARSSINCE(CLOSE);

NOTEXTMA5:MA(CLOSE,5);

NOTEXTMA10:MA(CLOSE,10);

NOTEXTMA20:MA(CLOSE,20);

NOTEXTMA60:MA(CLOSE,60);

NOTEXTRMA5:REF(MA(CLOSE,5),1);

NOTEXTRMA10:REF(MA(CLOSE,10),1);

NOTEXTRMA20:REF(MA(CLOSE,20),1);

NOTEXTRMA60:REF(MA(CLOSE,60),1);

NOTEXT大盘价位:INDEXC;

NOTEXT昨日大盘:REF(INDEXC,1);

X_8:=6.6;

X_9:=95;

GGS1:IF(REF(CLOSE,1)/REF(CLOSE,2)>1.04 OR REF(CLOSE,1)/REF(CLOSE,2)<0.97,X_9-3.2,X_9);

GGB1:IF(REF(CLOSE,1)/REF(CLOSE,2)>1.04 OR REF(CLOSE,1)/REF(CLOSE,2)<0.97,X_8+3.2,X_8);

X_10:=(CLOSE-LLV(LOW,89))/(HHV(HIGH,89)-LLV(LOW,89))*100;

X_11:=SMA(X_10,14,1);

X_12:=SMA(X_11,5,1);

X_13:=3*X_11-2*X_12;

K1:EMA(X_10,14);

D1:EMA(X_12,5);

J1:3*K1-2*D1;

X_14:=EMA(EMA(EMA(CLOSE,X_1),X_1),X_1);

X_15:=(X_14-REF(X_14,1))/REF(X_14,1)*100;

VAR2:X_15<0;

VAR3:X_15>0;

X_16:=EMA(SMA((CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100))*100,8,1),3);

VAR5:X_16<34;

X_17:=COUNT(VAR5,10);

X_18:=TIME2<133000;

VAR8:X_17>0 AND VAR3>0 AND X_16>34 AND X_18>0;

X_19:=5;

X_20:=10;

X_21:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1)))));

X_22:=MOD(FROMOPEN,X_21);

X_23:=IF(X_22<0.5,X_21,X_22);

VVOL:IF(CURRBARSCOUNT=1 AND DYNAINFO(8)>1,VOL*X_21/X_23,DRAWNULL),NODRAW;

XNL:VVOL/REF(VOL,1)>X_3;

ZS:REF(CLOSE,1);

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约