回零既买(通达信)

源码正文：

100,POINTDOT;0;50{XG51};
获利:WINNER(C)*100,COLOR808000,LINETHICK1{XG51};
買二:=C/WINNER(C){XG51};
回零既買:IF(買二>940,-10,0){XG51};
stICKLINE(回零既買<=0 AND 回零既買< REF(-4.5,1),-10,0,6,0),COLORFF3333{XG51};
底部:= IF(1/WINNER(CLOSE)>100 AND Abs((COST(50)-CLOSE)/CLOSE*100)>(100-ABS(((CLOSE-ma(CLOSE,10))/MA(CLOSE,10)*100+(CLOSE-MA(CLOSE,20))/MA(CLOSE,20)*100+(CLOSE-MA(CLOSE,30))/MA(CLOSE,30)*100)/3)),100,0), COLORSTICK,COLORWHITE;
大底:IF(REF(底部,1)>0 AND 底部=0,100,0),STICK, ,COLORWHITE,LINETHICK3{XG51};
DRAWTEXT(大底,50.2,'大底'),COLORRED,LINETHICK2{XG51};
DRAWTEXT( IF(crOSS(85, 3*SMA((CLOSE- LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE- LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1)),100,0),96,'逃'), COLORRED{XG51};
买入:IF(1/WINNER(CLOSE)>100 AND ABS((COST(50)-CLOSE)/CLOSE*100)>50 AND IF(1/WINNER(CLOSE)<REF(1/WINNER(CLOSE),1) AND REF(1/WINNER(CLOSE),1)>REF(1/WINNER(CLOSE),2),120,0),100,0),STICK,COLORWHITE{XG51};
DRAWTEXT(买入>0,90,'买50'), , COLORCCCCFF ,LINETHICK8{XG51};
买入A:IF(1/WINNER(CLOSE)>100 AND ABS((COST(50)-CLOSE)/CLOSE*100)>30 AND IF(1/WINNER(CLOSE)<REF(1/WINNER(CLOSE),1) AND REF(1/WINNER(CLOSE),1)>REF(1/WINNER(CLOSE),2),120,0),30,0),STICK,COLORWHITE,LINETHICK2{XG51};
DRAWTEXT(买入A>0,25,'买30'), , COLORBLUE,LINETHICK3{XG51};
W:(ema(CLOSE,1)+EMA(CLOSE,3)+EMA(CLOSE,5)+EMA(CLOSE,10)+EMA(CLOSE,13)+EMA(CLOSE,20)+EMA(CLOSE,30)+EMA(CLOSE,34)+EMA(CLOSE,55)+EMA(CLOSE,60)+EMA(CLOSE,90)+EMA(CLOSE,120)+EMA(CLOSE,250))/13,COLORBLUE LINETHICK0{XG51};
VAR1:=REF(W,2){XG51};
短线: SMA(MAX(W-VAR1,0),7,1)/SMA(ABS(W-VAR1),7,1)*100, COLORGREEN{XG51};
车弩机: IF(短线<12,30,0){XG51};
VAR2:=REF(W,1){XG51};
VAR3:=SMA(MAX(W-VAR2,0),7,1)/SMA(ABS(W-VAR2),7,1)*100{XG51};
弯弓: IF(VAR3<12,30,0){XG51};
逢高派发区: STICKLINE(短线>85,短线+10,短线-10,1.5,0), COLORWHITE{XG51};
VAR1J:=CLOSE/(EMA(EMA((C+L+H)/3,3),26)*0.9)<0.95 {XG51};
放箭:IF(VAR1J,15,0),STICK,LINETHICK3,COLORWHITE{XG51};
DRAWTEXT(VAR1J ,8,'箭'),COLORF0F000{XG51};
VARE1:=(INDEXC-REF(INDEXC, 1))/REF(INDEXC, 1){XG51};
VARE2:=(CLOSE-REF(CLOSE, 1))/REF(CLOSE, 1){XG51};
VARE3:=IF(VARE1>0.010, 0.900, 1) AND IF(VARE1>(-0.025), 1, 1.200){XG51};
VARE4:=VARE3*(VARE2-VARE1)*100{XG51};
VARE5:=SUM(VARE4, 10){XG51};
VARE6:=SMA(VARE5, 40, 1){XG51};
VARE7:=IF(CLOSE AND MA(vol, 5)/240 AND CLOSE>REF(CLOSE, 1)*1.0 AND CLOSE,88,0){XG51};
VARE8:=IF(CLOSE/REF(CLOSE, 1)>1.050 AND VOL/CAPITAL*100<10 AND CLOSE<17 AND HIGH/CLOSE<1.010 AND VARE7>0, 91, 0){XG51};
追击:IF(VARE8>90,30,0),STICK,LINETHICK3,COLORYELLOW{XG51};
DRAWTEXT(VARE8>90,30,'追击'),COLORBLUE{XG51};
IF(VAR1>5,IF(VAR1<100,VAR1,VAR2-10),0), COLORSTICK{X-G*5?1-C-N-{};

源码正文：

difF := ema(CLOSE,68) - Ema(CLOSE,170){XG51};
DEA := EMA(DIFF,90){XG51};
macd := 2*(DIFF-DEA){XG51};
A:=MacD{XG51};
G:=MA(MACD,2){XG51};
J:=MA(MACD,3){XG51};
J1:=MA(MACD,5){XG51};
stICKLINE(crOSS(MA(A,1),G),0.05,0,1,0),COLORRED,LINETHICK2{XG51};
VAR13:=IF(YEAR>=2018 AND MONTH>=11 AND DAY>=1,0,1){XG51};
AA:=(MA(C,1)+MA(C,3)+MA(C,5)+MA(C,7)+MA(C,9))/5{XG51};
BB:=(MA(C,2)+MA(C,4)+MA(C,6)+MA(C,8)+MA(C,10))/5{XG51};
CC:=EMA(AA,2){XG51};
DD:=EMA(BB,5){XG51};
VAR14:=MAX(EMA(AA,2)-EMA(BB,5),0)*1.2{XG51};
VAR15:=EMA(VAR14,5){XG51};
SS:=EMA(VAR15,2){XG51};
风险系数:=(VAR15-SS)/10*VAR13{XG51};
波浪系数:VAR15*VAR13,STICK,COLORFF00FF{XG51};
A10:=波浪系数,LINETHICK1 {XG51};
B:MA(A10,3),COLORBLUE,LINETHICK2{XG51};
B2:=MA(B,2)*2-B{XG51};
STICKLINE(B>B2,1.5*B,B2,3,0),COLOR0000FF{XG51};
STICKLINE(B<B2,1.5*B,B2,3,0),COLORYELLOW{XG51};
STICKLINE(VAR15>REF(VAR15,1) AND VAR13,VAR15,0,2,0),COLOR0099FF{XG51};
STICKLINE(VAR15>REF(VAR15,1) AND VAR13,VAR15,SS,3.5,0),COLORBLUE{XG51};
STICKLINE(VAR15<REF(VAR15,1) AND VAR13,0,VAR15,2,0),COLORCYAN{XG51};
STICKLINE(VAR15<REF(VAR15,1) AND VAR13,VAR15,SS,3.5,0),COLORFFCC33{XG51};
升跌:=EMA((C/MA((2*C+H+L)/4,8)-1)*100,3);0{X!G.5!1!C!N!{};