持股持币的好指标血枫主力(通达信)

持股持币的好指标血枫主力(通达信)

源码正文：

VAR1:=((CLOSE-ma(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100)/3{XG51};
短顶:stICKLINE(VAR1>9 AND FILTER(VAR1<REF(VAR1,1),5),VAR1+2,0,3,0),COLORCYAN{XG51};
大顶:STICKLINE(VAR1>20 AND FILTER(VAR1<REF(VAR1,1),5),VAR1+5,0,7,0),COLOR00FF00{XG51};
VAR2:=HHV(VAR1>20,10){XG51};
危险: STICKLINE(VAR2 AND crOSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),VAR1+10,0,4,0){XG51};
注意止损:STICKLINE(VAR2 AND FILTER(VAR1< REF(VAR1,1),6)
AND CROSS(MA(CLOSE,5),MA(CLOSE,2)),VAR1+6,0,3,0){XG51};
短底:=STICKLINE(VAR1<-9 AND VAR1> REF(VAR1,1),VAR1-2,0,3,0),COLORWHITE{XG51};
大底:STICKLINE(VAR1<-20 AND FILTER(VAR1> REF(VAR1,1),5),VAR1-5,0,7,0),COLORBLUE{XG51};
买入准备:VAR1<-9 AND VAR1>REF(VAR1,1),COLORRED{XG51};
DRAWTEXT(VAR1>9 AND FILTER(VAR1<REF(VAR1,1),5),VAR1+2,'短顶'),COLOR00FF00{XG51};
DRAWTEXT(VAR1>20 AND FILTER(VAR1<REF(VAR1,1),5),VAR1+5,'大顶'),COLORFFFF00{XG51};
DRAWTEXT(VAR2 AND CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),VAR1+10,' 危险'),COLOR00FFFF{XG51};
DRAWTEXT(VAR2 AND FILTER(VAR1< REF(VAR1,1),6) AND CROSS(MA(CLOSE,5),MA(CLOSE,2)),VAR1+6,'注意止损'),COLORFF00FF{XG51};
DRAWTEXT(FILTER(VAR1<-9 AND VAR1>REF(VAR1,1),18),VAR1-2,'短底'),,COLOR0000FF{XG51};
DRAWTEXT(VAR1<-20 AND FILTER(VAR1> REF(VAR1,1),5),VAR1-5,'大底'),{XG51};
DRAWTEXT(FILTER(VAR1<-9 AND VAR1>REF(VAR1,1),18),1,'买入准备'){XG51};
VAR3:=LLV(HIGH,240){XG51};
VAR4:=((100 * (CLOSE - VAR3)) / VAR3){XG51};
VAR5:=REF(LLV(CLOSE,480),1){XG51};
VAR6:=REF(HHV(CLOSE,480),1){XG51};
VAR7:=((100 * (CLOSE - VAR5)) / (VAR6 - VAR5)){XG51};
VAR8:=(((CLOSE - LLV(CLOSE,981)) / (HHV(CLOSE,981) - LLV(CLOSE,981))) * 100){XG51};
VAR9:=(((CLOSE - LLV(CLOSE,393)) / (HHV(CLOSE,393) - LLV(CLOSE,393))) * 100){XG51};
VARA:=(((CLOSE - LLV(LOW,981)) / (HHV(HIGH,981) - LLV(LOW,981))) * 100){XG51};
VARB:=(((CLOSE - LLV(LOW,393)) / (HHV(HIGH,393) - LLV(LOW,393))) * 100){XG51};
VARC:=(ema(((100 * (CLOSE - LLV(LOW,100))) / (HHV(HIGH,100) - LLV(LOW,100))),5) / 4){XG51};
VARD:=IF((DATE < 1031231),IF((VARC > 23.16),VARC,0),0){XG51};
VARE:=(VARC < 1){XG51};
VARF:=VARD{XG51};
VAR10:=((VAR4 < 0) AND (VAR7 < 0)){XG51};
VAR11:=1{XG51};
VAR12:=((((HIGH + LOW) + (CLOSE * 2)) / 4) * VAR11){XG51};
VAR13:=EMA(VAR12,21); VAR14:=STD(VAR12,21){XG51};
VAR15:=((((((VAR12 - VAR13) / VAR14) * 100) + 200) / 4) * VAR11){XG51};
VAR16:=(((EMA(VAR15,89) - 25) * 1.56) * VAR11){XG51};
VAR17:=((EMA(VAR16,5) * 1.22) * VAR11){XG51};
VAR18:=(EMA(VAR17,3) * VAR11){XG51};
VAR19:=((3 * VAR17) - ((2 * VAR18) * VAR11)){XG51};
VAR1A:=IF(((CROSS(VAR19,VAR17) AND CROSS(VAR19,VAR18)) AND CROSS(VAR17,VAR18)),1,0){XG51};
VAR1B:=IF(((CROSS(VAR17,VAR19) AND CROSS(VAR18,VAR19)) AND CROSS(VAR18,VAR17)),1,0){XG51};
买点:IF((FILTER(((((VAR8 = 0) AND VARE) AND VAR10) AND VAR1A),5) = 1),10,0),COLORWHITE{XG51};
卖点:IF((FILTER((((VAR8 = 100) AND VARF) AND VAR1B),5) = 1),10,0),COLORCYAN{XG51};
VAR1C:=(EMA(((100 * (CLOSE - LLV(LOW,100))) / (HHV(HIGH,100) - LLV(LOW,100))),13) / 4){XG51};
VAR1D:=(EMA(CLOSE,2) - EMA(CLOSE,89)){XG51};
VAR1E:=EMA(VAR1D,30){XG51};
VAR1F:=((2 * (VAR1D - VAR1E)) * 10){XG51};
VAR20:=((POW(VAR1F,3) * 0.1) + POW(VAR1F,2)){XG51};
VAR21:=SQRT(SQRT((((LOW * HIGH) * OPEN) * CLOSE))){XG51};
VAR22:=EMA((VAR21 * 0.97),3){XG51};
VAR23:=(((HIGH + LOW) + CLOSE) / 3){XG51};
VAR24:=((VAR23 - MA(VAR23,14)) / (0.015 * AVEDEV(VAR23,14))){XG51};
VAR25:=(IF(((YEAR < 2008) AND (VAR1F > 0.015)),VAR20,0) / 45){XG51};
庄拉线:VAR25,COLORBLUE{XG51};
VAR26:=(EMA(CLOSE,2) - EMA(CLOSE,150)); VAR27:=EMA(VAR26,100){XG51};
VAR28:=(2 * (VAR26 - VAR27)){XG51};
VAR29:=((POW(VAR28,3) * 0.1) + POW(VAR28,1)){XG51};
VAR2A:=SQRT(SQRT((((LOW * HIGH) * OPEN) * CLOSE))){XG51};
VAR2B:=EMA((VAR2A * 0.97),3){XG51};
VAR2C:=(((HIGH + LOW) + CLOSE) / 3){XG51};
VAR2D:=((VAR2C - MA(VAR2C,14)) / (0.015 * AVEDEV(VAR2C,14))){XG51};
黑马线:=(IF((VAR28 > 0.1),VAR29,0) * 5),COLORWHITE{XG51};
量价线:(((CLOSE - MA(CLOSE,21)) / MA(CLOSE,21)) * 100),COLORFFFFFF{XG51};
VAR2E:=IF((FILTER(((量价线 > 0) AND (量价线 < 3)),5) = 1),12,0){XG51};
涨幅前兆:IF((FILTER(((((庄拉线 > 0) AND (庄拉线 < 0.5)) AND VAR2E) AND (VAR1C < 3)),10) = 1),10,0),COLORFFFFFF{XG51};
选股利器:IF((FILTER((((((((VAR2E > 0) AND (VAR1C < 2)) AND (庄拉线 > 0)) AND (庄拉线 < 1)) AND (黑马线 > 0)) AND (黑马线 < 1.5)) AND (VAR2E > 0)),5) = 1),10,0),COLORFF00FF; DRAWICON((买点 > 0),10,1); DRAWICON((卖点 > 0),10,2); DRAWICON((涨幅前兆 > 0),10,1){XG51};
DRAWICON((选股利器 > 0),5,1){XG51};
DRAWBAND(量价线,RGB(255,221,0),0,RGB(0,200,0)){XG51};
IF(黑马线/2>=45,45,黑马线/2),COLORWHITE{XG51};
DRAWICON(ISLASTBAR=1  AND CROSS(量价线,0),0,11){XG51};
拉升开始:(5 * (((((((庄拉线 > 0.1) AND (COUNT((庄拉线 > 0.1),2) = 1)) AND (CLOSE >= OPEN)) AND (vol > REF(VOL,1))) AND ((VOL / CAPITAL) > 0.003)) AND (量价线 > 1)) AND (量价线 > 黑马线))),LINETHICK2,COLOR00FFFF; DRAWICON((拉升开始 > 0),5,10){XG51};
量价主升浪:(8 * FILTER((CROSS(量价线,黑马线) AND (庄拉线 > 0.5)),7)),LINETHICK3,COLORFF00FF; DRAWICON((量价主升浪 > 0),8,8){XG51};
庄拉主升浪:(11 * ((CROSS(庄拉线,黑马线) AND (黑马线 > 0)) AND (量价线 > 0))),LINETHICK3,COLORFF00FF{XG51};
DRAWICON((庄拉主升浪 > 0),11,8){XG51};
QJJ:=(VOL / (((HIGH - LOW) * 2) - Abs((CLOSE - OPEN)))){XG51};
XVL:=(IF((CLOSE > OPEN),(QJJ * (HIGH - LOW)),IF((CLOSE < OPEN),(QJJ * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2))) + IF((CLOSE > OPEN),(0 - (QJJ * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (QJJ * (HIGH - LOW))),(0 - (VOL / 2))))){XG51};
ZLL:=(VOL / CAPITAL){XG51};
HSL1:=IF((ZLL > 10),10,ZLL){XG51};
HSL:=((XVL / 20) / 1.15){XG51};
攻击流量:=(((HSL * 0.55) + (REF(HSL,1) * 0.33)) + (REF(HSL,2) * 0.22)){XG51};
流量基线:=EMA(攻击流量,8){XG51};
LLJX:=EMA(攻击流量,3){XG51};
周流量:=SUM(LLJX,5){XG51};
BB1:=REF(周流量,1){XG51};
ZQZJJ:=(((周流量 - BB1) / BB1) * 100){XG51};
周增幅:=IF(((周流量 > 0) AND (BB1 < 0)),ABS(ZQZJJ),IF((((周流量 < 0) AND (BB1 < 0)) AND (周流量 < BB1)),(0 - ZQZJJ),ZQZJJ)),LINETHICK0{XG51};
X1:=EMA(C,7){XG51};
DRAWTEXT(ISLASTBAR=1  AND FILTER(MA(CLOSE,20) AND MA(CLOSE,10) AND COUNT(X1<REF(X1,1),5)>2 AND X1>REF(X1,1),3),5,'♂短进'),COLOR00C600{X+G_5.1+C+N+{};