通达信股价四季彩图未加密选股指标公式源码

源码正文：

主线:=ema(Ema(C,1),5){XG51};
本线:=EMA(HHV(主线,5),1){XG51};
AAA:=EMA(HHV(本线,21),1){XG51};
BBB:=EMA(HHV(AAA,21),2){XG51};
CCC:=EMA(HHV(BBB,21),3){XG51};
DDD:=EMA(HHV(CCC,21),4){XG51};
EEE:=EMA(HHV(DDD,21),5){XG51};
MMM:=EMA(HHV(EEE,21),6){XG51};
XGG:=主线/MMM*100-100{XG51};
春:=XGG<0 AND XGG>=REF(XGG,1){XG51};
夏:=XGG>0 AND XGG>REF(XGG,1){XG51};
秋:=XGG>0 AND XGG<REF(XGG,1){XG51};
冬:=XGG<0 AND XGG<REF(XGG,1){XG51};
福:=(XGG-REF(XGG,1))/100{XG51};
DRAwrECTREL(200,500,500,999,RGB(255,0,255)){XG51};
DRAWRECTREL(200,1,500,500,90){XG51};
DRAWRECTREL(500,1,800,500,RGB(218,165,32)){XG51};
DRAWRECTREL(500,500,800,999,RGB(50,205,50)){XG51};
DRAWTEXT_FIX(1,0.30,0.75,1,'春........种')COLORRED{XG51};
DRAWTEXT_FIX(1,0.30,0.25,1,'夏........熟')COLORRED{XG51};
DRAWTEXT_FIX(1,0.75,0.25,1,'秋........收')COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.75,0.75,1,'冬........藏')COLORWHITE{XG51};
DRAWTEXT_FIX(春=1 AND CURRBARSCOUNT=1,0.48,0.61*(1-5*福),1,'今天')COLORRED{XG51};
DRAWTEXT_FIX(春=1 AND CURRBARSCOUNT=2,0.44,0.61*(1-5*福),1,'前1'){XG51};
DRAWTEXT_FIX(春=1 AND CURRBARSCOUNT=3,0.40,0.61*(1-5*福),1,'前2'){XG51};
DRAWTEXT_FIX(春=1 AND CURRBARSCOUNT=4,0.36,0.61*(1-5*福),1,'前3'){XG51};
DRAWTEXT_FIX(春=1 AND CURRBARSCOUNT=5,0.32,0.61*(1-5*福),1,'前4'){XG51};
DRAWTEXT_FIX(夏=1 AND CURRBARSCOUNT=1,0.48,0.31*(1-5*福),1,'今天')COLORRED{XG51};
DRAWTEXT_FIX(夏=1 AND CURRBARSCOUNT=2,0.44,0.31*(1-5*福),1,'前1'){XG51};
DRAWTEXT_FIX(夏=1 AND CURRBARSCOUNT=3,0.40,0.31*(1-5*福),1,'前2'){XG51};
DRAWTEXT_FIX(夏=1 AND CURRBARSCOUNT=4,0.36,0.31*(1-5*福),1,'前3'){XG51};
DRAWTEXT_FIX(夏=1 AND CURRBARSCOUNT=5,0.32,0.31*(1-5*福),1,'前4'){XG51};
DRAWTEXT_FIX(秋=1 AND CURRBARSCOUNT=1,0.53,0.31*(1-5*福),1,'今天')COLORWHITE{XG51};
DRAWTEXT_FIX(秋=1 AND CURRBARSCOUNT=2,0.57,0.31*(1-5*福),1,'前1'){XG51};
DRAWTEXT_FIX(秋=1 AND CURRBARSCOUNT=3,0.61,0.31*(1-5*福),1,'前2'){XG51};
DRAWTEXT_FIX(秋=1 AND CURRBARSCOUNT=4,0.69,0.31*(1-5*福),1,'前3'){XG51};
DRAWTEXT_FIX(秋=1 AND CURRBARSCOUNT=5,0.73,0.31*(1-5*福),1,'前4'){XG51};
DRAWTEXT_FIX(冬=1 AND CURRBARSCOUNT=1,0.53,0.61*(1-5*福),1,'今天')COLORWHITE{XG51};
DRAWTEXT_FIX(冬=1 AND CURRBARSCOUNT=2,0.57,0.61*(1-5*福),1,'前1'){XG51};
DRAWTEXT_FIX(冬=1 AND CURRBARSCOUNT=3,0.61,0.61*(1-5*福),1,'前2'){XG51};
DRAWTEXT_FIX(冬=1 AND CURRBARSCOUNT=4,0.69,0.61*(1-5*福),1,'前3'){XG51};
DRAWTEXT_FIX(冬=1 AND CURRBARSCOUNT=5,0.73,0.61*(1-5*福),1,'前4'){XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.5,0.1,1,C){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.45,0.1,1,'现价'){X_G?5_1_C_N_{};

源码正文：

D1:=(L+H+C*2)/4{XG51};
D2:= ma(D1,4){XG51};
D3:=HHV(D2,10){XG51};
D4:=MA(D3,3){XG51};
D5:=1.25*D4-0.25*D3{XG51};
A:=IF(D5>D3,D3,D5){XG51};
F1:=LLV(D2,10){XG51};
F2:=MA(F1,3); F3:=1.25*F2-0.25*F1{XG51};
B:=IF(F3<F1,F1,F3){XG51};
MA13:=MA(C,13){XG51};
DOU:=crOSS(C,B) AND CROSS(C,MA13) AND CROSS(C,A){XG51};
DOUDOU:=CROSS(C,MA13) AND CROSS(C,A){XG51};
大宝马:DOU OR DOUDOU{X=G~5*1=C=N={};