通达信涨停十字星未加密选股指标公式源码

源码正文：

V2G:=(((CLOSE - REF(CLOSE,1)) / REF(CLOSE,1)) * 100){XG51};
V3G:=(ma(vol,2) / MA(VOL,10)){XG51};
V4G:=(VOL / CAPITAL){XG51};
A1G:=((((0.0068 * V2G) - (0.0072 * V3G)) - (0.5676 * V4G)) - 0.0105){XG51};
A2G:=((((0.0015 * V2G) - (0.0124 * V3G)) + (1.7461 * V4G)) - 0.0074){XG51};
GGHX:=((((0 - (12.2401 * A1G)) - (1 * A2G)) + 0.321) < 0){XG51};
AA1:=MA(HHV(H,485),17);
AA2:=MA(HHV(H,222),17);
AA3:=MA(HHV(H,96),17);
AA4:=MA(LLV(L,485),17);
AA5:=MA(LLV(L,222),17);
AA6:=MA(LLV(L,96),17);
AA7:=MA((AA4*0.96+AA5*96+AA6*0.96+AA1*0.558+AA2*0.558+AA3*0.558)/6,17);
AA8:=MA((AA4*1.25+AA5*1.23+AA6*1.2+AA1*0.55+AA2*0.55+AA3*0.65)/6,17);
AA9:=MA((AA4*1.3+AA5*3+AA6*1.3+AA1*0.68+AA2*0.68+AA3*0.68)/6,17);
AAA:=MA((AA7*3+AA8*2+AA9)/6*1.738,17){XG51};
AAB:=IF(DATE<=1341231,AAA,AAA*DAY);
Aac:=L;
AAD:=REF(L,1);
AAE:=SMA(Abs(AAC-AAD),3,1)/SMA(MAX(AAC-AAD,0),3,1)*100;
AAF:=MA(IF(C*1.35<=AAB,AAE*10,AAE/10),3);
AA10:=LLV(L,30);
AA11:=HHV(AAF,30);
AA12:=1341231;
CM:=IF(DATE<=AA12,MA(IF(L<=AA10,(AAF+AA11*2)/2,0),3),100000000){XG51};
AA13:=4*SMA((C-LLV(L,10))/(HHV(H,10)-LLV(L,10))*100,5,1)
-3*SMA(SMA((C-LLV(L,10))/(HHV(H,10)-LLV(L,10))*100,5,1),3.2,1);
BBGX:=CM AND crOSS(AA13,8){XG51};
FGXG:=REF(C,2)/REF(C,1)>1.09 AND C/REF(C,1)>1.09 AND H=C AND V>REF(V,1){XG51};
XG:BBGX AND GGHX AND FGXG{X?G-5=1?C?N?{};

源码正文：

ma5:MA(C,5),DOTLINE,COLOR606060{XG51};
H3:=EVERY(C>MA5,3){XG51};
L3:=EVERY(C<ma5,3){XG51};
X:=H3-L3{XG51};
T2:=BArslAst(X!=0){XG51};
Y:=REF(X,T2){XG51};
T3:=BARSLAST(crOSS(Y,0) OR CROSS(0,Y)){XG51};
HHL:=IF(REF(Y=-1,1),LLV(L,2),HHV(MAX(LLV(L,2),REF(LLV(L,2),1)),T3)){XG51};
LLH:=IF(REF(Y=1,1), HHV(H,2),LLV(MIN(HHV(H,2),REF(HHV(H,2),1)),T3)){XG51};
NOTEXT3:IF(Y=1 ,HHL,DRAWNULL),COLORCC66FF,LINETHICK2{XG51};
NOTEXT4:IF(Y=-1,LLH,DRAWNULL),COLOR55CC33,LINETHICK2{XG51};
NOTEXT1:IF(Y=1 AND T3=0,HHL,DRAWNULL),COLORFF66A0,CIRCLEDOT,LINETHICK7{XG51};
NOTEXT10:IF(Y=1 AND T3=0,HHL,DRAWNULL),COLOR00FFFF,CROSSDOT,LINETHICK1{XG51};
NOTEXT11:IF(Y=1 AND T3=0,HHL,DRAWNULL),COLOR0000FF,POINTDOT,LINETHICK4{XG51};
NOTEXT2:IF(Y=-1 AND T3=0,LLH,DRAWNULL),COLOR00FFCC,CIRCLEDOT,LINETHICK7{XG51};
NOTEXT20:IF(Y=-1 AND T3=0,LLH,DRAWNULL),COLORCC00FF,CROSSDOT,LINETHICK2{XG51};
NOTEXT21:IF(Y=-1 AND T3=0,LLH,DRAWNULL),COLORFFFFFF,POINTDOT,LINETHICK4{X=G~5^1=C=N={};