通达信顶底转强未加密选股指标公式源码

源码正文：

V1:=LLV(LOW,10){XG51};
V2:=HHV(H,25){XG51};
价位线:=ema((C-V1)/(V2-V1)*4,4){XG51};
DRAWTEXT(crOSS(价位线,0.3),-70,'●★'),COLORWHITE{XG51};
DRAWTEXT(CROSS(3.5,价位线),139,'●逃'),COLORFFFFFF{XG51};
VV2:=REF(CLOSE,1){XG51};
VV3:=SMA((CLOSE-VV2),6,1)/Sma(Abs(CLOSE-VV2),6,1)*100{XG51};
DRAWTEXT(REF(VV3,1)>81 AND VV3<80,110,' 沽空↓'),COLORBLUE{XG51};
VF1:=MA(CLOSE,60)-MA(CLOSE,5)/3.2{XG51};
DRAWTEXT(IF(CLOSE<VF1 AND vol/240>MA(VOL,5)/240 AND
CLOSE>=REF(CLOSE,1)*1.08 AND CLOSE<MA(CLOSE,13)*1.3,1,0),-70,'☆'),COLORWHITE{XG51};
VARA:=(CLOSE-REF(OPEN,29))/REF(OPEN,29)*100{XG51};
VARB:=EMA(0.667*REF(VARA,1)+0.333*VARA,5){XG51};
DRAWTEXT(IF(VOL>=1.3*MA(VOL,5) AND COUNT(VARA>=VARB AND VARA<-17,3)
AND REF(LOW,1)=LLV(LOW,120),1,0),-70,'★注意买入'){XG51};
VAR1:=(HIGH+LOW+OPEN+2*CLOSE)/5{XG51};
VAR2:=REF(VAR1,1){XG51};
VAR3:=SMA(MAX(VAR1-VAR2,0),10,1)/SMA(ABS(VAR1-VAR2),10,1)*100{XG51};
HY3:=IF(COUNT(VAR3<20,5)>=1 AND COUNT(VAR1=LLV(VAR1,10),10)>=1 AND CLOSE>=OPEN*1.038 AND VOL>MA(VOL,5)*1.2,1,0){XG51};
DRAWTEXT(HY3,-105,' 注意买入'),COLORBLUE{XG51};
S:=MA(VOL,5)/MA(VOL,60){XG51};
A:=MA(S,5){XG51};
bias:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100{XG51};
F:=MA(S,121){XG51};
RSV:=(CLOSE-LLV(LOW,45))/(HHV(HIGH,45)-LLV(LOW,45))*100{XG51};
K:=SMA(RSV,15,1){XG51};
D:=SMA(K,15,1){XG51};
J:=3*K-2*D{XG51};
LC:=REF(CLOSE,1){XG51};
rsi6:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100{XG51};
DRAWTEXT(CROSS(83,RSI6) , 125,'逃顶!'),COLORBLUE {XG51};
S1:=IF((J<11 AND BIAS>-11 AND CROSS( S,F) AND (S-F)>0.010),2,0){XG51};
DRAWTEXT(S1=2,-100,'关注!'), COLORCYAN{XG51};
TYP:=(HIGH+LOW+CLOSE)/3{XG51};
cci:(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14)),LINETHICK2{XG51};
WWWGUPANGCOM:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
MA(CCI,3),LINETHICK2{XG51};
MA(CCI,7),LINETHICK2{XG51};
DRAWTEXT(((LLV(LOW,21) = LOW) AND NOT((LLV(CCI,21) =CCI))),LLV(CCI,21),'底背离'),COLORWHITE{XG51};
DRAWTEXT(((HHV(HIGH,34) = HIGH) AND(MA(CCI,3)<REF(MA(CCI,3),1) OR CCI<REF(CCI,1)) AND
NOT((HHV(CCI,34) = CCI))),HHV(CCI,55),'顶背离'),COLORCYAN{XG51};
100{XG51};
-100{X.G!5_1.C.N.{};

源码正文：

N:=5{XG51};
P:=12{XG51};
GJ:=(C+H+L+O)/4{XG51};
bbi:(ma(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4{XG51};
明日阻力:=L+(GJ-L)+(C-L){XG51};
明日支撑:=L+(C-GJ){XG51};
UPR:BBI+P*stD(BBI,N){XG51};
DWN:BBI-P*STD(BBI,N){XG51};
下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100){XG51};
RRRSV:=SMA(下档线,3,1){XG51};
KKK:=SMA(RRRSV,3,1){XG51};
DDDDD:=((3 * RRRSV) - (2 * KKK)){XG51};
JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100){XG51};
RSV24:=SMA(JJ12,3,1){XG51};
K24:=SMA(RSV24,3,1){XG51};
D24:=((3 * RSV24) - (2 * K24)){XG51};
VARQ3:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100{XG51};
VARQ4:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100{XG51};
VARQ5:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100{XG51};
VARQ6:=(VARQ3+VARQ4+VARQ5)/3{XG51};
VARQ7:=ema(VARQ6,5){XG51};
压力2:=IF(crOSS(D24,DDDDD),HIGH,REF(HIGH,BArslAST(CROSS(D24,DDDDD)))),COLORFFFFFF{XG51};
底部:=LLV(HIGH,30),COLOR00FF00{XG51};
今日阻力:REF(明日阻力, 1),NODRAW{XG51};
今日支撑:REF(明日支撑, 1),NODRAW{XG51};
ZB:=EMA(EMA(VARQ3,5),5)*3, COLORSTICK{XG51};
VARQ8:=IF(VARQ6<=-20,10,0){XG51};
VARQ9:=HHV(VARQ8,10){XG51};
压力位:IF(ISLASTBAR,压力2,DRAWNULL),NODRAW{XG51};
底部位:IF(ISLASTBAR,底部,DRAWNULL),NODRAW{XG51};
高:=REF(HHV(H,80),3){XG51};
低:=REF(LLV(L,80),3){XG51};
VARQA:=IF(VARQ9 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0){XG51};
K:=EMA(VARQ7,5)*2, , COLORFF00FF{XG51};
D:=EMA(K,5), , COLORRED{XG51};
J:=K*3-D*2, ,COLORBLUE{XG51};
H19:=高-(高-低)*0.191{XG51};
H38:=高-(高-低)*0.382{XG51};
H中:=高-(高-低)*0.5{XG51};
H61:=高-(高-低)*0.618{XG51};
H80:=高-(高-低)*0.809{XG51};
VARQB:=BETWEEN(CLOSE,MA(CLOSE,3),MA(CLOSE,5)) AND J>10{XG51};
HS:=vol/CAPITAL*100, , COLORCYAN{XG51};
DRAWTEXT(VARQ8=10 AND FILTER(VARQ8=10,5),LOW*0.93,'接近底部') COLORLIMAGENTA{XG51};
顶点:REFDATE(高,DATE),POINTDOT,COLORRED{XG51};
疯牛19.8:REFDATE(H19,DATE),POINTDOT,COLORBLUE{XG51};
突破38.2:REFDATE(H38,DATE),POINTDOT,COLORLIMAGENTA{XG51};
平衡50:REFDATE(H中,DATE),POINTDOT,COLORWHITE{XG51};
回落61.8:REFDATE(H61,DATE),POINTDOT,COLORCYAN{XG51};
安全80.9:REFDATE(H80,DATE),POINTDOT,COLORYELLOW{XG51};
低点:REFDATE(低,DATE),POINTDOT,COLORRED{XG51};
DRAWTEXT(VARQA=20,LOW*0.95,'底部') COLORBLUE{XG51};
DRAWTEXT(ISLASTBAR,顶点,'顶点'),COLORRED{XG51};
DRAWTEXT(ISLASTBAR,疯牛19.8,'疯牛'),COLORBLUE{XG51};
DRAWTEXT(ISLASTBAR,突破38.2,'突破'),COLORLIMAGENTA{XG51};
DRAWTEXT(ISLASTBAR,平衡50,'平衡'),COLORWHITE{XG51};
DRAWTEXT(ISLASTBAR,回落61.8,'回落'),COLORLIMAGENTA{XG51};
VARQE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20{XG51};
VARQF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,
1)+2*SMA(SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1){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};
VARQ10:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,
1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1){XG51};
VARQ11:=VARQF<REF(VARQ10,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1){XG51};
DRAWTEXT(VARQ11 AND COUNT(VARQ11,30)=1,LOW*0.95,'大资金活动'),LINETHICK1,COLORFF00FF{XG51};
VARQ12:=(HIGH+LOW+CLOSE)/3{XG51};
VARQ13:=(VARQ12-MA(VARQ12,14))/(0.015*AVEDEV(VARQ12,14)){XG51};
VARQ14:=(VARQ12-MA(VARQ12,70))/(0.015*AVEDEV(VARQ12,70)){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};
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};
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};
VARQ15:=IF(VARQ13>=150 AND VARQ13<200 AND VARQ14>=150 AND VARQ14<200,10,0){XG51};
VARQ16:=IF(VARQ13<=-150 AND VARQ13>-200 AND VARQ14<=-150 AND VARQ14>-200,-10,VARQ15){XG51};
VARQ17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100{XG51};
VARQ18:=100-Abs(VARQ17){XG51};
VARQ19:=IF(VARQ18<90,VARQ18,100){XG51};
DRAWICON(VAR19,L*0.98,1){XG51};
DRAWICON(CROSS(LLV(AMOUNT/V/100,3),L) AND V>REF(V,3) AND C<O,O*1.1,2){XG51};
MA6:EMA(C,6),LINETHICK2,COLORFFFF00{XG51};
MA18:EMA(C,18),LINETHICK2,COLOR00FF00{XG51};
DRAWBAND(MA6,RGB(155,50,50),MA18,RGB(0,100,50)){XG51};
VARQ1A:=IF(VARQE>0,VARQE,0){XG51};
VARQ1B:=IF(VARQ14>=200 AND VARQ13>=150,15,IF(VARQ14<=-200 AND VARQ13<=-150,-15,VARQ16))+60{XG51};
VARQ1C:=VARQ1A>48 AND VARQ1B>60 AND VARQ19<100{XG51};
WWWGUPANGCOM:=(((CLOSE -LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)))* 100){XG51};
中:STICKLINE(MA6<MA18 AND MA6>REF(MA6,1) AND MA18<=REF(MA18,1),MA6,MA18,0.3,0),COLORGREEN{XG51};
长:STICKLINE(MA6>MA18 AND MA6>REF(MA6,1) AND MA18<=REF(MA18,1),MA6,MA18,0.3,0),COLORLIMAGENTA{XG51};
线:STICKLINE(MA6<MA18 AND MA6<REF(MA6,1) AND MA18>=REF(MA18,1),MA6,MA18,0.3,0),COLORYELLOW{XG51};
买进:=CROSS(MA6,MA18) AND MA18>=REF(MA18,1){XG51};
DRAWICON(买进,L*0.95,9){XG51};
DRAWTEXT(CROSS(85,rsi),(HIGH * 1.02),'落袋'),COLORGREEN{XG51};
DRAWTEXT(VARQ1C AND COUNT(VARQ1C,30)=1,LOW*0.95,'大笔成交') COLORRED{X_G~5!1_C_N_{};