以下是通达信高抛低吸源码
通达信高抛低吸源码：
A1:=(((2*CLOSE)+HIGH)+LOW)/4;
A2:=LLV(LOW,34);
A3:=HHV(HIGH,34);
A4:=EMA((((A1-A2)/(A3-A2))*100),13);
A5:=EMA(((0.667*(REF(A4,1)))+(0.333*A4)),2);
A6:=(HHV(HIGH,9))-(LLV(LOW,9));
A7:=(HHV(HIGH,9))-CLOSE;
A8:=CLOSE-(LLV(LOW,9));
A9:=((A7/A6)*100)-70;
A10:=((CLOSE-(LLV(LOW,60)))/((HHV(HIGH,60))-(LLV(LOW,60))))*100;
A11:=SMA(((A8/A6)*100),3,1);
A12:=(SMA(A11,3,1))-(SMA(A9,9,1));
A13:=IF((A12 100),(A12-100),0);
线1:EMA((((A1-A2)/(A3-A2))*100),5);
线2:EMA(线1,13);
STICKLINE(((线1-线2) 0),线1,线2,0.05,-1),COLORRED;
STICKLINE(((线1-线2) 0),线1,线2,0.05,-1),COLORFFCC00;
VAR1:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36))*100;
VAR2:=SMA(VAR1,3,1);
VAR3:=SMA(VAR2,3,1);
VAR4:=SMA(VAR3,3,1);
波:VAR3;
段:VAR4;
VAR5:=CROSS(VAR3,VAR4)ANDVAR3
DRAWTEXT(FILTER(VAR5,10)=1,40,'逢低吸纳'),COLORYELLOW;
STICKLINE(FILTER(VAR5,10)=1,0,30,10,0),COLORRED;
VAR9:=CROSS(VAR4,VAR3)ANDVAR3
STICKLINE(FILTER(VAR9,5)=1,80,100,10,0),COLORGREEN;
DRAWTEXT(FILTER(VAR9,5)=1,70,'减仓'),COLOR00FF00;
VAR8:=CROSS(VAR2,VAR3)ANDVAR3 80ANDVAR3 VAR4;
STICKLINE(VAR8,85,100,10,0),COLOR0099FF;
100,COLORBBBBBB,LINETHICK3;
0,,LINETHICK3;
AA:=LLV(LOW,36);
BB:=HHV(HIGH,30);
风险:80,COLORFF00FF;
小心:92.5,COLOR00FF00;
DD:=(EMA(((CLOSE-AA)/(BB-AA))*(4),4))*(25);
股神:DD,COLOR0000FF,LINETHICK2;
股海:=(((DD-LLV(DD,21))/(HHV(DD,21)-LLV(DD,21)))*(4))*(25);
买:IF(CROSS(股海,90)AND(股神 40),70,0),COLORFFFF00;
DRAWTEXT(CROSS(股海,90)AND(股神 40),75,'买'),COLORFFFF00;
跟踪:10,COLOR0000FF;
吸:IF((COUNT((股神 REF(股神,1)),1)=1)AND(REF(股神,1) 跟踪),50,0),COLORF00FF0;
DRAWTEXT((COUNT((股神 REF(股神,1)),1)=1)AND(REF(股神,1) 跟踪),60,'买'),COLORF00FF0;
M20:=MA(C,18);
乖离20:=ABS((2*C+H+L)/4-M20)/M20;
乖离线:=DMA(CLOSE,乖离20);
止盈:乖离线*1.06,COLOR00FFFF,LINETHICK1;{20天乖离+6%}
止损:乖离线*0.94,COLOR00FF00,LINETHICK1;{20天均线乖离-6%}
DRAWBAND(止盈,RGB(0,0,255),乖离线,RGB(0,0,255));
DRAWBAND(乖离线,RGB(0,0,155),止损,RGB(0,0,155));
DRAWBAND(止盈,RGB(100,0,100),止盈*1.05,RGB(100,0,100));
DRAWBAND(止损,RGB(0,80,0),止损*0.95,RGB(0,180,0));
DMA(CLOSE,乖离20);
乖离线*1.06,COLOR00FFFF,LINETHICK1;
乖离线*0.94,COLOR00FF00,LINETHICK1;
乖离线*1.06*1.05,COLOR0077FF,LINETHICK1;
乖离线*0.94*0.95,COLORFF9900,LINETHICK1;{K线}
STICKLINE(CLOSE OPENORCLOSE=OPENANDCLOSE REF(CLOSE,1),LOW,HIGH,0.0,0),COLORRED;
STICKLINE(CLOSE OPENORCLOSE=OPENANDCLOSE =REF(CLOSE,1),LOW,HIGH,0.0,0),COLORCYAN;
STICKLINE(OPEN =CLOSE,CLOSE,OPEN,3,0),COLOR008800;
STICKLINE(OPEN =CLOSE,CLOSE,OPEN,2,0),COLOR00AA00;
STICKLINE(OPEN =CLOSE,CLOSE,OPEN,1,0),COLOR00DD00;
STICKLINE(OPEN =CLOSE,CLOSE,OPEN,0,0),COLOR00FF00;
STICKLINE(CLOSE OPEN,CLOSE,OPEN,3,0),COLOR000088;
STICKLINE(CLOSE OPEN,CLOSE,OPEN,2,0),COLOR0000AA;
STICKLINE(CLOSE OPEN,CLOSE,OPEN,1,0),COLOR0000DD;
STICKLINE(CLOSE OPEN,CLOSE,OPEN,0,0),COLOR0000FF;
A:=BARSCOUNT(C);
AH:=HHV(HIGH,120);
AL:=LLV(LOW,120);
B0:=(AH-AL)/40;
B1:=HIGH+B0;
B2:=LOW-B0;
AMV0:=((VOL*(((OPEN+CLOSE)+HIGH)+LOW))/4);
势:=(EMA(AMV0,21)/EMA(VOL,21));
N1:=BARSCOUNT(5);
N:=((N1-CURRBARSCOUNT)+1);
HH:=HHV(HIGH,N);
LL:=LLV(LOW,N);
最高:=HHV(N1,1),POINTDOT;
最低:=LLV(N1,1),COLOR00FFFF;
DIFF:=(EMA(CLOSE,5)-EMA(CLOSE,26));
DEA:=EMA(DIFF,3);
MACD:=(2*(DIFF-DEA));
MA5:=MA(CLOSE,5);
MA20:=MA(CLOSE,20);
MA120:=MA(CLOSE,120);
AA10:=MA(CLOSE,10);
Y:=((LLV(LOW,1)=LLV(LOW,60))AND((CLOSE/REF(CLOSE,1)) 1.04));
WX:=MA(CLOSE,0);
MB5:=(MA(CLOSE,15)*IF((20 5),WX,1));
MB7:=(MA(CLOSE,20)*IF((20 7),WX,1));
M5:=(MA(CLOSE,15)*IF((20 5),WX,1));
DDD:=(EMA(CLOSE,10)-EMA(CLOSE,100));
AMA:=EMA(DDD,4);
BMA:=(EMA(CLOSE,3)-EMA(CLOSE,30));
BMB:=EMA(BMA,4);
BMA1:=(EMA(CLOSE,13)-EMA(CLOSE,30));
SS:=(MA(CLOSE,8)*0.998),COLORFFFFFF;
买:=(DDD =AMAANDBMA =BMB);
HH1:=FILTER(((DDD =AMA)AND(BMA =BMB)),33);
{DRAWICON(HH1,SS,6);}
VARR1:=((SMA(MAX((CLOSE-REF(CLOSE,1)),0),12,1)/SMA(ABS((CLOSE-REF(CLOSE,1))),12,1))*100);
{DRAWICON(CROSS(82,VARR1),(HIGH*1.07),5);}
VAR1:=REF(CLOSE,1);
VAR2:=((SMA(MAX((CLOSE-VAR1),0),12,1)/SMA(ABS((CLOSE-VAR1)),12,1))*100);
顶部雷达:=(CROSS(80,VAR2)*1);
线:=((3*SMA((((CLOSE-LLV(LOW,28))/(HHV(HIGH,28)-LLV(LOW,28)))*100),5,1))-(2*SMA(SMA((((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*100),5,1),3,1)));
短期乖离率:=(((CLOSE-MA(CLOSE,13))/MA(CLOSE,13))*100);
{DRAWTEXT(FILTER((IF(((CROSS(趋势线,10)AND((CLOSE/LOW) 1.04))AND(短期乖离率 0.35)),1,0)AND(CLOSE OPEN)),5),(LOW-0.07),'底'),COLOR00FFFF;}
VARA:=EMA(((AMOUNT/VOL)/100),3);
D:=LLV(CLOSE,20);
XXY:=EMA(VARA,88);
XXD:=(XXY*0.74);
DRAWTEXT(FILTER(((((((短期乖离率 6)AND(OPEN =D))AND(LOW =XXD))AND((CLOSE/OPEN) 1.03))AND(CLOSE REF(CLOSE,1)))AND((CLOSE/LOW) 1.03)),5),(LOW-(LOW*0.09)),'★'),COLORFF00FF;
均价:=((((HIGH+LOW)+OPEN)+CLOSE)/4);
B:=((2*EMA(LLV(均价,88),5))-均价);
黄买:=((3*B)-(2*SMA(B,5,1))),COLORFF0033,LINETHICK1;
Y2:=DRAWTEXT(CROSS(CLOSE,黄买),L*0.97,'●'),COLORFF00FF;
{DRAWTEXT(CROSS(CLOSE,黄买),L*0.97,'¤'),COLORMAGENTA;}
黄点出买:=IF(Y2,L*0.97-0.01,DRAWNULL),CIRCLEDOT,COLOR00FFFF,LINETHICK2;
买进价:=((C-REF(MA(C,55),1))/6+MA(C,55))*1.004;
买进条件:=CROSS(C,买进价)AND买进价 REF(买进价,1);
买进:STICKLINE(买进条件,H,L,0,0),COLORMAGENTA,LINETHICK2;
STICKLINE(买进条件,O,C,3,0),COLORMAGENTA,LINETHICK2;
{DRAWICON(买进条件,L*0.97,1),COLORRED;}
KS:=(C-MA(C,33))/MA(C,33)*(-200);
RKS:=REF(KS,1);
FT:=RKS/KS =1.23ANDRKS =8ANDC/REF(C,1) =1.03;
反弹:STICKLINE(FT,H,L,0,1),COLORMAGENTA,LINETHICK2;
STICKLINE(FT,O,C,3,0),COLORYELLOW,LINETHICK2;
K1:=BACKSET(SS =REF(SS,1),2),COLORFFFFCC,LINETHICK1;
红线出买:=IF(K1,SS,DRAWNULL),COLORWHITE,LINETHICK2;
K2:=BACKSET(SS =REF(SS,1),2);
弱:=IF(K2,SS,DRAWNULL),COLORGREEN,LINETHICK2;
红点出买:IF(买,红线出买*0.988,DRAWNULL),POINTDOT,COLORRED,LINETHICK5;
VAR10:=MA(C,80)-MA(C,10)/3;
VAR11:=REF(C,1);
VAR12:=SMA(MAX(C-VAR11,0),18,1)/SMA(ABS(C-VAR11),18,1)*100;
高1:=REF(HHV(H,10),20);
低1:=REF(LLV(L,10),20);
H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
H3:=高1-(高1-低1)*0.5;
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
顶:=REFDATE(高1,DATE),COLORWHITE;
:REFDATE(H1,DATE),COLORGRAY,LINETHICK3;
DRAWTEXT(ISLASTBAR,中线,'----中线'),COLORYELLOW,LINETHICK4;
二:=REFDATE(H2,DATE),COLOR33FF33{MAGENTA},POINTDOT;
三:=REFDATE(H3,DATE),COLORLIGRAY;
四:=REFDATE(H4,DATE),COLORRED;
水平线:REFDATE(H5,DATE),COLORGRAY,LINETHICK2;
DRAWTEXT(ISLASTBAR,水平线,'水平线'),COLORYELLOW,LINETHICK4;
低:=REFDATE(低1,DATE),COLORYELLOW,POINTDOT;
DRAWTEXT(C=CANDCURRBARSCOUNT=50,中线+0.02,'中线'),COLORYELLOW;
DRAWTEXT(C=CANDCURRBARSCOUNT=20,水平线-0.02,'水平线'),COLORFFFFCC;
KSS:=(C-MA(C,33))/MA(C,33)*(-200);
RKSS:=REF(KSS,1);
VAR101:=MA(C,80)-MA(C,10)/3;
VAR111:=REF(C,1);
VAR122:=SMA(MAX(C-VAR111,0),18,1)/SMA(ABS(C-VAR111),18,1)*100;
{DRAWICON(CROSS(79,VAR12),H*1.035,2);}
DRAWTEXT(CROSS(79,VAR122),H*1.04,'抛↓'),COLOR33FF33;
{垂直1:=IF(CURRBARSCOUNT=0,REFDATE(HHV(H,240),DATE),DRAWNULL),STICK;
STICKLINE(低吸,HHV(H,240),LLV(L,240-239),0,0),STICK,COLORCYAN;};
Y1:=(H+L)/2;
AO:=MA(Y1,5)-MA(Y,34);
DU0:=CROSS(AO,0);
UD0:=CROSS(0,AO);
TDU0:=BARSLAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
决策线:IF(TDU3 TUD3,REF(HHV(H,2),TDU3),REF(LLV(L,2),TUD3)),COLORYELLOW;
DRAWTEXT(ISLASTBAR,决策线,'决策线'),COLORYELLOW;
阻力:REFDATE(REF(HHV(H,22),1),DATE),COLORGRAY,LINETHICK4;
DRAWTEXT(ISLASTBAR,阻力,'----------阻力'),COLORRED,LINETHICK4;
底:REFDATE(REF(LLV(L,22),1),DATE),COLORGRAY,LINETHICK4;
DRAWTEXT(ISLASTBAR,底,'底'),COLORRED,LINETHICK4;
AA17:=EMA(C,14)COLORWHITE,LINETHICK1;
A17X:=(AA17-REF(AA17,1))/REF(AA17,1)*100,NODRAW;
参考线试买:IF(A17X =0,REF(EMA(C,14),BARSLAST(CROSS(A17X,0))+1),DRAWNULL)COLORRED,LINETHICK1;
DRAWTEXT(ISLASTBAR,参考线试买,'参考线试买'),COLORRED,LINETHICK1;
DMLJ:=HHV(H,120);
E:=(H+L+O+2*C)/5;
CRTP:=E+(H-L);
CRZL:=2*E-L;
CRZC:=2*E-H;
CRFZ:=E-(H-L);
CRXL:=(E+CRTP+CRZL+CRZC+CRFZ)/5;
高:=CONST(CRTP),COLORRED;
阻:=CONST(CRZL),COLORC7C9FF;
支:=CONST(CRZC),COLOR7C9CFF;
反:=CONST(CRFZ),COLORDD00DD;
心理:=CONST(CRXL);
高压:DRAWLINE(S 1 CURRBARSCOUNT=5+1,高,ISLASTBAR,高,1),COLOR0000FF;
阻力1:DRAWLINE(S 1 CURRBARSCOUNT=5+1,阻,ISLASTBAR,阻,1),COLOR0099FF;
支撑:DRAWLINE(S 1 CURRBARSCOUNT=5+1,支,ISLASTBAR,支,1),COLORGREEN;
价:DRAWLINE(S 1 CURRBARSCOUNT=5+1,反,ISLASTBAR,反,1),COLORDD00DD;
次日心理价:DRAWLINE(S 1 CURRBARSCOUNT=5+1,心理,ISLASTBAR,心理,1),COLORFFFFFF;
DRAWTEXT(ISLASTBAR,反,'反转买'),LINETHICK1,COLORDD00DD;
DRAWTEXT(ISLASTBAR,支,'支撑'),LINETHICK1,COLOR00FF00;
DRAWTEXT(ISLASTBAR,阻,'阻力1'),LINETHICK1,COLOR0099FF;
DRAWTEXT(ISLASTBAR,高,'高压'),LINETHICK1,COLOR0000FF;
T1:=CONST(LLVBARS(LOW,10));
T1HIGH:=CONST(REF(HIGH,T1));
CC:=CONST(CURRBARSCOUNT);
T2:=CONST(BARSLAST(CURRBARSCOUNT CC+T1ANDH T1HIGH));
T2HIGH:=CONST(REF(HIGH,T2));
T3:=CONST(BARSLAST(CURRBARSCOUNT CC+T2ANDHIGH T2HIGH));
T3HIGH:=CONST(REF(HIGH,T3));
猎击线:DRAWLINE(CURRBARSCOUNT=T3+1,T3HIGH,ISLASTBAR,T3HIGH,1),COLORGRAY,LINETHICK1;
DRAWTEXT(ISLASTBAR,T3HIGH,'------------网买入')LINETHICK1,COLORYELLOW;
IF(S=1,CRTP,DRAWNULL),COLORRED;
IF(S=1,CRZL,DRAWNULL),COLORC7C9FF;
IF(S=1,CRZC,DRAWNULL),COLOR7C9CFF;
IF(S=1,CRFZ,DRAWNULL),COLORDD00DD;
IF(S=1,CRXL,DRAWNULL),COLORFFDDFF;
网12:=EXPMA(CLOSE,12),COLORGRAY,LINETHICK2;
网33:EXPMA(CLOSE,33),COLORFF00FF,LINETHICK4;
IF(网33 REF(网33,1),网33,DRAWNULL),COLOR00FF00,LINETHICK3;
VC:=(2*CLOSE+HIGH+LOW)/4;
K:SLOPE(WMA(VC,5),9)*5+VC,COLOR00FFFF,LINETHICK0;
D1:WMA(K,3),COLOR00FF00,LINETHICK0;
J:2.8*K-1.8*D1,COLOR0099FF,LINETHICK1;
2.8*K-1.8*D1,COLORFF9900,LINETHICK1;
IF(J REF(J,1),J,DRAWNULL),COLOR0000FF,LINETHICK3;
A7:=C-REF(C,1);
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
买1:=LLV(A8,2)=LLV(A8,7)ANDCOUNT(A8 0,2)ANDCROSS(A8,MA(A8,2));
DRAWTEXT(FILTER(买1=1,5),LOW-0.05,'↖买进'),COLORYELLOW;
STICKLINE(买1,OPEN,CLOSE,2,0),COLORYELLOW;
MA30:=EMA(CLOSE,30);
强弱:EMA(CLOSE,900);
STICKLINE((MA30 强弱),MA30,强弱,1,0),COLOR0000FF;
STICKLINE((MA30 强弱),MA30,强弱,1,0),COLOR00FF00;
H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;
阻力:L1+P1*7/8,COLOR00DD00;
支撑:L1+P1*0.5/8,COLOR00DD00;
现价:CLOSE,COLORWHITE,LINETHICK1;
STICKLINE(CROSS(支撑,现价),支撑,阻力,1,0),COLORYELLOW;
DRAWTEXT(LONGCROSS(支撑,现价,2),支撑*1.001,'★B'),COLORYELLOW;{吸}
DRAWTEXT(LONGCROSS(现价,阻力,2),现价,'★'),COLORRED;{抛};
通达信高抛低吸截图
