换手率战法副图指标 源码 通达信 附图

 正能量:VOL,VOLSTICK,COLORRED;
负能量:-VOL,VOLSTICK,COLORCYAN;

年换手:SUM(VOL,YEAR)*100/CAPITAL,NODRAW;
月换手:SUM(VOL,MONTH)*100/CAPITAL,NODRAW;
周换手:SUM(VOL,WEEKDAY)*100/CAPITAL,NODRAW;
日换手:IF((SETCODE==0||SETCODE==1),100*VOL,VOL)/(FINANCE(7)/100),NODRAW;
多头换手:SUM(ACTINVOL,1)*100/CAPITAL,NODRAW,COLORYELLOW;
空头换手:SUM(ACTOUTVOL,1)*100/CAPITAL,NODRAW,COLORGREEN;

五十换手:SUM(VOL,50)*100/CAPITAL,NODRAW;
百日换手:SUM(VOL,100)*100/CAPITAL,NODRAW;

 {年月日星期}
DA:=YEAR AND MONTH AND DAY;
 AA1:=STRCAT(CON2STR(YEAR,0),'年');
AA2:=STRCAT(CON2STR(MONTH,0),'月');
AA3:=STRCAT(CON2STR(DAY,0),'日');
AA4:=STRCAT('【',IF(WEEKDAY=1,'星期一',IF(WEEKDAY=2,'星期二',
IF(WEEKDAY=3,'星期三',IF(WEEKDAY=4,'星期四',IF
 (WEEKDAY=5,'星期五',IF(WEEKDAY=6,'星期六','星期日')))))));
AA:=STRCAT(STRCAT(STRCAT(AA1,AA2),STRCAT(AA3,AA4)),'】');
DRAWTEXT_FIX(DA,0.88,0.991,0,AA),COLORWHITE;

 SAT:=(DVOL/DCLOSE)/(HHV(DVOL,20)/HHV(DCLOSE,20));
当期量能饱和:=(IF(SAT>1,1,SAT)*100);
 DRAWTEXT_FIX(1,0.991,0.001,1,STRCAT(STRCAT('当期量能饱和： ',CON2STR(当期量能饱和,2)),'％')),COLORRED;

 DRAWTEXT_FIX(ISLASTBAR=1,0.0100,0,0,STKNAME), COLOR0000FF;
 DRAWTEXT_FIX(ISLASTBAR=1,0.0880,0,0,CODE),COLORWHITE;

ASDF:=STRCAT(STRCAT('当前获利盘比例: ',CON2STR(WINNER(CLOSE)*100,2)),'％');
DRAWTEXT_FIX(ISLASTBAR,0.300,0.010,0,ASDF),COLORWHITE;
 {ASDF1:=STRCAT(STRCAT('昨日获利盘比例: ',CON2STR(WINNER(REF(CLOSE,1))*100,2)),'％');}
 {DRAWTEXT_FIX(ISLASTBAR,0.700,0.010,0,ASDF1),COLORYELLOW;}

LC:=REF(CLOSE,1);
 WRSI:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;
 WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;
活跃:=(WRSI-WR10);
活跃度比:=IF(活跃>=0,(活跃+100)/2,100-ABS((活跃-100)/2));
 DRAWTEXT_FIX(1,0.707,0.01,1,STRCAT(STRCAT('活跃度比： ',CON2STR(活跃度比,2)),'％')),COLORCYAN;

毛利比率:=(HHV(H,0)-LLV(L,0))/LLV(L,0)*100*0.44,NODRAW,COLORYELLOW;
 DRAWTEXT_FIX(1,0.82800,0.01,1,STRCAT(STRCAT('毛利比率： ',CON2STR(毛利比率,2)),'％')),COLORYE