大智慧公式源码 大智慧主图显示换手率和板块的公式源码:

  {参数设置 年:最小1990,最大3000,缺省年2014 月:1,12,1 (缺省月7)日:1,31,1(缺省日17)}

  时间:=(年-1900)*10000+月*100+日;

  DRAWTEXT(BARSLAST(DATE》=时间),L*0.94,‘换手起点’),COLORRED;

  DRAWICON(BARSLAST(DATE》=时间),L*0.98,1);

  HSL:100*VOL/(capital),linethick0;

  上市日期:(FINANCE2(2)-19000000),linethick0;

  {天数:BARSLAST(DATE《=1140101);

  累积换手:=SUM(HSL,5);}

  HS100:IF(DATE》=时间,SUM(HSL,if(上市日期《=时间,BARSLAST(DATE《=时间),0))》=100,0),linethick0;

  HS200:IF(DATE》=时间,SUM(HSL,if(上市日期《=时间,BARSLAST(DATE《=时间),0))》=200,0),linethick0;

  HS300:IF(DATE》=时间,SUM(HSL,if(上市日期《=时间,BARSLAST(DATE《=时间),0))》=300,0),linethick0;

  HS400:IF(DATE》=时间,SUM(HSL,if(上市日期《=时间,BARSLAST(DATE《=时间),0))》=400,0),linethick0;

  HS500:IF(DATE》=时间,SUM(HSL,if(上市日期《=时间,BARSLAST(DATE《=时间),0))》=500,0),linethick0;

  HS600:IF(DATE》=时间,SUM(HSL,if(上市日期《=时间,BARSLAST(DATE《=时间),0))》=600,0),linethick0;

  HS700:IF(DATE》=时间,SUM(HSL,if(上市日期《=时间,BARSLAST(DATE《=时间),0))》=700,0),linethick0;

  HS800:IF(DATE》=时间,SUM(HSL,if(上市日期《=时间,BARSLAST(DATE《=时间),0))》=800,0),linethick0;

  HS900:IF(DATE》=时间,SUM(HSL,if(上市日期《=时间,BARSLAST(DATE《=时间),0))》=900,0),linethick0;

  HS1000:IF(DATE》=时间,SUM(HSL,if(上市日期《=时间,BARSLAST(DATE《=时间),0))》=1000,0),linethick0;

  DRAWTEXT(CROSS(HS100,0.99),L*0.94,‘换100’),COLORYELLOW;

  DRAWICON(CROSS(HS100,0.99),L*0.98,1);

  DRAWTEXT(CROSS(HS200,0.99),L*0.94,‘换200’),COLORGREEN;

  DRAWICON(CROSS(HS200,0.99),L*0.98,1);

  DRAWTEXT(CROSS(HS300,0.99),L*0.94,‘换300’),COLORWHITE;

  DRAWICON(CROSS(HS300,0.99),L*0.98,1);

  DRAWTEXT(CROSS(HS400,0.99),L*0.97,‘换400’),COLORWHITE;

  DRAWTEXT(CROSS(HS500,0.99),L*0.97,‘换500’),COLORWHITE;

  DRAWTEXT(CROSS(HS600,0.99),L*0.97,‘换600’),COLORWHITE;

  DRAWTEXT(CROSS(HS700,0.99),L*0.97,‘换700’),COLORWHITE;

  DRAWTEXT(CROSS(HS800,0.99),L*0.97,‘换800’),COLORWHITE;

  DRAWTEXT(CROSS(HS900,0.99),L*0.97,‘换900’),COLORWHITE;

  DRAWTEXT(CROSS(HS1000,0.99),L*0.97,‘换1000’),COLORWHITE;

  X1:=STRFIND(BKNAME,‘自选股,’,1); x2:=STRFIND(BKNAME,‘自选股1底部,’,1);

  x3:=STRFIND(BKNAME,‘自选股2平台,’,1); x4:=STRFIND(BKNAME,‘自选股A绩优,’,1);

  x5:=STRFIND(BKNAME,‘自选股B绩优增仓,’,1);

  x:=max(1,x1,x2,x3,x4,x5);

  x1:= if(x=x1,7,if(x=x2 or x=x3 or x=x4,12,if(x=x5,16,0)));

  {BK1:=STRMID(BKNAME,x+x1,8); X6:=if(STRFIND(BK1,‘,’,1)《》0,STRFIND(BK1,‘,’,1),9);

  BK:=STRMID(BKNAME,x+x1,x6-1);}

  BK:=STRMID(BKNAME,x+x1,200);

  DRAWTEXTABS(0,10,‘板块名称:’+BK),Color9DFFFF;

  UploadPic/2015-3/201532923543763161.jpg

  UploadPic/2015-3/201532923544441960.jpg