20240522 极品顶底T+0分时主图——逍遥分时指标-源码免费分享-支持手机电脑

原创 gskz 股市客栈 2024-05-22 22:42 江苏

注意：源码太长文章底部点击'阅读原文'可直接下载指标tn6文件

{主图分时指标源码}

N:=0;M:=1;

J1:CLOSE,COLORWHITE;

J2:ZSTJJ,COLORYELLOW;

GPZBGS1:=SUM(CLOSE*VOL,240)/SUM(VOL,240);

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

GPZBGS3:=SUM(CLOSE*VOL,240)/SUM(VOL,240);

GPZBGS4:=CLOSE>REF(CLOSE,1) AND CLOSE/J2>1+N/1000;

GPZBGS5:=CLOSE<REF(CLOSE,1) AND CLOSE/J2<1-N/1000;

GPZBGS6:=CROSS(SUM(GPZBGS4,0),0.5);

GPZBGS7:=CROSS(SUM(GPZBGS5,0),0.5);

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

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

F1:CONST(SUM(IF(GPZBGS8,REF(CLOSE,1),DRAWNULL),0)),DOTLINE,COLORWHITE;

F2:CONST(SUM(IF(GPZBGS9,REF(CLOSE,1),DRAWNULL),0)),DOTLINE,COLORGREEN;

GPZBGS10:=CROSS(SUM(GPZBGS4 AND CLOSE>F1*(1+M/100),0),0.5);

GPZBGS11:=CROSS(SUM(GPZBGS5 AND CLOSE<F2*(1-M/100),0),0.5);

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

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

F3:CONST(SUM(IF(GPZBGS12,REF(CLOSE,1),DRAWNULL),0)),COLORWHITE;

F4:CONST(SUM(IF(GPZBGS13,REF(CLOSE,1),DRAWNULL),0)),COLORGREEN;{股票指标公式网WWW.GPZBGS.COM}

DRAWICON(GPZBGS8,REF(CLOSE*1.002,1),2);

DRAWICON(GPZBGS12,REF(CLOSE*1.002,1),35);

DRAWICON(GPZBGS9,REF(CLOSE*0.998,1),1);

DRAWICON(GPZBGS13,REF(CLOSE*0.998,1),34);

GPZBGS14:=CLOSE>REF(CLOSE,1) AND CLOSE/J2>1+5/100;

GPZBGS15:=CLOSE<REF(CLOSE,1) AND CLOSE/J2<1-5/100;

GPZBGS16:=CROSS(SUM(GPZBGS14,0),0.5);

GPZBGS17:=CROSS(SUM(GPZBGS15,0),0.5);

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

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

GPZBGS20:=CONST(SUM(IF(GPZBGS18,REF(CLOSE,1),DRAWNULL),0));{股票指标公式网WWW.GPZBGS.COM}

GPZBGS21:=CONST(SUM(IF(GPZBGS19,REF(CLOSE,1),DRAWNULL),0));{股票指标公式网WWW.GPZBGS.COM}

DRAWICON(GPZBGS18,REF(CLOSE*1.002,1),15);

DRAWICON(GPZBGS19,REF(CLOSE*0.998,1),9);