通达信重力势能未加密选股指标公式源码

N:=250{XG51};
均价:=(0.618*(0.809*C+0.191*O)+0.382*(IF(H=C,C,H)+IF(L=C,C,L))/2){XG51};
AA:=(Wma(均价,34)*0.618+(WMA(均价,55)+WMA(均价,89))/2+WMA(均价,144)*0.382)/2{XG51};
黄金线:=(REF(AA,2)+REF(AA,1)+REF(AA,0))/3{XG51};
ac:=IF(BARSCOUNT(C)=1,C,均价){XG51};
ao1:=REF(AC,1)/2{XG51};
AO:=IF(BARSCOUNT(C)=1,O,REF(AO1,1)+REF(AC,1)/2){XG51};
M:=C/REF(C,1){XG51};
G:=AMOUNT/HHV(REF(AMOUNT,1),250){XG51};
HI:=HHV(REF(C,1),250)-LLV(REF(C,1),250){XG51};
MGH:=IF(均价>黄金线,SGN(AC-AO)*M*G*HI,-1*Abs(M*G*HI)){XG51};
相对重力势能:MGH/ABS(HHV(MGH,N)-LLV(MGH,N)),volstICK{XG51};
0.4{XG51};
0.8;

{=W_W-W.X*G+5^1*C*N*{_}

通达信潜筹涌动未加密选股指标公式源码

源码正文：

SW:=18;BW:=66;DW:=86{XG51};
CJ:=(H+L+2*O+3*C)/7{XG51};
DK:=INTPART(276/POW(TOTALBARSCOUNT+0.3,2)-1.1){XG51};
DN:=IF(DK<5,5,DK){XG51};
KN:=POW(HHV(H,3.6*DN)/HHV(H,0),0.9){XG51};
短筹:SMA(Sma((PWINNER(2*SW,BW*CJ/100)+0.618*PWINNER(SW,DW*CJ/100))*61.8,1.2*DN,0.41*DN),2.2*DN,2.2*DN-1),COLORBLUE;
抢筹:IF(SLOPE(短筹,0.4*DN)>=0,SLOPE(短筹,0.4*DN)*POW(0.61*DN,1.5),0),COLORB0AFFF{XG51};
活筹:=0.28*短筹+4.62*抢筹-3{XG51};
上涨角:=HHV(ATAN(SLOPE(活筹,0.6*DN)*0.58)*180/3.14159,0.6*DN){XG51};
TT:=(上涨角+1.11*短筹)/1.916{XG51};
屯:=SMA(TT,2.4*DN,0.6*DN){XG51};
屯筹:=(2.28*HHV(屯,1.6*DN)+SMA(屯,2.4*DN,1))/2.801{XG51};
IF(SLOPE(屯筹,2)>0,屯筹,DRAWNULL),COLORWHITE{XG51};
IF(SLOPE(屯筹,2)<=0,屯筹,DRAWNULL),COLORYELLOW{XG51};
QL:=(抢筹*0.8+SLOPE(短筹,0.4*DN)*(60-短筹)*0.8+SLOPE(屯筹,0.6*DN)*(88-屯筹)*0.55+SLOPE(屯,0.6*DN)*(屯-100)*0.2)*POW(DN/4.2,0.4)*KN{XG51};
潜筹:IF(SLOPE(QL,1.6*DN)>0,0.22*SMA(QL,2.4*DN,2.4*DN-1)+0.44*HHV(QL,1.6*DN)-4,0),COLORFF9977{XG51};
QF:=BArslAst(crOSS(68,潜筹))+1{XG51};
潜伏期:IF(QF=1,REF(QF,1)+1,QF),LINETHICK0{XG51};
潜深:=0.5*HHV(潜伏期,3.6*DN)+0.5*SMA(潜伏期,3.6*DN,1){XG51};
上浮力:IF(SLOPE(潜深,2)<0,KN*50*POW(-SLOPE(潜深,2),0.2),0),COLORLIMAGENTA,LINETHICK2{XG51};
KP:=BARSLAST(CROSS(短筹,屯筹*(KN-0.0495)))+1{XG51};
庄筹派发:SMA(MA(115*KN-屯筹*(KN-0.0495),KP)*0.6,1.8*DN,2)+25,COLORRED{XG51};
潜筹涌动:=SMA(潜筹,1.8*DN,2){XG51};
XG:=SMA(V,4,3)<1.421*SMA(V,24,1){XG51};
牛市粗选:屯筹>88  AND 庄筹派发<46.7 AND  0.495*潜筹涌动+潜伏期>18.2  AND XG ,LINETHICK0{XG51};
回头岸:-潜筹*SLOPE(潜筹,2)/100,LINETHICK0{XG51};
定军山:抢筹+SLOPE(屯筹,8),LINETHICK0{XG51};
熊市粗选:(回头岸>0.1 OR 定军山>0) AND C/REF(C,1)>=1.048 AND 潜筹涌动>0.3*潜筹 AND XG,LINETHICK0{XG51};
IF(牛市粗选,庄筹派发,DRAWNULL),COLORLIMAGENTA,LINETHICK3{XG51};
IF(熊市粗选,庄筹派发,DRAWNULL),,COLORFF48A3,LINETHICK3{X-G^5+1-C-N-{};