双向换手率集成所属板块F10财务通达信公式 副图 源码附图

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)),'％')),COLORYELLOW;

 

A111:=FINANCE(42);

A211:=DATETODAY(CONST(DATE));

A311:=A211-A111;

XDATE:=DAYTODATE(A311)+19000000;

上市日期:=STRCAT(' 上市日期: ',CON2STR(XDATE,0));

DRAWTEXT_FIX(ISLASTBAR,0.45,0,0,上市日期),COLORMAGENTA;

SSTS1:=STRCAT('上市',CON2STR(FINANCE(42),0));

SSTS2:=STRCAT(SSTS1,'天');

{DRAWTEXT_FIX(CURRBARSCOUNT=1,0.618,0.0,0,SSTS2),COLORCYAN;}

SSTS3:=STRCAT('累计交易：',CON2STR(TOTALBARSCOUNT,0));

SSTS4:=STRCAT(SSTS3,'周期');

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.168,0.001,0,SSTS4),COLORLIMAGENTA;

 

{涨停统计}

W11:=EMA(C,1);

涨停:=W11/REF(W11,1)>=1.095;

ZTCS:=COUNT(涨停,BARSSINCE(涨停)+1);

 

NTZZT1:=STRCAT('　 距今',CON2STR(CONST(BARSLAST(涨停)),0));

NTZZT2:=STRCAT(NTZZT1,'天有涨停');

GZT1:=STRCAT('　 共涨停',CON2STR(ZTCS,0));GZT2:=STRCAT(GZT1,'次');

ZTTJ1:=STRCAT(SSTS2,GZT2);

ZTTJ2:=STRCAT(ZTTJ1,NTZZT2);ZTTJ:=STRCAT('【涨停统计】',ZTTJ2);

DRAWTEXT_FIX(CURRBARSCOUNT=1,0.618,0.99,0,ZTTJ),COLORCYAN;

 

 

Z1:=STRCAT(HYBLOCK,' ');

Z2:=STRCAT(Z1,FGBLOCK);

Z3:=STRCAT(Z2,DYBLOCK);

Z4:=STRCAT(Z3,' ');

HSL11:=V/CAPITAL*100; 

DRAWNUMBER(CURRBARSCOUNT=1 AND HSL11,L,HSL11),COLOR00FFFF;

DRAWTEXT_FIX(ISLASTBAR,0.00,0.991,0,STRCAT(Z4,GNBLOCK)),COLORGREEN;

DRAWTEXT_FIX(1,0.500,0.991,0,STRCAT('【自定板块】：',ZDBLOCK)),COLORYELLOW;

{股票指标网  整理}

原理解析：
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)),'】')
当满足条件DA时,在横轴0.88纵轴0.991位置书写文字
 
 
SAT赋值:(D成交量/D收盘价)/(20日内D成交量最高值/20日内D收盘价最高值)
如果SAT>1返回1否则返回SAT
DRAWTEXT_FIX(1,0.991,0.001,1,STRCAT(STRCAT('当期量能饱和： ',CON2STR(当期量能饱和,2)),'％')),画红色
当满足条件ISLASTBAR=1时,在横轴0.0100纵轴0位置书写文字
当满足条件ISLASTBAR=1时,在横轴0.0880纵轴0位置书写文字
 
ASDF:=STRCAT(STRCAT('当前获利盘比例: ',CON2STR(收盘价计算的获利盘比例*100,2)),'％')
当满足条件ISLASTBAR时,在横轴0.300纵轴0.010位置书写文字
{ASDF1:=STRCAT(STRCAT('昨日获利盘比例: ',CON2STR(1日前的收盘价计算的获利盘比例*100,2)),'％')
当满足条件ISLASTBAR时,在横轴0.700纵轴0.010位置书写文字
}
 
LC赋值:1日前的收盘价
WRSI赋值:SMA(收盘价-LC和0较大值,5,1)/SMA(收盘价-LC的绝对值,5,1)*100
WR10赋值:(3日内最高价最高值-收盘价)/(3日内最高价最高值-3日内最低价最低值)*100
活跃赋值:(WRSI-WR10)
活跃度比:=IF(活跃>=0,(活跃+100)/2,100-(活跃-100的绝对值/2))
DRAWTEXT_FIX(1,0.707,0.01,1,STRCAT(STRCAT('活跃度比： ',CON2STR(活跃度比,2)),'％')),画青色
 
毛利比率赋值:(0日内H最高值-0日内L最低值)/0日内L最低值*100*0.44,NODRAW,画黄色
DRAWTEXT_FIX(1,0.82800,0.01,1,STRCAT(STRCAT('毛利比率： ',CON2STR(毛利比率,2)),'％')),画黄色
 
A111赋值:FINANCE(42)
A211赋值:DATETODAY(CONST(DATE))
A311赋值:A211-A111
XDATE:=DAYTODATE(A311)+19000000
上市日期:=STRCAT(' 上市日期: ',CON2STR(XDATE,0))
当满足条件ISLASTBAR时,在横轴0.45纵轴0位置书写文字
SSTS1赋值:STRCAT('上市',CON2STR(FINANCE(42),0))
SSTS2赋值:STRCAT(SSTS1,'天')
当满足条件 到最后交易的周期=1时,在横轴0.618纵轴0.0位置书写文字
}
SSTS3赋值:STRCAT('累计交易：',CON2STR(TOTALBARSCOUNT,0))
SSTS4赋值:STRCAT(SSTS3,'周期')
当满足条件 到最后交易的周期=1时,在横轴0.168纵轴0.001位置书写文字
 
{涨停统计}
W11赋值:C的1日指数移动平均
涨停赋值:W11/1日前的W11>=1.095
ZTCS赋值:COUNT(涨停,BARSSINCE(涨停)+1)
 
NTZZT1赋值:STRCAT('　 距今',CON2STR(CONST(上次涨停距今天数),0))
NTZZT2赋值:STRCAT(NTZZT1,'天有涨停')
GZT1赋值:STRCAT('　 共涨停',CON2STR(ZTCS,0))
GZT2赋值:STRCAT(GZT1,'次')
ZTTJ1赋值:STRCAT(SSTS2,GZT2)
ZTTJ2赋值:STRCAT(ZTTJ1,NTZZT2)
ZTTJ赋值:STRCAT('【涨停统计】',ZTTJ2)
当满足条件 到最后交易的周期=1时,在横轴0.618纵轴0.99位置书写文字
 
 
Z1赋值:STRCAT(HYBLOCK,' ')
Z2赋值:STRCAT(Z1,FGBLOCK)
Z3赋值:STRCAT(Z2,DYBLOCK)
Z4赋值:STRCAT(Z3,' ')
HSL11赋值:V/当前流通股本*100
 
DRAWNUMBER( 到最后交易的周期=1 AND HSL11,L,HSL11),COLOR00FFFF
DRAWTEXT_FIX(ISLASTBAR,0.00,0.991,0,STRCAT(Z4,GNBLOCK)),画绿色
DRAWTEXT_FIX(1,0.500,0.991,0,STRCAT('【自定板块】：',ZDBLOCK)),画黄色
{股票指标网 整理}