通达信底部介入选股指标公式源码

通达信底部介入选股指标公式源码

源码正文：

AA:=vol/((HIGH-LOW)*2-Abs(CLOSE-OPEN)){XG51};
买量:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK0,COLORWHITE{XG51};
卖量:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORGREEN{XG51};
进出量:=买量+卖量,COLOR00FFFF{XG51};
五日内净流入:=SUM(进出量,5),LINETHICK1,COLORLIGREEN{XG51};
N:=9;M:=14;N1:=6{XG51};
TYP := (HIGH + LOW + CLOSE)/3{XG51};
CC1:=(TYP-ma(TYP,M))/(0.015*AVEDEV(TYP,M)),COLORFF00FF{XG51};
C1:=SMA(CC1,3,1){XG51};
C2:=SMA(C1,3,1){XG51};
C3:=3*C1-2*C2{XG51};
CB1:=ema(C3,5){XG51};
LC := REF(CLOSE,1){XG51};
rsi1:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100{XG51};
RSI:=(RSI1-50)*5{XG51};
R1A:=SMA(RSI,3,1){XG51};
D1:=SMA(R1A,3,1){XG51};
J1:=3*R1A-2*D1{XG51};
RR1:=EMA(J1,5){XG51};
RR2:=REF(RR1,1){XG51};
RR:=RR1>RR2{XG51};
卖出:=REF(RR,1)=1 AND NOT(RR) AND CB1>100{XG51};
R1:=(CLOSE-LLV(LOW,90))/(HHV(HIGH,90)-LLV(LOW,90))*200{XG51};
R2:=EMA((CLOSE-(LLV(LOW,5)))/((HHV(HIGH,5))-(LLV(LOW,5)))*100,4)*2{XG51};
R3:=EMA(0.618*REF(R2,1)+0.382*R2,2){XG51};
R4:=POW(MA(CLOSE,5),2)+MA(CLOSE,5){XG51};
R5:=POW(MA(LOW,5),2)+MA(LOW,5){XG51};
R6:=POW(MA(HIGH,5),2)+MA(HIGH,5){XG51};
R7:=(R4-LLV(R5,64))/(HHV(R6,64)-LLV(R5,64))*150+65-10{XG51};
R8:=SMA((SMA(R7,3,1)*1.5-100),3,1){XG51};
R9:=3*(SMA(R7,3,1)*1.5-100)-2*R8{XG51};
R10:=(HIGH+LOW+CLOSE*2)/4{XG51};
R11:=(R10-(EMA(R10,13)))*100/(stD(R10,13)){XG51};
R12:=EMA((EMA(R11,5)),13)+200-100{XG51};
R13:=(SMA(R1,3,1))+R2+(SMA(R7,3,1)*1.5-100)+R12{XG51};
R14:=(SMA((SMA(R1,3,1)),3,1))+R3+R8+(EMA(R12,10)){XG51};
R15:=(3*(SMA(R1,3,1))-2*(SMA((SMA(R1,3,1)),3,1)))+(3*R12-2*(EMA(R12,10)))+
R9+(3*R12-2*(EMA(R12,10))){XG51};
R16:=(HIGH+LOW+CLOSE)/3{XG51};
R17:=(R16-MA(R16,34))/(0.015*AVEDEV(R16,34)){XG51};
R18:=(HIGH+LOW+CLOSE+R16)/4{XG51};
R19:=(R18-(EMA(R18,24)))/(STD(R18,24))*100{XG51};
R20:=(R16-MA(R16,24))/(0.015*AVEDEV(R16,24)){XG51};
R21:=(((EMA(R19,5))+R20+R17)/3+165)/4{XG51};
R22:=(R13+R14+R15*30)/32/5-15{XG51};
买卖: EMA(((R21+R22)/2/1.1),1){XG51};
阻力:MA(买卖,3),COLORRED,LINETHICK2{XG51};
IF(买卖< 阻力,买卖,DRAWNULL),COLORCYAN,LINETHICK2{XG51};
IF(买卖>=阻力,买卖,DRAWNULL),COLORWHITE,LINETHICK2{XG51};
短线介入:IF(crOSS(((CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*250),0) AND CROSS(买卖,阻力) AND 阻力>0 AND 阻力>REF(阻力,1) AND 五日内净流入>0 AND 五日内净流入>REF( 五日内净流入,1),90,0),COLORWHITE{XG51};
DRAWICON(CROSS(买卖,阻力) AND ((CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*250)>REF(((CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*250),1),阻力,1){XG51};
DRAWICON(CROSS(阻力,买卖),阻力-3.66,2){XG51};
DRAWICON(卖出,买卖*1.13,6){XG51};
DRAWICON(CROSS(买卖,100),买卖*1.10,9){XG51};
DRAWICON(CROSS(买卖,120),买卖*1.06,35){XG51};
DRAWICON(CROSS(((CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*250),0) AND CROSS(买卖,阻力) AND 阻力>0 AND 阻力>REF(阻力,1) AND 五日内净流入>0 AND 五日内净流入>REF( 五日内净流入,1) ,28,11){XG51};
STICKLINE(CROSS(((CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*250),0) AND CROSS(买卖,阻力) AND 阻力>0 AND 阻力>REF(阻力,1) AND 五日内净流入>0 AND 五日内净流入>REF( 五日内净流入,1),22.8,0,1,0),COLORWHITE{XG51};
DRAWTEXT(CROSS(((CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*250),0) AND CROSS(买卖,阻力) AND 阻力>0 AND 阻力>REF(阻力,1) AND 五日内净流入>0 AND 五日内净流入>REF( 五日内净流入,1),88,'&larr;━金牛狂飙'),COLORMAGENTA{XG51};
VAR2W:=REF(LOW,1){XG51};
VAR3W:=SMA(ABS(LOW-VAR2W),3,1)/SMA(MAX(LOW-VAR2W,0),3,1)*100{XG51};
VAR4W:=EMA(IF(CLOSE*1.3,VAR3W*10,VAR3W/10),3){XG51};
VAR5W:=LLV(LOW,30){XG51};
VAR6W:=HHV(VAR4W,30){XG51};
VAR7W:=IF(MA(CLOSE,58),1,0){XG51};
VAR8W:=EMA(IF(LOW<=VAR5W,(VAR4W+VAR6W*2)/2,0),3)/618*VAR7W{XG51};
VAR9W:=IF(VAR8W>100,100,VAR8W){XG51};
STICKLINE(VAR9W>-150,0,VAR9W,2,0), COLORMAGENTA{XG51};
底部吸筹指标:=(CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100, COLOR00FF00{XG51};
STICKLINE(CROSS(底部吸筹指标,-24),88,0,1,0), COLORRED{XG51};
DRAWTEXT(CROSS(底部吸筹指标,-24),89,'建仓'){XG51};
可能放量拉升:=IF(CROSS(底部吸筹指标,-24),1,0), COLORRED{XG51};
短线可买:STICKLINE(REF(kdj.J,1)<0 AND kdJ.J>0,88,0,1,0),COLORCYAN{XG51};
DRAWTEXT(REF(KDJ.J,1)<0 AND KDJ.J>0,90,'&larr;短线介入'),COLORBLUE{XG51};
强弱分界线:50,COLORLIGREEN,DOTLINE{XG51};
风险顶:100,COLORLIBLUE{XG51};
DRAWTEXT(ISLASTBAR,100,'清仓'),COLORBLUE{XG51};
DRAWTEXT(ISLASTBAR,10,'吸筹'),COLORCYAN{XG51};
MV3:=EMA(V,3){XG51};
MA3:=EMA(C,3){XG51};
MV3角度:=ATAN((MV3/REF(MV3,1)-1)*100)*180/3.1416{XG51};
MA3角度:=ATAN((MA3/REF(MA3,1)-1)*100)*180/3.1416{XG51};
MV5:=EMA(V,5){XG51};
MA5:=EMA(C,5){XG51};
MV5角度:=ATAN((MV5/REF(MV5,1)-1)*100)*180/3.1416{XG51};
MA5角度:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416{XG51};
MV10:=EMA(V,10){XG51};
MA10:=EMA(C,10){XG51};
MV10角度:=ATAN((MV10/REF(MV10,1)-1)*100)*180/3.1416{XG51};
MA10角度:=ATAN((MA10/REF(MA10,1)-1)*100)*180/3.1416{XG51};
强弱度:=(MV3角度+MA3角度+MV5角度+MA5角度+MV10角度+MA10角度)/6,COLORFFFFFF{XG51};
十九强:=IF(强弱度>=80,80,0),COLOR0000FF,LINETHICK2{XG51};
脱离MA5:=(L/MA(C,5)-1)*100,COLORFF9988,POINTDOT,LINETHICK0{XG51};
DRAWTEXT(十九强 AND 脱离MA5>=3.5,108,'&larr;险'),COLORCYAN{XG51};
日:=150;昨前:=3{XG51};
高1:=REF(HHV(H,日),昨前){XG51};
顶:REFDATE(高1,DATE),COLORBLacK{XG51};
绝顶:=REFDATE(顶,DATE),NODRAW{XG51};
跑:=绝顶=H AND ((C-L)<(O-C) OR (O-L)<(C-O)),NODRAW{XG51};
STICKLINE(跑,120,100,1,0),COLOR777777{XG51};
STICKLINE(跑,120,100,1,0),COLORAAAAAA{XG51};
STICKLINE(跑,120,100,1,0),COLORCCCCCC{XG51};
STICKLINE(跑,120,100,0.1,0),COLORFFFFFF{XG51};
STICKLINE(跑,120,100,1,0),COLORFFFFFF{XG51};
DRAWTEXT(跑,阻力*1.03,'&larr;绝顶逃')COLORCYAN{X.G!5_1.C.N.{};