分时抄盘手(通达信)

源码正文：

TA:=IF(TIME>093000 AND TIME<094000 ,1,0){XG51};
TT:=IF(TIME>=093000 AND TIME<=093300 ,1,0){XG51};
T0:=IF(TIME>093600 AND TIME<095900 ,1,0){XG51};
T1:=IF(TIME>093300 AND TIME<145900 ,1,0){XG51};
T2:=IF(TIME>095500 AND TIME<145900 ,1,0){XG51};
T3:=IF(TIME>142500 AND TIME<145900 ,1,0){XG51};
T4:=IF(TIME>111000 AND TIME<145900 ,1,0){XG51};
T5:=IF(TIME>110000 AND TIME<145900 ,1,0){XG51};
T6:=IF(TIME>104200 AND TIME<145900 ,1,0){XG51};
T7:=IF(TIME>103000 AND TIME<131000 ,1,0){XG51};
T8:=IF(TIME>130000 AND TIME<155900 ,1,0){XG51};
T9:=IF(TIME>095500 AND TIME<131000 ,1,0){XG51};
T10:=IF(TIME>130500 AND TIME<143500 ,1,0){XG51};
T11:=IF(TIME>094500 AND TIME<102500 ,1,0){XG51};
T12:=IF(TIME>095000 AND TIME<140000 ,1,0){XG51};
T13:=IF(TIME>093000 AND TIME<143500 ,1,0){XG51};
dif:=ema(CLOSE,12)-Ema(CLOSE,26){XG51};
DEA:=EMA(DIF,9){XG51};
VARY1:=vol/((HIGH-LOW)*2-Abs(CLOSE-OPEN)){XG51};
SD:=(C>60 AND C<100,200,100){XG51};
SF:=IF(C<40 AND C<=60,300,SD){XG51};
SG:=IF(C>10 AND C<=28,1000,IF(C>29 AND C<40,500,SF)){XG51};
SH:=IF(C<5,5000,IF(C>=5 AND C<=10,2000,SG)){XG51};
SJ:=IF(C>=6000,5,SH){XG51};
SK:=IF(C>1000 AND C<6000,25,SJ){XG51};
macd:=(DIF-DEA)*SK,COLORstICK{XG51};
STICKLINE((MacD>=0),0,MACD,3,1),COLOR0000FF{XG51};
STICKLINE(((MACD>=0) AND (MACD < REF(MACD,1))),0,MACD,3,0),COLORGREEN{XG51};
STICKLINE((MACD<0),0,MACD,3,0),COLORFFFF00{XG51};
STICKLINE(((MACD<0) AND (MACD > REF(MACD,1))),0,MACD,3,1),COLORWHITE{XG51};
JS1:=100000*(CLOSE-REF(CLOSE,5))/(5*REF(CLOSE,5)){XG51};
JS2:=IF(JS1>110,110,JS1){XG51};
JS:=IF(JS2<-20,-20,JS2){XG51};
RSV2:=(CLOSE-LLV(LOW,120))/(HHV(HIGH,120)-LLV(LOW,120))*100{XG51};
K2A:=SMA(RSV2,33,1){XG51};
K2:=IF(TT=1,REF(K2A,1),K2A){XG51};
D2:=SMA(K2,3,1){XG51};
OK:=K2{XG51};
RSV:=(CLOSE-LLV(LOW,89))/(HHV(HIGH,89)-LLV(LOW,89))*100{XG51};
K89A:=SMA(RSV,33,1){XG51};
K89:=IF(TT=1,REF(K89A,1),K89A){XG51};
RSVC2:=(CLOSE-LLV(LOW,140))/(HHV(HIGH,120)-LLV(LOW,120))*100{XG51};
KC2:=SMA(RSVC2,46,1){XG51};
DC2:=SMA(KC2,46,1){XG51};
大趋势:DC2,LINETHICK1,CIRCLEDOT,COLORBLUE{XG51};
TYPP:=(HIGH+LOW+CLOSE)/3{XG51};
cci:=(TYPP-MA(TYPP,14))/(0.015*AVEDEV(TYPP,14)){XG51};
GG:=(C-REF(C,210))/REF(C,210)*55{XG51};
WG:=BARSSINCE(V>0)+1{XG51};
GGJX:=((SUM(C*V,WG)/SUM(V,WG)+WG*0)/REF((SUM(C*V,WG)/SUM(V,WG)+WG*0),0)-1)*55{XG51};
DPX:=0.3*(3*SMA((C-LLV(L,105))/(HHV(H,105)-LLV(L,105)),5,1)-2*SMA(SMA((C-LLV(L,105))/(HHV(H,105)-LLV(L,105)),5,1),3,1))*0.9,,COLOR5AFF99{XG51};
GBC:=crOSS(GG,GGJX){XG51};
GBK:=-CROSS(GGJX,GG){XG51};
GBD:=SUM(GBC,0)+SUM(GBK,0){XG51};
涨幅:=DYNAINFO(14)*100{XG51};
STS:=FINANCE(32)>=0 AND FINANCE(34)>0 AND DYNAINFO(7)>0 {XG51};
CK:=IF(DYNAINFO(8)>0 AND STS=0 AND 涨幅<4.91 OR DYNAINFO(8)>0 AND STS=1 AND 涨幅<9.91,1,0){XG51};
CCT:=DYNAINFO(8){XG51};
PPP:= FILTER(CCT=0,500) {XG51};
DRAWTEXT(PPP,45,'★今日该股票未开盘,不能分析★'),COLORFF00FF{XG51};
TDSA:=5+3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1){XG51};
TDSB:=IF(TA=1 AND TDSA=105,70,TDSA){XG51};
WH:=TDSB{XG51};
WE:=FILTER(WH>90,16){XG51};
TDCJ:=(7*SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1)-3*SMA(SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1),3,1)-SMA(SMA(SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1),3,1),2,1)),COLORFF9933{XG51};
WL:=TDCJ{XG51};
VM1:=(C*2+H+L)/4*10{XG51};
VM2:=EMA(VM1,13)-EMA(VM1,34){XG51};
VM3:=EMA(VM2,5){XG51};
VM4:=2*(VM2-VM3)*5.5{XG51};
A:=EMA(WINNER(CLOSE),10){XG51};
B:=EMA(WINNER(CLOSE),34){XG51};
BA:=100*(CLOSE-REF(CLOSE,12))/REF(CLOSE,12){XG51};
BD:=MA(roc,6)*100{XG51};
VAR67:=(LOW+HIGH+CLOSE)/3{XG51};
VAR80:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,3,0){XG51};
VAR81:=zig(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3){XG51};
VAR83:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3){XG51};
VAR82:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3){XG51};
VAR84:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3){XG51};
VAR85:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3){XG51};
VAR87:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3){XG51};
VARF:=100-3*SMA((CLOSE-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1),15,1){XG51};
VAR9A:=100-3*SMA((OPEN-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1),15,1){XG51};
VAR86:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3){XG51};
VAR88:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3){XG51};
VARX1:=(MA(CLOSE,80)-MA(CLOSE,13)/3){XG51};
VARX2:=( MA((CLOSE-VARX1)/VARX1,1)){XG51};
NN1:=VAR80{XG51};
VARM1:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36))*100{XG51};
VARM2:=SMA(VARM1,3,1){XG51};
NN2:=(VAR81+VAR83+VAR85+VAR87){XG51};
MM1:=(VAR82+VAR84+VAR86+VAR88){XG51};
MM2:= IF(MM1>0,-500,0){XG51};
MM:= IF(C>1000,MM2*100,MM2),COLORWHITE,LINETHICK3{XG51};
CT:=SUM(MM,0) AND T1=1{XG51};
CL1:=EMA(IF(WH<15 AND WL<5 AND OK<55 AND L<= LLV(L,27),SMA(ABS(L-REF(L,1)),27,1)/SMA(MAX(L-REF(L,1),0),27,1),0),3)*100{XG51};
CL2:=IF(CL1>80,80,CL1){XG51};
CHH1:=SUM(WE OR CL2,0){XG51};
CHH:=IF(CT=0 AND CHH1>110,110,CHH1){XG51};
五指山:TDSB,COLORFF00FF{XG51};
VAS1:=(2*C+H+L)/4{XG51};
VAS2:=LLV(L,34){XG51};
VAS3:=HHV(H,34){XG51};
AAD:=MA(CLOSE,32){XG51};
BAD:=MA(CLOSE,12){XG51};
DDD:=CROSS(B,A){XG51};
RSVR:= (CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
VAR1:=HHV(HIGH,9)-LLV(LOW,9){XG51};
VAR2:=HHV(HIGH,9)-CLOSE{XG51};
VAR4:=VAR2/VAR1*100-70{XG51};
VAR6:=(2*CLOSE+HIGH+LOW)/4{XG51};
VAR8:=LLV(LOW,34){XG51};
VAR11:=HHV(HIGH,34){XG51};
VAR12:=EMA((VAR6-VAR8)/(VAR11-VAR8)*100,13){XG51};
VAR13:=EMA(0.667*REF(VAR12,1)+0.333*VAR12,2){XG51};
万泉河:VAR12,COLORCYAN{XG51};
RSV1:=(CLOSE-LLV(LOW,35))/(HHV(HIGH,35)-LLV(LOW,35))*100{XG51};
K1:=SMA(RSV1,8,1){XG51};
D1:=SMA(K1,8,1){XG51};
资金流:D1,,NODRAW{XG51};
STICKLINE(EMA(D1,3)>REF(EMA(D1,3),1) ,EMA(D1,3) ,REF(EMA(D1,3),1) ,11 ,0),COLORWHITE{XG51};
STICKLINE(EMA(D1,3)<REF(EMA(D1,3),1) ,EMA(D1,3) ,REF(EMA(D1,3),1) ,11 ,0 ),COLORGREEN;

KA1:=SMA(RSVR,8,1){XG51};
DA1:=SMA(KA1,8,1){XG51};
TDFZ:=DA1{XG51};
波浪:= (7*SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1)-3*SMA(SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1),3,1)-SMA(SMA(SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1),3,1),2,1)),COLORFF9933{XG51};
VARM3:=SMA(VARM2,3,1){XG51};
VARM4:=SMA(VARM3,3,1);
AAC:=MA(C,1){XG51};
BBB:=MA(AAD,2){XG51};
VAR51:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*80{XG51};
BBC:=SMA(VAR51,7,1){XG51};
SMX:=EMA(C,65)/EMA(REF(C,65),65)*10{XG51};
VAR68:=(VAR67-MA(VAR67,14))/(0.015*AVEDEV(VAR67,14)){XG51};
wr30:=100*(HHV(HIGH,79)-CLOSE)/(HHV(HIGH,79)-LLV(LOW,79)){XG51};
VAR21:=(2*CLOSE+HIGH+LOW+OPEN)/5{XG51};
VAR22:=LLV(LOW,34){XG51};
VAR23:=HHV(HIGH,34){XG51};
CC:=EMA(C,11)/EMA(REF(C,11),11)*10{XG51};
W1:=WL/10{XG51};
W2:=REF(WL,1)/10{XG51};
SK1:=EMA((VAR21-VAR22)/(VAR23-VAR22)*100,13){XG51};
WR31:=IF(WR30=0 OR SK1>=90 OR VAR68>-250,100,WR30){XG51};
VAR1Z:=REF(CLOSE,1){XG51};
VAR2Z:=SMA(MAX(CLOSE-VAR1Z,0),7,1)/SMA(ABS(CLOSE-VAR1Z),7,1)*100{XG51};
VAR3Z:=SMA(MAX(CLOSE-VAR1Z,0),13,1)/SMA(ABS(CLOSE-VAR1Z),13,1)*100{XG51};
VAR4Z:=SMA(MAX(VAR1Z-CLOSE,0),7,1)/SMA(ABS(CLOSE-VAR1Z),7,1)*100{XG51};
VAR5Z:=SMA(MAX(VAR1Z-CLOSE,0),13,1)/SMA(ABS(CLOSE-VAR1Z),13,1)*100{XG51};
VAR6Z:=BARSCOUNT(CLOSE){XG51};
小舟:IF(CK=1 AND OK<30 AND NN1>0 OR NN2>0 ,35,DRAWNULL)*2,STICK,COLORLIMAGENTA,LINETHICK2{XG51};
LH2:=EMA(IF(WL<35 AND T4=1 AND L<= LLV(L,30),SMA(ABS(L-REF(L,1)),30,1)/SMA(MAX(L-REF(L,1),0),30,1),0),3)*30,STICK,COLORBLUE,LINETHICK2{XG51};
LH:=IF(LH2>80,80,LH2){XG51};
LHH:=SUM(LH,0){XG51};
浪花:LH,STICK,COLORBLUE,LINETHICK2{XG51};
VAR2A:=VARF<REF(VAR9A,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1){XG51};
NC1:=CT=0 AND CROSS(WL,TDFZ){XG51};
NC2:=WH>25 AND WH<55 AND WL > MA(REF(WL,5),5) AND CT=0 AND T2=1 AND 涨幅<7{XG51};
VARSA1:=REF(CLOSE,1){XG51};
VARSA2:=SMA(MAX(CLOSE-VARSA1,0),7,1)/SMA(ABS(CLOSE-VARSA1),7,1)*100{XG51};
VARSA3:=SMA(MAX(CLOSE-VARSA1,0),13,1)/SMA(ABS(CLOSE-VARSA1),13,1)*100{XG51};
VARC:=(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)){XG51};
KZ:=CT=0 AND VARC=1{XG51};
CH:=SUM(KZ,0) AND T1=1{XG51};
P1:= FILTER(KZ=1,16) {XG51};
DRAWTEXT(FILTER(KZ=1,16)=1,55,'←看涨！'),COLORLIMAGENTA,LINETHICK2{XG51};
STICKLINE(FILTER(KZ=1,16)=1,0,75,1,0),LINETHICK1,COLORLIMAGENTA{XG51};
STICKLINE(FILTER(P1=1,45)=1,0,30,10,0),LINETHICK1,COLORLIMAGENTA{XG51};
DRAWICON(FILTER(KZ=1,240)=1,8,5){XG51};
EE:=EMA(C,150)/EMA(REF(C,150),150)*10{XG51};
HH:=IF(EE>REF(EE,1),1,0){XG51};
HS1:=CROSS(EE,SMX) AND EE>CC AND SMX>CC AND HH=1{XG51};
HS:=SUM(HS1,0) AND T1=1{XG51};
DRAWTEXT(CT=0 AND T1=1 AND VAR2A AND COUNT(VAR2A,132)=1,30,'←挖金矿?'),LINETHICK1,COLOR00FF33{XG51};
STICKLINE(CT=0 AND T1=1 AND VAR2A AND COUNT(VAR2A,132)=1,0,85,1,0),COLOR00FF33{XG51};
DRAWICON(CT=0 AND T1=1 AND VAR2A AND COUNT(VAR2A,132)=1,-8,1){XG51};
VAR31:=MA(VOL,5)>MA(VOL,60){XG51};
DDS1:= T1=1 AND CROSS(CC+0.01,SMX) AND WH<70 OR WH<70 AND T1=1 AND CROSS(CC+0.01,EE){XG51};
DDS2:= T1=1 AND CROSS(EE+0.01,SMX-0.01) AND WH<70{XG51};
DRAWTEXT(FILTER(DDS1=1 OR DDS2=1,32)=1,30,'←挖金矿?'),LINETHICK1,COLOR00FF33{XG51};
STICKLINE(FILTER(DDS1=1 OR DDS2=1,32)=1,0,85,1,0),COLOR00FF33,LINETHICK2{XG51};
DRAWICON(FILTER(DDS1=1 OR DDS2=1,32)=1,-8,1){XG51};
BM:=EMA(C,2){XG51};
SM:=EMA(SLOPE(C,21)*20+C,42);
BUA:=JS<=-10 AND WL<5 AND ZJL<0 AND CCT>0 AND T1=1 AND CT=0{XG51};
BUB:=JS<0 AND WL<0 AND CCT>0 AND WH<=0 AND T3=1 AND CT=0{XG51};
SEL:=CROSS(SM,BM) AND WH>90{XG51};
JDD:=EMA(CLOSE,144), COLORYELLOW,LINETHICK2{XG51};
VAR2C:=MA(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),5)*100{XG51};
VAR2D:=5{XG51};
VAR2E:=CROSS(VAR2C,VAR2D){XG51};
DX:=IF(VAR2E AND CLOSE<JDD,1,0),LINETHICK0,COLORBLUE{XG51};
DCT:=SUM(DX,0){XG51};
VARM6:=CC>SMX AND CC>EE AND CROSS(VARM3,VARM4) AND VARM3<30 AND T1=1 AND CCT >0 AND 涨幅<8{XG51};
VARM7:=WH>70 AND T4=1 AND CROSS(SMX,CC) AND 涨幅<9.9 OR WH>80 AND T4=1 AND CROSS(EE,SMX) OR WH>80 AND T4=1 AND CROSS(VARM4,VARM3) AND VARM3>80 AND CCT>0 AND 涨幅<9.9{XG51};
VM5:=IF(VM4>=0,VM4,0),COLORFF00FF{XG51};
VM6:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1){XG51};
VM7:=EMA(VM6,5){XG51};
VM8:=(VM7-REF(VM7,3))/REF(VM7,3)*100{XG51};
VARSB1:=SMA(MAX(VARSA1-CLOSE,0),7,1)/SMA(ABS(CLOSE-VARSA1),7,1)*100{XG51};
VARSB2:=SMA(MAX(VARSA1-CLOSE,0),13,1)/SMA(ABS(CLOSE-VARSA1),13,1)*100{XG51};
VARSB3:=BARSCOUNT(CLOSE){XG51};
DESY:=100*(HHV(HIGH,33)-CLOSE)/(HHV(HIGH,33)-LLV(LOW,33))*100{XG51};
HYJD:=(T4=1 AND DA1<35 AND VARSA2<25 AND VARSA3<30 AND VARSB3>35)*65, STICK,COLORBLUE{XG51};
CA:=CT=1 AND T13=1 AND 涨幅<9.8{XG51};
DDC:='★提醒：后市看跌↓当心'{XG51};
DRAWTEXT(FILTER(CA=1,360)=1,50,DDC),COLORCYAN{XG51};
DRAWTEXT(FILTER(CA=1,360)=1,90,' 逃?'),LINETHICK1,COLORCYAN{XG51};
DRAWICON(FILTER(CA=1,360)=1,90,15){XG51};
STICKLINE(FILTER(CA=1,360)=1,0,80,1,0),LINETHICK1,COLORBLUE{XG51};
波峰:= (CH=0 AND VARSB1<25 AND VARSB2<30 AND VARSB3>35)*100,COLORCYAN;

OUT:=波峰{XG51};
SSV1:=(2*CLOSE+HIGH+LOW)/4{XG51};
SSV2:=LLV(LOW,34){XG51};
SSV3:=HHV(HIGH,34){XG51};
SSVA:=EMA((SSV1-SSV2)/(SSV3-SSV2)*100,12){XG51};
SSVB:=EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3){XG51};
TDBV:=CROSS(SSVB,SSVA) AND SSVA<30 AND WH<5 AND WL<25 AND CK=1{XG51};
VARV1:=(C*2+H+L)/4*10{XG51};
VARV2:=EMA(VARV1,13)-EMA(VARV1,34){XG51};
VARV3:=EMA(VARV2,5){XG51};
VARV4:=2*(VARV2-VARV3)*5.5{XG51};
VARR1:= IF(VARV4<=0,VARV4,0),COLORYELLOW{XG51};
VARR2:=IF(VARV4>=0,VARV4,0),COLORFF00FF{XG51};
VARV5:=(HHV(INDEXH,8)-INDEXC)/(HHV(INDEXH,8)-LLV(INDEXL,8))*8{XG51};
VARV6:=EMA(3*VARV5-2*SMA(VARV5,18,1),5){XG51};
VARV7:=(INDEXC-LLV(INDEXL,8))/(HHV(INDEXH,8)-LLV(INDEXL,8))*10{XG51};
VARV8:=(INDEXC*2+INDEXH+INDEXL)/4{XG51};
VARV9:=EMA(VARV8,13)-EMA(VARV8,34){XG51};
VARVA:=EMA(VARV9,3){XG51};
VARVB:=(VARV9-VARVA)/2{XG51};
VARR3:=IF(VARVB>=0,VARVB,0),COLORWHITE{XG51};
VARR4:=IF(VARVB<=0,VARVB,0),COLORCYAN{XG51};
V11:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1){XG51};
QSX:=WH{XG51};
VARH:=(QSX-REF(QSX,1))/REF(QSX,1)*100{XG51};
AA:=(QSX<=13) AND FILTER((QSX<=13),15){XG51};
TDE:=FILTER(QSX>90,16){XG51};
TDAA:=IF( TT=1 AND TDE=1,REF(TDE,1),TDE){XG51};
FFJ:=TDAA{XG51};
TDC:=GBD=0 AND CT=1 AND T9=1 AND TDAA AND ZJL>70 AND 涨幅<9.9{XG51};
TDA:=STICKLINE(FILTER( QSX<=13 AND VARH>13,60)=1,0,100,1,0){XG51};
TDS:=IF(TT=1 AND TDE=1,REF(TDA,1),TDA){XG51};
TDW:=TDS{XG51};
SWEE:= STICKLINE(FILTER(VARM7=1,16)=1,70,90,1,0){XG51};
DUP:=ZJL>80 AND WH>=99.4 AND WL>=89 AND CK=1 AND CCT>0 AND T1=1 AND 涨幅<8{XG51};
BBAA:=WL<15 AND WH<25 AND TDS=1 AND T1=1 AND CT=0 AND TDW{XG51};
BBA:= DA1<35 AND CROSS(WH,WL) AND (QSX<=13 AND VARH>13) AND FILTER((QSX<=13 AND VARH>13),10) {XG51};
DD2:=CROSS(QSX,WL) AND WH<10{XG51};
DD5:= WL<15 AND WH<20 AND CROSS(ABS(GG),ABS(GGJX*1.15)) AND ABS(GG)>ABS(GGJX*1.15){XG51};
VBB:=WH<5 AND WL<0 AND OK<35 AND T3=1 AND CT=1 AND 涨幅<7{XG51};
SSW:=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),COLOR00FFFF{XG51};
BUD:=IF(CT=1 AND T2=1 AND WH<=0 AND WL<0 AND JS<=-20 AND CROSS(SSW,1),1,0){XG51};
BUE:=JS<=-20 AND WH>=85 AND WL<=10 AND OK<50 AND T2=1{XG51};
TDBA:=T2=1 AND CK=1 AND LHH=0 AND ZJL>78 AND OK<90 AND WH>95 AND CCT>0 AND 涨幅<9.9{XG51};
TDBB:=JS>=110 AND WH>=110 AND WL>90 AND OK>=94 AND CCT>0 AND 涨幅<9.9{XG51};
TDP:=ZJL>79 AND LHH=0 AND OK<90 AND IF(A>0.90 AND CLOSE<MA(CLOSE,5),1,0)*1 AND 涨幅<9.9{XG51};
TDQ:=JS>=110 AND WH>=110 AND OK>60 AND CCT>0 AND T1=1 AND 涨幅<9.9{XG51};
TDJ:=JS>=110 AND WH>95 AND WL>95 AND OK>95 AND ZJL>59 AND T1=1 AND CCT>0 AND 涨幅<9.9{XG51};
TDF:=JS>=100 AND WH>=100 AND WL>=85 AND OK>=65 AND 涨幅<9.9{XG51};
TDB:=TDAA AND JS>=100 AND WH>100 AND OK>85 AND T1=1 AND CCT>0 AND 涨幅<9.9{XG51};
界:STICKLINE(CK=1 AND WH>=95 AND WH>REF(WH,1),87,94,2,0),COLORBLUE{XG51};
DRAWICON(FILTER(TDBA =1,8)=1,97,2){XG51};
DRAWICON(FILTER(TDBB =1,8)=1,97,2){XG51};
DRAWICON(FILTER(TDC =1,8)=1,97,2){XG51};
DRAWICON(FILTER(TDJ =1,8)=1,97,2){XG51};
DRAWICON(FILTER(TDB =1,8)=1,97,2){XG51};
DRAWICON(FILTER(TDP =1,64)=1,97,2){XG51};
DRAWICON(FILTER(TDQ=1,8)=1,97,2){XG51};
DRAWICON(FILTER(TDF=1,8)=1,97,2);

DRAWICON(TDBV,-8,1){XG51};
DRAWICON(FILTER( BBAA=1,16)=1,-8,1){XG51};
DRAWICON(FILTER(DD5=1 AND CT=0 AND T7=1 AND 涨幅<7,64)=1,-8,1){XG51};

STICKLINE(FILTER(BUB=1,32)=1,0,65,1,0),LINETHICK1,COLORBLUE{XG51};
STICKLINE(FILTER(BUE=1,16)=1,0,65,1,0),LINETHICK3,COLORBLUE{XG51};
DRAWTEXT(FILTER(OUT=100 ,32)=1,93,' ←逃顶'),LINETHICK1,COLORBLUE{XG51};
DRAWTEXT(WH>80 AND OK>76 AND T1=1 AND CROSS(K89,K2),93,'逃顶'),LINETHICK1,COLORBLUE;

警戒:85,POINTDOT,COLORCYAN{XG51};
{X.G?5_1.C.N.{};

源码正文：

ma1:=MA(CLOSE,5){XG51};
MA2:=MA(CLOSE,10){XG51};
P01:=IF(MA1>MA2,1,IF(MA2>MA1,-1,0)){XG51};
MA3:=MA(CLOSE,3){XG51};
MA4:=MA(CLOSE,5){XG51};
P02:=IF(MA3>MA4,1,IF(MA4>MA3,-1,0)){XG51};
MA5:=MA(CLOSE,12){XG51};
MA6:=MA(CLOSE,50){XG51};
P03:=IF(MA5>MA6,1,IF(MA6>MA5,-1,0));
RSV:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100{XG51};
K:=ema(RSV,3){XG51};
D:=EMA(K,3){XG51};
P04:=IF(K>D,1,IF(D>K,-1,0)){XG51};
dif:=EMA(CLOSE,12)-EMA(CLOSE,26){XG51};
DEA:=EMA(DIF,9){XG51};
MacD:=(DIF-DEA)*2{XG51};
P05:=IF(DIF>DEA,1,IF(DEA>DIF,-1,0)){XG51};
TR:=EMA(EMA(EMA(CLOSE,12),12),12){XG51};
TRIX:=(TR-REF(TR,1))/REF(TR,1)*100{XG51};
MATRIX:=MA(TRIX,9) {XG51};
P06:=IF(TRIX>MATRIX,1,IF(MATRIX>TRIX,-1,0)){XG51};
TR1:=EMA(MAX(MAX(HIGH-LOW,Abs(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),7){XG51};
HD :=HIGH-REF(HIGH,1){XG51};
LD :=REF(LOW,1)-LOW{XG51};
DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),7){XG51};
DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),7){XG51};
pdi:= DMP*100/TR{XG51};
mdi:= DMM*100/TR{XG51};
ADX:= EMA(ABS(MDI-PDI)/(MDI+PDI)*100,7){XG51};
ADXR:=EMA(ADX,7){XG51};
P07:=IF(PDI>MDI AND ADX>PDI AND ADX>50,3,
IF(PDI<MDI AND ADX>MDI AND ADX>50,-3,0)){XG51};
LC:=REF(CLOSE,1){XG51};
RSI1:=EMA(MAX(CLOSE-LC,0),5)/EMA(ABS(CLOSE-LC),5)*100{XG51};
P08:=IF(RSI1>80,1,IF(RSI1<20,-1,0)){XG51};
TYP:=(HIGH+LOW+CLOSE)/3{XG51};
CCI:=(TYP-MA(TYP,8))/(0.015*AVEDEV(TYP,8)){XG51};
P09:=IF(CCI>180,2,IF(CCI<-180,-2,0)){XG51};
wr1:=(CLOSE-LLV(LOW,6))/(HHV(HIGH,6)-LLV(LOW,6))*100{XG51};
P10:= IF(WR1>80,1,IF(WR1<20,-1,0)){XG51};
OSC:=100*(CLOSE-MA(CLOSE,20)){XG51};
P11:=IF(OSC>0,1,IF(OSC<0,-1,0)){XG51};
MOM:=CLOSE-REF(CLOSE,7){XG51};
P12:=IF(MOM>0,1,IF(MOM<0,-1,0)){XG51};
DPO:=CLOSE-REF(MA(CLOSE,11),11/2+1){XG51};
P13:=IF(DPO>0,1,IF(DPO<0,-1,0)){XG51};
MB:=MA(CLOSE,12){XG51};
R:=(CLOSE-MB)*(CLOSE-MB){XG51};
X1:=MA(R,12){XG51};
X2:=SQRT(X1){XG51};
D1:=1{XG51};
UPPER:=MB+(D1*X2){XG51};
LOWER:=MB-(D1*X2){XG51};
P14:=IF(CLOSE>UPPER,2,IF(CLOSE<LOWER,-2,0)){XG51};
BR:=SUM(MAX(0,HIGH-REF(CLOSE,1)),14)/SUM(MAX(0,REF(CLOSE,1)-LOW),14)*100{XG51};
AR:=SUM(HIGH-OPEN,14)/SUM(OPEN-LOW,14)*100{XG51};
P15:=IF(BR>350 OR AR>180,3,IF(BR<45 OR AR<45,-3,0)){XG51};
TH:=SUM(IF(CLOSE>REF(CLOSE,1),vol,0),14){XG51};
TL:=SUM(IF(CLOSE<REF(CLOSE,1),VOL,0),14){XG51};
TQ:=SUM(IF(CLOSE=REF(CLOSE,1),VOL,0),14){XG51};
VR:=0100*(TH*2+TQ)/(TL*2+TQ){XG51};
P16:=IF(VR>350,3,IF(VR<45,-3,0)){XG51};
WVAD:=SUM((CLOSE-OPEN)/(HIGH-LOW)*VOL,6)/10000{XG51};
P17:=IF(WVAD>0,1,IF(WVAD<0,-1,0)){XG51};
VOLUME:=MA(VOL,4)/VOL{XG51};
MID:=100*(HIGH+LOW-REF(HIGH+LOW,1))/(HIGH+LOW){XG51};
EMV:=MA(MID*VOLUME*(HIGH-LOW)/MA(HIGH-LOW,4),4){XG51};
P18:=IF(EMV>0,1,IF(EMV<0,-1,0)){XG51};
VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL){XG51};
OBV:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0){XG51};
MaoBV:=EMA(OBV,24){XG51};
P19:=IF(OBV>MAOBV,1,IF(OBV<MAOBV,-1,0)){XG51};
PVI:= PVI,COLORRED{XG51};
MPVI:=EMA(PVI,24),COLORBLUE;
P20:=IF(PVI>MPVI,1,IF(PVI<MPVI,-1,0)){XG51};
NVI:=NVI,COLORRED{XG51};
MNVI:=EMA(NVI,24),COLORBLUE{XG51};
P21:=IF(NVI>MNVI,2,IF(NVI<MNVI,-2,0)){XG51};
MASS:=SUM(MA(HIGH-LOW,9)/MA(MA(HIGH-LOW,9),9),25){XG51};
MA7:=MA(CLOSE,9){XG51};
P22:=IF(MA7>REF(MA7,1) AND MASS>26.5,2,IF(MA7<REF(MA7,1)
AND MASS<26.5,-2,0)){XG51};
NUM:=ABS(HHV(HIGH,15)-LLV(LOW,15)){XG51};
DEN:=SUM(ABS(CLOSE-REF(CLOSE,1)),15){XG51};
VHF:=IF(DEN=0,0,NUM/DEN){XG51};
VHF1:=EMA(VHF,240){XG51};
P23:=IF(VHF>VHF1,1,IF(VHF<VHF1,-1,0)){XG51};
PU:=MA(CLOSE,13){XG51};
CU:=MA(VOL,13){XG51};
PU1:=(PU-REF(PU,1))/REF(PU,1)*100{XG51};
CU1:=(CU-REF(CU,1))/REF(CU,1)*100{XG51};
逆时针曲线:=PU1+CU1{XG51};
P24:=IF(逆时针曲线>REF(逆时针曲线,1),1,IF(逆时针曲线<REF(逆时针曲线,1),-1,0)){XG51};
LC2:=REF(CLOSE,1){XG51};
AA:=ABS(HIGH-LC2){XG51};
BB:=ABS(LOW-LC2){XG51};
CC:=ABS(HIGH-REF(LOW,1)){XG51};
DD:=ABS(LC2-REF(OPEN,1)){XG51};
R2:=IF(AA>BB AND AA>CC,AA+BB/2+DD/4,IF(BB>CC AND BB>AA,BB+AA/2+DD/4,CC+DD/4)){XG51};
X01:=(CLOSE-LC2+(CLOSE-OPEN)/2+LC2-REF(OPEN,1)){XG51};
SI:=16*X01/R2*MAX(AA,BB){XG51};
ASI:=SUM(SI,0),COLORRED{XG51};
MASI:=MA(ASI,6),COLORBLUE{XG51};
P25:=IF(CLOSE<HHV(CLOSE,13) AND ASI=HHV(ASI,13),1,IF(CLOSE>LLV(CLOSE,13) AND ASI=LLV(ASI,13),-1,0)){XG51};
BIAS1 :=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100{XG51};
P26:=IF(BIAS1>10,1,IF(BIAS1<-10,-1,0)){XG51};
决策曲线: (36+P01+P02+P03+P04+P05+P06+P07+P08+P09+P10+P11+P12+P13+P14+P15+P16+
P17+P18+P19+P20+P21+P22+P23+P24+P25+P26)*1.36{XG51};
MAJCQX:MA(决策曲线,3){XG51};
stICKLINE(C>0,36,36,10,0),COLOR00FF00{XG51};
STICKLINE(C>0,56,56,10,0),COLORFF00FF{XG51};
STICKLINE(C>0,71,71,10,0),COLORWHITE{XG51};
STICKLINE(C>0,44,44,10,0),COLORBLUE{X*G~5-1*C*N*{};