通达信能量穿越未加密选股指标公式源码

源码正文：

M1:=5{XG51};
M2:=10{XG51};
M3:=20{XG51};
M4:=60{XG51};
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2){XG51};
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
stICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),2,1),COLORLICYAN{XG51};
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2){XG51};
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2){XG51};
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2){XG51};
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,CLOSE,REF(CLOSE,1),2,0),COLORGREEN{XG51};
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1{XG51};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0),COLORWHITE{XG51};
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD{XG51};
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),2,1),COLORLICYAN{XG51};
基础值:=IF(C<REF(C,1) AND REF(C,1)<REF(C,2) AND L<REF(L,1) AND L>REF(L,2),REF(C,2),IF(C>REF(C,1),C,REF(C,1))),NODRAW{XG51};
towER1:IF(VAR1A,REF(基础值,1),基础值),NODRAW{XG51};
基础值2:=IF(O>REF(O,1) AND REF(O,1)>REF(O,2) AND H>REF(H,1) AND H<REF(H,2),REF(O,2),IF(C<REF(C,1),C,REF(C,1))){XG51};
bbi:(ma(CLOSE,M1)+MA(CLOSE,M2)+MA(CLOSE,M3)+MA(CLOSE,M4))/4,COLORBLUE,LINETHICK2{XG51};
IF(BBI>=REF(BBI,1),BBI,DRAWNULL),COLORLIMAGENTA,LINETHICK2{XG51};
IF(BBI<=REF(BBI,1),BBI,DRAWNULL),COLORCYAN,LINETHICK2{X.G^5-1.C.N.{};

源码正文：

M13:=ma(C,13){XG51};
M34:=MA(C,34){XG51};
M55:=MA(C,55){XG51};
VAR1:=MA(M13,M55){XG51};
VAR2:=(C+H+L)/3{XG51};
VAR3:=MA(VAR2,34){XG51};
VAR4:=REF(VAR3,1){XG51};
stICKLINE(VAR3>VAR4,VAR3,VAR4,4,0),COLORFFFFFF{XG51};
STICKLINE(VAR3<VAR4,VAR3,VAR4,4,0),COLORFF0000{XG51};
CV1:=HHV(H,30){XG51};
CV2:=LLV(L,30){XG51};
CV3:=MA((C-CV2)/(CV1-CV2)*100,5){XG51};
CV4:=MA((C-CV2)/(CV1-CV2)*100,20){XG51};
DRAWTEXT(crOSS(CV4,CV3) AND CV3>70,H*1.05,'中线卖'),COLORFFFF00{XG51};
CV6:=(C-LLV(L,80))/(HHV(H,80)-LLV(L,80))*200{XG51};
CV7:=SMA(CV6,3,1){XG51};
CV8:=SMA(CV7,3,1){XG51};
CV9:=3*CV7-2*CV8{XG51};
CVA:=LLV(L,5){XG51};
CVB:=HHV(H,5){XG51};
CVC:=MA((C-CVA)/(CVB-CVA)*100,4)*2{XG51};
CVD:=MA(0.667*REF(CVC,1)+0.333*CVC,2){XG51};
CVE:=3*CVC-2*CVD{XG51};
CVF:=POW(MA(C,5),2)+MA(C,5){XG51};
CV10:=POW(MA(L,5),2)+MA(L,5){XG51};
CV11:=POW(MA(H,5),2)+MA(H,5){XG51};
CV12:=(CVF-LLV(CV10,64))/(HHV(CV11,64)-LLV(CV10,64))*150+55{XG51};
CV13:=SMA(CV12,3,1)*1.5-100{XG51};
CV14:=SMA(CV13,3,1){XG51};
CV15:=3*CV13-2*CV14{XG51};
CV16:=(H+L+C*2)/4{XG51};
CV17:=MA(CV16,13){XG51};
CV18:=STD(CV16,13){XG51};
CV19:=(CV16-CV17)*100/CV18{XG51};
CV1A:=MA(CV19,5){XG51};
CV1B:=MA(CV1A,13){XG51};
CV1C:=MA(CV1A,13)+100{XG51};
CV1D:=MA(CV1C,10){XG51};
CV1E:=3*CV1C-2*CV1D{XG51};
CV1F:=CV7+CVC+CV13+CV1C{XG51};
CV20:=CV8+CVD+CV14+CV1D{XG51};
CV21:=CV9+CVE+CV15+CV1E{XG51};
CV22:=(H+L+C)/3{XG51};
CV23:=AMOUNT/V/100{XG51};
CV24:=SUM(AMOUNT,5)/SUM(V,5)/100{XG51};
CV25:=(CV22-MA(CV22,34))/(0.015*AVEDEV(CV22,34)){XG51};
CV26:=dma(AMOUNT/V/100,V/CAPITAL){XG51};
CV27:=(H+L+C+CV22)/4{XG51};
CV28:=MA(CV27,24){XG51};
CV29:=STD(CV27,24){XG51};
CV2A:=(CV27-CV28)/CV29*100{XG51};
CV2B:=(CV22-MA(CV22,24))/(0.015*AVEDEV(CV22,34)){XG51};
CV2C:=MA(CV2A,5){XG51};
CV2D:=(CV23-MA(CV23,21))/(0.015*AVEDEV(CV23,21)){XG51};
CV2E:=(CV24-MA(CV24,90))/(0.015*AVEDEV(CV24,90)){XG51};
CV2F:=((CV2C+CV2B+CV25)/3+165)/4{XG51};
CV30:=(MA(MA(MA(CV2F,15),10),5)-25)*2+CV26{XG51};
CV31:=(CV1F+CV20+CV21*30)/32/5-15{XG51};
CV32:=MA(CV31,13){XG51};
CV33:=(CV2F+CV31)/2/1.1{XG51};
CV34:=CV33{XG51};
价位线:=MA(CV34,3){XG51};
趋势线:=MA((CV30+CV32)/2,2){XG51};
CV36:=MA(趋势线,34){XG51};
CV37:=(C-MA(C,6))/MA(C,6)*100{XG51};
CV38:=(C-MA(C,12))/MA(C,12)*100{XG51};
CV39:=(C-MA(C,24))/MA(C,24)*100{XG51};
CV3A:=(CV37+2*CV38+3*CV39)/6{XG51};
CV3B:=MA(CV3A,3){XG51};
CV3C:=CROSS(价位线,0) AND COUNT(CV3B<-12,2)>=1 OR CROSS(价位线,趋势线) AND COUNT(CV3B<-12,2)>=1{XG51};
DRAWTEXT(CV3C OR (CROSS(价位线,趋势线) AND COUNT(CV3B<-7,2)>=1 OR CROSS(价位线,0) AND COUNT(CV3B<-7,1)>=1),L*0.96,'中线买'),COLORWHITE{XG51};
绿线:HHV(MA(H,21),20),COLORCYAN,LINETHICK2{XG51};
红线:LLV(MA(H,21),1),COLORWHITE,LINETHICK2{XG51};
DRAWTEXT(REF(绿线,1)>REF(红线,1) AND 绿线=红线,绿线*0.99,'天天笑'),COLOR8977FF{XG51};
DRAWICON(REF(绿线,1)>REF(红线,1) AND 绿线=红线,绿线*0.97,17){XG51};
DRAWTEXT(REF(绿线,1)=REF(红线,1) AND 绿线>红线,绿线*1.02,'持币观望'),COLOR00FF00{XG51};
DRAWICON(REF(绿线,1)=REF(红线,1) AND 绿线>红线,绿线*1.04,6){X*G!5~1*C*N*{};