通达信买进和最低价的主图选股指标公式源码

通达信买进和最低价的主图选股指标公式源码

源码正文：

M1:=5{XG51};
M2:=10{XG51};
M3:=20{XG51};
M4:=60{XG51};
M5:=120{XG51};
M6:=250{XG51};
M7:=30{XG51};
M8:=1{XG51};
M9:=2{XG51};
M10:=3{XG51};
ma1:MA(CLOSE,M1){XG51};
MA2:MA(CLOSE,M2){XG51};
MA3:MA(CLOSE,M3){XG51};
MA4:MA(CLOSE,M4){XG51};
MA5:MA(CLOSE,M5){XG51};
MA6:MA(CLOSE,M6){XG51};
MA7:MA(CLOSE,M7){XG51};
MA8:MA(CLOSE,M8){XG51};
MA9:MA(CLOSE,M9){XG51};
MA10:MA(CLOSE,M10){XG51};
Z1:=stRCAT(HYBLOCK,' '){XG51};
Z2:=STRCAT(Z1,DYBLOCK){XG51};
Z3:=STRCAT(Z2,' '){XG51};
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORBLUE{XG51};
N:=BARSSINCEN(L=LLV(L,20),30){XG51};
A1:=IF(CURRBARSCOUNT<20 AND C<10,CONST(LLV(L,20)),DRAWNULL){XG51};
A2:=IF(CURRBARSCOUNT<20 AND C<10,CONST(HHV(C,20)),DRAWNULL){XG51};

DRAWKLINE(H,O,L,C){XG51};
A3:A1+0.1,COLORGRAY,LINETHICK2{XG51};
DRAWICON(MA(L,20)/A3<1.02 AND L/A3<1.02,A3,26){XG51};
DRAWKLINE(HIGH,OPEN,LOW,CLOSE){XG51};

A1P:=REF(HIGH,3)=HHV(HIGH,2*3+1); B1P:=FILTER(A1P,3); C1P:=BacKSET(B1P,3+1); D1P:=FILTER(C1P,3){XG51};
A2P:=REF(LOW,3)=LLV(LOW,2*3+1); B2P:=FILTER(A2P,3); C2P:=BACKSET(B2P,3+1); D2:=FILTER(C2P,3){XG51};
E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; E2:=(HIGH+LOW)/2{XG51};
H1:=(D1P AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1{XG51};
L1P:=(D2 AND NOT(D1P AND E1<E2)); H2:=D1P AND NOT(D2 AND E1>=E2){XG51};
X1:=REF(BArslAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1P,X1)>0,LLVBARS(IF(L1P,LOW,10000),X1)){XG51};
G1P:=F1>REF(F1,1); I1:=BACKSET(G1P,2); LDP:=I1>REF(I1,1){XG51};
L2PP:=LDP OR ISLASTBAR OR BARSCOUNT(CLOSE)=1{XG51};
X2:=REF(BARSLAST(L2PP),1)+1; F2:=BACKSET(L2PP AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2)){XG51};
G2P:=F2>REF(F2,1); I2:=BACKSET(G2P,2); HDP:=I2>REF(I2,1){XG51};
DRAWNUMBER(LDP,L*0.999,L),COLORRED;{XG51};
dif:=macd.DIF{XG51};
H300:=HHVBARS(DIF,300){XG51};
A:=boll.UB{XG51};
T:=BARSLAST(CROSS(A>=REF(A,1),0.5)){XG51};
E25:expma(C,25),COLORLIMAGENTA{XG51};
ZF:=EVERY(RANGE(C/REF(C,1),0.97,1.05),T+1){XG51};
ZFF:=(HHV(H,T+1)-LLV(L,T+1))/LLV(L,T+1)*100{XG51};
TJ:=EVERY(MAX(C,O)/A<1.02 ,T+1){XG51};
XL:=(ATAN((E25/REF(E25,T)-1)*100)*180/3.1415926){XG51};
TJ1:=CROSS(DIF>=REF(DIF,H300),0.5) AND ZFF<17 AND ZF AND TJ{XG51};
TJ2:=MIN(C,O)/E25>1.04{XG51};
XG:=TJ1 AND XL>75{XG51};
STICKLINE(XG,C,O,2,0),COLORLICYAN{XG51};
STICKLINE(XG,H,L,0,0),COLORLICYAN{XG51};
DRAWICON(XG,H*1.01,15){XG51};
DRAWTEXT(XG,L*0.95,'起程')COLORBLUE{X-G=5=1-C-N-{};