相關標簽:

 

{以下是大智慧主圖顯示換手率和所屬板塊的指標公式源碼}{參數設置 年:最小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;
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://m.kzuj.com.cn',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指標公式');