本人是个指标初级DIY者,近年來比较关注各类指标,大都数都不尽人意,但从中学到和 总结不少经验,吸取精华并DIY成自用的比较满意的指标,本指标就是其中之一。
但该指标是本人较满意之作,是加密的。敬请谅解。本T+0分时主图名称为【操盘助手】 可以和[资金进出]共同组成分时图版面,进行盯盘,操作时可参考日K线图研判,可进 行T+0操作,当指标中有两次以上显示卖或买就可以操作。朋友们也可以多观察几天熟悉 一下再操作。
本指标也可以编制成分时买卖预警
分时主图包含以下功能(指标中也有注释):
现价、支撑、压力、买卖提示,资金进出,机构买入力度,财务,板块。
主动买卖盘彩条形:左上为现手买数据;中间为买卖差(正值为红,负值为绿);右边为现手 卖数据。
主动买卖盘是显示多空的重要指标,主动买卖盘多则多方占优势。
{分时主图}
MA30: = EMA(CLOSE,30);
强弱:EMA(CLOSEZ900)
STICKLINE((MA30> 强弱),MA30,强弱,0.8zO)zCOLORRED;
STICKLINE((MA30< 强弱),MA30,强弱,0.8,0),COLORGREEN;
H1: = MAX(D YN AINFO(3)ZDYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1=H1-L1;
阻力:L1+P1*7/8,COLORLIGREEN;
支撐:L1+P1*0.5/8,COLORLIMAGENTA;
中:(支椁+阻力)/2ZCOLORWHITE,POINTDOT;
均价:SUM(V*C,0)/SU M(V,0),COLORYELLOW,DOTLINE;
现价:CLOSE,COLORWHITE INETHICK2;
DRAWTEXT( IS3STBAR AND 现价,现价,STRCAT('-CON2STR(现价,2))),COLORYELLOW;
{DRAWNUMBER(CURRBARSCOUNT=1,现价,现价),COLORYELLOW;}
天天报价网STICKLINE(CROSS(支撑,现价),支撑冲,1,0),COLORCCOOFF;
STICKLINE(CROSS(现价,阻力),阻力,中,1,0)ZCOLOR33FF33
DRAWTEXT(LONGCROSS(支撑,现价,2),支撐*1.001,★买)COLORFF66FF ;{吸}
DRAWTEXT(LONGCROSS(现价,阻力,2),阻力 *0.999 ☆卖)COLOR66FF33;{抛};
底买:STICKLINE(C v 支撐,支撐,C,2,0),COLORRED;
STICKLINE(CROSS(支撑,现价),支撑,(支撐冲)/5+支撑,2,0),COLORYELLOW;
DRAWTEXT(CROSS(支撑,现价),(支撑冲)/5+支撑,底COLORYELLOW;
STICKLINE(CROSS(现价,阻力),阻力,阻力■(支撑-^)/5,2,0),COLORLIRED; DRAWTEXT(CROSS(现价,阻力),阻力■(支撑冲)/5,'),COLORLIRED; DRAWTEXT(CURRBARSC0UNT=8,阻力+0.003,顶)COLOR
GREEN,LINETHICK1; DRAWTEXT(CURRBARSC0UNT=8,支撑-0.003'),COLORLIRED,LINETHICK1; DRAWTEXT(CURRBARSCOUNT=8,(支撐+阻力)/2,COLORWHITE INETHICK1;
{成交数据}
成交额=V*C/100ZNODRAW;{万元}
A2:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE」)))),成交额,0)),0);
A3:=SUM((IF(((成交额/8>20) AND (CLOSEv(REF(CLOSE」)))),成交额,0)),0); A6:=(A2+A3);
A7:=IF((ISLASTBAR)z((100*A2)/A6)z0);
A8:=IF((ISLASTBAR)z((100*A3)/A6)z0);
DD1: = 1;
AAAI: =STRCAT(STRCAT(* 机构买',CON2STR(( 100*A2)/A6,0)),' %');
AAA2: =STRCAT(STRCAT(* 机构卖 XON2STR((100*A3)/A6,0)),'%‘)
AAA3: =STRCAT(STRCAT('机构总买入,ZCON2STR((100*(A2-A3))/A6Z0))%');
A000:=DRAWTEXT_FIX(DDl = l,0,0.02,0,AAAl)zCOLORRED;
A001:=DRAWTEXT_FIX(DDl=l,0,0.13,0,AAA2)zCOLOR00FF00; {DRAWTEXT_FIX(DDl = l,0,0.15,0,AAAl)zCOLOR00FFFF;
DRAWTEXT_FIX(DDl = l,0,0.20z0,AAA2),COLOR00FFFF;}
DRAWTEXT_FIX(DDl = lzO,88,l,0,AAA3),COLOROOFFFF;
现手买:BUYVOL*DYNAINFO(7)*100/10000 COLOROOOOFF,NODRAW;
现手卖:SELLVOL*DYNAINFO(7)*100/10000 COLOROOFFOO,NODRAW;
:=ABS(现手买)+ABS(现手卖兀 OLOR80FFFF,NODRAW;
:=ABS(现手买)-ABS(现手卖兀 OLOR80FFFF,NODRAW;
MPB1:=ABS(现手买)/合 *100;
MPB2:=ABS(现手卖)/ 合 *100;
TESTSKIP(NOT(现手买 OR 现手卖 OR OR OR MPB1 OR MPB2)!=0);
{绿框卖}
DRAWRECTREL(595,1000,795,940,RGB(0,128,0));
DRAWRECTREL(595,995,795,945,RGB(0,148,0));
DRAWRECTREL(595,990,795,950,RGB(0,168,0));
DRAWRECTREL(595,985,795,955zRGB(0,188,0));
DRAWRECTREL(595,980z795,960zRGB(0,208,0));
DRAWRECTREL(595,975,795,965,RGB(0,228,0)); DRAWRECTREL(595,970z795,970zRGB(0,248,0));
{红框买}
DRAWRECTREL(595,1000,595+现手买 *210/^,940,RGB(128,0,0));
DRAWRECTREL(595,995,595+现手买 *210/,945,RGB(148,0,0));
DRAWRECTREL(595,990,5954-现手买 *210/,950,RGB(168,0,0));
DRAWRECTREL(595,985,595+现手买 *210/,955,RGB(188,0,0));
DRAWRECTREL(595,980,5954-现手买 *210/,960,RGB(208,0,0));
DRAWRECTREL(595,975,595+现手买 *210/,965,RGB(228,0,0));
DRAWRECTREL(595,970,595+现手买 *210/,970,RGB(248O0));
DRAWRECTREL(595+现手买 *210/,940,595+现手买 *210/ ,1000,RGB(128Q0));
DRAWRECTREL(795,940,795,1000,RGB(0,0.0,10));
DRAWRECTREL(594.8,939.8,594.8,1000,RGB(0z0,10))
DRAWRECTREL(594.8,939.8z594.8z939.8zRGB(0,0,10))
DRAWRECTREL(594.8,1000,594.8,1000,RGB(0,0,10));
DRAWTEXT_FIX(l,054,089QSTRCAT(STRCAT(蔦 CON2STR(现手买,1))7J ')),COLOROOOOFF;
DRAWTEXT_FIX(l,0785,0.89OSTRCAT(STRCAT(:CON2STR(现手卖,1))/7? ')),COLOROOFFOO;
DRAWTEXT_FIX(CURRBARSCOUNT= 1 AND(差)>0Q65,0.89OSTRCAT(‘ ',STRCAT(CON2STR(,1),万)))COLOROOOOFF;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(差)v0,065,0.89OSTRCAT(‘
',STRCAT(CON2STR(J),万)))COLOROOFFOO;
DRAWTEXT_FIX(CURRBARSCOUNT= 1 AND()=0Q65,0.89OSTRCAT(‘ ',STRCAT(CON2STR(J),万)))COLOR80FFFF;
DRAWTEXT_FIX(lz0.8,0.98,0,STRCAT(STRCATC ',CON2STR(MPB2Z1)),'% ')),COLOROOFFOO;
DRAWTEXT_FIX(l,054,098OSTRCAT(STRCAT(蔦 CON2STR(MPB1」)),%
')),COLOROOOOFF;
市盈率:=STRCATC市盈率:CON2STR(C/FINANCE(33),2));
市销率=STRCATC 市销率:\CON2STR(C/(FINANCE(20)/FINANCE(1)),2));
市净率:=STRCAT(* 市净率:',CON2STR(C/FINANCE(34),2));
净资收益率=STRCAT(* 净资收益率:,,CON2STR(FINANCE(33)/FINANCE(34)*100,2)); 毛利率:=STRCAT(*毛利率: