通达信红袖添香未加密选股指标公式源码

源码正文：

VAR1:=(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50)){XG51};
VAR2:=SMA(VAR1,47,1)+10{XG51};
VAR3:=(CLOSE-LLV(LOW,48))/(HHV(HIGH,48)-LLV(LOW,48)){XG51};
VAR4:=Sma(VAR3,3,1){XG51};
VAR5:=SMA(VAR4,3,1)+10{XG51};
DDDD:=VAR5-VAR2{XG51};
stICKLINE(REF(DDDD,1)<DDDD,DDDD,REF(DDDD,1),8,1),COLORYELLOW{XG51};
STICKLINE(REF(DDDD,1)>DDDD,DDDD,REF(DDDD,1),8,1),COLORBLUE{XG51};
DRAWICON(crOSS(DDDD,REF(DDDD,1)),DDDD-0.1,1){XG51};
DRAWICON(CROSS(REF(DDDD,1),DDDD),REF(DDDD,1)+0.1,2){XG51};
difF:(ema(CLOSE,10)-EMA(CLOSE,20))*0.7,LINETHICK1,COLORWHITE{XG51};
DEAF:EMA(DIFF,8),LINETHICK1,COLORCYAN;macd1:=(DIFF-DEAF),COLORSTICK{XG51};
DRAWBAND(DIFF,RGB(250,100,100),DEAF,RGB(0,0,0)){XG51};
SHORT:=5{XG51};
LONG:=26{XG51};
MID:=2{XG51};
DIF:(EMA(CLOSE,SHORT)-EMA(CLOSE,LONG)),LINETHICK1,COLORBLUE{XG51};
DEA:EMA(DIF,MID){XG51};
DRAWBAND(DIF,RGB(250,0,0),DEA,RGB(200,180,280)){XG51};
MacD:=(DIF-DEA)*2,COLORSTICK{XG51};
向下:=IF(DIF<REF(DIF,1),DIF,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
DRAWICON(CROSS(DIF,DEA) AND DIF>REF(DIF,1) AND DEA<0,DIF,0){XG51};
趋势线:=MACD1,LINETHICK2,COLORGREEN{XG51};
判断:=(SMA(((C+L)/2-LLV(L,21))/(HHV((H+C)/2,21)-LLV(L,21))*100,2,1)-8){XG51};
STICKLINE(FILTER(CROSS(判断,趋势线)=1 OR 判断>REF(判断,1),10) AND 判断<25 ,0,0.02,4,0),COLORWHITE{XG51};
STICKLINE(FILTER(判断<REF(判断,1)AND 判断>65,5),0,0.02,4,0),COLORCYAN{XG51};
MA5:=EMA(C,3){XG51};
MA13:=EMA(C,13){XG51};
UP:=DRAWLINE(L=LLV(L,BArslAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),0),COLOR0000FF{XG51};
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),0),COLOR00FF00{XG51};
HR:=HHV(HIGH,55){XG51};
HRY:=LLV(LOW,55){XG51};
HRY11:=HR*HRY{XG51};
HRY33:=SQRT(HRY11){XG51};
TJ2:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HRY33{XG51};
DRAWTEXT(TJ2,-0.01,'金牛'),COLOR00FFFF{XG51};
0{XG51};
当前红袖天数:BARSLASTCOUNT(DIF>=DEA),NODRAW{X-G?5^1-C-N-{};

源码正文：

Qdif:=ema(CLOSE,12)-Ema(CLOSE,26){XG51};
QDEA:=EMA(QDIF,9){XG51};
Qmacd:=(QDIF-QDEA)*2{XG51};
M5:=MA(C,5){XG51};
M10:=MA(C,10){XG51};
M20:=MA(C,20){XG51};
DXW1:=IF((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)),1,0){XG51};
XH1:=IF(COUNT(DXW1,3)>0,1,0){XG51};
RQ1:=BArslAst(DXW1){XG51};
RQ2:=REF(RQ1,RQ1+1)+RQ1+1{XG51};
RQ3:=IF(RQ2-RQ1>6,1,0){XG51};
ZBW:=IF(DXW1=1,QMacD<0 AND OPEN<M20 AND M5<REF(M5,1),0){XG51};
WWMR:=SUM(ZBW,20){XG51};
XG:IF(WWMR=2 AND RQ3 AND XH1,1,0){X^G_5~1^C^N^{};