通达信反转形态主图未加密选股指标公式源码

源码正文：

HT:=HHVBARS(H,15){XG51};
LT:=LLVBARS(L,15){XG51};
DF1:=(REF(C,LT)-REF(C,HT+1))/REF(C,HT+1)*100{XG51};
DF2:=(C-REF(C,LT+1))/REF(C,LT+1)*100{XG51};
TJ:=C>=REF(C,HT){XG51};
V型:=HT>LT AND DF1<-5 AND COUNT(TJ,HT+1)=1 AND TJ AND ((C-REF(C,1))/C>0.04 OR (C-O)/C>0.04){XG51};
XGT:=BArslAst(V型){XG51};
HQF:=BacKSET(V型,HT+1){XG51};
LQF:=BACKSET(V型,LT+1){XG51};
HQFT:=BARSLAST(crOSS(HQF=1,0.5)){XG51};
LQFT:=BARSLAST(CROSS(LQF=1,0.5)){XG51};
NOTEXT1:DRAWLINE(HQFT=0,H,LQFT=0,L,0),COLORWHITE,LINETHICK6{XG51};
NOTEXT2:DRAWLINE(LQFT=0,L,V型,L,0),COLORWHITE,LINETHICK6{XG51};
TJ1:=O/C>1.05 AND C/REF(C,1)<0.94{XG51};
TJ2:=REF(C,1)/REF(C,2)<1.09 AND L=LLV(L,5){XG51};
TJ3:=TJ1 AND TJ2{XG51};
TJ4:=BARSLAST(TJ3){XG51};
TJ5:=BETWEEN(TJ4,4,15){XG51};
TJ6:=C/REF(C,1)>1.02 AND O/REF(C,TJ4)<1.03 AND C/REF(C,TJ4)>1.02{XG51};
TJ7:=COUNT(TJ6,TJ4)=1{XG51};
TJ8:=REF(O,1)/REF(C,TJ4)>1.03{XG51};
TJ9:=C/REF(C,1)>1.04{XG51};
TJ10:=EVERY(BETWEEN(O/REF(C,TJ4),1.05,0.9),TJ4){XG51};
U型:=TJ5 AND TJ6 AND TJ7 AND TJ9 AND REF(TJ10,1){XG51};
QF2:=BACKSET(U型=1,TJ4+1){XG51};
QFT2:=BARSLAST(CROSS(QF2=1,0.5)){XG51};
NOTEXT3:DRAWLINE(QFT2=0,L,U型,REF(L,QFT2),0),COLORmaGENTA,LINETHICK8{XG51};
STICKLINE(QFT2=0,O,L,3,0),COLORLIMAGENTA{XG51};
STICKLINE(U型,C,REF(L,BARSLAST(QFT2=0)),3,0),COLORLIMAGENTA{XG51};
T:=BARSLAST(H<REF(L,1)){XG51};
LKL:=REF(L,T+1){XG51};
TJ110:=HHV(H,T+1){XG51};
TJ11:=CROSS(C,REF(L,T+1)){XG51};
TJ12:=TJ110<REF(L,T+1){XG51};
突破幅度:=(C/REF(L,T+1)-1)*100{XG51};
突破量:=vol/REF(VOL,1){XG51};
ZF:=(REF(L,T+1)-LLV(L,T+1))/LLV(L,T+1)*100{XG51};
岛型:=REF(TJ12,1) AND TJ11 AND 突破量>2 AND ZF<10 AND 突破幅度>3{XG51};
QF:=BACKSET(岛型,T+2){XG51};
QFT:=BARSLAST(CROSS(QF=1,0.5)){XG51};
NOTEXT4:DRAWLINE(QFT=0,L,岛型,REF(L,QFT),0),COLORBLUE{XG51};
STICKLINE(岛型,C,O,3,0),COLORBLUE{XG51};
FT:=BACKSET(岛型,T+1){XG51};
STICKLINE(FT AND 岛型=0,C,O,3,0),COLORBLUE{XG51};
STICKLINE(FT AND 岛型=0,H,L,0,0),COLORBLUE{XG51};
STICKLINE(FT AND 岛型=0,LKL,LKL,4,0),COLORBLUE{XG51};
STICKLINE(FT AND 岛型=0,REFX(REF(TJ110,1),BARSNEXT(岛型)),REFX(REF(TJ110,1),BARSNEXT(岛型)),4,0),COLORBLUE{X?G.5-1?C?N?{};

源码正文：

限制:= (stRCMP(STKnaME,'ST')=-1 OR STRCMP(STKNAME,'*ST')=-1)=0
AND BARSCOUNT(C)>60
AND FINANCE(7)<2000000000 AND FINANCE(33)>0{XG51};
dif :=ema(CLOSE,12) - Ema(CLOSE,26){XG51};
DEA :=EMA(DIF,9){XG51};
MD :=2*(DIF-DEA){XG51};
T:=BArslAST(DIF<0 AND DEA<0 AND crOSS(DIF,DEA)){XG51};
TJ:=EVERY(MD>0,4) AND MD>REF(MD,1) AND REF(MD,1)<REF(MD,2) AND REF(MD,2)<REF(MD,3) AND REF(MD,3)<REF(MD,4) AND MD>0 AND DIF>0 {XG51};
水上漂1:=COUNT(TJ,T)=1 AND TJ AND 限制{XG51};
水上漂:SUM(水上漂1,1){XG51};
TJ2:=EVERY(MD>0,4) AND MD>REF(MD,1) AND REF(MD,1)<REF(MD,2) AND REF(MD,2)<REF(MD,3) AND REF(MD,3)<REF(MD,4) AND MD>0 AND DIF<0 AND DEA<0{XG51};
水下漂1:=COUNT(TJ2,T)=1 AND TJ2 AND 限制{XG51};
水下漂:SUM(水下漂1, 1){XG51};
A1:=HHV(EMA(vol/5,4),240){XG51};
A2:=LLV(EMA(VOL/5,4),240){XG51};
A3:=MA(CLOSE,35){XG51};
A4:=EMA(CLOSE,15)-EMA(CLOSE,30){XG51};
A5:=EMA(A4,12){XG51};
A6:=2*(A4-A5){XG51};
A7:=(CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12))*100{XG51};
A8:=(CLOSE-LLV(LOW,45))/(HHV(HIGH,45)-LLV(LOW,45))*100{XG51};
BA:=(CLOSE-LLV(LOW,225))/(HHV(HIGH,225)-LLV(LOW,225))*100{XG51};
B1:=SMA(A7,3,1){XG51};
B2:=SMA(A8,15,1){XG51};
B3:=SMA(BA,45,1){XG51};
ZZ:="macd.MacD">0{XG51};
B4:=(B3-REF(B3,1))*50{XG51};
B5:=(B2-REF(B2,1))*10{XG51};
B6:=REF(B2,1)-REF(B3,1){XG51};
B7:=(B2-B6-B3)*30{XG51};
B8:=B1-REF(B1,1){XG51};
B10:= EMA((EMA(VOL/5,4)-A2)/A2*A3,13){XG51};
A9:=EMA((A1-EMA(VOL/5,4))/EMA(VOL/5,4)*A3,13){XG51};
B9:=A6>=-0.035 AND A6<=0.045 AND CLOSE>MA(CLOSE,5)
AND CLOSE>MA(CLOSE,10) AND A9>-100{XG51};
DD:=EXIST(C/REF(C,1)>1.055,60){XG51};
空中加油: IF(B9 AND B8>7 AND REF(B8,1)<0 AND B8-REF(B8,1)>9,1,0) AND DD AND ZZ AND 限制, COLORWHITE{XG51};
MACD:=(DIF-DEA)*2{XG51};
TTT:=100*EMA(EMA(C-REF(C,1),6),6)/EMA(EMA(Abs(C-REF(C,1)),6),6){XG51};
TT:=LLV(TTT,2)=LLV(TTT,7) AND COUNT(TTT<0,2) AND CROSS(TTT,MA(TTT,2)){XG51};
TT1:=IF((HHV(ABS(((HHV(CLOSE,6)/LLV(CLOSE,6))-1)),6)>(10/100)),3,6){XG51};
TT2:=IF(MINUTE=5,TT1*48,IF(MINUTE=15,TT1*16,IF(MINUTE=30,TT1*8,IF(MINUTE=60,TT1*4,TT1)))){XG51};
TT3:=IF( VOL=0,MA(CLOSE,TT2),((SUM(AMOUNT,TT2)/SUM(VOL,TT2))/100)){XG51};
TT4:=REF(C>O OR C<O,24) AND CROSS(C,REF(TT3,1)){XG51};
TT5:=H/C<1.01 AND REF(C/REF(C,1)<1.095,11){XG51};
TT6:=REF(C>O OR C<O,1) AND MACD>0 AND REF(MACD<0,1){XG51};
牛眼:TT AND TT4 AND TT5 AND TT6{XG51};
{X_G?5!1_C_N_{};