通达信区间成本主图选股指标公式源码

通达信区间成本主图选股指标公式源码

源码正文：

起点:=1;终点:=100{XG51};
AA:=起点{XG51};
BB:=终点{XG51};
cyc:=IF(CAPITAL=0,(SUM(C,AA)-SUM(C,BB))/(AA-BB),(SUM(AMOUNT,AA)-SUM(AMOUNT,BB))/(SUM(vol,AA)-SUM(VOL,BB))/100){XG51};
区间成本:CONst(CYC),NODRAW{XG51};
区间换手:(SUM(VOL,AA)-SUM(VOL,BB))/CAPITAL*100,NODRAW{XG51};
计算周期:AA-BB,NODRAW{XG51};
HH:=REFDATE(HHV(H,起点),DATE){XG51};
LL:=REFDATE(LLV(L,起点),DATE){XG51};
N1:=IF(PERIOD=7,1.05,IF(PERIOD=6,1.02,1.01)){XG51};
N2:=IF(PERIOD=7,0.95,IF(PERIOD=6,0.98,0.99)){XG51};
STICKLINE(CURRBARSCOUNT<=终点,区间成本*N1,区间成本*N2,5,0),COLOR808080{XG51};
STICKLINE(CURRBARSCOUNT<=终点,区间成本,区间成本,5,0),COLORRED{XG51};
STICKLINE(CURRBARSCOUNT=起点,HH,LL,0,-1),COLORBLUE{XG51};
STICKLINE(CURRBARSCOUNT=终点,HH,LL,0,-1),COLORBLUE{XG51};
DRAWTEXT(CURRBARSCOUNT=起点,LL,'起点'),COLORRED{XG51};
DRAWTEXT(CURRBARSCOUNT=终点,LL,'终点'),COLORRED{XG51};
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);

{X^G_5~1^C^N^{}