通达信回马智能辅助主图选股指标公式源码

通达信回马智能辅助主图选股指标公式源码

源码正文：

VAR1T:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))){XG51};
VAR2T:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14)))){XG51};
VAR3T:=(100 - ma(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34)){XG51};
DIR1:=Abs(CLOSE-REF(CLOSE,5)){XG51};
VIR1:=SUM(ABS(CLOSE-REF(CLOSE,1)),5){XG51};
ER1:=DIR1/VIR1{XG51};
CS1:=ER1*(0.8-2/8)+2/8{XG51};
CQ1:=CS1*CS1{XG51};
DIR2:=ABS(CLOSE-REF(CLOSE,10)){XG51};
VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10){XG51};
ER2:=DIR2/VIR2{XG51};
CS2:=ER2*(0.8-2/24)+2/24{XG51};
CQ2:=CS2*CS2{XG51};
stICKLINE(VAR2T < MA(VAR3T,6),LOW,HIGH,0,1),COLORLIGREEN{XG51};
STICKLINE(VAR2T > MA(VAR3T,6),LOW,HIGH,0,1),COLORWHITE{XG51};
STICKLINE(((OPEN>CLOSE)AND(VAR2T<MA(VAR3T,6))),(CLOSE-0.03),OPEN,2.5,0),COLORLIGREEN{XG51};
STICKLINE(((OPEN<CLOSE)AND(VAR2T<MA(VAR3T,6))),CLOSE,OPEN,2.5,1),COLORLIGREEN{XG51};
STICKLINE(((OPEN>CLOSE)AND(VAR2T>MA(VAR3T,6))),OPEN,(CLOSE-0.03),2.5,0),COLORLICYAN{XG51};
STICKLINE(((OPEN<CLOSE)AND(VAR2T>MA(VAR3T,6))),OPEN,CLOSE,2.5,1),COLORWHITE{XG51};
DRAWICON(crOSS(VAR2T,MA(VAR3T,6)),(LOW - (LOW*0.02)),7){XG51};
DRAWICON(CROSS(MA(VAR3T,6),VAR1T),(HIGH+(HIGH*0.02)),8){XG51};
PT:=REF(H,1)-REF(L,1){XG51};
cdp:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4{XG51};
AH:=CDP+PT{XG51};
AL:=CDP-PT{XG51};
NH:=CDP*2-REF(L,1){XG51};
NL:=CDP*2-REF(H,1){XG51};
强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW{XG51};
阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORYELLOW{XG51};
M:=IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL){XG51};
撑:IF(NL<M,CDP-(CDP-M)*0.618,NL)NODRAW{XG51};
底:IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL)NODRAW{XG51};
HHJSJDA:=(3*CLOSE+OPEN+LOW+HIGH)/6{XG51};
HHJSJDB:(20*HHJSJDA+19*REF(HHJSJDA,1)+18*REF(HHJSJDA,2)+17*REF(HHJSJDA,3)+16*REF(HHJSJDA,4)+15*REF(HHJSJDA,5)+14*REF(HHJSJDA,6)
+13*REF(HHJSJDA,7)+12*REF(HHJSJDA,8)+11*REF(HHJSJDA,9)+10*REF(HHJSJDA,10)+9*REF(HHJSJDA,11)+8*REF(HHJSJDA,12)
+7*REF(HHJSJDA,13)+6*REF(HHJSJDA,14)+5*REF(HHJSJDA,15)+4*REF(HHJSJDA,16)+3*REF(HHJSJDA,17)+2*REF(HHJSJDA,18)+
REF(HHJSJDA,20))/210,COLORYELLOW,LINETHICK2{XG51};
HHJSJDC:MA(HHJSJDB,5),COLORBLUE,LINETHICK2{XG51};
ZT:=C/REF(C,1)>1.090{XG51};
STICKLINE(ZT,OPEN,CLOSE,3,0),COLORWHITE{XG51};
STICKLINE(ZT,OPEN,CLOSE,3,0),COLORWHITE{XG51};
STICKLINE(ZT,H,L,0,0),COLORWHITE{XG51};
XH:=FILTER(ZT,13){XG51};
BH:=BArslAST(ZT){XG51};
LMIN:=REF(MIN(L,REF(C,1)),BH){XG51};
CZZ:=REF(H,BH)-LMIN{XG51};
STICKLINE(C AND BH<22,(LMIN+CZZ*0.5),(LMIN+CZZ*0.5),7,0),COLORWHITE{XG51};
STICKLINE(C AND BH<22,(LMIN+CZZ*0.382),(LMIN+CZZ*0.382),7,0),COLORLIMAGENTA{XG51};
STICKLINE(C AND BH<22,LMIN,LMIN,7,0),COLORYELLOW{XG51};
VARZT:=BARSLAST(C/REF(C,1)>1.097){XG51};
STICKLINE(VARZT=2,L*0.97,L*0.98,8,0),COLOR0000FF{XG51};
DRAWTEXT(VARZT=2,L*0.95,'3天'),COLORYELLOW{XG51};
STICKLINE(VARZT=4,H*1.03,H*1.02,8,0),COLOR9966FF{XG51};
DRAWTEXT(VARZT=4,H*1.06,'5天'),COLORYELLOW{XG51};
STICKLINE(VARZT=7,L*0.97,L*0.98,8,0),COLOR00FFFF{XG51};
DRAWTEXT(VARZT=7,L*0.95,'8天'),COLORYELLOW{XG51};
STICKLINE(VARZT=12,H*1.03,H*1.02,8,0),COLORFF33FF{XG51};
DRAWTEXT(VARZT=12,H*1.06,'13天'),COLORYELLOW{XG51};
AZ1:=ema(C,14){XG51};
AZ1X:=(AZ1-REF(AZ1,1))/REF(AZ1,1)*100,NODRAW{XG51};
出击:=IF(AZ1X>=0,REF(EMA(C,14),BARSLAST(CROSS(AZ1X,0))+1),DRAWNULL)COLORWHITE{XG51};
休假:=IF(AZ1X<0,REF(EMA(C,14),BARSLAST(CROSS(0,AZ1X))+1),DRAWNULL)COLORCYAN{XG51};
STICKLINE(CROSS(AZ1X,0),C,O,2,0)COLORLIMAGENTA{XG51};
STICKLINE(CROSS(0,AZ1X),C,O,2,0)COLORCYAN{X~G.5.1~C~N~{};