红绿趋势线通达信公式 副图 源码附图

来函数检测结果如下：
该公式没有未来函数

M:=26;

VARF:=100-3*SMA((CLOSE-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1),15,1);

VAR19:=100-3*SMA((OPEN-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1),15,1);

VAR20:=VARF<REF(VAR19,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);

大资金活动:IF(VAR20 AND COUNT(VAR20,30)=1,18,0),LINETHICK1,COLORRED;

STICKLINE(VAR20 AND COUNT(VAR20,30)=1,0,15,5,0),COLORRED;

DRAWTEXT(VAR20 AND COUNT(VAR20,30)=1,15,'大资金活动'),COLORRED;

VAR1:=(CLOSE*2+HIGH+LOW)/4*10;

VAR2:=EMA(VAR1,13)-EMA(VAR1,34);

VAR3:=EMA(VAR2,5);

VAR4:=2*(VAR2-VAR3)*5.5;

主力撤: IF(VAR4<=0,VAR4,0),COLORRED;

主力进: IF(VAR4>=0,VAR4,0),COLORGREEN;

VAR5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8;

VAR6:=EMA(3*VAR5-2*SMA(VAR5,18,1),5);

VAR7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10;

VAR8:=(INDEXC*2+INDEXH+INDEXL)/4;

VAR9:=EMA(VAR8,13)-EMA(VAR8,34);

VARA:=EMA(VAR9,3);

VARB:=(VAR9-VARA)/2;

大盘资金活动: IF(VARB>=0,VARB,0);

VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;

VAR10:=(HIGH+LOW+CLOSE)/3;

VAR11:=(VAR10-MA(VAR10,14))/(0.015*AVEDEV(VAR10,14));

VAR12:=(VAR10-MA(VAR10,70))/(0.015*AVEDEV(VAR10,70));

VAR13:=IF(VAR11>=150 AND VAR11<200 AND VAR12>=150 AND VAR12<200,10,0);

VAR14:=IF(VAR11<=-150 AND VAR11>-200 AND VAR12<=-150 AND VAR12>-200,-10,VAR13);

VAR15:=(CLOSE-MA(CLOSE,11))/MA(CLOSE,11)*100;

VAR16:=100-ABS(VAR15);

VAR17:=IF(VAR16<90,VAR16,100);

VAR1A:=IF(VARE>0,VARE,0);

VAR1B:=IF(VAR12>=200 AND VAR11>=150,15,IF(VAR12<=-200 AND VAR11<=-150,-15,VAR14))+60;

VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR17<100;

原理解析：
M赋值:26
VARF赋值:100-3*SMA((收盘价-65日内最低价最低值)/(80日内最高价最高值-65日内最低价最低值)*100,20,1)+2*SMA(SMA((收盘价-65日内最低价最低值)/(80日内最高价最高值-65日内最低价最低值)*100,20,1),15,1)
VAR19赋值:100-3*SMA((开盘价-65日内最低价最低值)/(80日内最高价最高值-65日内最低价最低值)*100,20,1)+2*SMA(SMA((开盘价-65日内最低价最低值)/(80日内最高价最高值-65日内最低价最低值)*100,20,1),15,1)
VAR20赋值:VARF<1日前的VAR19 AND 成交量>1日前的成交量 AND 收盘价>1日前的收盘价
输出大资金活动:IF(VAR20 AND 统计30日满足VAR20的天数=1,18,0),LINETHICK1,画红色
STICKLINE(VAR20 AND 统计30日满足VAR20的天数=1,0,15,5,0),画红色
DRAWTEXT(VAR20 AND 统计30日满足VAR20的天数=1,15,'大资金活动'),画红色
VAR1赋值:(收盘价*2+最高价+最低价)/4*10
VAR2赋值:VAR1的13日指数移动平均-VAR1的34日指数移动平均
VAR3赋值:VAR2的5日指数移动平均
VAR4赋值:2*(VAR2-VAR3)*5.5
如果VAR4<=0返回VAR4否则返回0
如果VAR4>=0返回VAR4否则返回0
VAR5赋值:(8日内INDEXH最高值-INDEXC)/(8日内INDEXH最高值-8日内INDEXL最低值)*8
VAR5的18日[1日权重]移动平均
VAR7赋值:(INDEXC-8日内INDEXL最低值)/(8日内INDEXH最高值-8日内INDEXL最低值)*10
VAR8赋值:(INDEXC*2+INDEXH+INDEXL)/4
VAR9赋值:VAR8的13日指数移动平均-VAR8的34日指数移动平均
VARA赋值:VAR9的3日指数移动平均
VARB赋值:(VAR9-VARA)/2
如果VARB>=0返回VARB否则返回0
VARE赋值:MA(100*(收盘价-34日内收盘价最低值)/(34日内最高价最高值-34日内最低价最低值),5)-20
VAR10:=(最高价+最低价+收盘价)/3
VAR11:=(VAR10-VAR10的14日简单移动平均)/(0.015*AVEDEV(VAR10,14))
VAR12:=(VAR10-VAR10的70日简单移动平均)/(0.015*AVEDEV(VAR10,70))
如果VAR11>=150 AND VAR11<200 AND VAR12>=150 AND VAR12<200返回10否则返回0
如果VAR11<=-150 AND VAR11>-200 AND VAR12<=-150 AND VAR12>-200返回-10否则返回VAR13
VAR15:=(收盘价-收盘价的11日简单移动平均)/收盘价的11日简单移动平均*100
VAR16:=100-VAR15的绝对值
如果VAR16<90返回VAR16否则返回100
如果VARE>0返回VARE否则返回0
VAR1B:=IF(VAR12>=200 AND VAR11>=150,15,IF(VAR12<=-200 AND VAR11<=-150,-15,VAR14))+60
VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR17<100