红娘子顶与底 同花顺副图 源码分享

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

CS:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
红先锋:(EMA(CS,3)-50)*2;
STICKLINE(红先锋<REF(红先锋,1)AND 红先锋>0,0,红先锋,4,0),COLOR00AAFF;
STICKLINE(红先锋<REF(红先锋,1)AND 红先锋>0,0,红先锋,4.4,0),COLOR00CCFF;
STICKLINE(红先锋>=REF(红先锋,1)AND 红先锋>0,0,红先锋,4,0),COLOR0000AA;
STICKLINE(红先锋>=REF(红先锋,1)AND 红先锋>0,0,红先锋,4.4,0),COLOr0022CC;
STICKLINE(红先锋>REF(红先锋,1)AND 红先锋<0,0,红先锋,4,0),COLORAA00BB;
STICKLINE(红先锋>REF(红先锋,1)AND 红先锋<0,0,红先锋,4.4,0),COLORCC22BB;
STICKLINE(红先锋<=REF(红先锋,1)AND 红先锋<0,0,红先锋,4,0),COLORFF7700;
STICKLINE(红先锋<=REF(红先锋,1)AND 红先锋<0,0,红先锋,4.4,0),COLORFFAA22;
VAR18:=(HIGH+LOW+CLOSE)/3;
VAR19:=(VAR18-MA(VAR18,14))/(0.015*AVEDEV(VAR18,14));
VAR1A:=(VAR18-MA(VAR18,70))/(0.015*AVEDEV(VAR18,70));
VAR1B:=IF(VAR19>=150 AND VAR19<200 AND VAR1A>=150 AND VAR1A<200,-10,0);
VAR1C:=IF(VAR19<=-150 AND VAR19>-200 AND VAR1A<=-150 AND VAR1A>-200,10,0);
VAR1D:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VAR1E:=100-ABS(VAR1D);
顶:IF(BARSCOUNT(CLOSE)<70,80,IF(VAR1A>=200 AND VAR19>=150,-15,VAR1B)+80),LINETHICK2,colorgreen;
底:IF(BARSCOUNT(CLOSE)<70,-80,IF(VAR1A<=-200 AND VAR19<=-150,15,VAR1C)-80),colorred,LINETHICK2;

原理解析：
CS赋值:(收盘价-8日内最低价最低值)/(8日内最高价最高值-8日内最低价最低值)*100
输出红先锋:(CS的3日指数移动平均-50)*2
STICKLINE(红先锋<1日前的红先锋AND 红先锋>0,0,红先锋,4,0),COLOR00AAFF
STICKLINE(红先锋<1日前的红先锋AND 红先锋>0,0,红先锋,4.4,0),COLOR00CCFF
STICKLINE(红先锋>=1日前的红先锋AND 红先锋>0,0,红先锋,4,0),COLOR0000AA
STICKLINE(红先锋>=1日前的红先锋AND 红先锋>0,0,红先锋,4.4,0),COLOR0022CC
STICKLINE(红先锋>1日前的红先锋AND 红先锋<0,0,红先锋,4,0),COLORAA00BB
STICKLINE(红先锋>1日前的红先锋AND 红先锋<0,0,红先锋,4.4,0),COLORCC22BB
STICKLINE(红先锋<=1日前的红先锋AND 红先锋<0,0,红先锋,4,0),COLORFF7700
STICKLINE(红先锋<=1日前的红先锋AND 红先锋<0,0,红先锋,4.4,0),COLORFFAA22
VAR18赋值:(最高价+最低价+收盘价)/3
VAR19赋值:(VAR18-VAR18的14日简单移动平均)/(0.015*AVEDEV(VAR18,14))
VAR1A赋值:(VAR18-VAR18的70日简单移动平均)/(0.015*AVEDEV(VAR18,70))
如果VAR19>=150 AND VAR19<200 AND VAR1A>=150 AND VAR1A<200返回-10否则返回0
如果VAR19<=-150 AND VAR19>-200 AND VAR1A<=-150 AND VAR1A>-200返回10否则返回0
VAR1D赋值:(收盘价-收盘价的13日简单移动平均)/收盘价的13日简单移动平均*100
VAR1E赋值:100-VAR1D的绝对值
输出顶:IF(收盘价的有效数据周期数<70,80,IF(VAR1A>=200 AND VAR19>=150,-15,VAR1B)+80), 线宽为2,画绿色
输出底:IF(收盘价的有效数据周期数<70,-80,IF(VAR1A<=-200 AND VAR19<=-150,15,VAR1C)-80),画红色, 线宽为2