通达信短线高手副图指标 黄托底蓝压顶 源码 附图

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

VAR1C:=1;

MA18:=MA(C,18);

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

VAR3C:=IF(YEAR>=2099 AND MONTH>2,0,1);

VAR4C:=LLV(LOW,5);

VAR5C:=HHV(HIGH,4);

VAR1:=2*MA(LLV((C+L)/2,8)*1.1,13)-EMA((C+L)/2,3)-((C+L)/2)*0.1;

VAR2:=IF((EMA((C+L)/2,3)-VAR1)*5>0,POW((EMA((C+L)/2,3)-VAR1)*5,2)/10,-1*POW((EMA((C+L)/2,3)-VAR1)*5,2)/10);

VAR3:=IF(VAR2>0,VAR2-0,0);

DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);

TJZB1:100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5)),COLOR0080FF;

TJZB2:100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10)),COLORGREEN;

TJZB3:100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20)),COLORFF8000;

TJZB4:100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30)),COLOR00FFFF;

VARR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);

VARR2:=REF(VARR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VARR3:=REF(VARR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARR4:=REF(VARR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VARR5:=REF(VARR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARR6:=REF(VARR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

启动线:=10*SUM(EMA((C+L)/2,2),5)/10.158,NODRAW;

平衡线:=10*LLV(SUM( EMA((C+L)/2,2),5)/10.158,4),NODRAW;

平台线:=10*LLV(SUM( EMA((C+L)/2,2),5)/10.158,10),NODRAW;

强弱线:=EMA(启动线,21);

VARR7:=REF(VARR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARR8:=REF(VARR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VARR9:=REF(VARR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARRA:=REF(VARR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

散户:=EMA((VAR2C-VAR4C)/(VAR5C-VAR4C)*100,4)*VAR3C*VAR1C;

庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3C*VAR1C;

VARRB:=REF(VARRA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARRC:=REF(VARRB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VARRD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);

VARRE:=REF(VARRD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARRF:=REF(VARRE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

DRAWTEXT(CROSS(散户,庄家) AND 散户<50 AND 29<散户,40,'短快进'),COLOR00FF00;

DRAWTEXT(CROSS(散户,庄家) AND 散户<30,50,'低吸'),COLOR3399CC;

DRAWTEXT(CROSS(庄家,散户) AND 散户>70,95,'高抛'),COLORMAGENTA;

买:=IF(LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2)),1,0);

VARR10:=REF(VARRF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARR11:=REF(VARR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VARR12:=REF(VARR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARR13:=REF(VARR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VARR14:=REF(VARR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARR15:=REF(VARR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VARR16:=REF(VARR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARR17:=REF(VARR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);

VARR18:=REF(VARR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);

VARR19:=REF(VARRD OR VARRE OR VARRF OR VARR10 OR VARR11 OR VARR12 OR VARR13 OR

VARR14 OR VARR15 OR VARR16 OR VARR17 OR VARR18,1) AND VARR1;

加仓A:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;

VARR1A:=REF(VARR1 OR VARR2 OR VARR3 OR VARR4 OR VARR5 OR VARR6 OR VARR7 OR

VARR8 OR VARR9 OR VARRA OR VARRB OR VARRC,1) AND VARRD;

DRAWTEXT(VARR19,20,'黄托底'),COLORYELLOW;

DRAWTEXT(VARR1A,80,'蓝压顶'),COLORLICYAN;

WWWGUPANGCOM:=3*SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1)-2*SMA(SMA((C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100,3,1),3,1);

STICKLINE(VAR3>0 AND REF(VAR3,1)=0 AND (C+L)/2>MA((C+L)/2,8),0,50,1,0),COLORYELLOW;

DRAWTEXT(VAR3>0 AND REF(VAR3,1)=0 AND (C+L)/2>MA((C+L)/2,8),50,'红色启动');

跟:=IF(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),1,0);

DRAWTEXT(MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18),LOW*0.96,'跟'),COLOR7F52AF;

原理解析：
VAR1C赋值:1
MA18赋值:C的18日简单移动平均
VAR2C赋值:(2*收盘价+最高价+最低价)/4
如果YEAR>=2099 AND MONTH>2返回0否则返回1
VAR4C赋值:5日内最低价最低值
VAR5C赋值:4日内最高价最高值
VAR1赋值:2*MA(LLV((C+L)/2,8)*1.1,13)-EMA((C+L)/2,3)-((C+L)/2)*0.1
VAR2赋值:IF((EMA((C+L)/2,3)-VAR1)*5>0,POW((EMA((C+L)/2,3)-VAR1)*5,2)/10,-1*POW((EMA((C+L)/2,3)-VAR1)*5,2)/10)
如果VAR2>0返回VAR2-0否则返回0
DX赋值:100*MTM的6日指数移动平均,6)/EMA(EMA(MTM的绝对值,6),6)
输出TJZB1:100*(C-5日内L最低值)/(5日内C最高值-5日内L最低值),COLOR0080FF
输出TJZB2:100*(C-10日内L最低值)/(10日内C最高值-10日内L最低值),画绿色
输出TJZB3:100*(C-20日内L最低值)/(20日内C最高值-20日内L最低值),COLORFF8000
输出TJZB4:100*(C-30日内L最低值)/(30日内C最高值-30日内L最低值),COLOR00FFFF
VARR1赋值:收盘价>1日前的收盘价 AND 收盘价>2日前的收盘价
VARR2赋值:1日前的VARR1 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VARR3赋值:1日前的VARR2 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VARR4赋值:1日前的VARR3 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VARR5赋值:1日前的VARR4 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VARR6赋值:1日前的VARR5 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
启动线赋值:10*SUM(EMA((C+L)/2,2),5)/10.158,NODRAW
平衡线赋值:10*LLV(SUM( EMA((C+L)/2,2),5)/10.158,4),NODRAW
平台线赋值:10*LLV(SUM( EMA((C+L)/2,2),5)/10.158,10),NODRAW
强弱线赋值:启动线的21日指数移动平均
VARR7赋值:1日前的VARR6 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VARR8赋值:1日前的VARR7 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VARR9赋值:1日前的VARR8 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VARRA赋值:1日前的VARR9 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
散户赋值:EMA((VAR2C-VAR4C)/(VAR5C-VAR4C)*100,4)*VAR3C*VAR1C
庄家赋值:E0.667*1日前的散户+0.333*散户的2日简单移动平均*VAR3C*VAR1C
VARRB赋值:1日前的VARRA AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VARRC赋值:1日前的VARRB AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VARRD赋值:收盘价<1日前的收盘价 AND 收盘价<2日前的收盘价
VARRE赋值:1日前的VARRD AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VARRF赋值:1日前的VARRE AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
DRAWTEXT(散户上穿庄家 AND 散户<50 AND 29<散户,40,'短快进'),COLOR00FF00
DRAWTEXT(散户上穿庄家 AND 散户<30,50,'低吸'),COLOR3399CC
DRAWTEXT(庄家上穿散户 AND 散户>70,95,'高抛'),画洋红色
买赋值:IF(2日内DX最低值=7日内DX最低值 AND 统计2日满足DX<0的天数 AND CROSS(DX,DX的2日简单移动平均),1,0)
VARR10:=1日前的VARRF AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VARR11:=1日前的VARR10 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VARR12:=1日前的VARR11 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VARR13:=1日前的VARR12 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VARR14:=1日前的VARR13 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VARR15:=1日前的VARR14 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VARR16:=1日前的VARR15 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VARR17:=1日前的VARR16 AND 收盘价<=1日前的收盘价 AND 收盘价>=2日前的收盘价
VARR18:=1日前的VARR17 AND 收盘价>=1日前的收盘价 AND 收盘价<=2日前的收盘价
VARR19:=1日前的VARRD OR VARRE OR VARRF OR VARR10 OR VARR11 OR VARR12 OR VARR13 OR
VARR14 OR VARR15 OR VARR16 OR VARR17 OR VARR18 AND VARR1
加仓A赋值:SMA(EMA((C-1日前的C)/1日前的C,5)*100,3,1)*10
VARR1A:=1日前的VARR1 OR VARR2 OR VARR3 OR VARR4 OR VARR5 OR VARR6 OR VARR7 OR
VARR8 OR VARR9 OR VARRA OR VARRB OR VARRC AND VARRD
当满足条件VARR19时,在20和'黄托底'位置书写文字
当满足条件VARR1A时,在80和'蓝压顶'位置书写文字
WWWGUPANGCOM赋值:3*SMA((C-9日内L最低值)/(9日内H最高值-9日内L最低值)*100,3,1)-2*SMA(SMA((C-9日内L最低值)/(9日内H最高值-9日内L最低值)*100,3,1),3,1)
STICKLINE(VAR3>0 AND 1日前的VAR3=0 AND (C+L)/2>MA((C+L)/2,8),0,50,1,0),画黄色
DRAWTEXT(VAR3>0 AND 1日前的VAR3=0 AND (C+L)/2>MA((C+L)/2,8),50,'红色启动')
跟赋值:IF(MA18>=3日前的MA18 AND 收盘价上穿MA18,1,0)
DRAWTEXT(MA18>=3日前的MA18 AND 收盘价上穿MA18,最低价*0.96,'跟'),COLOR7F52AF