分享

转码页面

 pharl 2019-08-03

以下是流氓OBV源码(无源码的请下载附件导入)

{流氓OBV}DRAWGBK(C>0,RGB(40,120,20),RGB(00,00,00),0,0,1),LINETHICK2;

OBV0:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0);

OBV:=OBV0/100000;

MA30:=MA(OBV,30);

SUB:OBV-MA30,LINETHICK2;

(SUB,SUB>=REF(SUB,1),RGB(255,0,0),SUB<REF(SUB,1),RGB(0,250,0)),LINETHICK4;

长均:MA(SUB,L),COLORBLUE,LINETHICK4;

中均:MA(SUB,20),COLORFF00FF,LINETHICK2;

短均:MA(SUB,5),COLOR00FFFF,LINETHICK2;

STICKLINE(中均>长均ANDREF(中均,1)<REF(短均,1)AND短均<=中均,中均,0,2,1);

STICKLINE(REF(中均,1)>REF(短均,1)AND短均>=中均,中均,0,2,1),COLORFF00F2;

(短均,SUB,短均<SUB,RGB(180,50,0),短均>SUB,RGB(0,50,180));

(长均,短均,长均<短均,RGB(200,0,100),长均>短均,RGB(0,100,100));

TY:=SUB;

AA1:=REF(TY,10)=HHV(TY,2*10+1);B1:=FILTER(AA1,10);C1:=BACKSET(B1,10+1);HD:=FILTER(C1,10);

AA2:=REF(TY,10)=LLV(TY,2*10+1);B2:=FILTER(AA2,10);C2:=BACKSET(B2,10+1);LD:=FILTER(C2,10);

AB:=REF(SUB,BARSLAST(HD));

T1:=BARSLAST(HD)<BARSLAST(LD)ANDNOT(HD);

T2:=BARSLAST(HD)>BARSLAST(LD)ANDNOT(LD);

峰:IF(T1,AB,AB),COLORYELLOW,POINTDOT;

0,COLORFF99FF;

DIF:=EMA(C,5)-EMA(C,13);

DEA:=EMA(DIF,9);

A1:=BARSLAST(REF(CROSS(DIF,DEA),1));

C01:=BARSLAST(REF(CROSS(DEA,DIF),1));

底背离:REF(C,A1+1)>CANDREF(DIF,A1+1)<DIFANDCROSS(DIF,DEA),COLOR00FFFF,LINETHICK2;

顶背离:REF(C,C1+1)<CANDREF(DIF,C1+1)>DIFANDCROSS(DEA,DIF),COLORFF00FF,LINETHICK2;

DRAWTEXT(底背离>0,15,'←底背离'),COLORWHITE;

DRAWTEXT(顶背离>0,15,'←顶背离'),COLORWHITE;

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

    0条评论

    发表

    请遵守用户 评论公约