主动买盘:IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),NODRAW;
主动卖盘:IF(CLOSE>OPEN,AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,AA*(HIGH-LOW),VOL/2)),NODRAW;
{ 天顺人和分时主图 源码}
{改绿背景 放最上面}
DRAWGBK(C>0, RGB(10,10,10),RGB(38,90,0),0,'11',0);
{基本面}
净资收益率:=(FINANCE(33)/FINANCE(34)*100);
主营利润率:=(FINANCE(23)/FINANCE(20)*100);
主营业增长率:=FINANCE(44);
净利润增长率:=FINANCE(43);
每股收益:=CONST(FINANCE(38));
每股净资产:=CONST(FINANCE(34));
每股未分配:=CONST(FINANCE(32));
每股公积金:=CONST(FINANCE(18));
A股流通:=FINANCE(7)/100000000;
市盈率:=DYNAINFO(39);
换手率:=VOL/CAPITAL*100;
量比:=DYNAINFO(17);
ER1:=净资收益率>3;
ER12:=净资收益率<3 AND 净资收益率>1;
ER2:=主营利润率>5;
ER22:=主营利润率>1;
ER4:=主营业增长率>5;
ER42:=主营业增长率>1;
ER5:=净利润增长率>5;
ER52:=净利润增长率>0.5;
SAX1:=每股收益>0.01;
SAX12:= 每股收益>0.002;
SAX2:=每股净资产>2;
SAX22:=每股净资产>0.2;
SAX4:=每股未分配>0.5;
SAX42:=每股未分配>0.01;
SAX5:=每股公积金>0.5;
SAX52:=每股公积金>0.05;
DP2:=A股流通<20;
DP22:=A股流通<5000;
DP3:=市盈率<200;
DP32:=市盈率<5000;
DP4:=换手率>1;
DP42:=换手率>0.5;
WMF1:=量比>0.8;
WMF12:=量比>0.5;
优秀:=ER1 AND ER2 AND ER4 AND ER5 AND SAX1 AND SAX2 AND SAX4 AND SAX5 AND DP2 AND DP3 AND DP4 AND WMF1;
较好:=ER12 AND ER22 AND ER42 AND ER52 AND SAX12 AND SAX22 AND SAX42 AND SAX52 AND DP22 AND DP32 AND DP42 AND WMF12;
DRAWTEXT_FIX(优秀,0.5,0.01,0,'基本面:优秀级!'),COLORRED;
DRAWTEXT_FIX(较好,0.5,0.05,0,'基本面:较好!'),COLORMAGENTA;
FX:=IF(C>REF(C,1),1,IF(C<REF(C,1),-1,0));
TT:=BARSLAST(HOUR=9 AND MINUTE=31 AND V>0)+1 ;
昨收:=引用个股.昨日收盘#DAY;
最高价:=CONST(HHV((C/昨收-1)*100,TT));
最低价:=CONST(LLV((C/昨收-1)*100,TT));
单位:=CONST((最高价-最低价)/40);
多方:=SUM(IF(FX=1,V,0),TT)/SUM(V,TT)*100;
空方:=SUM(IF(FX=-1,V,0),TT)/SUM(V,TT)*100;
平衡:=SUM(IF(FX=0,V,0),TT)/SUM(V,TT)*100;
DRAWTEXT_FIX(1,0.15,0,0,STRCAT(STRCAT(STRCAT('多方:',CON2STR(多方,1)),
STRCAT('平衡:',CON2STR(平衡,1))),STRCAT('空方:',CON2STR(空方,1)))),COLORYELLOW;
DRAWTEXT_FIX(1,0,0,0,STRCAT('最小单位:',CON2STR(单位,3))),COLORLIGRAY;
{当前量}
DRAWTEXT_FIX(ISLASTBAR,0.28,0.05,0,'当前量: '),COLORCYAN;
DRAWNUMBER_FIX(ISLASTBAR,0.328,0.05,0.5,V/10000)COLORYELLOW;
{涨跌提示}
ZSTJJ,COLORYELLOW,LINETHICK2;
最新:CLOSE,LINETHICK2,COLORWHITE;
DRAWTEXT( ISLASTBAR AND 最新>REF(最新,1),最新,STRCAT(' 涨',CON2STR(最新,2))),COLOR0000FF;
DRAWTEXT( ISLASTBAR AND 最新<REF(最新,1),最新,STRCAT(' 跌',CON2STR(最新,2))),COLOR00FF00;
MA5:="分时引用.MA5#DAY";
DRAWTEXT(FILTER(CROSS(MA5,C),10),L,'↑破5'),COLORGREEN;
DRAWTEXT(FILTER(CROSS(C,MA5),10),L,'↑上5'),COLORMAGENTA;
{显示自定义板块}
DRAWTEXT_FIX(1,0.08,0.98,0,ZDBLOCK),COLORRED;
{大盘}
AAAB1:=STRCAT('沪深总上涨:',CON2STR(DYNAINFO(60),0));
AAAB2:=STRCAT('沪深总下跌:',CON2STR(DYNAINFO(61),0));
DRAWTEXT_FIX(ISLASTBAR,0.8,0,0,AAAB1),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.9,0,0,AAAB2),COLORGREEN;
流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿');
DRAWTEXT_FIX(ISLASTBAR,0.58,0.02,0,流通盘),COLORGREEN;
关键点:"分时引用.关键点位#DAY",COLORWHITE;
{顶底预判}
HH:=MAX(DYNAINFO(3),DYNAINFO(5));
LL:=MIN(DYNAINFO(3),DYNAINFO(6));
PP:=HH-LL;阻力:LL+PP*7/8,COLOR00DD00;
支撑:LL+PP*0.5/8,COLORLIGREEN;
现价:CLOSE,COLORWHITE,LINETHICK2;
XG:LONGCROSS(支撑,现价,2),NODRAW;
STICKLINE(CROSS(支撑,现价),支撑,(支撑+阻力)/2,2,0),COLORRED;
STICKLINE(CROSS(现价,阻力),阻力,(支撑+阻力)/2,2,0),COLORGREEN;
DRAWTEXT(LONGCROSS(支撑,现价,2),支撑*1.001,'★吸'),LINETHICK2,,COLORYELLOW;
DRAWTEXT(LONGCROSS(现价,阻力,2),现价,'★抛'),LINETHICK2,COLORRED;
{分时显示}
DQL:="分时引用.当前量#DAY";
MHST:="分时引用.HST#DAY";
QHST:="分时引用.HST2#DAY";
DRAW