|
首先引用公式是：
{FSYY}
T1:REF(MA(V,5),1);
HS:V/CAPITAL*100;
HST:REF(V/CAPITAL*100,1);
HST2:REF(V/CAPITAL*100,2);
李哥分时，
参数N,缺省5
XX:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE));
主力:=EXPMA(CLOSE/XX,20);大户:=EXPMA(CLOSE/XX,60);散户:=EXPMA(CLOSE/XX,120);
底:=1;1.02,NODRAW;高:=1.03;
AA:=主力>大户 AND 主力>1.003 AND 大户>散户 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60);
DRAWICON(主力>大户 AND 大户>散户 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60) AND 主力=HHV(主力,30) AND CROSS(主力,1.003),C,42);
DRAWTEXT(主力>大户 AND 大户>散户 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60) AND 主力=HHV(主力,30) AND CROSS(主力,1.003),C*0.999,'-庄家来了'),COLORFFFF00;
DRAWICON(CROSS(主力,1.02),C,14);
XG:HHV(H,480),DOTLINE,COLORRED;
星期:=WEEKDAY,NODRAW;
日1:=DATETODAY(DATE);
上市日:=REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT);
自然日:=日1-DATETODAY(上市日)+1;
ZB:=(自然日-REF(自然日,1))!=星期-REF(星期,1)OR TOTALBARSCOUNT-CURRBARSCOUNT=0;
本周第几天:=BARSLAST(ZB)+1;
MA1:=REF(C,本周第几天);
MA2:=REF(MA1,本周第几天);
MA3:=REF(MA2,本周第几天);
MA4:=REF(MA3,本周第几天);
MA5:=REF(MA4,本周第几天);
MA6:=REF(MA5,本周第几天);
MA7:=REF(MA6,本周第几天);
MA8:=REF(MA7,本周第几天);
MA9:=REF(MA8,本周第几天);
十周价:=(C+MA1+MA2+MA3+MA4+MA5+MA6+MA7+MA8+MA9)/10;
决策:REFDATE(十周价,DATE),COLOREE8FFF,LINETHICK2;
DRAWTEXT(ISLASTBAR,决策,' 决策线'),COLOR5B5BFF;
SUM(AMOUNT,0)/SUM(VOL,0)/100 ,LINETHICK1,COLORYELLOW;
DRAWICON(CROSS(C,决策),C,1);
D11:=YEAR AND MONTH AND DAY;
MM1:=STRCAT(CON2STR(YEAR,0),'年');
MM2:=STRCAT(CON2STR(MONTH,0),'月');
MM3:=STRCAT(CON2STR(DAY,0),'日');
MM4:=STRCAT('【',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',IF(WEEKDAY=6,'六','日')))))));
MM:=STRCAT(STRCAT(STRCAT(MM1,MM2),STRCAT(MM3,MM4)),'】');
DRAWTEXT_FIX(D11,0,0.8.62,0,MM),COLOR5555FF;
股价支撑线:=MA(CLOSE,20),COLORGREEN;
底价线:股价支撑线-2*STD(CLOSE,20),COLOR5555FF,LINETHICK3;
实量:=SUM(VOL,FROMOPEN);
虚拟量:=实量/240*FROMOPEN;
SZB:=实量/10000;
XZB:=虚拟量/10000;
大单买:=SUM(IF(CLOSE>=REF(CLOSE,1) AND VOL*C/100/8>=25,VOL,0),FROMOPEN);
大单卖:=SUM(IF(CLOSE<REF(CLOSE,1) AND VOL*C/100/8>=25,VOL,0),FROMOPEN);
ZB1:=大单买/实量*100;
ZB2:=大单卖/实量*100;
DRAWRECTREL(919,CONST(100-ZB1)*1000/100,939,1000,RGB(200,50,0));
DRAWRECTREL(939,CONST(100-ZB2)*1000/100,959,1000,RGB(0,255,0));
DRAWTEXT_FIX(1,0.8,0.32,0,STRCAT(STRCAT('【大单买】',CON2STR(ZB1,2)),'％')),COLOR0032FF;
DRAWTEXT_FIX(1,0.8,0.42,0,STRCAT(STRCAT('【大单卖】',CON2STR(ZB2,2)),'％')),COLORGREEN;
小单买:=SUM(IF(CLOSE>=REF(CLOSE,1) AND VOL*C/100/8<25,VOL,0),FROMOPEN);
小单卖:=SUM(IF(CLOSE<REF(CLOSE,1) AND VOL*C/100/8<25,VOL,0),FROMOPEN);
ZB3:=小单买/实量*100;
ZB4:=小单卖/实量*100;
DRAWRECTREL(959,CONST(100-ZB3)*1000/100,979,1000,90);
DRAWRECTREL(979,CONST(100-ZB4)*1000/100,999,1000,RGB(100,100,100));
DRAWTEXT_FIX(1,0.8,0.52,0,STRCAT(STRCAT('【小单买】',CON2STR(ZB3,2)),'％')),COLORYELLOW;
DRAWTEXT_FIX(1,0.8,0.62,0,STRCAT(STRCAT('【小单卖】',CON2STR(ZB4,2)),'％')),COLORYELLOW;
DRAWTEXT_FIX(1,0.31,0.6,0,STRCAT('均价:',CON2STR(SUM(V*C,0)/SUM(V,0),2))),COLORYELLOW;
M1Q:="FSYY.T1#DAY"/100;
MHS:="FSYY.HS#DAY";
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.22,0.85,0,STRCAT('量比: ',CON2STR(DYNAINFO(17),2))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.22,0.55,0,STRCAT('换手率: ',CON2STR(MHS,2))),COLORDDDDDD;
MHST:="FSYY.HST#DAY";
QHST:="FSYY.HST2#DAY";
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.22,0.65,0,STRCAT('昨天: ',CON2STR(MHST,2))),COLORMAGENTA;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.22,0.75,0,STRCAT('前天: ',CON2STR(QHST,2))),COLOR0080FF;
DRAWTEXT_FIX(1,0.45,0.25,0,STRCAT(STRCAT('竞价动能：',CON2STR(AA,2)),''))COLORFF9900;
开盘手数:=DYNAINFO(15)/DYNAINFO(4)/100;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND CLOSE,0.43,1,1,'开盘手数:'),COLOR00FF00;
DRAWNUMBER_FIX(CURRBARSCOUNT=1 AND CLOSE,0.43,1,0,开盘手数),COLOR5555FF;
DRAWTEXT_FIX(ISLASTBAR,0.5,0.05,0,CODE),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.55,0.05,0,STKNAME)COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.6,0.05,0,HYBLOCK),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.6,0,0,DYBLOCK),COLORCYAN;
今开:DYNAINFO(4),COLOR999900,LINETHICK3;
DRAWTEXT(CURRBARSCOUNT=8,今开,' 开盘线'),COLOR8500DE,LINETHICK2;
DRAWGBK(1,RGB(0,0,0),RGB(0,0,0),0,'019',0);
总股本:=STRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿');
流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿');
全流通:=STRCAT(' 全流通: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2));
市值:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿');
上市天数:=STRCAT(' 上市天数: ',CON2STR(FINANCE(42),0));
A:=DAYTODATE(DATETODAY(CONST(DATE))-FINANCE(42))+19000000;
上市日期:=STRCAT(' 上市日期: ',CON2STR(A,0));
股本市值:=STRCAT('股本市值: ',STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值),上市天数),上市日期));
DRAWTEXT_FIX(ISLASTBAR,0.005,0.90,0,股本市值),COLOREE8FFF;
DRAWTEXT_FIX(1,0,0,0,'地区：'),COLOR00FF00;
DRAWTEXT_FIX(1,0.05,0,0,DYBLOCK),COLOR00FF00;所属行业:
DRAWTEXT_FIX(1,0,0.08,0,'行业：'),COLOR00FF00;
DRAWTEXT_FIX(1,0.05,0.08,0,HYBLOCK),COLOR00FF00;所属概念:
DRAWTEXT_FIX(1,0,0.16,0,'概念：'),COLOR00FF00;
DRAWTEXT_FIX(1,0.05,0.16,0,GNBLOCK),COLOR00FF00;所属风格:
DRAWTEXT_FIX(1,0,0.24,0,'风格：'),COLOR00FF00;
DRAWTEXT_FIX(1,0.05,0.24,0,FGBLOCK),COLOR00FF00;
DRAWTEXT_FIX(1,0.05,0.28,0,STRCAT(' ',EXTERNSTR(0,1))),COLOR00FF00;
20218152164012897.png
|
