顶底主图波段指标(通达信)

顶底主图波段指标(通达信)

源码正文：

攻击线5:ma(C,5)LINETHICK1{XG51};
操盘线10:MA(C,10)LINETHICK1{XG51};
生命线30:MA(C,30)LINETHICK1{XG51};
决策线60:MA(C,60)LINETHICK1{XG51};
DRAWTEXT(crOSS(攻击线5,操盘线10),LOW*0.95,'攻抄金叉'),COLORWHITE{XG51};
DRAWTEXT(CROSS(生命线30,决策线60),LOW*0.95,'生决金叉'),COLORLIMAGENTA{XG51};
N:=20{XG51};
M:=30{XG51};
P1:=80{XG51};
P2:=100{XG51};
VAR101:=(C+H+O+L)/4{XG51};
卖出:xma(VAR101,N)*(1+P1/1000),COLORWHITE,LINETHICK2{XG51};
买入:XMA(VAR101,M)*(1-P2/1000),COLORLICYAN,LINETHICK2{XG51};
幅度:=100*(卖出-买入)/买入,NODRAW{XG51};
MA1:=MA(VAR101,3){XG51};
stICKLINE(卖出>LOW AND 卖出<HIGH,卖出,MAX(卖出,MAX(OPEN,CLOSE)),3,0),COLORCYAN{XG51};
STICKLINE(卖出>MIN(C,O) AND 卖出<MAX(C,O),卖出,MAX(OPEN,CLOSE),3,0),COLORCYAN{XG51};
STICKLINE(卖出>LOW AND 卖出<HIGH,卖出,HIGH,0,0),COLORCYAN{XG51};
STICKLINE(卖出<LOW,OPEN,CLOSE,3,0),COLORCYAN{XG51};
STICKLINE(卖出<LOW,HIGH,LOW,0,0),COLORCYAN{XG51};
STICKLINE(买入>LOW AND 买入<HIGH,买入,MIN(MIN(OPEN,CLOSE),买入),3,0),COLORLIMAGENTA{XG51};
STICKLINE(买入>MIN(C,O) AND 买入<MAX(C,O),买入,MIN(OPEN,CLOSE),3,0),COLORLIMAGENTA{XG51};
STICKLINE(买入>LOW AND 买入<HIGH,买入,LOW,0,0),COLORLIMAGENTA{XG51};
STICKLINE(买入>HIGH,OPEN,CLOSE,3,0),COLORLIMAGENTA{XG51};
STICKLINE(买入>HIGH,HIGH,LOW,0,0),COLORLIMAGENTA{XG51};
DRAWTEXT(CROSS(LOW,买入),LOW*0.95,'买'),COLORWHITE,LINETHICK2{XG51};
DRAWTEXT(CROSS(卖出,HIGH),HIGH*1.02,'卖'),COLORCYAN{XG51};
MA20:=MA(CLOSE,20){XG51};
MA120:=MA(CLOSE,120){XG51};
MA30:=MA(CLOSE,37){XG51};
MAP:=MA(CLOSE,8){XG51};
AA5:=MA(CLOSE,21){XG51};
AA10:=MA(CLOSE,8),COLORFF0000{XG51};
AA12:=MA(CLOSE,12),COLORFF0000{XG51};
BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10){XG51};
BB12:=((ATAN((AA12 - REF(AA12,1))) * 3.1416) * 10){XG51};
MA13:=MA(CLOSE,13){XG51};
VAR01:=((((OPEN + LOW) + HIGH) + CLOSE) / 4){XG51};
中期大底:=LLV(LOW,30),{XG51};
短期底部0:=LLV(HIGH,30){XG51};
短底:=ema(VAR01,5){XG51};
支撑:=HHV(短底,60){XG51};
压力1:=HHV(LOW,20),COLORFAABEC{XG51};
压力:=SMA(LOW,5,1){XG51};
中线:=MA(CLOSE,3){XG51};
DRAWTEXT(FILTER(((((HIGH > 支撑) AND (CLOSE < 支撑)) AND ((CLOSE / OPEN) > (0 - 1.06))) AND (CLOSE < OPEN)),5),(HIGH + 0.02),'逃'),COLORFFFF00{XG51};
中轨道:=(MA(HIGH,15) * 1.05){XG51};
天:=(MA(LOW,15) * 0.985){XG51};
人:=(MA(LOW,15) * 0.96){XG51};
地:=(((HIGH + LOW) + CLOSE) / 3){XG51};
B1:=HHV(地,(4 * 15)){XG51};
B6:=LLV(地,(4 * 15)){XG51};
B7:=(B1 - B6){XG51};
B8:=(MA(((地 - B6) / B7),2) * 80){XG51};
VAR1:=(((CLOSE - LLV(LOW,100)) / (HHV(HIGH,100) - LLV(LOW,100))) * 200){XG51};
飞龙顶底线1:=SMA(VAR1,3,1){XG51};
VAR2:=SMA(飞龙顶底线1,3,1){XG51};
VAR3:=((3 * 飞龙顶底线1) - (2 * VAR2)){XG51};
VAR4:=LLV(LOW,5){XG51};
VAR5:=HHV(HIGH,5){XG51};
VAR6:=(EMA((((CLOSE - VAR4) / (VAR5 - VAR4)) * 100),4) * 2){XG51};
VAR7:=EMA(((0.667 * REF(VAR6,1)) + (0.333 * VAR6)),2){XG51};
VAR8:=((3 * VAR6) - (2 * VAR7)){XG51};
VAR9:=(POW(MA(CLOSE,5),2) + MA(CLOSE,5)){XG51};
VARA:=(POW(MA(LOW,5),2) + MA(LOW,5)){XG51};
VARB:=(POW(MA(HIGH,5),2) + MA(HIGH,5)){XG51};
VARC:=(((((VAR9 - LLV(VARA,64)) / (HHV(VARB,64) - LLV(VARA,64))) * 150) + 65) - 10){XG51};
VARD:=((SMA(VARC,3,1) * 1.5) - 100){XG51};
VARE:=SMA(VARD,3,1){XG51};
VARF:=((3 * VARD) - (2 * VARE)){XG51};
VAR10:=(((HIGH + LOW) + (CLOSE * 2)) / 4){XG51};
VAR11:=EMA(VAR10,13){XG51};
VAR12:=STD(VAR10,13){XG51};
VAR13:=(((VAR10 - VAR11) * 100) / VAR12){XG51};
VAR14:=EMA(VAR13,5){XG51};
VAR15:=EMA(VAR14,13){XG51};
VAR16:=((EMA(VAR14,13) + 200) - 100){XG51};
VAR17:=EMA(VAR16,10){XG51};
VAR18:=((3 * VAR16) - (2 * VAR17)){XG51};
VAR19:=(((飞龙顶底线1 + VAR6) + VARD) + VAR16){XG51};
VAR1A:=(((VAR2 + VAR7) + VARE) + VAR17){XG51};
VAR1B:=(((VAR3 + VAR8) + VARF) + VAR18){XG51};
VAR1C:=(((HIGH + LOW) + CLOSE) / 3){XG51};
VAR1D:=((AMOUNT / vol) / 100){XG51};
VAR1E:=((SUM(AMOUNT,5) / SUM(VOL,5)) / 100){XG51};
VAR1F:=((VAR1C - MA(VAR1C,34)) / (0.015 * AVEDEV(VAR1C,34))){XG51};
VAR21:=((((HIGH + LOW) + CLOSE) + VAR1C) / 4){XG51};
VAR22:=EMA(VAR21,24){XG51};
VAR23:=STD(VAR21,24){XG51};
VAR24:=(((VAR21 - VAR22) / VAR23) * 100){XG51};
VAR25:=((VAR1C - MA(VAR1C,24)) / (0.015 * AVEDEV(VAR1C,24))){XG51};
VAR26:=EMA(VAR24,5){XG51};
VAR27:=((VAR1D - MA(VAR1D,21)) / (0.015 * AVEDEV(VAR1D,21))){XG51};
VAR28:=((VAR1E - MA(VAR1E,90)) / (0.015 * AVEDEV(VAR1E,90))){XG51};
VAR29:=(((((((VAR28 + VAR27) + VAR26) + VAR25) + VAR1F) / 5) + 165) / 4){XG51};
VAR2A:=(((((VAR19 + VAR1A) + (VAR1B * 30)) / 32) / 5) - 15){XG51};
VAR2B:=(((VAR29 + VAR2A) / 2) / 1.1){XG51};
VAR2C:=VAR2B{XG51};
短线:=MA(VAR2C,26){XG51};
MID:=(短线 + (2 * STD(VAR2C,26))){XG51};
UPPER:=(短线 - (2 * STD(VAR2C,26))){XG51};
LOWER:=IF((VAR2C > 短线),短线,VAR2C){XG51};
XY:=MA(CLOSE,5){XG51};
M80:=MA(CLOSE,80){XG51};
短期底部:=(LLV(HIGH,30) * 0.93){XG51};
MA80:=LLV(HIGH,30){XG51};
短期底部2:=SMA(CLOSE,2,1){XG51};
趋势:=(MA(LOW,10) * 0.96){XG51};
趋:=(EMA(OPEN,107) * 0.897){XG51};
超跌位2:=MA(CLOSE,15){XG51};
GF:=MA(CLOSE,10){XG51};
MAN:=(SMA(HIGH,21,2) * 1.05){XG51};
上1:=(HHV(短底,60) * 0.92){XG51};
压力2:=(SMA(HIGH,21,2) * 1.035){XG51};
阻挡线:=(SMA(LOW,21,2) * 0.96){XG51};
下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100){XG51};
RSV:=SMA(下档线,3,1){XG51};
K:=SMA(RSV,3,1){XG51};
D:=((3 * RSV) - (2 * K)){XG51};
J:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100){XG51};
VAR2P:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100){XG51};
VAR3P:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100){XG51};
VAR4P:=(((J + (2 * VAR2P)) + (3 * VAR3P)) / 6){XG51};
VAR5P:=MA(VAR4P,3){XG51};
VAR6P:=(((CLOSE - LLV(LOW,34)) / (HHV(HIGH,34) - LLV(LOW,34))) * 100){XG51};
RSV12:=SMA(VAR6P,3,1){XG51};
K12:=SMA(RSV12,3,1){XG51};
D12:=((3 * RSV12) - (2 * K12)){XG51};
J12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100){XG51};
RSV24:=SMA(J12,3,1){XG51};
K24:=SMA(RSV24,3,1){XG51};
D24:=((3 * RSV24) - (2 * K24)){XG51};
J24:=IF(CROSS(D,D24),LOW,REF(LOW,BArslAST(CROSS(D,D24)))){XG51};
压力位:=IF(CROSS(D24,D),HIGH,REF(HIGH,BARSLAST(CROSS(D24,D)))){XG51};
支撑位:=IF((CLOSE >= MA(CLOSE,20)),80,50){XG51};
U2L:=IF((CLOSE >= MA(CLOSE,20)),50,20){XG51};
L2L:=IF(((D < 支撑位) AND (REF(D,1) >= 支撑位)),HHV(REF(HIGH,1),(BARSLAST(((D >= 支撑位) AND (REF(D,1) < 支撑位))) - 1)),REF(HHV(REF(HIGH,1),(BARSLAST(((D >= 支撑位) AND (REF(D,1) < 支撑位))) - 1)),BARSLAST(((D < 支撑位) AND REF(D,1))))){XG51};
RH1:=IF((HIGH > L2L),LOW,REF(LOW,BARSLAST((HIGH > L2L)))){XG51};
RH4:=IF((HIGH > L2L),D,REF(D,BARSLAST((HIGH > L2L)))){XG51};
RH42:=IF((((HIGH > RH1) AND (D < RH4)) AND (D < D24)),HIGH,REF(HIGH,BARSLAST((((HIGH > RH1) AND (D < RH4)) AND (D < D24))))){XG51};
RH5:=IF(((D > U2L) AND (REF(D,1) <= U2L)),LLV(REF(LOW,1),(BARSLAST(((D <= U2L) AND (REF(D,1) > U2L))) - 1)),REF(LLV(REF(LOW,1),(BARSLAST(((D <= U2L) AND (REF(D,1) > U2L))) - 1)),BARSLAST(((D > U2L) AND REF(D,1))))){XG51};
RL1:=IF((LOW < RH5),HIGH,REF(HIGH,BARSLAST((LOW < RH5)))){XG51};
RL4:=IF((LOW < RH5),D,REF(D,BARSLAST((LOW < RH5)))){XG51};
RL42:=IF((((LOW < RL1) AND (D > RL4)) AND (D > D24)),LOW,REF(LOW,BARSLAST((((LOW < RL1) AND (D > RL4)) AND (D > D24))))){XG51};
长期底部:=LLV(HIGH,30){XG51};
DRAWTEXT(FILTER(((((RL42 = J24) AND (CLOSE > OPEN)) AND (CLOSE > 长期底部)) AND (LOW <= J24)),20),(LOW - 0.12),'底成'),COLOR0EABFF{XG51};
RL5:=(SMA(HIGH,5,2) * 1.05){XG51};
上:=(SMA(LOW,5,2) * 0.96){XG51};
下:=SMA(LOW,2,1){XG51};
中:=(((((3 * CLOSE) + HIGH) + LOW) + OPEN) / 6){XG51};
X1:=EMA(中,10){XG51};
X2:=REF(X1,1){XG51};
X3:=((REF(HIGH,1) + REF(LOW,1)) / 2){XG51};
X4:=(MA(CLOSE,21) + (2 * STD(CLOSE,21))){XG51};
X5:=REF(CLOSE,1){XG51};
X6:=((SMA(MAX((CLOSE - X5),0),7,1) / SMA(Abs((CLOSE - X5)),7,1)) * 100){XG51};
X7:=CROSS(79,X6){XG51};
X8:=FILTER(X7,4){XG51};
X9:=MA(CLOSE,115){XG51};
VAR001:=EMA(CLOSE,8){XG51};
飞龙顶底线:=EMA(VAR001,20){XG51};
VAR002:=CROSS(VAR001,飞龙顶底线){XG51};
VAR003:=(VAR001 < MA(CLOSE,20)){XG51};
VAR004:=(((HHV(HIGH,36) - CLOSE) / (HHV(HIGH,36) - LLV(LOW,36))) * 100){XG51};
VAR005:=SMA(VAR004,5,1){XG51};
VAR006:=SMA(VAR005,8,1){XG51};
VAR007:=(CROSS(VAR005,VAR006) AND (VAR006 < 5)){XG51};
VAR008:=((CLOSE > (LLV(CLOSE,60) + (0.3 * LLV(CLOSE,60)))) AND VAR007){XG51};
VAR009:=IF((CLOSE > 1000),VAR007,VAR008){XG51};
VAR00F:=CROSS(X1,X2){XG51};
MA115:=VAR00F{XG51};
低买:=(VAR002 AND VAR003){XG51};
黑马起步:=VAR009{XG51};
DRAWTEXT(X8,(HIGH * 1.03),'出货'),COLOR9000F5{XG51};
DRAWTEXT((黑马起步 > 0),(HIGH * 1.04),'逃命'),COLORFF0000{XG51};
逃遁:=(SMA(HIGH,21,2) * 1.05){XG51};
阻挡:=(SMA(LOW,21,2) * 0.94){XG51};
DRAWTEXT(FILTER(((((((((CLOSE / OPEN) > 1.03) AND ((超跌位2 - REF(超跌位2,1)) > 0)) AND ((CLOSE - REF(CLOSE,1)) > 0)) AND (HIGH < 压力1)) AND (CLOSE < 压力1)) AND ((压力2 - REF(压力2,1)) > 0)) AND (CLOSE < MAN)),3),LOW,'出击'),COLOR646E69{XG51};
DRAWTEXT((((((低买 > 0) AND ((X1 - REF(X1,1)) > 0)) AND (HIGH < 压力位)) AND (HIGH < X9)) AND ((X2 - REF(X2,1)) > 0)),LOW,'黑马'),COLOR00FF00{XG51};
DRAWTEXT((((CROSS(VAR2C,UPPER) AND (HIGH < 压力1)) AND ((XY - REF(XY,1)) > 0)) AND (HIGH < 支撑)),LOW,'买'),COLORFFFFFF{XG51};
DRAWTEXT(FILTER((((((MA115 AND (CLOSE < 压力位)) AND ((人 - REF(人,1)) > 0)) AND ((X1 - REF(X1,1)) > 0)) AND (HIGH < 上1)) AND ((CLOSE / OPEN) > 1.03)),5),LOW,'●买'),COLOR93EE7D{XG51};
DRAWTEXT(((((LOW <= 上) AND (HIGH >= 短期底部)) AND (CLOSE >= 长期底部)) AND ((CLOSE / OPEN) > 1.03)),(LOW - 0.08),'★抄底'),COLOR0000FF{XG51};
DRAWTEXT(FILTER((((((LOW <= 阻挡线) AND ((MA20 - REF(MA20,1)) > 0)) AND (OPEN <= 上1)) AND (HIGH > 上1)) AND (CLOSE > 阻挡线)),5),LOW,'涨10%'),COLORFFFFFF{XG51};
DRAWTEXT(FILTER((((((B8 <= 1) AND (LOW <= 阻挡)) AND (CLOSE > OPEN)) AND (LOW <= 中期大底)) AND (CLOSE >= 长期底部)),3),(LOW - 0.08),'短抄E'),COLORA100FF{XG51};
DRAWTEXT(FILTER((((CROSS(趋势,趋) AND (HIGH < M80)) AND (HIGH < 压力1)) AND LLV(LOW,0)),10),LOW,'果断买'),COLOR668800{XG51};
DRAWTEXT(FILTER(((CROSS(中线,人) AND (LOW <= 人)) AND (CLOSE >= 人)),4),(LOW - 0.06),'买'),COLOR00FF00{XG51};
DRAWTEXT(FILTER((((((((MA20 - REF(MA20,1)) > 0) AND (HIGH < 支撑)) AND ((AA10 - REF(AA10,1)) > 0)) AND (HIGH < 压力1)) AND (VOL >= REF(VOL,1))) AND CROSS(CLOSE,MA20)),57),LOW,'突破生命线'),COLOR0000FF{XG51};
DRAWTEXT(FILTER(((((LOW <= MA80) AND (CLOSE > MA80)) AND (CLOSE > OPEN)) AND (短期底部2 <= MA80)),8),LOW,'底'),COLORFFFF00{XG51};
DRAWTEXT(((CROSS(MA20,压力位) AND (LOW <= MA20)) AND ((MA20 - REF(MA20,1)) > 0.02)),(LOW - 0.03),'●绝佳买点'),COLORAFA0AF{XG51};
DRAWTEXT((((((((CROSS(CLOSE,MA20) AND (HIGH < 压力位)) AND (OPEN < MA20)) AND (HIGH < 支撑)) AND ((MAN - REF(MAN,1)) > 0)) AND ((X1 - REF(X1,1)) > 0)) AND (D < 63)) AND ((MA20 - REF(MA20,1)) > 0)),(LOW - 0.05),'●大牛浮水'),COLOR73777F{XG51};
DRAWTEXT(CROSS(中期大底,短期底部),(LOW - 0.02),'短线买'){XG51};
短趋势线:=MA(CLOSE,13){XG51};
中趋势线1:=MA(CLOSE,33),LINETHICK1{XG51};
中趋势线:=MA(CLOSE,55){XG51};
涨:=IF(短趋势线>REF(短趋势线,1),短趋势线,DRAWNULL),COLORWHITE,LINETHICK3{XG51};
平:=IF(短趋势线=REF(短趋势线,1),短趋势线,DRAWNULL),COLOR00FFFF,LINETHICK3{XG51};
跌:=IF(短趋势线<REF(短趋势线,1),短趋势线,DRAWNULL),COLORCYAN,LINETHICK3{XG51};
STICKLINE(CROSS(MA(CLOSE,13),C) AND MA(CLOSE,13)>REF(MA(CLOSE,13) ,1) AND V<REF(V,1) AND MA(CLOSE,13)>MA(CLOSE,55) ,L,L*0.98,3,0),COLORBLUE{XG51};
DRAWTEXT(CROSS(MA(CLOSE,13),C) AND INDEXC>MA(INDEXC,13) AND MA(CLOSE,13)>REF(MA(CLOSE,13) ,1) AND V<REF(V,1) AND MA(CLOSE,13)>MA(CLOSE,55) ,L*0.95,'买'),COLORWHITE,LINETHICK2{XG51};
VAR011:=((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};
VAR012:=HHV(VAR011>20,10){XG51};
DRAWTEXT(VAR011<-20 AND INDEXC<MA(INDEXC,13) AND FILTER(VAR011> REF(VAR011,1),5),L*0.93,'抄底'),COLORBLUE,LINETHICK2{XG51};
VAR013:=IF(MA(CLOSE,13)>REF(MA(CLOSE,13),1),MA(CLOSE,13),DRAWNULL){XG51};
DRAWTEXT((IF(CLOSE>MA(CLOSE,13) AND OPEN<CLOSE,-0.1,0))AND((C-REF(C,1))/(REF(C,1))>0.061)AND (MA(CLOSE,13)=VAR013) AND (MA(CLOSE,1),MA(CLOSE,13)) AND (VOL>REF(HHV(VOL,3),1)*2),L*0.98,'主力介入'),COLORLIMAGENTA{XG51};
X:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68){XG51};
Y:=EMA(CLOSE,10){X~G-5-1~C~N~{};