同花顺红山进绿山出副图源码分享

Var3:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
Var4:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
Var5:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;
Var6:=(Var3+Var4+Var5)/3;
Var7:=EMA(Var6,5);
指标: EMA(EMA(Var3,5),5)*3, COLORSTICK;
Var8:=IF(Var6<=-20,10,0);
Var9:=HHV(Var8,10);
STICKLINE(Var8=10,20,10,5,0),COLOR6666FF;
VarA:=IF(Var9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);
DRAWTEXT(VarA=20,15,'底部'),linethick1,colorwhite;
STICKLINE((VarA=20),0,10,5,0),colorwhite;
VARC:=(ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG
(3,5),2)<=REF(ZIG(3,5),3));
VARD:=(ZIG(3,5)<REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)>=REF(ZIG(3,5),2)) AND (REF(ZIG
(3,5),2)>=REF(ZIG(3,5),3));
STICKLINE((VARC=1),(-14),0,4,0),Color0000FF;
DRAWTEXT((VARC=1),(-14),'买'),Color0000FF;
STICKLINE((VARD=1),14,0,4,0),Color00FF00;
DRAWTEXT((VARD=1),18,'卖'),Color00FF00;
VarE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VarF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA
((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
Var10:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA
((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
Var11:=VarF<REF(Var10,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
DRAWTEXT(Var11 AND COUNT(Var11,30)=1,15,'大资金活动'),linethick1,COLORff00ff;
STICKLINE(Var11 AND COUNT(Var11,30)=1,1,10,5,0),colorff00ff;
Var12:=(HIGH+LOW+CLOSE)/3;
Var13:=(Var12-MA(Var12,14))/(0.015*AVEDEV(Var12,14));
Var14:=(Var12-MA(Var12,70))/(0.015*AVEDEV(Var12,70));
Var15:=IF(Var13>=150 AND Var13<200 AND Var14>=150 AND Var14<200,10,0);
Var16:=IF(Var13<=-150 AND Var13>-200 AND Var14<=-150 AND Var14>-200,-10,Var15);
Var17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
Var18:=100-ABS(Var17);
Var19:=IF(Var18<90,Var18,100);

原理解析：
VAR3赋值:(收盘价-收盘价的6日简单移动平均)/收盘价的6日简单移动平均*100
VAR4赋值:(收盘价-收盘价的24日简单移动平均)/收盘价的24日简单移动平均*100
VAR5赋值:(收盘价-收盘价的32日简单移动平均)/收盘价的32日简单移动平均*100
VAR6赋值:(VAR3+VAR4+VAR5)/3
VAR7赋值:VAR6的5日指数移动平均
输出指标: VAR3的5日指数移动平均,5)*3, COLORSTICK
如果VAR6<=-20返回10否则返回0
VAR9赋值:10日内VAR8最高值
当满足条件VAR8=10时,在20和10之间画柱状线
VARA赋值:IF(VAR9 AND CROSS(收盘价的3日简单移动平均,收盘价的5日简单移动平均),20,0)
当满足条件VARA=20时,在15和'底部'位置书写文字
STICKLINE((VARA=20),0,10,5,0),画白色
VARC赋值:(ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)<=REF(ZIG(3,5),3))
VARD赋值:(ZIG(3,5)=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3))
STICKLINE((VARC=1),(-14),0,4,0),COLOR0000FF
DRAWTEXT((VARC=1),(-14),'买'),COLOR0000FF
STICKLINE((VARD=1),14,0,4,0),COLOR00FF00
DRAWTEXT((VARD=1),18,'卖'),COLOR00FF00
VARE赋值:MA(100*(收盘价-34日内收盘价最低值)/(34日内最高价最高值-34日内最低价最低值),5)-20
VARF赋值:100-3*SMA((收盘价-75日内最低价最低值)/(75日内最高价最高值-75日内最低价最低值)*100,20,1)+2*SMA(SMA((收盘价-75日内最低价最低值)/(75日内最高价最高值-75日内最低价最低值)*100,20,1),15,1)
VAR10赋值:100-3*SMA((开盘价-75日内最低价最低值)/(75日内最高价最高值-75日内最低价最低值)*100,20,1)+2*SMA(SMA((开盘价-75日内最低价最低值)/(75日内最高价最高值-75日内最低价最低值)*100,20,1),15,1)
VAR11赋值:VARF<1日前的VAR10 AND 成交量>1日前的成交量 AND 收盘价>1日前的收盘价
DRAWTEXT(VAR11 AND 统计30日满足VAR11的天数=1,15,'大资金活动'),LINETHICK1,COLORFF00FF
STICKLINE(VAR11 AND 统计30日满足VAR11的天数=1,1,10,5,0),COLORFF00FF
VAR12赋值:(最高价+最低价+收盘价)/3
VAR13赋值:(VAR12-VAR12的14日简单移动平均)/(0.015*AVEDEV(VAR12,14))
VAR14赋值:(VAR12-VAR12的70日简单移动平均)/(0.015*AVEDEV(VAR12,70))
如果VAR13>=150 AND VAR13<200 AND VAR14>=150 AND VAR14<200返回10否则返回0
如果VAR13<=-150 AND VAR13>-200 AND VAR14<=-150 AND VAR14>-200返回-10否则返回VAR15
VAR17赋值:(收盘价-收盘价的13日简单移动平均)/收盘价的13日简单移动平均*100
VAR18赋值:100-VAR17的绝对值
如果VAR18<90返回VAR18否则返回100