以下是通达信压力支撑指标公式
C/C++Code复制内容到剪贴板
HIGHN:=10;LOWN:=10;HIGHDISPLAY:=0;LOWDISPLAY:=0;ZGDISPLAY:=0;MADISPLAY:=0;
AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);
QY:=BACKSET(AA,HIGHN+1);
CC:=FILTER(QY,HIGHN)ANDH=HHV(H,HIGHN+1);
DRAWICON(CC,H*1.02,2);
DDD:=BARSLAST(CC);
GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBU:=IF(DDD,REF(H,DDD),H);{顶部}
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
DINGBU1:=REF(DINGBU,DDD+1);
GDCS1:=CONST(DINGBUTS);
DINGBUTS1:=REF(DINGBUTS,DDD+1);
GDCS2:=CONST(DINGBUTS1);
DINGBU2:=REF(DINGBU1,DDD+1);
MM:=IF(CURRBARSCOUNT>GDCS2,0,1);
高点压力:DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1)COLORGREEN,LINETHICK2;
DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLOR0055FF,POINTDOT;
DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLORYELLOW,POINTDOT;
AA1:=REF(L,LOWN)=LLV(L,2*LOWN+1);
QY1:=BACKSET(AA1,LOWN+1);
CC1:=FILTER(QY1,LOWN)ANDL=LLV(L,LOWN+1);
DRAWICON(CC1,L*0.98,1);
DD1:=BARSLAST(CC1);
DDTS:=IF(CC1,CURRBARSCOUNT,0);
YDB:=IF(DD1,REF(L,DD1),L);
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
DDCS1:=CONST(DDTS1);
ZDB:=REF(YDB,DD1+1);
DDTS2:=REF(DDTS1,DD1+1);
DDCS2:=CONST(DDTS2);
低点支撑:DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1)COLORRED,LINETHICK2;
ZGSTAR:=(高点压力+低点支撑)/2;
ZGEND:=CONST((高点压力+低点支撑)/2);
STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2);
中轨:DRAWLINE(CURRBARSCOUNT=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,1),COLORFF55BB,LINETHICK2;
DRAWLINE(CURRBARSCOUNT=DDCS1,L,ISLASTBAR,REF(L,DDCS1-1),1),COLORMAGENTA,POINTDOT,;
DRAWLINE(CURRBARSCOUNT=DDCS2,L,ISLASTBAR,REF(L,DDCS2-1),1),COLORCYAN,POINTDOT;
重心:=(C+0.618*REF(C,1)+0.382*REF(C,2)+0.236*REF(C,3)+0.146*REF(C,4))/2.382,COLORYELLOW,LINETHICK1;
GAO:=HHV(C,60)-LLV(C,60);
RSI:=SMA(MAX(重心-REF(重心,1),0),5,1)/SMA(ABS(重心-REF(重心,1)),5,1);
指导线:重心+GAO*(RSI-0.5),COLORMAGENTA,LINETHICK1;
STICKLINE(CROSS(RSI,0.1),指导线,REF(指导线,1),1,0),COLORYELLOW;
STICKLINE(CROSS(0.9,RSI),指导线,REF(指导线,1),1,0),COLORCYAN;
通达信突破压力位指标
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
BBI线:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
CPX40:=WMA(MID,40);
CPX30:=WMA(MID,30);
CPX20:=WMA(MID,20);
CPX15:=WMA(MID,15);
CPX10:=WMA(MID,10);
CPX5:=WMA(MID,5);
CPX3:=WMA(MID,3);
STZF:=(MAX(CLOSE,OPEN)/MIN(CLOSE,OPEN)-1)*100;
均STZF:=(SUM(STZF,21)-STZF)/20;
DYX:=CLOSE(均
STZF*2.5));
ZNCPX3:=IFF(DYX,(6*CLOSE+2*REF(MID,1)+1*REF(MID,2))/9,CPX3);
DYKX:=CLOSE>REF(CLOSE,1)AND(100*(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>(均
STZF*2.5));
ZNCPX5:=IFF(DYKX,(6*CLOSE+2*REF(MID,1)+1*REF(MID,2))/9,CPX5);
CPMXK:=CPX20;
CPMXM:=CPX30;
CPKXM:=ZNCPX3;
CPKXK:=ZNCPX3;
UP:=CPX30>REF(CPX30,1);
DOWN:=CPX30<REF(CPX30,1);
CPXM:=IFF(UP,CPMXK,IFF(DOWN,CPMXM,0));
CPXK:=IFF(UP,CPKXM,IFF(DOWN,CPKXK,0));
D:=CPXK>CPXM;
K:=CPXK<=CPXM;
长:=WMA(MID,30);
中:=WMA(MID,20);
短:=WMA(MID,10);
SXX:=短>REF(短,1)AND中<REF(中,1)AND长<REF(长,1);
SMX:=短>REF(短,1)AND中>REF(中,1)AND长<REF(长,1);
SML:=短>REF(短,1)AND中>REF(中,1)AND长>REF(长,1);
SXL:=短>REF(短,1)AND中REF(长,1);
XML:=短REF(中,1)AND长>REF(长,1);
XXL:=短REF(长,1);
XXX:=短<REF(短,1)AND中<REF(中,1)AND长<REF(长,1);
均线最大:=MAX(CPX5,MAX(CPX10,MAX(CPX20,MAX(CPX30,CPX40))));
均线最小:=MIN(CPX5,MIN(CPX10,MIN(CPX20,MIN(CPX30,CPX40))));
高缠绕度:=1000*(均线最大/均线最小-1)<27;
低缠绕度:=1000*(均线最大/均线最小-1)>=27;
投机:=IFF(BARSSINCE(C>0)>=40,10,0);
STICKLINE(投机,0,10,3.00,0),COLORBLUE,COLOR990000;
试盘:=IFF(SXX,20,0);
STICKLINE(SXX,0,20,3.00,0),COLOR990000;
加仓:=IFF(SMXANDD,40,IFF(SMXANDK,20,0));
STICKLINE(SMXANDD,0,40,3.00,0),COLORYELLOW,COLOR0088FF;
STICKLINE(SMXANDK,0,20,3.00,0),COLORBLUE,COLOR990000;
重仓:=IFF(SMLANDDAND低缠绕度,90,IFF(SMLANDDAND高缠绕度,60,IFF(SMLAND
K,20,0)));
STICKLINE(SMLANDK,0,20,3.00,0),COLOR990000;
STICKLINE(SMLANDDAND低缠绕度,0,90,3.00,0),COLORRED,COLOR000055;
STICKLINE(SMLANDDAND高缠绕度,0,60,3.00,0),COLORYELLOW,COLOR0088FF;
高仓:=IFF(SXLANDDAND低缠绕度,70,IFF(SXLANDDAND高缠绕度,40,IFF(SXLAND
K,20,0)));
STICKLINE(((SXLANDK)OR(SXLANDDAND高缠绕
度)),0,20,3.00,0),COLORBLUE,COLOR990000;
STICKLINE(SXLANDDAND低缠绕度,0,70,3.00,0),COLOR000055;
STICKLINE(SXLANDDAND高缠绕度,0,40,3.00,0),COLOR0088FF;
减仓:=IFF(XMLANDD,60,IFF(XMLANDK,20,0));
STICKLINE(XMLANDD,0,60,3.00,0),COLOR0088FF;
STICKLINE(XMLANDK,0,20,3.00,0),COLOR990000;
轻仓:=IFF(XXLANDD,30,IFF(XXLANDK,20,0));
STICKLINE(XXLANDD,0,30,3.00,0),COLOR0088FF;
STICKLINE(XXLANDK,0,20,3.00,0),COLOR990000;
空仓:=IFF(XXX,0,0);
仓位1:=IFF(SMLANDDAND低缠绕度,90,IFF(SXLANDDAND低缠绕度,70,IFF((XML
ANDD)OR(SMLANDDAND高缠绕度),60,IFF
((1/2)==10,50,IFF((SMXANDD)OR(SXLANDDAND高缠绕度),40,IFF(XXLAND
D,30,0))))));
仓位2:=IFF(SXXOR(SMXANDK)OR(SMLANDK)OR(SXLANDK)OR
(XMLANDK)OR(XXLANDK),20,10);
仓位A:=MAX(仓位1,仓位2);
配置仓位:=IFF(((REF(仓位A,1)==90)OR(REF(仓位A,1)==70))AND(仓位A<=50AND
仓位A>=30),60,仓位A);
STICKLINE(((REF(仓位A,1)==90)OR(REF(仓位A,1)==70))AND(仓位A<=50AND仓位
A>=30),0,60,3.00,0),COLOR0088FF;
修正一天:=COUNT(配置仓位>=70,2)==1ANDCOUNT(配置仓位>=30AND配置仓位
<=60,2)==1;
修正二天:=COUNT(配置仓位>=70,3)==1ANDCOUNT(配置仓位>=30AND配置仓位
<=60,3)==2;
修正三天:=COUNT(配置仓位>=70,4)==1ANDCOUNT(配置仓位>=30AND配置仓位
<=60,4)==3;
修正四天:=COUNT(配置仓位>=70,5)==1ANDCOUNT(配置仓位>=30AND配置仓位
<=60,5)==4;
修正五天:=COUNT(配置仓位>=70,6)==1ANDCOUNT(配置仓位>=30AND配置仓位
<=60,6)==5;
修正六天:=COUNT(配置仓位>=70,7)==1ANDCOUNT(配置仓位>=30AND配置仓位
<=60,7)==6;
修正七天:=COUNT(配置仓位>=70,8)==1ANDCOUNT(配置仓位>=30AND配置仓位
<=60,8)==7;
修正八天:=COUNT(配置仓位>=70,9)==1ANDCOUNT(配置仓位>=30AND配置仓位
<=60,9)==8;
修正九天:=COUNT(配置仓位>=70,10)==1ANDCOUNT(配置仓位>=30AND配置仓位
<=60,10)==9;
修正十天:=COUNT(配置仓位>=70,11)==1ANDCOUNT(配置仓位>=30AND配置仓位
<=60,11)==10;
修正十一天:=COUNT(配置仓位>=70,12)==1ANDCOUNT(配置仓位>=30AND配置仓位
<=60,12)==11;
修正十二天:=COUNT(配置仓位>=70,13)==1ANDCOUNT(配置仓位>=30AND配置仓位
<=60,13)==12;
修正十三天:=COUNT(配置仓位>=70,14)==1ANDCOUNT(配置仓位>=30AND配置仓位
<=60,14)==13;
修正条件BX:=((修正一天ANDD)OR(修正二天ANDD)OR(修正三天ANDD)OR
(修正四天ANDD)OR(修正五天ANDD)OR(修正六天ANDD)OR
(修正七天ANDD)OR(修正八天ANDD)OR(修正九天ANDD)OR
(修正十天ANDD)OR(修正十一天ANDD)OR(修正十二天ANDD)OR(修正十三天
ANDD));STICKLINE(修正条件BX,0,配置仓位,3.00,0),COLOR000055;
蓝:=配置仓位<=20;
红:=(配置仓位>=70)OR修正一天OR修正二天OR修正三天OR修正四天OR修正
五天OR修正六天OR
修正七天OR修正八天OR修正九天OR修正十天OR修正十一天OR修正十二天OR
修正十三天;
黄:=(红==0)AND(蓝==0);
VAR1:=EMA(EMA(CLOSE,9),9);
控盘:=((VAR1-REF(VAR1,1))/REF(VAR1,1)*1000)>0;
满仓线:IFF(1,100,0),COLORRED;
STICKLINE(控盘==0AND红,0,配置仓位,3.00,0),COLOR0088FF;
STICKLINE(控盘==0AND黄,0,配置仓位,3.00,0),COLOR990000;
STICKLINE(控盘AND蓝,0,配置仓位,3.00,0),COLOR0088FF;
配置仓位NEW:=IFF(控盘AND配置仓位<=50,50,配置仓位);
仓位马力:IFF(1,配置仓位NEW,0),NODRAW;
STICKLINE(控盘AND(加仓OR轻仓OR(SXLANDDAND高缠绕度))AND红
==0,0,50,3.00,0),COLOR0088FF;
STICKLINE(红,0,50,3.00,0),COLOR000055;
STICKLINE(控盘==0AND红,0,配置仓位NEW,3.00,0),COLOR0088FF;
STICKLINE(控盘==0AND黄,0,配置仓位NEW,3.00,0),COLOR990000;
STICKLINE(控盘AND蓝,0,配置仓位NEW,3.00,0),COLOR0088FF;
黄新:=黄OR(控盘==0AND红)OR(控盘AND蓝)OR(控盘==0AND仓位马力>=60);
蓝新:=蓝OR(控盘==0AND黄);
红新:=红;
STICKLINE((控盘==0AND仓位马力>=60),0,仓位马力,3.00,0),COLOR0088FF;
修一天:=COUNT(红新,2)==1ANDCOUNT(黄新,2)==1;
修二天:=COUNT(红新,3)==1ANDCOUNT(黄新,3)==2;
修三天:=COUNT(红新,4)==1ANDCOUNT(黄新,4)==3;
修四天:=COUNT(红新,5)==1ANDCOUNT(黄新,5)==4;
修五天:=COUNT(红新,6)==1ANDCOUNT(黄新,6)==5;
修六天:=COUNT(红新,7)==1ANDCOUNT(黄新,7)==6;
修七天:=COUNT(红新,8)==1ANDCOUNT(黄新,8)==7;
修八天:=COUNT(红新,9)==1ANDCOUNT(黄新,9)==8;
修九天:=COUNT(红新,10)==1ANDCOUNT(黄新,10)==9;
修十天:=COUNT(红新,11)==1ANDCOUNT(黄新,11)==10;
修十一天:=COUNT(红新,12)==1ANDCOUNT(黄新,12)==11;
修正条件AX:=
(修一天OR修二天OR修三天OR修四天OR修五天OR
修六天OR修七天OR修八天OR修九天OR修十天OR
修十一天);
STICKLINE(修正条件AX,0,配置仓位NEW,3.00,0),COLOR000055;
文章来源：
评论(0)