当前位置: 网站首页 > 股票软件公式 > 通达信公式 > 文章 当前位置: 通达信公式 > 文章

通达信源码:时间之窗彩图,九转序列王者,主力建仓

点击: 次    来源:顶尖财经    作者:股市狙击 - 小 + 大

时间之窗彩图:

DRAWGBK(C>0,RGB(0,150,150),RGB(0,00,100),0,' ',0),LINETHICK2; 

M80:MA(C,80),LINETHICK0;

M200:MA(C,200),LINETHICK0;

DRAWBAND(M200,RGB(40,100,40),M80,RGB(100,100,0)),LINETHICK0;

DRAWKLINE(H,O,L,C);

MA03:MA(C,3),COLORYELLOW,DOTLINE,LINETHICK0;

IF(MA03>=REF(MA03,1),MA03,DRAWNULL),COLOR0066FF,LINETHICK0; 

IF(MA03< REF(MA03,1),MA03,DRAWNULL),,COLORGREEN,LINETHICK0; 

X:=(3*C+L+O+H)/6;

多空线:(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)

+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)

+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+

REF(X,20))/210,COLORGREEN,LINETHICK2;

IF(多空线>=REF(多空线,1),多空线,DRAWNULL),COLORRED,LINETHICK3; 

IF(多空线< REF(多空线,1),多空线,DRAWNULL),,COLORGREEN,LINETHICK3; 

牛皮熊:DRAWICON(CROSS(MA03,多空线) AND CLOSE/REF(CLOSE,1)>1.03,LOW*0.96,25);

DRAWTEXT(FILTER(牛皮熊,8),多空线-0.05,'↖跟庄买进'),COLORGREEN;

DRAWTEXT(CROSS(MA03,多空线)  AND MA03>0,多空线-0.23,'★←'),COLORYELLOW;

花:=SLOPE(EMA(C,3),3);

神:=SLOPE(EMA(C,7),7);

DRAWICON(CROSS(花,神) AND CLOSE/REF(CLOSE,1)>1.03,LOW*0.96,25);

DRAWTEXT(CROSS(花,神) AND CLOSE/REF(CLOSE,1)>1.03,LOW*0.96,'买'),COLORWHITE;

花2:=EMA(SLOPE(1,1)+C,3),COLORRED;

神2:=EMA(SLOPE(1,1)+C,7),COLORBLUE;

A02:=3*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5)-2*EMA((C-LLV(L,30))/(HHV(H,30)-LLV(L,30))*100,5);

A4:=(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34))*100;

A5:=EMA(CLOSE,12)-EMA(CLOSE,26);

A6:=EMA(A5,9);

A7:=(A5<-0.1 AND A5>A6);

财神:IF(A7,LLV(L,21),DRAWNULL)COLORRED,CIRCLEDOT;

DRAWTEXT_FIX(1,0.07,0,0,HYBLOCK)COLOR0080FF;

DRAWTEXT_FIX(1,0.01,0.08,0,'主题投资:')COLOR0000FF;

DRAWTEXT_FIX(1,0.09,0.08,0,EXTERNSTR(0,1))COLOR0000FF;

窗口显示:=C>REF(C,1)*1.095 AND C=H;

T:=BARSLAST(窗口显示),LINETHICK0;

涨停价:REF(C,T)NODRAW,LINETHICK0;

涨停日期:REF(DATE-1000000,T)NODRAW,LINETHICK0;

STICKLINE(L>REF(H,1),L,REF(H,1),20,1001), COLORYELLOW ,LINETHICK0;

STICKLINE(REF(L,1)>H,REF(L,1),H,20,1001), COLORGREEN ,LINETHICK0;

TJ01:=C<O AND REFX(C<O,1) AND REFX(C>O,2);

DRAWLINE(TJ01,REFX(LLV(L,2),1),REF(TJ01,1),REF(REFX(LLV(L,2),1),1),1)COLORYELLOW,LINETHICK0;

DRAWLINE(TJ01,REFX(HHV(C,2),1),REF(TJ01,1),REF(REFX(HHV(C,2),1),1),1)COLORYELLOW,LINETHICK0;

{波峰} 

TY:=H; 

A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); 

HD:=FILTER(C1,10); 

A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C002:=BACKSET(B2,10+1); 

LD:=FILTER(C002,10); 

波峰:REF(H,BARSLAST(HD)),COLOR00808F,POINTDOT,LINETHICK4; 

STICKLINE(H,波峰,波峰,8,0),COLOR00808F,LINETHICK4;

BDGD:=C=HHV(C,13);

GDSJ:=BARSLAST(FILTER(CROSS(0.8,BDGD),2))+1;

高点:REF(C,GDSJ),COLORGREEN,LINETHICK4,POINTDOT;

突破:CROSS(C,REF(高点,1)),COLOR00FFFF,POINTDOT,LINETHICK0;

STICKLINE(GDSJ<=6,高点,高点,8,0),COLORGREEN,LINETHICK2;

BDDD:=C=LLV(C,13);

DDSJ:=BARSLAST(FILTER(CROSS(0.8,BDDD),2))+1;

低点:REF(C,DDSJ),COLOR0055FF,POINTDOT,LINETHICK4;

STICKLINE(DDSJ<=6,低点,低点,8,0),COLOR0055FF,LINETHICK4;

AAA:=(REF(CLOSE,1)+REF(CLOSE,2)+OPEN)/3;

前高:DRAWLINE(CURRBARSCOUNT=3,H,REF(CURRBARSCOUNT=3,1),REF(H,1),1),LINETHICK2;

 昨收:DRAWLINE(CURRBARSCOUNT=2,C,REF(CURRBARSCOUNT=2,1),REF(C,1),1),LINETHICK2;

压力线:DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),1),COLORYELLOW,LINETHICK0;

DRAWTEXT(压力线,L-0.2,'压力↙'),COLORYELLOW,LINETHICK0;

MA010:=MA(CLOSE,10),COLORYELLOW,LINETHICK0;

MA54:=MA(CLOSE,54),COLORFFCCCC,LINETHICK0;

PL1:=(((CLOSE - MA54) / MA54) < 0.1);

PL2:=(((CLOSE - MA010) / MA010) < 0.3);

偏离率:=(((PL1 = 1) AND (PL2 = 1)) * 0.2);

平台突破:=((((偏离率 = 0) AND (REF(偏离率,1) = 0.2)) AND (REF((COUNT((偏离率 = 0.2),10) = 10),1) = 1)) * 1);

DRAWTEXT(平台突破,L,'=================='),COLORWHITE;

DRAWTEXT(平台突破,L-0.05,'平台突破'),COLORGREEN;

三日最低:=EMA((REF(L,4)+REF(L,3)+REF(L,2))/3,3); 

三日最高:=EMA((REF(H,4)+REF(H,3)+REF(H,2))/3,3); 

EXITLONG:CROSS(CROSS(三日最高,C),0.6);

ENTERLONG:CROSS(CROSS(C,三日最低),0.5);

STICKLINE(C/REF(C,1)>1.095,C,O,2,0),COLORYELLOW;

涨停:=IF(REF(C,1)*1.095-C<0.01 ,1,0);

STICKLINE(涨停,OPEN,CLOSE,2.5,0),COLORYELLOW;

DRAWTEXT(涨停,L-0.1,'涨停'),COLORYELLOW;

C3:=REF(C,1);

跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);

STICKLINE(跌停,OPEN,CLOSE,2.5,0),COLORBLUE;

DRAWTEXT(跌停,H+0.3,'跌停'),COLORBLUE;

NN:=120;

{跳空}

STICKLINE(REF(L,1)>H,H,REF(L,1),5,0),COLORGRAY;

STICKLINE(REF(H,1)<L,L,REF(H,1),5,0),COLORGRAY;

{彩色K线}

 TYX3:=MA(REF(HHV((C+L+O+H)/4,30),1),3);

 TYX4:=MA((C+L+O+H)/4,13);

 TYX5:=EMA((C+L+O+H)/4,21);

 {空心红}

 STICKLINE(C<TYX5 AND C>O,H,L,0,0),COLORRED;

 STICKLINE(C<TYX5 AND C>O,C,O,3,1),COLORRED;

 {深绿}

 STICKLINE(C<TYX5 AND C<O,H,L,0,0),COLOR007700;

 STICKLINE(C<TYX5 AND C<O,C,O,3,0),COLOR005500;

 STICKLINE(C<TYX5 AND C<O,C,O,2,0),COLOR006600;

 STICKLINE(C<TYX5 AND C<O,C,O,1,0),COLOR007700;

 {蓝}

 STICKLINE(C>TYX5 AND C<O,H,L,0,0),COLORFFDD44;

 STICKLINE(C>TYX5 AND C<O,C,O,3,0 ),COLORFF7700;

 STICKLINE(C>TYX5 AND C<O,C,O,2,0 ),COLORFFAA22;

 STICKLINE(C>TYX5 AND C<O,C,O,1 ,0 ),COLORFFDD44;

 {黄}

 STICKLINE(C>TYX5 AND C>O,H,L,0,0 ),COLOR00EEFF;

 STICKLINE(C>TYX5 AND C>O,C,O,3,0 ),COLOR00AAFF;

 STICKLINE(C>TYX5 AND C>O,C,O,2,0 ),COLOR00CCFF;

 STICKLINE(C>TYX5 AND C>O,C,O,1,0 ),COLOR00EEFF;

 {粉红}

 STICKLINE(C>TYX4 AND C>O,H,L,0,0),COLORFF66AA;

 STICKLINE(C>TYX4 AND C>O,C,O,3,0 ),COLORFF11FF;

 STICKLINE(C>TYX4 AND C>O,C,O,2,0 ),COLORFF44FF;

 STICKLINE(C>TYX4 AND C>O,C,O,1,0 ),COLORFF66FF;

 {亮灰}

 STICKLINE(C>TYX4 AND C<O,H,L,0,0),COLOR999999;

 STICKLINE(C>TYX4 AND C<O,C,O,3,0),COLOR555555;

 STICKLINE(C>TYX4 AND C<O,C,O,2,0),COLOR777777;

 STICKLINE(C>TYX4 AND C<O,C,O,1,0),COLOR999999;

 {深红}

 STICKLINE(C>TYX3 AND C>O,H,L,0,0),COLOR0000DD;

 STICKLINE(C>TYX3 AND C>O,C,O,3,0),COLOR000099;

 STICKLINE(C>TYX3 AND C>O,C,O,2,0),COLOR0000BB;

 STICKLINE(C>TYX3 AND C>O,C,O,1,0),COLOR0000DD;

 {涨跌停K线}

 STICKLINE((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1)),OPEN,CLOSE,1,0),COLORYELLOW;

 STICKLINE((REF(C,1)-C)*100/REF(C,1)>=(10-0.01*100/REF(C,1)),OPEN,CLOSE,1,0),COLORWHITE;

 {突破}

 STICKLINE(REF(COUNT(C<TYX3,5)=5,1) AND C>TYX3 AND C>O,C,O,1,0),COLOR00CCFF;

 STICKLINE(REF(COUNT(C<TYX3,5)=5,1) AND C>TYX3 AND C>O,C,O,1,0),COLOR00CCFF;

{红绿三角【副图】}

A10304:=REF(HIGH,3)=HHV(HIGH,2*3+1); 

B10304:=FILTER(A10304,3); 

C10304:=BACKSET(B10304,3+1); 

D10304:=FILTER(C10304,3);{高点}

A20304:=REF(LOW,3)=LLV(LOW,2*3+1); 

B20304:=FILTER(A20304,3); 

C20304:=BACKSET(B20304,3+1); 

D20304:=FILTER(C20304,3);{低点}

E10304:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; 

E20304:=(HIGH+LOW)/2;{高低点出现在同一K线上时可作取舍}

H10304:=(D10304 AND NOT(D20304 AND E10304>=E20304)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;

L10304:=(D20304 AND NOT(D10304 AND E10304=E20304));

X10304:=REF(BARSLAST(H10304),1)+1; 

F10304:=BACKSET(H10304 AND COUNT(L10304,X10304)>0,LLVBARS(IF(L10304,LOW,10000),X10304));

G10304:=F10304>REF(F10304,1); 

I10304:=BACKSET(G10304,2); 

LD0304:=I10304>REF(I10304,1);{过滤后低点}

L20304:=LD0304 OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;

X20304:=REF(BARSLAST(L20304),1)+1; 

F20304:=BACKSET(L20304 AND COUNT(H10304,X20304)>0,HHVBARS(IF(H10304,HIGH,0),X20304));

G20304:=F20304>REF(F20304,1); 

I20304:=BACKSET(G20304,2); 

HD0304:=I20304>REF(I20304,1);{过滤后高点}

UU0304:=BACKSET(BARSTATUS=2,BARSLAST(LD0304)+1);

VV0304:=UU0304>REF(UU0304,1);

UU20304:=BACKSET(BARSTATUS=2,BARSLAST(HD0304)+1);

VV20304:=UU20304>REF(UU20304,1);

{以下语句为三角形部分}

底:REF(L,BARSLAST(VV0304)),COLORYELLOW,LINETHICK0; 

顶:REF(H,BARSLAST(VV20304)),COLORYELLOW,LINETHICK0;

{下跌三角形:绿色三角形画完介入}

STICKLINE(VV0304,顶,底,0,0),COLORGREEN,LINETHICK2;

DRAWLINE(VV20304,H,VV0304,L,0),COLORGREEN,LINETHICK2;{斜}

DRAWLINE(VV20304,H,VV0304,顶,0),COLORGREEN,LINETHICK2;

{上涨三角形:红色三角形画完出局}

STICKLINE(VV20304 ,顶,底,0,0),COLORBLUE,LINETHICK2;

DRAWLINE(VV0304,L,VV20304,H,0),COLORBLUE,LINETHICK2;{斜}

DRAWLINE(VV0304,L,VV20304,底,0),COLORBLUE,LINETHICK2;

DRAWICON(C<O AND C>REF(C,1),H,6);{假阴真阳}

均价:AMOUNT/VOL/100,NODRAW;

假阴0:=O>C AND 均价>REF(C,1);

DRAWTEXT(假阴0,L-0.2,'假阴↖'),COLORE8E8E8;

STICKLINE(假阴0,O,C,1,0),COLORRED; 

VVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL);{模拟量}

H_L:=0.1*CONST(HHV(VOL,240));

长阴短柱:=C/REF(C,1)<=0.96 AND V<HHV(V,30)/1.9;

DRAWTEXT(长阴短柱 ,V+1.6*0.098,'长阴短柱↙'),COLORLICYAN;

MA05:=MA(C,5);

MA5角度: ATAN((MA05/REF(MA05,1)-1)*100)*180/3.1416,NODRAW;

T01:=CONST(LLVBARS(LOW,10));

T1HIGH:=CONST(REF(HIGH,T01));

MM:=CONST(CURRBARSCOUNT);

T02:=CONST(BARSLAST(CURRBARSCOUNT>MM+T01 AND H>T1HIGH));

T2HIGH:=CONST(REF(HIGH,T02));

T03:=CONST(BARSLAST(CURRBARSCOUNT>MM+T02 AND HIGH>T2HIGH));

T3HIGH:=CONST(REF(HIGH,T03));

攻击线:DRAWLINE(CURRBARSCOUNT=T03+1, T3HIGH, ISLASTBAR, T3HIGH,1),LINETHICK3,COLOR8080FF;

DRAWTEXT(ISLASTBAR, T3HIGH, '必杀攻击线')LINETHICK2,COLORCYAN;

A6A:=REF(HIGH,6)=HHV(HIGH,2*6+1);

B6A:=FILTER(A6A,6); 

C6A:=BACKSET(B6A,6+1); 

D6A:=FILTER(C6A,6);

A7A:=REF(LOW,6)=LLV(LOW,2*6+1);

B7A:=FILTER(A7A,6); 

C7A:=BACKSET(B7A,6+1); 

D7A:=FILTER(C7A,6);

E6A:=(REF(LLV(LOW,2*6),1)+REF(HHV(HIGH,2*6),1))/2;

E7A:=(HIGH+LOW)/2;

H6A:=(D6A AND NOT(D7A AND E6A>=E7A)) OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;

H7A:=D6A AND NOT(D7A AND E6A>=E7A);

L6A:=D7A AND NOT(D6A AND E6A=E7A);

X6A:=REF(BARSLAST(H6A),1)+1;

F6A:=BACKSET(H6A AND COUNT(L6A,X6A)>0,LLVBARS(IF(L6A,LOW,10000),X6A));

G6A:=F6A>REF(F6A,1);

I6A:=BACKSET(G6A,2); 

LD2A:=I6A>REF(I6A,1);

L7A:=LD2A OR BARSTATUS=2 OR BARSCOUNT(CLOSE)=1;

X7A:=REF(BARSLAST(L7A),1)+1; 

F7A:=BACKSET(L7A AND COUNT(H7A,X7A)>0,HHVBARS(IF(H7A,HIGH,0),X7A));

G7A:=F7A>REF(F7A,1); 

I7A:=BACKSET(G7A,2);

HD2A:=I7A>REF(I7A,1);

UU3A:=BACKSET(BARSTATUS=2,BARSLAST(LD2A)+1);

VV3A:=UU3A>REF(UU3A,1);

WW3A:=BACKSET(VV3A,REF(BARSLAST(LD2A),1)+2);

XX3A:=WW3A>REF(WW3A,1);

DRAWLINE(XX3A,L,VV3A,L,1),COLORCYAN,LINETHICK2;

UU4A:=BACKSET(BARSTATUS=2,BARSLAST(HD2A)+1);

VV4A:=UU4A>REF(UU4A,1);

WW4A:=BACKSET(VV4A,REF(BARSLAST(HD2A),1)+2);

XX4A:=WW4A>REF(WW4A,1);

DRAWLINE(XX4A,H,VV4A,H,1),COLOR8000F0,LINETHICK2;

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) AND H=HHV(H,HIGHN+1); 

DRAWICON(CC,H*1.02,2); 

DDD:=BARSLAST(CC); 

GDTS:=IF(CC,BARSCOUNT(C),0); 

DINGBU:=IF(DDD,REF(H,DDD),H); 

DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS); 

DINGBU1:=REF(DINGBU,DDD+1); 

GDCS1:=CEILING(DINGBUTS); 

DINGBUTS1:=REF(DINGBUTS,DDD+1); 

GDCS2:=CEILING(DINGBUTS1); 

DINGBU2:=REF(DINGBU1,DDD+1); 




九转序列王者:

A1:=C>REF(C,4);

NT:=BARSLASTCOUNT(A1);

TJ11:=NT=9;

TJ13:=ISLASTBAR AND BETWEEN(NT,5,8);

AY:=(BACKSET(TJ11>0,9) OR   BACKSET(TJ13>0,NT))*NT;

DRAWTEXT(AY>0,H*1.02,VAR2STR(AY,0)),COLORFF00FF;

DRAWTEXT(NT=9,H*1.02,'9'),COLORGREEN;

B1:=C<REF(C,4);

NT0:=BARSLASTCOUNT(B1);

TJ21:=NT0=9 ;

TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8);

AY1:=(BACKSET(TJ21>0,9)  OR  BACKSET(TJ23>0,NT0))*NT0;

DRAWTEXT(AY1>0,L*0.98,VAR2STR(AY1,0)),COLORFF00FF;

DRAWTEXT(NT0=9,L*0.98,'9'),COLORGREEN;

MA1:MA(CLOSE,M1);




主力建仓:

用法说明:
红色柱子代表主力在建仓,红色的柱子越高,说明主力建仓的资金越多,绿色的柱子代表主力在洗盘。
当出现了很多红色柱子,后又出现绿色的柱子并且绿色的柱子一天比一天短,说明主力建仓在洗盘并且洗盘马上要结束了,
当绿色的柱子快没有的时候,说明马上要拉升了,( 顶尖财经 股票学院: http://www.58188.com )

 
N1:=5;
N2:=9;
NMTM:=C-REF(C,1);
ZLGJ:100*EMA(EMA(NMTM,N1),N1)/EMA(EMA(ABS(NMTM),N1),N1),COLORRED,LINETHICK1;
MAZL:MA(ZLGJ,N2),COLORFFCAC5,LINETHICK1;
STICKLINE(REF(ZLGJ,1)<=ZLGJ,ZLGJ,REF(ZLGJ,1),2.5,0),COLORFF00FF;
STICKLINE(REF(ZLGJ,1)>ZLGJ,ZLGJ,REF(ZLGJ,1),2.5,0),COLORYELLOW;
VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
VAR2:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),10,1);
VAR3:=EMA(VAR2,10);
VAR4:=LLV(LOW,33);
VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),3);
主力进场:IF(VAR5>REF(VAR5,1),VAR5,0),COLORRED,NODRAW;
STICKLINE(VAR5>REF(VAR5,1),0,VAR5,3,0 ),COLORRED;
洗盘:IF(VAR5<REF(VAR5,1),VAR5,0),COLORGREEN,NODRAW;
STICKLINE(VAR5<REF(VAR5,1),0,VAR5,3,0),COLORGREEN;

上一篇:通达信源码:买卖特准,低位启动,见底飘红选股和副图

下一篇:通达信公式下载:组合买卖神器,主力吸筹指标,一线天波段