分享

纵横天下股市,化解久困英雄”

 雨楼18 2018-12-23

 {指标源码}
{二八财富指标}

{虚拟涨停K线2}
ZTKX2:=IF(CURRBARSCOUNT=1,IF(FROMOPEN=240,CLOSE,REF(CLOSE,1)*1.1)*1.1,DRAWNULL);
STICKLINE(CURRBARSCOUNT=1,ZTKX2,MAX(OPEN,CLOSE),-1,1),COLOR00C0C0;
ZTKX:=IF(CURRBARSCOUNT=1,REF(CLOSE,1)*1.1,DRAWNULL);
STICKLINE(CURRBARSCOUNT=1,ZTKX,MAX(OPEN,CLOSE),-1,-1),COLOR00C0C0;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
STICKLINE(CLOSE/REF(CLOSE,1)>1.09 AND CLOSE=HIGH AND OPEN!=CLOSE,OPEN*1.003,CLOSE*0.997,0.5,0),COLOR00FFFF;

{基础条件(系统设置勾选成交量复权)}
JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));
CBZX:=IF(JJJT,0.01*AMOUNT/VOL,(CLOSE+HIGH+LOW)/3);
换手:=IF((SETCODE==0||SETCODE==1),100*VOL,VOL)/CAPITAL;

{分界线}
CT28:COST(78),COLORCYAN;
界峰F1:CONST(PEAK(CT28,5,1)),COLORCYAN,POINTDOT;
F2:CONST(PEAK(CT28,5,2)),COLORCYAN,POINTDOT;
DRAWTEXT(CURRBARSCOUNT=CONST(PEAKBARS(CT28,5,1))+1,CT28,'界 峰▲1'),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=CONST(PEAKBARS(CT28,5,2))+1,CT28,'界 峰▲2'),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=CONST(TROUGHBARS(CT28,5,1))+1,CT28,'波 谷'),COLORWHITE;

{调整中枢}
TT78:=SUMBARS(换手,78);
TT100:=SUMBARS(换手,100);
TTX8:=IF(TT78>5,TT78,TT100);
RHIGH:=MAX(REF(CLOSE,1),HIGH);
RLOW:=MIN(REF(CLOSE,1),LOW);
RVH0:=IF(BETWEEN(CONST(CBZX),RHIGH,RLOW),换手,0);
OBV0:=CBZX*SUM(RVH0,TTX8);
RVH1:=IF(BETWEEN(CONST(REF(CBZX,1)),RHIGH,RLOW),换手,0);
OBV1:=REF(CBZX,1)*SUM(RVH1,TTX8);
RVH2:=IF(BETWEEN(CONST(REF(CBZX,2)),RHIGH,RLOW),换手,0);
OBV2:=REF(CBZX,2)*SUM(RVH2,TTX8);
RVH3:=IF(BETWEEN(CONST(REF(CBZX,3)),RHIGH,RLOW),换手,0);
OBV3:=REF(CBZX,3)*SUM(RVH3,TTX8);
RVH4:=IF(BETWEEN(CONST(REF(CBZX,4)),RHIGH,RLOW),换手,0);
OBV4:=REF(CBZX,4)*SUM(RVH4,TTX8);
RVH5:=IF(BETWEEN(CONST(REF(CBZX,5)),RHIGH,RLOW),换手,0);
OBV5:=REF(CBZX,5)*SUM(RVH5,TTX8);
RVH6:=IF(BETWEEN(CONST(REF(CBZX,6)),RHIGH,RLOW),换手,0);
OBV6:=REF(CBZX,6)*SUM(RVH6,TTX8);
RVH7:=IF(BETWEEN(CONST(REF(CBZX,7)),RHIGH,RLOW),换手,0);
OBV7:=REF(CBZX,7)*SUM(RVH7,TTX8);
RVH8:=IF(BETWEEN(CONST(REF(CBZX,8)),RHIGH,RLOW),换手,0);
OBV8:=REF(CBZX,8)*SUM(RVH8,TTX8);
RVH9:=IF(BETWEEN(CONST(REF(CBZX,9)),RHIGH,RLOW),换手,0);
OBV9:=REF(CBZX,9)*SUM(RVH9,TTX8);
RVH10:=IF(BETWEEN(CONST(REF(CBZX,10)),RHIGH,RLOW),换手,0);
OBV10:=REF(CBZX,10)*SUM(RVH10,TTX8);
RVH11:=IF(BETWEEN(CONST(REF(CBZX,11)),RHIGH,RLOW),换手,0);
OBV11:=REF(CBZX,11)*SUM(RVH11,TTX8);
RVH12:=IF(BETWEEN(CONST(REF(CBZX,12)),RHIGH,RLOW),换手,0);
OBV12:=REF(CBZX,12)*SUM(RVH12,TTX8);
RVH13:=IF(BETWEEN(CONST(REF(CBZX,13)),RHIGH,RLOW),换手,0);
OBV13:=REF(CBZX,13)*SUM(RVH13,TTX8);
RVH14:=IF(BETWEEN(CONST(REF(CBZX,14)),RHIGH,RLOW),换手,0);
OBV14:=REF(CBZX,14)*SUM(RVH14,TTX8);
RVH15:=IF(BETWEEN(CONST(REF(CBZX,15)),RHIGH,RLOW),换手,0);
OBV15:=REF(CBZX,15)*SUM(RVH15,TTX8);
RVH16:=IF(BETWEEN(CONST(REF(CBZX,16)),RHIGH,RLOW),换手,0);
OBV16:=REF(CBZX,16)*SUM(RVH16,TTX8);
RVH17:=IF(BETWEEN(CONST(REF(CBZX,17)),RHIGH,RLOW),换手,0);
OBV17:=REF(CBZX,17)*SUM(RVH17,TTX8);
RVH18:=IF(BETWEEN(CONST(REF(CBZX,18)),RHIGH,RLOW),换手,0);
OBV18:=REF(CBZX,18)*SUM(RVH18,TTX8);
RVH19:=IF(BETWEEN(CONST(REF(CBZX,19)),RHIGH,RLOW),换手,0);
OBV19:=REF(CBZX,19)*SUM(RVH19,TTX8);
RVH20:=IF(BETWEEN(CONST(REF(CBZX,20)),RHIGH,RLOW),换手,0);
OBV20:=REF(CBZX,20)*SUM(RVH20,TTX8);
MOBV20:=MAX(OBV0,MAX(OBV1,MAX(OBV2,MAX(OBV3,MAX(OBV4,MAX(OBV5,
MAX(OBV6,MAX(OBV7,MAX(OBV8,MAX(OBV9,MAX(OBV10,MAX(OBV11,MAX(OBV12,MAX(OBV13,MAX(OBV14,MAX(OBV15,
MAX(OBV16,MAX(OBV17,MAX(OBV18,MAX(OBV19,OBV20))))))))))))))))))));
FCB20:=IF(MOBV20=OBV0,CBZX,IF(MOBV20=OBV1,REF(CBZX,1),IF(MOBV20=OBV2,REF(CBZX,2),IF(MOBV20=OBV3,REF(CBZX,3),IF(MOBV20=OBV4,REF(CBZX,4),IF(MOBV20=OBV5,REF(CBZX,5),
IF(MOBV20=OBV6,REF(CBZX,6),IF(MOBV20=OBV7,REF(CBZX,7),IF(MOBV20=OBV8,REF(CBZX,8),IF(MOBV20=OBV9,REF(CBZX,9),IF(MOBV20=OBV10,REF(CBZX,10),IF(MOBV20=OBV11,REF(CBZX,11),IF(MOBV20=OBV12,REF(CBZX,12),IF(MOBV20=OBV13,REF(CBZX,13),IF(MOBV20=OBV14,REF(CBZX,14),IF(MOBV20=OBV15,
REF(CBZX,15),IF(MOBV20=OBV16,REF(CBZX,16),IF(MOBV20=OBV17,REF(CBZX,17),IF(MOBV20=OBV18,REF(CBZX,18),IF(MOBV20=OBV19,REF(CBZX,19),REF(CBZX,20)))))))))))))))))))));
调整中枢:IF(CURRBARSCOUNT<=CONST(TT100),CONST(FCB20),DRAWNULL),COLORYELLOW;

{基本资料}
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT('行业:',HYBLOCK)),COLORGRAY;
DRAWTEXT_FIX(ISLASTBAR,0.07,0,0,STRCAT('区域:',DYBLOCK)),COLORGRAY;
DRAWTEXT_FIX(ISLASTBAR,0.15,0,0,STRCAT('概念:',GNBLOCK)),COLORGRAY;
DRAWTEXT_FIX(1,0.45,0.05,0,'【黄实线柱:次 日 最 高 位 置 】'),COLORYELLOW;

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

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多