通达信趋势窗口画线主图未加密选股指标公式源码

源码正文：

A111:=ema(CLOSE,9)-Ema(CLOSE,56){XG51};
A21:=EMA((0.618*REF(A111,1)+0.382*A111),3){XG51};
stICKLINE(A111>=A21,H,L,0,1)COLORFF00FF{XG51};
STICKLINE(A111>=A21,O,C,-1,1)COLORWHITE{XG51};
STICKLINE(A111<A21,H,L,0,1),COLOR00FF00{XG51};
STICKLINE(A111<A21,O,C,-1,1),COLORFF2400;N1:=6{XG51};
重心:(2*C+H+L)/4,COLOR00FFFF,LINETHICK0{XG51};
SJ:=WMA((重心-LLV(L,5))/(HHV(H,5)-LLV(L,5))*100,2){XG51};
ZJ:=WMA(0.618*REF(SJ,1)+0.382*SJ,2){XG51};
DRAWTEXT(crOSS(SJ,ZJ) AND SJ<30,L-0.1,'←低吸'),COLORFFFFFF{XG51};
DRAWTEXT(CROSS(ZJ,SJ) AND SJ>70,H+0.1,'←高抛'),COLORFFFFFF{XG51};
A1:=EMA(C,14)COLORRED,LINETHICK1{XG51};
A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW{XG51};
突破:REF(EMA(C,14),1),NODRAW;距离:(C-突破)/突破*100,NODRAW{XG51};
出击:IF(A1X>=0,REF(EMA(C,14),BArslAST(CROSS(A1X,0))+1),DRAWNULL)COLORWHITE,LINETHICK1{XG51};
休假:IF(A1X<0,REF(EMA(C,14),BARSLAST(CROSS(0,A1X))+1),DRAWNULL)COLORCYAN,LINETHICK1{XG51};
涨幅:IF(A1X>=0,(C-出击)/出击*100,DRAWNULL)NODRAW{XG51};
跌幅:IF(A1X<0,(C-休假)/休假*100,DRAWNULL)NODRAW{XG51};
♂10%:IF(H>=出击*1.1,出击*1.1,DRAWNULL),COLORWHITE,POINTDOT,LINETHICK4{XG51};
♂20%:IF(H>=出击*1.2,出击*1.2,DRAWNULL),COLORWHITE,POINTDOT,LINETHICK4{XG51};
♂30%:IF(H>=出击*1.3,出击*1.3,DRAWNULL),COLORWHITE,POINTDOT,LINETHICK4{XG51};
♀Ⅰ:IF(L<休假*0.9,休假*0.9,DRAWNULL),COLORCYAN,POINTDOT,LINETHICK4{XG51};
♀Ⅱ:IF(L<休假*0.8,休假*0.8,DRAWNULL),COLORCYAN,POINTDOT,LINETHICK4{XG51};
♀Ⅲ:IF(L<休假*0.7,休假*0.7,DRAWNULL),COLORCYAN,POINTDOT,LINETHICK4{XG51};
STICKLINE(CROSS(A1X,0),C,O,2,0)COLORBLUE{XG51};
STICKLINE(CROSS(0,A1X),C,O,2,0)COLORCYAN{XG51};
STICKLINE(CROSS(A1X,0)OR CROSS(0,A1X),REF(EMA(C,14),1),REF(EMA(C,14),1)*0.998,2,0)COLORRED{XG51};
STICKLINE(ISLASTBAR,REF(EMA(C,14),1),REF(EMA(C,14),1)*0.998,5,0)COLORRED{XG51};
A11:DRAWLINE(HIGH>=HHV(HIGH,5),HIGH,LOW<=LLV(LOW,5),LOW,0)DOTLINE{XG51};
B1:DRAWLINE(LOW<=LLV(LOW,5),LOW,HIGH>=HHV(HIGH,5),HIGH,0)DOTLINE{XG51};
A2:DRAWLINE(HIGH>=HHV(HIGH,13),HIGH,LOW<=LLV(LOW,13),LOW,0)DOTLINE,COLORGREEN{XG51};
B2:DRAWLINE(LOW<=LLV(LOW,13),LOW,HIGH>=HHV(HIGH,13),HIGH,0)DOTLINE{XG51};
A3:DRAWLINE(HIGH>=HHV(HIGH,34),HIGH,LOW<=LLV(LOW,34),LOW,0)DOTLINE{XG51};
B3:DRAWLINE(LOW<=LLV(LOW,34),LOW,HIGH>=HHV(HIGH,34),HIGH,0)DOTLINE{XG51};
A4:DRAWLINE(HIGH>=HHV(HIGH,55),HIGH,LOW<=LLV(LOW,55),LOW,0)DOTLINE{XG51};
B4:DRAWLINE(LOW<=LLV(LOW,55),LOW,HIGH>=HHV(HIGH,55),HIGH,0)DOTLINE;mtm:=C-REF(C,1){XG51};
ZLGJ:=100*EMA(EMA(MTM,N1),N1)/EMA(EMA(Abs(MTM),N1),N1){XG51};
买1:=IF(LLV(ZLGJ,2)=LLV(ZLGJ,7) AND COUNT(ZLGJ<0,2) AND CROSS(ZLGJ,MA(ZLGJ,2)),1,0){XG51};
卖1:=IF(HHV(ZLGJ,2)=HHV(ZLGJ,7) AND COUNT(ZLGJ>50,2) AND CROSS(MA(ZLGJ,2),ZLGJ),1,0){XG51};
DRAWICON(FILTER(买1=1,5),LOW*0.99,7),COLORWHITE{XG51};
STICKLINE(FILTER(买1=1,5),C,O,1,0),COLORWHITE{XG51};
DRAWICON(FILTER(卖1=1,1),H*1.01,8),COLOR00FF00{XG51};
STICKLINE(FILTER(卖1=1,1),C,O,1,0),COLOR00FF00{XG51};
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100{XG51};
K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D{XG51};
BDGD:=HHV(J,2)=HHV(J,8) AND J>80{XG51};
注意:=IF(CROSS(REF(J-0.01,1),J) AND REF(BDGD,1),1,0){XG51};
DRAWTEXT(注意 AND 卖1<1,HIGH*1.01,'J'),COLOR00FF00,LINETHICK3{XG51};
STICKLINE(注意 AND 卖1<1,O,CLOSE,1,0),COLORBLUE,LINETHICK2{XG51};
时间窗口01:=FILTER(IF(HHVBARS(HIGH,5),0,H),5),COLORFFFF00{XG51};
DRAWTEXT(时间窗口01,HIGH*0.99,'5'){XG51};
时间窗口02:=FILTER(IF(LLVBARS(LOW,5),0,L),5),COLOR00FFFF{XG51};
DRAWTEXT(时间窗口02,LOW*0.99,'5'){XG51};
时间窗口1:=FILTER(IF(HHVBARS(HIGH,13),0,1),13),COLOR00FF00{XG51};
DRAWTEXT(时间窗口1,HIGH*0.99,'13'){XG51};
时间窗口2:=FILTER(IF(LLVBARS(LOW,13),0,1),13),COLOR0000FF{XG51};
DRAWTEXT(时间窗口2,LOW*0.99,'13'){XG51};
时间窗口3:=FILTER(IF(HHVBARS(HIGH,34),0,2),34),COLOR55FF55{XG51};
DRAWTEXT(时间窗口3,HIGH*0.99,'34'){XG51};
时间窗口4:=FILTER(IF(LLVBARS(LOW,34),0,2),34),COLOR5555FF{XG51};
DRAWTEXT(时间窗口4,LOW*0.99,'34'){XG51};
时间窗口5:=FILTER(IF(HHVBARS(HIGH,55),0,30),55),COLOR99FF99{XG51};
DRAWTEXT(时间窗口5,HIGH*0.99,'55'){XG51};
时间窗口6:=FILTER(IF(LLVBARS(LOW,55),0,30),55),COLORDD00FF{XG51};
DRAWTEXT(时间窗口6,LOW*0.99,'55'){XG51};
时间窗口7:=FILTER(IF(HHVBARS(HIGH,89),0,40),89),COLORddfFDD{XG51};
DRAWTEXT(时间窗口7,HIGH*0.99,'89'){XG51};
时间窗口8:=FILTER(IF(LLVBARS(LOW,89),0,40),89),COLOR0055FF{XG51};
DRAWTEXT(时间窗口8,LOW*0.99,'89'){XG51};
时间窗口9:=FILTER(IF(HHVBARS(HIGH,144),0,50),144),COLORDDFF00{XG51};
DRAWTEXT(时间窗口9,HIGH*0.99,'144'){XG51};
时间窗口10:=FILTER(IF(LLVBARS(LOW,144),0,50),144),COLOR9955FF{XG51};
DRAWTEXT(时间窗口10,LOW*0.99,'144'){XG51};
时间窗口11:=FILTER(IF(HHVBARS(HIGH,233),0,60),233),COLORDDFFFF{XG51};
DRAWTEXT(时间窗口11,HIGH*0.99,'233'){XG51};
时间窗口12:=FILTER(IF(LLVBARS(LOW,233),0,60),233),COLORFF55FF{XG51};
DRAWTEXT(时间窗口12,LOW*0.99,'233'){X_G!5^1_C_N_{};

源码正文：

stICKLINE(TIME2=94100 AND REF(C,BArslAST(TIME2=94100))>=REF(C,BARSLAST(TIME2=93100)),DYnaINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORWHITE{XG51};
STICKLINE(TIME2=94100 AND REF(C,BARSLAST(TIME2=94100))<REF(C,BARSLAST(TIME2=93100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORCYAN{XG51};
STICKLINE(TIME2=95100 AND REF(C,BARSLAST(TIME2=95100))>=REF(C,BARSLAST(TIME2=94100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORWHITE{XG51};
STICKLINE(TIME2=95100 AND REF(C,BARSLAST(TIME2=95100))<REF(C,BARSLAST(TIME2=94100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORCYAN{XG51};
STICKLINE(TIME2=100100 AND REF(C,BARSLAST(TIME2=100100))>=REF(C,BARSLAST(TIME2=95100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORWHITE{XG51};
STICKLINE(TIME2=100100 AND REF(C,BARSLAST(TIME2=100100))<REF(C,BARSLAST(TIME2=95100)),DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,-1),COLORCYAN{XG51};
SJ1:=TIME2=93100;T1:=BARSLAST(SJ1);SJ2:=TIME2=94100{XG51};
SJ4:=TIME2=95100;T2:=BARSLAST(SJ2);T4:=BARSLAST(SJ4){XG51};
H1:=IF(TIME2=94100,REF(C,T2),DRAWNULL)=C{XG51};
H2:=IF(TIME2=95100,REF(C,T4),DRAWNULL)=C{XG51};
CS2:=CONST(REF(C,T2)){XG51};
CS4:=CONST(REF(C,T4)){XG51};
GL2:=FILTERX(H1,T2){XG51};
GL4:=FILTERX(H2,T4){XG51};
L1:=IF(TIME2=93100,REF(C,T1),DRAWNULL)=C{XG51};
CS1:=CONST(REF(C,T1)){XG51};
GL1:=FILTERX(L1,T1){XG51};
DA:=CONST(IF(REF(GL2,BARSLAST(GL2)),REF(BARSLAST(GL1),BARSLAST(GL2)),DRAWNULL)){XG51};
DA1:=CONST(IF(REF(GL4,BARSLAST(GL4)),REF(BARSLAST(GL2),BARSLAST(GL4)),DRAWNULL)){XG51};
A:=IF(BARSLAST(GL1)>=0 AND BARSLAST(GL1)<=DA,((CS2-CS1)/DA)*BARSLAST(GL1)+CS1,DRAWNULL){XG51};
B:=IF(BARSLAST(GL2)>=0 AND BARSLAST(GL2)<=DA1,((CS4-CS2)/DA1)*BARSLAST(GL2)+CS2,DRAWNULL){XG51};
IF(A>=REF(A,2),A,DRAWNULL)COLORLImaGENTA,LINETHICK3{XG51};
IF(A<REF(A,2),A,DRAWNULL)COLORCYAN,LINETHICK5{XG51};
IF(B>=REF(B,2),B,DRAWNULL)COLORMAGENTA,LINETHICK3{XG51};
IF(B<REF(B,2),B,DRAWNULL)COLORCYAN,LINETHICK3{XG51};
XSJ1:=TIME2=95100{XG51};
XT1:=BARSLAST(XSJ1){XG51};
XSJ2:=TIME2=100100{XG51};
XT2:=BARSLAST(XSJ2){XG51};
XCS2:=CONST(REF(C,XT2)){XG51};
XL1:=IF(TIME2=95100,REF(C,XT1),DRAWNULL)=C{XG51};
XH1:=IF(TIME2=100100,REF(C,XT2),DRAWNULL)=C{XG51};
XCS1:=CONST(REF(C,XT1)){XG51};
XGL1:=FILTERX(XL1,XT1){XG51};
XGL2:=FILTERX(XH1,XT2){XG51};
XDA:=CONST(IF(REF(XGL2,BARSLAST(XGL2)),REF(BARSLAST(XGL1),BARSLAST(XGL2)),DRAWNULL)){XG51};
XA:=IF(BARSLAST(XGL1)>=0 AND BARSLAST(XGL1)<=XDA,((XCS2-XCS1)/XDA)*BARSLAST(XGL1)+XCS1,DRAWNULL){XG51};
IF(XA>=REF(XA,1),XA,DRAWNULL)COLORMAGENTA,LINETHICK3{XG51};
IF(XA<REF(XA,1),XA,DRAWNULL)COLORCYAN,LINETHICK3{XG51};
时间:=TIME2=100100{XG51};
N:=BARSLAST(时间){XG51};
C1:CONST(IF(N,MAX(REF(HHV(H,0),N+1),DYNAINFO(4)),HHV(H,0))),DOTLINE,COLORWHITE{XG51};
C2:CONST(IF(N,MIN(REF(LLV(L,0),N+1),DYNAINFO(4)),LLV(L,0))),DOTLINE,COLORCYAN{XG51};
C3:(C1+C2)/2,DOTLINE,COLORBLUE{XG51};
VV:=HHV(V,0){XG51};
ZF:=(C1/C2-1)*100{XG51};
DRAWTEXT(CURRBARSCOUNT=2,C1,VARCAT(VARCAT(VARCAT(VARCAT('上限:',VAR2STR(C1,2)),'元,'),VARCAT('振幅:',VAR2STR(ZF,2))),'%')),COLORWHITE{XG51};
DRAWTEXT(CURRBARSCOUNT=2,C3,VARCAT(VARCAT('中限:',VAR2STR(C3,2)),'元')),COLORBLUE{XG51};
DRAWTEXT(CURRBARSCOUNT=2,C2,VARCAT(VARCAT('下限:',VAR2STR(C2,2)),'元')),COLORCYAN{XG51};
DRAWTEXT(C1/C2<=1.03 AND crOSS(C,C1) AND V>=VV,C1*1.005,'★买入')COLORWHITE{XG51};
DRAWTEXT(C1/C2<=1.03 AND CROSS(C2,C) AND V>=VV,C2*0.998,'★卖出')COLORCYAN{XG51};
STICKLINE(C1/C2<1.03 AND CROSS(C,C1) AND V>=VV,DYNAINFO(3)*1.03,DYNAINFO(3)*0.97,1,0),COLORWHITE{XG51};
AAA:=MAX(DYNAINFO(3),DYNAINFO(5)){XG51};
BBB:=MIN(DYNAINFO(3),DYNAINFO(6)){XG51};
CCC:=AAA-BBB{XG51};
中轨:=(AAA+BBB)/1,POINTDOT{XG51};
阻力:BBB+CCC*7/8,COLORYELLOW,POINTDOT{XG51};
支撑:BBB+CCC*1/8,COLORLIMAGENTA,POINTDOT{XG51};
支撑1:BBB+CCC*0.5/8,POINTDOT{XG51};
上顶:BBB+CCC*2/3,POINTDOT{XG51};
下底:BBB+CCC/3,COLORYELLOW,POINTDOT{XG51};
STICKLINE(C>阻力,阻力,C,2,0),COLORCYAN{XG51};
STICKLINE(C<支撑,支撑,C,2,0),COLORMAGENTA{XG51};
DRAWTEXT(LONGCROSS(支撑1,C,2),下底,'B'),COLORBLUE{XG51};
DRAWTEXT(LONGCROSS(C,阻力,2),上顶,'S'),COLORWHITE;{X?G^5-1?C?N?{};