趋势优化(通达信)

源码正文：

N1:=7;N2:=14;N3:=21{XG51};
界:=38,COLORFF3311{XG51};
stICKLINE(C>0,38,38,1,1),COLORFF9911{XG51};
加仓线:=51,COLORFF1155{XG51};
STICKLINE(C>0,51,51,1,1),COLORFF1199{XG51};
LC:=REF(CLOSE,1){XG51};
rsi1:SMA(maX(CLOSE-LC,0),N1,1)/SMA(Abs(CLOSE-LC),N1,1)*100,COLORFFFFFF{XG51};
RSI2:SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100,COLORFFFFFF{XG51};
RSI3:SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100,COLORFFFFFF{XG51};
RSI4:SMA(RSI3,7,1),LINETHICK2,COLOR00CD00{XG51};
趋势F:=xma(((CLOSE- LLV(LOW,48))/(HHV(HIGH,48)-LLV(LOW,48))*50),17)+9,COLORFFFFFF{XG51};
wr1:XMA(趋势F,7)*1.372,COLORWHITE,LINETHICK2{XG51};
MA1:=MA(C,1){XG51};
MA5:=MA(C,5){XG51};
MA7:=MA(C,7){XG51};
MA10:=MA(C,10){XG51};
DRAWICON(crOSS(MA(C,1),MA(C,5)),RSI4,1){XG51};
DRAWICON(CROSS(MA(C,1),MA(C,5)) AND CROSS(RSI1,RSI4) AND REF(WR1,1)<WR1,RSI4*1.1,23){X=G!5*1=C=N={};

源码正文：

重心:= (C+0.618*REF(C,1)+0.382*REF(C,2)+0.236*REF(C,3)+0.146*REF(C,4))/2.382,COLORBLUE,LINETHICK1{XG51};
Gao:=HHV(C,60)-LLV(C,60){XG51};
rsi:=SMA(maX(重心-REF(重心,1),0),5,1)/SMA(Abs(重心-REF(重心,1)),5,1){XG51};
指导线:重心+GAO*(RSI-0.5),COLORRED,LINETHICK1{XG51};
上升:IF(指导线>REF(指导线,1),指导线,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
下降:IF(指导线<REF(指导线,1),指导线,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
JRH:=HHV(C,2){XG51};
JRL:=LLV(C,2){XG51};
MA3:=MA(CLOSE,3){XG51};
YTSL:=(3*CLOSE+LOW+OPEN+HIGH)/6{XG51};
VAR1:=(CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2)){XG51};
VAR2:=(REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)){XG51};
VAR3:=(REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)){XG51};
VAR4:=(REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)){XG51};
VAR5:=(REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)){XG51};
VAR6:=(REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)){XG51};
VAR7:=(REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)){XG51};
VAR8:=(REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)){XG51};
VAR9:=(REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)){XG51};
VARA:=(REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)){XG51};
VARB:=(REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)){XG51};
VARC:=(REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)){XG51};
VARD:=(CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2)){XG51};
VARE:=(REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)){XG51};
VARF:=(REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)){XG51};
VAR10:=(REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)){XG51};
VAR11:=(REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)){XG51};
VAR12:=(REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)){XG51};
VAR13:=(REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)){XG51};
VAR14:=(REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)){XG51};
VAR15:=(REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)){XG51};
VAR16:=(REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)){XG51};
VAR17:=(REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2)){XG51};
VAR18:=(REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2)){XG51};
VAR19:=((REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1)) AND VAR1){XG51};
VAR1A:=((REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1)) AND VARD){XG51};
红色持股:VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,COLOR0000FF,NODRAW{XG51};
离场:=IF(红色持股,JRL,DRAWNULL){XG51};
明离场价:=离场,COLORFF99FF,NODRAW{XG51};
今离场价:REF(离场,1)COLOR0000FF,NODRAW{XG51};
青色观望:VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,COLORFFFF00,NODRAW{XG51};
进:=IF(青色观望,JRH,DRAWNULL){XG51};
明进场价:=进,COLOR33AacC,NODRAW{XG51};
今进场价:REF(明进场价,1),COLORFF0000,NODRAW{XG51};
短买:VAR19,COLOR33AACC,NODRAW{XG51};
品红离场:VAR1A,COLORFF99FF,NODRAW{XG51};
急速超跌:(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100<-14,COLORFFFFFF,NODRAW{XG51};
stICKLINE(ISLASTBAR AND (红色持股 OR REF(红色持股,1)=1),今离场价,今离场价,30,1),COLOR0000FF{XG51};
STICKLINE(ISLASTBAR AND (青色观望 OR REF(青色观望,1)=1),今进场价,今进场价,30,1),COLOR00FF00{XG51};
STICKLINE(C>=O,L,H,0,0),COLOR0000CC{XG51};
STICKLINE(C<O,L,H,0,0),COLOR999900{XG51};
STICKLINE(1,C,O,3.5,0),COLOR858500{XG51};
STICKLINE(C>=O,C,O,3.5,0),COLOR0000E5{XG51};
STICKLINE(红色持股,CLOSE,O,2.8,0),COLOR000055{XG51};
STICKLINE(红色持股,CLOSE,O,2,0),COLOR000088{XG51};
STICKLINE(红色持股,CLOSE,O,1.5,0),COLOR0000AA{XG51};
STICKLINE(红色持股,CLOSE,O,1,0),COLOR0000CC{XG51};
STICKLINE(红色持股,CLOSE,O,0.5,0),COLOR0000EE{XG51};
STICKLINE(青色观望,CLOSE,O,2.8,0),COLOR555500{XG51};
STICKLINE(青色观望,CLOSE,O,2,0),COLOR888800{XG51};
STICKLINE(青色观望,CLOSE,O,1.5,0),COLORAAAA00{XG51};
STICKLINE(青色观望,CLOSE,O,1,0),COLORCCCC00{XG51};
STICKLINE(青色观望,CLOSE,O,0.5,0),COLOREEEE00{XG51};
CO:=(C-O){XG51};
STICKLINE(急速超跌,O,C-CO/2,2.8,0),COLOR555555{XG51};
STICKLINE(急速超跌,O,C-CO/2,2,0),COLOR888888{XG51};
STICKLINE(急速超跌,O,C-CO/2,1.5,0),COLORAAAAAA{XG51};
STICKLINE(急速超跌,O,C-CO/2,1,0),COLORCCCCCC{XG51};
STICKLINE(急速超跌,O,C-CO/2,0.5,0),COLOREEEEEE{XG51};
STICKLINE(短买,O,O+CO/3,2.8,0),COLOR335555{XG51};
STICKLINE(短买,O,O+CO/3,2,0),COLOR338888{XG51};
STICKLINE(短买,O,O+CO/3,1.5,0),COLOR33AAAA{XG51};
STICKLINE(短买,O,O+CO/3,1,0),COLOR33CCCC{XG51};
STICKLINE(短买,O,O+CO/3,0,0),COLOR33EEEE{XG51};
DRAWTEXT(短买,REF(CLOSE,1)-0.2,'B'),COLORWHITE{XG51};
STICKLINE(品红离场,O,O+CO/3,2.8,0),COLOR550055{XG51};
STICKLINE(品红离场,O,O+CO/3,2,0),COLOR880088{XG51};
STICKLINE(品红离场,O,O+CO/3,1.5,0),COLORAA00AA{XG51};
STICKLINE(品红离场,O,O+CO/3,1,0),COLORCC00CC{XG51};
STICKLINE(品红离场,O,O+CO/3,0.5,0),COLOREE00EE{XG51};
DRAWTEXT(品红离场,REF(CLOSE,1)+0.2,'S'),COLORCYAN;

选股
VARR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2){XG51};
VARR2:=REF(VARR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARR3:=REF(VARR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARR4:=REF(VARR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARR5:=REF(VARR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARR6:=REF(VARR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARR7:=REF(VARR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARR8:=REF(VARR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARR9:=REF(VARR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARRA:=REF(VARR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARRB:=REF(VARRA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARRC:=REF(VARRB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARRD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2){XG51};
VARRE:=REF(VARRD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARRF:=REF(VARRE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARR10:=REF(VARRF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARR11:=REF(VARR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARR12:=REF(VARR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARR13:=REF(VARR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARR14:=REF(VARR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARR15:=REF(VARR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARR16:=REF(VARR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARR17:=REF(VARR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARR18:=REF(VARR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
黄托底:REF(VARRD OR VARRE OR VARRF OR VARR10 OR VARR11 OR VARR12 OR VARR13 OR
VARR14 OR VARR15 OR VARR16 OR VARR17 OR VARR18,1) AND VARR1{X!G~5=1!C!N!{};