通达信趋势顶底彩带主图+量副图公式源码

DRAWBAND(MA(CLOSE,5),RGB(200,150,200),MA(CLOSE,10),RGB(83,123,68));
DRAWKLINE(H,O,L,C);
狼上轨:REF(HHV(H,21),1),COLORGRAY;
中轨:REF((HHV(H,63)+LLV(L,63))/2,1),COLORYELLOW;
狼下轨:REF(LLV(L,126),1),COLORRED;
顶:=HHV(H,21);
底:=LLV(L,126);
H19:=底+(顶-底)*0.618;
H中:=底+(顶-底)*0.5;
H61:=底+(顶-底)*1.236;
起点H80:=底+(顶-底)*0.382;
【底】:REFDATE(底,DATE),COLORRED;
【0.618】:REFDATE(H19,DATE),COLORGREEN,POINTDOT;
【0.5】:REFDATE(H中,DATE),COLORWHITE,POINTDOT;
【1.236】:REFDATE(H61,DATE),COLORLIRED,POINTDOT;
【0.382】:REFDATE(起点H80,DATE),COLORBLUE;
【顶】:REFDATE(顶,DATE),COLORGREEN;
DRAWNUMBER(ISLASTBAR ,起点H80,起点H80),COLORRED;
{设置参数:N,1,100,10}
T1:=CONST(LLVBARS(LOW,10));
T1HIGH:=CONST(REF(HIGH,T1));
CC:=CONST(CURRBARSCOUNT);
T2:=CONST(BARSLAST(CURRBARSCOUNT>CC+T1 AND H>T1HIGH));
T2HIGH:=CONST(REF(HIGH,T2));
T3:=CONST(BARSLAST(CURRBARSCOUNT>CC+T2 AND HIGH>T2HIGH));
T3HIGH:=CONST(REF(HIGH,T3));
猎击线:DRAWLINE(CURRBARSCOUNT=T3+1, T3HIGH, ISLASTBAR, T3HIGH, 1),LINETHICK2,COLOR0000FF;
DRAWTEXT(ISLASTBAR, T3HIGH, '猎击线')LINETHICK1,COLOR0000FF;
AABB:=CROSS(MA(C,3),MA(C,8)) AND MA(C,8)>REF(MA(C,8),1) ;
STICKLINE(AABB AND PERIOD>4,L,L*0.990,6,0),COLORRED;
AA:=起点;
BB:=终点;
CYC:=IF(C>900,(SUM(C,AA)-SUM(C,BB))/(AA-BB),(SUM(AMOUNT,AA)-SUM(AMOUNT,BB))/(SUM(VOL,AA)-SUM(VOL,BB))/100);
区间成本:CONST(CYC),NODRAW;
区间换手:(SUM(VOL,AA)-SUM(VOL,BB))/CAPITAL*100,NODRAW;
计算周期:AA-BB,NODRAW;
HH:=REFDATE(HHV(H,起点),DATE);
LL:=REFDATE(LLV(L,起点),DATE);
N1:=IF(PERIOD=7,1.05,IF(PERIOD=6,1.02,1.01));
N2:=IF(PERIOD=7,0.95,IF(PERIOD=6,0.98,0.99));
STICKLINE(CURRBARSCOUNT<=终点,区间成本*N1,区间成本*N2,5,0),COLOR808080;
STICKLINE(CURRBARSCOUNT<=终点,区间成本,区间成本,5,0),COLORWHITE;
STICKLINE(CURRBARSCOUNT=起点,HH,LL,0,-1),COLORYELLOW;
STICKLINE(CURRBARSCOUNT=终点,HH,LL,0,-1),COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=起点,LL,'起点'),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=终点,LL,'终点'),COLORWHITE;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
高区:IF(CURRBARSCOUNT<=60, CONST(IF(ISLASTBAR=1,HHV