通达信分时弹压主图指标公式
长趋势:=13;
{DRAWGBK(C>0,RGB(0,0,0),RGB(0,0,0),0,'56',0),LINETHICK2;}
DRAWRECTREL(990,1,0,1,RGB(250,250,0));
DRAWTEXT_FIX(C>0,0.01,0.00,0,'0'),COLOR00CCCC;
DRAWTEXT_FIX(C>0,0.970,0.00,0,'100'),COLOR00CCCC;
DRAWRECTREL(990,189,0,189,RGB(200,200,0));
DRAWTEXT_FIX(C>0,0.01,0.189,0,'19.1'),COLOR00CCCC;
DRAWTEXT_FIX(C>0,0.970,0.189,0,'80.9'),COLORWHITE;
DRAWRECTREL(990,375,0,375,RGB(200,200,0));
DRAWTEXT_FIX(C>0,0.01,0.376,0,'38.2'),COLOR00CCCC;
DRAWTEXT_FIX(C>0,0.970,0.376,0,'61.8'),COLORWHITE;
DRAWRECTREL(990,491,0,491,RGB(200,200,0));
DRAWTEXT_FIX(C>0,0.01,0.492,0,'50.0'),COLOR00CCCC;
DRAWTEXT_FIX(C>0,0.970,0.492,0,'50.0'),COLORWHITE;
DRAWRECTREL(990,607,0,607,RGB(200,200,0));
DRAWTEXT_FIX(C>0,0.01,0.608,0,'61.8'),COLOR00CCCC;
DRAWTEXT_FIX(C>0,0.970,0.608,0,'38.2'),COLORWHITE;
DRAWRECTREL(990,794,0,794,RGB(200,200,0));
DRAWTEXT_FIX(C>0,0.01,0.795,0,'80.9'),COLOR00CCCC;
DRAWTEXT_FIX(C>0,0.970,0.795,0,'19.1'),COLORWHITE;
DRAWRECTREL(990,982,0,982,RGB(250,250,0));
DRAWTEXT_FIX(C>0,0.01,0.936,0,'BASE'),COLOR00CCCC;
DRAWTEXT_FIX(C>0,0.970,0.936,0,'0'),COLOR00CCCC;
年:=YEAR,NODRAW;
月:=MONTH,NODRAW;
星期:=WEEKDAY,NODRAW;
日1:=DATETODAY(DATE);
上市日:=REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT);
自然日:=日1-DATETODAY(上市日)+1;
ZB:=(自然日-REF(自然日,1))!=星期-REF(星期,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0;
本周第几天:=BARSLAST(ZB)+1;
本月第几天:=BARSLAST(年*100+月!=REF(年*100+月,1))+1;
MA1:=REF(C,本周第几天);
MA2:=REF(MA1,本周第几天);
MA3:=REF(MA2,本周第几天);
MA4:=REF(MA3,本周第几天);
MA5:=REF(MA4,本周第几天);
MA6:=REF(MA5,本周第几天);
MA7:=REF(MA6,本周第几天);
MA8:=REF(MA7,本周第几天);
MA9:=REF(MA8,本周第几天);
十周价:=(C+MA1+MA2+MA3+MA4+MA5+MA6+MA7+MA8+MA9)/10;
决策:REFDATE(十周价,DATE),COLORFF0080,LINETHICK2;
DRAWTEXT(ISLASTBAR,决策,' 决策线'),COLORFF0080;
SUM(AMOUNT,0)/SUM(VOL,0)/100 ,LINETHICK1,COLORYELLOW;
DRAWICON(CROSS(C,决策),C,1);
V1:=TIME;
A1:=COUNT(BARSCOUNT(C)=1 AND TIME<102000 ,0 );
T:=IF(V1<130000,(FLOOR(V1/10000)-9.5)*60+(FLOOR(V1/100)-100*FLOOR(V1/10000)),(FLOOR(V1/10000)-11)*60+(FLOOR(V1/100)-100*FLOOR(V1/10000))),NODRAW;
时间:=TIME=100000;
N:=BARSLAST(时间),COLOR808080;
常数:=CONST(IF(N=0,C,REF(C,N))),COLOR004848,DOTLINE;
CS1:=CONST(IF(N,HHV(H,0),REF(HHV(H,0),N))),COLOR808080;
CS2:=CONST(IF(N,LLV(L,0),REF(LLV(L,0),N))),COLOR808080;
{STICKLINE(时间=1,CS1,CS2,-1,0),COLOR808080;}
H01:=MAX(DYNAINFO(3),DYNAINFO(5));
L01:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H01-L01;
阻力:L01+P1*7/8,COLOR00FFFF,DOTLINE;
DRAWTEXT(CURRBARSCOUNT=1,阻力,'阻力'),COLOR00FFFF;
{DRAWTEXT_FIX(1,0.00,0,0,'所属行业:')COLOR0080FF;
DRAWTEXT_FIX(1,0.07,0,0,HYBLOCK)COLOR0080FF;
DRAWTEXT_FIX(1,0.14,0,0,'所属地区:')COLOR00FFFF;
DRAWTEXT_FIX(1,0.21,0,0,DYBLOCK)COLOR00FFFF;
DRAWTEXT_FIX(1,0.01,0.08,0,'主题投资:')COLOR0000FF;
DRAWTEXT_FIX(1,0.09,0.08,0,EXTERNSTR(0,1))COLOR0000FF;} {生成数据时第1项输1与这里1一致,描述部分输"主题投资"}
最新0:C,LINETHICK9,COLORFFFF00;
IF(C>=REF(C,1),C,DRAWNULL),LINETHICK9,COLOR0909FF;
AA0:=SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C));
BB0:=BETWEEN(C/AA0,C+H,C-H);
TT3:=BARSCOUNT(C)+1;
M:=SUM(V*C,TT3)/SUM(V,TT3),COLORYELLOW;
P2:=240;
TC1:=IF(H=HHV(H,P2),C,DRAWNULL);
TC2:=CONST(BARSLAST(TC1=H))+1;
UPPER:=CONST(IF(TC2=1,C,REF(C,TC2-1)));
BC1:=IF(L=LLV(L,P2),C,DRAWNULL);
BC2:=CONST(BARSLAST(BC1=L))+1;
LOWER:=CONST(IF(BC2=1,C,REF(C,BC2-1)));
LP:=CURRBARSCOUNT<=BC2 AND C=LOWER;{低点定位}
HP:=CURRBARSCOUNT<=TC2 AND C=UPPER;{高点定位}
低:=LOWER;
高:=UPPER;
TTT:=MAX(TC2,BC2);
ZZ:=(高+低)/2;
ZH:=(高+ZZ)/2;
ZL:=(ZZ+低)/2;
EE:=CURRBARSCOUNT<=TTT;
中低:IF(EE,ZL,DRAWNULL),COLOR0099FF,LINETHICK1,DOTLINE;
DRAWTEXT(CURRBARSCOUNT=5,中低,'中低'),COLORFFFFFF;
中高:IF(EE,ZH,DRAWNULL),COLORFF9900,LINETHICK1,DOTLINE;
DRAWTEXT(CURRBARSCOUNT=5,中高,'中高'),COLORFFFFFF,LINETHICK2;
标准:IF(EE,ZZ,DRAWNULL),COLORWHITE,LINETHICK1,DOTLINE;
DRAWTEXT(CURRBARSCOUNT=5,标准,'标准'),COLORFFFFFF,LINETHICK2;
高点:IF(EE,高,DRAWNULL),COLOR00FFCC,LINETHICK1,DOTLINE;
DRAWTEXT(CURRBARSCOUNT=6,高点,'高'),COLORFFFFFF,LINETHICK2;
低点:IF(EE,低,DRAWNULL),COLOR00CC00,LINETHICK1,DOTLINE;
DRAWTEXT(CURRBARSCOUNT=1,低点,'低'),COLORFFFFFF,LINETHICK2;
{均价:SUM(V*C,0)/SUM(V,0),COLORWHITE,DOTLINE;
DRAWTEXT(CURRBARSCOUNT=6,均价,'均'),COLORFFFFFF,LINETHICK2;}
最新:C,LINETHICK9,COLORFFFF00;
IF(C>=REF(C,1),C,DRAWNULL),LINETHICK9,COLORRED;
AA:=SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C));
BB:=BETWEEN(C/AA,C+H,C-H);
{分时均线}
W:=BARSLAST(DAY-REF(DAY,1))+1;
均价:SUM(CLOSE*VOL,W)/SUM(VOL,W),LINETHICK2,COLORYELLOW;
IF(均价0)+1;
FS:=SUM(C*V,A)/SUM(V,A);
GJ:=(C+H+L+O)/4;
明日阻力:=L+(GJ-L)+(C-L);
明日支撑:=L+(C-GJ);
明日阻力2:=L+2*(GJ-L)+(C-L);
明日支撑2:=L+(C-GJ)-(GJ-L);
今日阻力:CONST(REF(明日阻力 , 1));
今日支撑:CONST(REF(明日支撑 , 1));
今日阻力2:CONST(REF(明日阻力2 , 1));
今日支撑2:CONST(REF(明日支撑2 , 1));
DRAWTEXT(ISLASTBAR,今日阻力,' -------------阻'),COLOR0000FF;
DRAWTEXT(ISLASTBAR,今日支撑,' -------------------------支'),COLOR00FF00;
DRAWTEXT(BARSTATUS=2 ,HH,'----------------------------------HH'),COLORFFFFFF;
DRAWTEXT(BARSTATUS=2 AND V>REF(V,1) AND MA(V,5)>REF(MA(V,5),1),HH,'今日成交量大于昨日,且有继续增大趋势'+' '),COLOR8285FF;
DRAWTEXT(BARSTATUS=2 AND VREF(MA(V,5),1),HH,'今日成交量小于昨日,但有放大迹象'+' '),COLOR8285FF;
DRAWTEXT(BARSTATUS=2 AND V>REF(V,1)AND MA(V,5)=O5,200,0),IF(C5>=O5,0,200),0));
DRAWRECTREL( 0,C52,16,O52,RGB(IF(C5>=O5,128,0),IF(C5>=O5,0,128),0));
DRAWRECTREL(28,H42,28,L42,RGB(IF(C4>=O4,200,0),IF(C4>=O4,0,200),0));
DRAWRECTREL(20,C42,36,O42,RGB(IF(C4>=O4,128,0),IF(C4>=O4,0,128),0));
DRAWRECTREL(48,H32,48,L32,RGB(IF(C3>=O3,200,0),IF(C3>=O3,0,200),0));
DRAWRECTREL(40,C32,56,O32,RGB(IF(C3>=O3,128,0),IF(C3>=O3,0,128),0));
DRAWRECTREL(68,H22,68,L22,RGB(IF(C2>=O2,200,0),IF(C2>=O2,0,200),0));
DRAWRECTREL(60,C22,76,O22,RGB(IF(C2>=O2,128,0),IF(C2>=O2,0,128),0));
DRAWRECTREL(88,H12,88,L12,RGB(IF(C1>=O1,200,0),IF(C1>=O1,0,200),0));
DRAWRECTREL(80,C12,96,O12,RGB(IF(C1>=O1,128,0),IF(C1>=O1,0,128),0));
DRAWRECTREL(108,H02,108,L02,RGB(IF(C0>=O0,200,0),IF(C0>=O0,0,200),0));
DRAWRECTREL(100,C02,116,O02,RGB(IF(C0>=O0,128,0),IF(C0>=O0,0,128),0));}
{分时弹压}
BAA:=(DYNAINFO(5)-DYNAINFO(3))/DYNAINFO(3)*100;
BAB:=ABS((DYNAINFO(6)-DYNAINFO(3))/DYNAINFO(3)*100);
BAC:=MAX(BAA,BAB);
昨收:=DYNAINFO(3);
今开:=DYNAINFO(4),COLORLICYAN;
现价:=DYNAINFO(7);
新高:=HHV(H,480);
新低:=LLV(L,480);
EAA:=(CLOSE-新高)/新高*100;
EAB:=(CLOSE-新低)/新低*100;
XG:=FILTER(CROSS(C,REF(新高,1)),10);
XD:=FILTER(CROSS(C,REF(新低,1)),10);
STICKLINE(XG,均价,C*1.002,6,0),COLORLIRED;
STICKLINE(XD,均价,C*0.998,4,0),COLORCYAN;
时5:MA(C,300),COLORMAGENTA;
T0:=CURRBARSCOUNT;
A5:="MAA.MA1#DAY";
A25:="MAA.MA2#DAY";
GJ0:=400;
CAA:=(CLOSE-A5)/A5*100;
CAB:=(CLOSE-A25)/A25*100;
日5:IF(C
本文来源于网友自行发布,不代表本站立场,转载联系作者并注明出处