N:=72;M:=1357;P1:=151;P2:=14;P3:=318;P4:=453;P5:=99;P6:=48;
{回調(diào)預(yù)測-M=200-1000-738}
高:=REF(HHV(H,N),3);
頂:REFDATE(高,DATE),COLORWHITE;
Z1:REFDATE(高/1.0809,DATE),POINTDOT,LINETHICK1,COLORYELLOW;
Z2:REFDATE(高/1.1618,DATE),POINTDOT,LINETHICK1,COLORYELLOW;
Z3:REFDATE(高/1.2558,DATE),POINTDOT,LINETHICK1,COLORMAGENTA;
Z4:REFDATE(高/1.4589,DATE),POINTDOT,LINETHICK1,COLORYELLOW;
Z5:REFDATE(高/1.5770,DATE),POINTDOT,LINETHICK1,COLORRED;
{Z6:REFDATE(高/1.8322,DATE),POINTDOT,LINETHICK1,COLORYELLOW;
Z7:REFDATE(高/1.9804,DATE),POINTDOT,LINETHICK1,COLORGREEN;
Z8:REFDATE(高/2.3008,DATE),POINTDOT,LINETHICK1,COLORYELLOW;
Z9:REFDATE(高/2.4870,DATE),POINTDOT,LINETHICK1,COLORWHITE;}
Z:REFDATE(高/(M/1000),DATE),LINETHICK4,COLORYELLOW;
支:REFDATE(高/(M/1000),DATE),LINETHICK2,COLORRED;
{www.wwwpicpay.com 概念股網(wǎng)_通達信股票指標公式}
DRAWTEXT(ISLASTBAR,頂,’頂’),COLORWHITE;
DRAWTEXT(ISLASTBAR,Z1,’8.09′),COLORGREEN;
DRAWTEXT(ISLASTBAR,Z2,’16.18′),COLORGREEN;
DRAWTEXT(ISLASTBAR,Z3,’25.58′),COLORGREEN;
DRAWTEXT(ISLASTBAR,Z4,’45.98′),COLORGREEN;
DRAWTEXT(ISLASTBAR,Z5,’57.7′),COLORGREEN;
{DRAWTEXT(ISLASTBAR,Z6,’83.22′),COLORGREEN;
DRAWTEXT(ISLASTBAR,Z7,’98.04′),COLORGREEN;
DRAWTEXT(ISLASTBAR,Z8,’130.08′),COLORGREEN;
DRAWTEXT(ISLASTBAR,Z9,’148.7′),COLORGREEN;}
DRAWKLINE(H,O,L,C);
五日線:MA(CLOSE,30);
月線:MA(CLOSE,5);
半年線:MA(CLOSE,30);
年線:MA(CLOSE,250);
VAR1:=(2*CLOSE+HIGH+LOW)/4;
VAR2:=IF(YEAR>=2099 AND MONTH>2,0,1);
VAR3:=LLV(LOW,5);
VAR4:=HHV(HIGH,4);
散戶:=EMA((VAR1-VAR3)/(VAR4-VAR3)*100,4)*VAR2;
莊家:=EMA(0.667*REF(散戶,1)+0.333*散戶,2)*VAR2;
DRAWTEXT(CROSS(散戶,莊家) AND 散戶<47,L-0.05,'←低吸'),COLORLIRED;
DRAWTEXT(CROSS(莊家,散戶) AND 散戶>60,H+0.05,’←高拋’),COLOR80FF00;
DRAWICON(CROSS(散戶,莊家) AND 散戶<47,L-0.05,1);
DRAWICON(CROSS(莊家,散戶) AND 散戶>60,H+0.05,2);
市場成本:DMA(AMOUNT/V/100,V/CAPITAL),NODRAW;
操盤成本:(MA(C,30)+MA(C,72))/2,COLORRED;
市盈率:DYNAINFO(39),COLORFF00FF,NODRAW;
TJ:=VOL>=REF(V,1)*1.91 AND C>REF(C,1)*1.01;
STICKLINE(TJ,OPEN,CLOSE,1.5,0),COLORFF00FF;
量＿價:=1;CTKG:=1;
W:=量＿價;
EPSL:=0.0001;
ZZ:=(C+H+L)/3;
TJA:=ZZ>=MAX(C,O) AND CTKG=1;{倒錘頭};
TJB:=ZZ<=MIN(C,O) AND CTKG=1;{正錘頭};
ZF:=IF(TJA,1,IF(TJB,-1,0));{正負數(shù)};
TJ0:=TJA OR TJB;
TJ1:=H=L AND C>REF(C,1);{一字漲停};
TJ2:=H=L AND C TJ3:=H=L AND C=REF(C,1);{連續(xù)一字漲、跌停};
量_價:=IF(W=1,VOL,AMOUNT),STICK,COLOREEFFEE;{平盤量,白色}
EE:=IF(TJ1,EPSL,IF(TJ2,-EPSL,0));
ZL:=2*(H-L)+ABS(C-O)+3*IF(TJ3,EPSL,ABS(EE));
JGL_DX:=(IF(TJ0,2/3*(2*C-H-L)+ZF*ABS(C-O),(C-O))+EE)/ZL;
差:=(JGL_DX*量_價)/20000,COLOR13AADD,NODRAW;
DX:=JGL_DX*100,NODRAW;
買:=量_價*(1+JGL_DX)/20000,COLOR1133AA,NODRAW;
賣:=量_價*(1-JGL_DX)/20000,COLORFFFF00,NODRAW;
量差:=買-賣,NODRAW,COLORYELLOW;
STICKLINE(量差<=0,CLOSE,OPEN,3,0),COLOR009900;
STICKLINE(量差<=0,CLOSE,OPEN,2.2,0),COLOR00BB00;
STICKLINE(量差<=0,CLOSE,OPEN,1.5,0),COLOR00DD00;
STICKLINE(量差<=0,CLOSE,OPEN,0.5,0),COLOR00FF00;
STICKLINE(量差>=0,CLOSE,OPEN,3,0),COLOR000099;
STICKLINE(量差>=0,CLOSE,OPEN,2.2,0),COLOR0000CC;
STICKLINE(量差>=0,CLOSE,OPEN,1.5,0),COLOR0000FF;
STICKLINE(量差>=0,CLOSE,OPEN,0.5,0),COLORCC66FF;
V2V:=V/REF(V,1)>=1.9 AND C>REF(C,1);
STICKLINE(V2V,OPEN,CLOSE,0.5,0),COLORYELLOW;
ZT:=C/REF(C,1)>1.097;
STICKLINE(ZT,OPEN,CLOSE,0.5,0),COLORYELLOW;
V3V:=V/REF(V,1)>=1.9 AND C STICKLINE(V3V,OPEN,CLOSE,0.5,0),COLORBLUE;
D:=MA(CLOSE,80)-MA(CLOSE,10)/3;
DRAWTEXT(IF(CLOSEMA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08
AND CLOSE STICKLINE(ISLASTBAR,HHV(C,5),HHV(C,5),218,1)COLORBLUE;
STICKLINE(ISLASTBAR,HHV(C,5)*0.95,HHV(C,5)*0.95,218,1)COLORRED;