股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
    上一主题 下一主题

    [通达信] 「指标」自用资金筹码主图


        [-----复制链接-----]

    22万

    主题

    22万

    帖子

    14

    精华

    积分
    11040
    楼主
    2024-3-7 17:33:25
    【资料名称】:自用资金筹码主图介绍
    【资料描述】:

    自用资金筹码主图

    自用资金筹码主图

    主图可根据每只K线表示的换手率、大单资金流向及筹码成本虚线,方便的观察主力筹码收集、派发、主力资金流入流出,短期底部和成交密集区压力!还可根据时间周期判断变盘时间!

    源码 说明

    K线中间窄柱子表示机构大单资金买卖净额,流出画蓝色柱子,流入画黄色柱子。

    时间与k线波段方面的规律:
    从k线历史上波段低点或高点开始往右数k线数目,如果距今日的k线数目落于以下的数字之中,那么今日的k线就将是波段的低点或高点的可能大增。适用于月,周,日,小时等等所有k线周期级别。记住, 史上的k线波段,在经历了这些循环周期数字之后,必定再现这些波段。
    熟悉这些会说话的循环周期,他们将为您开启时间之门。。。

    K线半截颜色表示当日换手统计;
    1.灰色表示 (带量换手) 大于5或小于8,相对活跃。适当关注!
    2.蓝色表示 (放量换手) 换手大于8,小于15.活跃!重点关注,深度介入,大举买入或卖出,大幅上升或回落。
    3.绿色表示 (巨量换手) 换手大于15或小于25.异常换手!低位介入。高位快跑!
    4.棕色表示 (怪异换手) 换手大于25.怪异换手!低位介入。高位快跑!
    5.红色表示 (成交倍量) 成交量大于昨日一倍或一倍以上

    筹码成本虚线说明;

    帝王线:为获利盘为99%、93%、85%三个区域的平均成本。
    汉界线:为获利盘为84%、67%、50%三个区域的平均成本。
    楚河线:为获利盘为49%、34%、16%三个区域的平均成本。
    自刎线:为获利盘为15%、7%、1%三个区域的平均成本。

     
    买线:=EMA(CLOSE,2);
    卖线:=EMA(SLOPE(CLOSE,21)*20+CLOSE,42);
    买入:IF(CROSS(买线,卖线),L-0.02,DRAWNULL),CROSSDOT,LINETHICK4,COLORRED;
    卖出:IF(CROSS(80,RSI)*30,H+0.02,DRAWNULL),CROSSDOT,LINETHICK4,COLORGREEN;
    VC:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA (CLOSE,32))/MA(CLOSE,32)*100)/3;
    S2:=IF(VC>20 AND FILTER(VC< REF(VC,1),5),H+0.02,DRAWNULL),CIRCLEDOT,LINETHICK4,COLORGREEN;
    A1:=BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1));
    B1:=REF(C,A1+1)> C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA");
    DRAWTEXT(B1> 0,L-0.02,'M底'),COLOR00FFFF;{MACD底背离}
    A2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1));
    B2:=REF(C,A2+1)> C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D");
    DRAWTEXT(B2,L-0.10,'K底'),COLORFF00FF;{KDJ底背离}
    A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));
    B3:=REF(C,A3+1)> C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2");
    DRAWTEXT(B3> 0,L-0.18,'R底'),COLOR0000FF;{RSI底背离}
    C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1));
    D1:=REF(C,C1+1)<C AND REF("MACD.DIF",C1+1)> "MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF");
    DRAWTEXT(D1> 0,H+0.16,'M顶'),COLOR00FF00;{MACD顶背离}
    C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1));
    D2:=REF(C,C2+1)<C AND REF("KDJ.K",C2+1)> "KDJ.K" AND CROSS("KDJ.D","KDJ.K");
    DRAWTEXT(D2> 0,H+0.08,'K顶'),COLORFFFFCC;{KDJ顶背离}
    C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));
    D3:=REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)> "RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1");
    DRAWTEXT(D3> 0,H+0.04,'R顶'),COLORFF9900;{RSI顶背离};


    DRAWTEXT_FIX(C>0,0.00,0.10,0,STRCAT('业绩预报:',EXTERNSTR(0,6))),COLORYELLOW,LINETHICK2;
    DRAWTEXT_FIX(C>0,0.004,0.21,0,STRCAT('千股千评:',EXTERNSTR(0,1))),COLORYELLOW,LINETHICK2;
    {DRAWTEXT_FIX(C>0,0.004,0.13,0,STRCAT('智能诊股:',EXTERNSTR(0,2))),COLORFFFF00,LINETHICK2;}
    {DRAWTEXT_FIX(C>0,0.004,0.17,0,STRCAT('机构关注:',EXTERNSTR(0,5))),COLORFFFFFF,LINETHICK2;}
    {DRAWTEXT_FIX(C>0,0.004,0.21,0,STRCAT('龙虎交易:',EXTERNSTR(0,3))),COLORLIGREEN,LINETHICK2;}

    {DRAWTEXT_FIX(ISLASTBAR,0,0,0,GNBLOCK),COLORYELLOW;}{概念板块左上角}
    DRAWTEXT_FIX(ISLASTBAR,0,28,0,GNBLOCK),COLORYELLOW;{板块概念左下角}
    {DRAWTEXT_FIX(1,0.26,28,0,HYBLOCK)COLOR0080FF;{所属行业左下角}
    {DRAWTEXT_FIX(1,0.31,28,0,DYBLOCK)COLOR00FFFF;{所属地区左下角}

    DRAWTEXT_FIX(1,0.00,0,0,'所属行业:')COLORBROWN;
    DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK)COLOR00FFFF;
    DRAWTEXT_FIX(1,0.14,0,0,'所属地区:')COLORBROWN;
    DRAWTEXT_FIX(1,0.20,0,0,DYBLOCK)COLOR00FFFF;
    DRAWTEXT_FIX(1,0.30,0.00,0,'主题投资:')COLORBROWN;
    DRAWTEXT_FIX(1,0.36,0.00,0,EXTERNSTR(0,2))COLOR00FFFF;
    DRAWTEXT_FIX(1,0.00,0.05,0,'主营业务:')COLORBROWN;
    DRAWTEXT_FIX(1,0.06,0.05,0,EXTERNSTR(0,3))COLORBROWN;
    {DRAWTEXT_FIX(1,0.00,0.10,0,'解禁日期:')COLORBROWN;}
    {DRAWTEXT_FIX(1,0.06,0.10,0,EXTERNSTR(0,4))COLORBROWN;}
    DRAWTEXT_FIX(1,0.00,0.15,0,'愚民概念:'),COLORBROWN;
    DRAWTEXT_FIX(1,0.06,0.15,0,EXTERNSTR(0,5)),COLORBROWN;


    称帝:(COST(99)+COST(93)+COST(85))/3,COLORYELLOW,DOTLINE,LINETHICK1;
    汉界:(COST(84)+COST(67)+COST(50))/3,COLORGREEN,DOTLINE,LINETHICK1;
    楚河:(COST(16)+COST(34)+COST(49))/3,COLORRED,DOTLINE,LINETHICK1;
    自刎:(COST(1)+COST(7)+COST(15))/3,COLORMAGENTA,DOTLINE,LINETHICK1;
    汉界飘移:(汉界-REF(汉界,3))/REF(汉界,3)*100,COLORGREEN,NODRAW;
    楚河飘移:(楚河-REF(楚河,3))/REF(楚河,3)*100,COLORRED,NODRAW;
    上跨度:(称帝-楚河)/楚河*100,NODRAW;{计算帝王线与楚河线的距离}
    下跨度:(汉界-自刎)/自刎*100,NODRAW;{计算汉界线与自刎线的距离}


    {时间循环周期}

    {菲波纳契螺旋周期;易学难精;关注成黄金分割比率的波段位置}
    DRAWTEXT(CURRBARSCOUNT=3,HIGH*1.02,'3'), COLORGREEN;
    DRAWTEXT(CURRBARSCOUNT=5,HIGH*1.02,'5'), COLORGREEN;
    DRAWTEXT(CURRBARSCOUNT=8,HIGH*1.02,'8'), COLORGREEN;
    DRAWTEXT(CURRBARSCOUNT=13,HIGH*1.02,'13'), COLORGREEN;
    DRAWTEXT(CURRBARSCOUNT=21,HIGH*1.02,'21'), COLORGREEN;
    DRAWTEXT(CURRBARSCOUNT=34,HIGH*1.02,'34'), COLORGREEN;
    DRAWTEXT(CURRBARSCOUNT=55,HIGH*1.02,'55'), COLORGREEN;
    DRAWTEXT(CURRBARSCOUNT=89,HIGH*1.02,'89'), COLORGREEN;
    DRAWTEXT(CURRBARSCOUNT=144,HIGH*1.02,'144'), COLORGREEN;
    DRAWTEXT(CURRBARSCOUNT=233,HIGH*1.02,'233'), COLORGREEN;
    DRAWTEXT(CURRBARSCOUNT=377,HIGH*1.02,'377'), COLORGREEN;
    DRAWTEXT(CURRBARSCOUNT=610,HIGH*1.02,'610'), COLORGREEN;
    DRAWTEXT(CURRBARSCOUNT=987,HIGH*1.02,'987'), COLORGREEN;
    DRAWTEXT(CURRBARSCOUNT=1597,HIGH*1.02,'1597'), COLORGREEN;
    DRAWTEXT(CURRBARSCOUNT=2584,HIGH*1.02,'2584'), COLORGREEN;
    DRAWTEXT(CURRBARSCOUNT=4181,HIGH*1.02,'4181'), COLORGREEN;

    {卢卡斯螺旋周期,《超级短线新武器》一书有具体的实战案例}
    DRAWTEXT(CURRBARSCOUNT=7,HIGH*1.025,'7'), COLORWHITE;
    DRAWTEXT(CURRBARSCOUNT=11,HIGH*1.025,'11'), COLORWHITE;
    DRAWTEXT(CURRBARSCOUNT=18,HIGH*1.025,'18'), COLORWHITE;
    DRAWTEXT(CURRBARSCOUNT=29,HIGH*1.025,'29'), COLORWHITE;
    DRAWTEXT(CURRBARSCOUNT=47,HIGH*1.025,'47'), COLORWHITE;
    DRAWTEXT(CURRBARSCOUNT=76,HIGH*1.025,'76'), COLORWHITE;
    DRAWTEXT(CURRBARSCOUNT=123,HIGH*1.025,'123'), COLORWHITE;
    DRAWTEXT(CURRBARSCOUNT=199,HIGH*1.025,'199'), COLORWHITE;
    DRAWTEXT(CURRBARSCOUNT=322,HIGH*1.025,'322'), COLORWHITE;
    DRAWTEXT(CURRBARSCOUNT=521,HIGH*1.025,'521'), COLORWHITE;
    DRAWTEXT(CURRBARSCOUNT=843,HIGH*1.025,'843'), COLORWHITE;
    DRAWTEXT(CURRBARSCOUNT=1364,HIGH*1.025,'1364'), COLORWHITE;
    DRAWTEXT(CURRBARSCOUNT=2207,HIGH*1.025,'2207'), COLORWHITE;
    DRAWTEXT(CURRBARSCOUNT=3571,HIGH*1.025,'3571'), COLORWHITE;
     

    DRAWTEXT_FIX(1,0.01,0.9,0,'数字绿色菲波纳契螺旋周期,白色卢卡斯螺旋周期'),COLORBROWN;

    {精准线}
    N1:=3;
    L0:=0.00;{点位差参数}

    {底精准线}
    LW:=ABS(L-REF(L,1))<=L0;
    LT:=ABS(L-REF(L,2))<=L0;
    LS:=ABS(L-REF(L,3))<=L0;
    LF:=ABS(L-REF(L,4))<=L0;
    LH:=ABS(L-REF(L,5))<=L0;
    精准线首次:=LW OR LT OR LS OR LF OR LH;
    精准左:=FILTER(精准线首次,N1) ;
    天数:=BARSLAST(精准左);
    LTS:=REF(L,天数);
    {谷底}支撑线:=ABS(L-LTS)<=L0;
    STICKLINE(精准左,L,L,50,-1),COLORLIGREEN;
    {DRAWLINE(精准左,L, 支撑线,LTS,1),COLORMAGENTA;}
    DRAWTEXT(精准左,H*0.95,'支撑线'),COLOR8A0000;


    {顶精准线}
    G1:=ABS(H-REF(H,1))<=L0;
    G2:=ABS(H-REF(H,2))<=L0;
    G3:=ABS(H-REF(H,3))<=L0;
    G4:=ABS(H-REF(H,4))<=L0;
    G5:=ABS(H-REF(H,5))<=L0;
    精准线首次1:=G1 OR G2 OR G3 OR G4 OR G5;
    精准左1:=FILTER(精准线首次1,N1) ;
    天数1:=BARSLAST(精准左1);
    HTS:=REF(H,天数1);
    {峰顶}压力线:=ABS(H-HTS)<=L0;
    STICKLINE(精准左1,H,H,50,-1),COLORLIRED;
    {DRAWLINE(精准左1,L, 压力线,HTS,1),COLORGREEN;}
    DRAWTEXT(精准左1,H*1.01,'压力线'),COLOR660066;


    {超级资金:}
    {超B:=L2_AMO(0,2)/10000.0;
    超S:=-L2_AMO(0,3)/10000.0;
    当日净额:超B+超S,NODRAW;}
    机构买入:L2_AMO(0,2)/10000.0,NODRAW;
    机构卖出:-L2_AMO(0,3)/10000.0,NODRAW;
    机构净买:机构买入+机构卖出,NODRAW;

    STICKLINE(机构净买>0,O,C,0.3,0), COLORYELLOW;
    STICKLINE(机构净买<0,O,C,0.2,0), COLORBLUE;

    {单根K线表示换手量能}

    A01:=MIN(O,C);
    B01:=ABS(O-C);
    倍量:=(V/REF(V,1)>=1.91 AND COUNT(C>O,1)) OR (L>REF(H,1) AND COUNT(O>C,1) AND V/REF(V,1)>=1.91),NODRAW,COLORYELLOW,COLORFF00FF;
    地量:=V<=REF(LLV(V,55),1),NODRAW;
    STICKLINE(地量,A01+B01,A01+B01/1.5,2.5,0),COLORFF0000;
    STICKLINE(倍量,A01+B01/4,A01+B01/2,2.5,0){,COLOR7F017F},COLORRED;
    换手:=VOL*100/CAPITAL,STICK;
    带量:=C=C AND 换手>=5 AND 换手<8{,COLORLIGRAY{COLOR007575};
    STICKLINE(带量,A01,A01+B01/4,2.5,0),COLORGRAY,{COLOR007575};
    放量:=C=C AND 换手>=8 AND 换手<15{,COLOR32CD32};
    STICKLINE(放量,A01,A01+B01/4,2.5,0),COLORBLUE{COLOR32CD32};
    巨量:=C=C AND 换手>=15 AND 换手<25{,COLORGREEN};
    STICKLINE(巨量,A01,A01+B01/4,2.5,0),COLORGREEN{,COLOR32CD32};
    怪异:=C=C AND 换手>=25,COLOR8E236B;
    STICKLINE(怪异,A01,A01+B01/4,2.5,0),COLORBROWN{,COLOR8E236B};

    {重点K线}
    黄昏之星:=((((((REF(CLOSE,2) / REF(OPEN,2)) > 1.03) AND (REF(OPEN,1) >
    REF(CLOSE,2))) AND ((ABS((REF(OPEN,1) - REF(CLOSE,1))) /
    REF(CLOSE,1)) < 0.02)) AND ((CLOSE / OPEN) < 0.97)) AND (CLOSE <REF(CLOSE,2)));
    射击之星:=(((MIN(OPEN,CLOSE) = LOW) AND ((HIGH - LOW) > (3 *
    (MAX(OPEN,CLOSE) - LOW)))) AND (CLOSE > MA(CLOSE,5)));
    锤头:=(((HIGH = MAX(OPEN,CLOSE)) AND ((HIGH - LOW) > (3 * (HIGH -
    MIN(OPEN,CLOSE))))) AND (CLOSE < MA(CLOSE,5)));
    吊颈:=(( (HIGH = MAX(OPEN,CLOSE)) AND ((HIGH - LOW) > (3 * (HIGH -
    MIN(OPEN,CLOSE))))));
    穿头破脚:=((((((REF(CLOSE,1) / REF(OPEN,1)) > 1.03) AND ((CLOSE / OPEN)
    < 0.96)) AND (CLOSE < REF(OPEN,1))) AND (OPEN > REF(CLOSE,1))) OR
    (((((REF(CLOSE,1) / REF(OPEN,1)) < 0.97) AND ((CLOSE / OPEN) >
    1.04)) AND (CLOSE > REF(OPEN,1))) AND (OPEN < REF(CLOSE,1))));
    身怀六甲:=(((((ABS((REF(CLOSE,1) - REF(OPEN,1))) / REF(CLOSE,1)) > 0.04)
    AND ((ABS((CLOSE - OPEN)) / CLOSE) < 0.005)) AND (MAX(CLOSE,OPEN) <
    MAX(REF(CLOSE,1),REF(OPEN,1)))) AND (MIN(CLOSE,OPEN) > MIN(REF(CLOSE,1),REF(OPEN,1))));
    乌云盖顶:=(((((REF(CLOSE,1) / REF(OPEN,1)) > 1.03) AND ((CLOSE / OPEN) <
    0.97)) AND (OPEN > REF(CLOSE,1))) AND (CLOSE < REF(CLOSE,1)));
    曙光初现:=(((((REF(CLOSE,1) / REF(OPEN,1)) < 0.97) AND ((CLOSE / OPEN) >
    1.03)) AND (OPEN < REF(CLOSE,1))) AND (CLOSE > REF(CLOSE,1)));
    倾盆雨:=(((((REF(CLOSE,1) / REF(OPEN,1)) >= 1.03) AND (OPEN <
    REF(CLOSE,1))) AND (OPEN > REF(OPEN,1))) AND (CLOSE < REF(OPEN,1)));

    DRAWTEXT(倾盆雨,H*1.03,'倾盆大雨'),COLORCYAN;
    DRAWTEXT(黄昏之星,H*1.02,'黄昏之星'),COLORCYAN;
    DRAWTEXT(射击之星,H*1.03,'射击之星可能见顶'),COLORCYAN;
    DRAWTEXT(锤头,L-L*0.02,'锤头可能见底'),COLORGREEN;
    DRAWTEXT(吊颈,H*1.03,'吊颈'),COLORCYAN;
    DRAWTEXT(穿头破脚,H*1.05,'穿头破脚'),COLORCYAN;
    {DRAWTEXT(乌云盖顶,H*1.03,'乌云盖顶'),COLORCYAN;}
    {DRAWTEXT(曙光初现,L-L*0.02,'曙光初现(放量)'),COLORGREEN;}
    DRAWTEXT(身怀六甲,L-L*0.02,'身怀六甲,底升顶落'),COLORGREEN;

    {平头底部:=REF(C,1)<MA(C,10) AND ABS(REF(C,1)-REF(O,1))>MA(ABS(C-O),10)*1.1 AND ABS(C-O)<MA(ABS(C-O),10)/1.1 AND L=REF(L,1);}{K线组合又叫蹑底,未破之前底部有支撑,一般不会收盘跌破,若收盘跌破,则形态成压,,若未破低而高过母线,则大概是低位震荡吸货!}
    {DRAWTEXT(平头底部,L*1.02,'蹑底看涨'),COLORYELLOW;};


    NZ:=150;
    判断高低:=3;
    高:=REF(HHV(H,NZ),判断高低);
    {近期顶}密集成交区:REFDATE(高,DATE),COLORLIGREEN,LINETHICK2;
    最顶:=REFDATE(密集成交区,DATE),NODRAW;
    出:=最顶=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW;
    {STICKLINE(出,C,O,3,0),COLORGREEN;}
    STICKLINE(出,C,O,1.1,0),COLORBROWN;
    DRAWTEXT(出,H*0.95,'抛'),COLORGREEN;

    低:=REF(LLV(L,NZ),判断高低);
    {近期底}近期新低:REFDATE(低,DATE),COLORLIRED,LINETHICK2;
    最底:=REFDATE(近期新低,DATE),NODRAW;
    进:=最底=L AND ((C+L)<(O+C) OR (O+L)<(C+O)),NODRAW;
    {STICKLINE(进,C,O,3,0),COLORYELLOW;}
    STICKLINE(进,C,O,1.1,0),COLORYELLOW;
    DRAWTEXT(进,H*0.95,'买'),COLORYELLOW;


     


     



    gd26016


    【下载地址隐藏】:                    点:回复可见地址
    游客,如果您要查看本帖隐藏内容请回复






    上一篇:「指标」自用的真实盘口
    下一篇:「指标」极品操盘(一主图两副图)
    回复

    举报

    QQ|

    GMT+8, 2024-11-11 13:11

    快速回复 返回顶部 返回列表