公式位置:主圖
公式代碼:
N:=72; M:=1357; P1:=151; P2:=14; P3:=318; P4:=453; P5:=99; P6:=48; 高:=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;
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,5),COLORYELLOW; 月線:MA(CLOSE,24),COLORWHITE; 半年線:MA(CLOSE,120),COLORBLUE; 年線:MA(CLOSE,250),COLORRED; 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; DRAWICON(CROSS(散戶,莊家) AND 散戶<47,L-0.05,1); DRAWICON(CROSS(莊家,散戶) AND 散戶>60,H+0.05,2); 市場(chǎng)成本: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; 量_價(jià):=1;CTKG:=1; W:=量_價(jià); 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)); TJ0:=TJA OR TJB; TJ1:=H=L AND C>REF(C,1); TJ2:=H=L AND C<REF(C,1);
TJ3:=H=L AND C=REF(C,1); 量_價(jià):=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*量_價(jià))/20000,COLOR13AADD,NODRAW; DX:=JGL_DX*100,NODRAW; 買:=量_價(jià)*(1+JGL_DX)/20000,COLOR1133AA,NODRAW; 賣:=量_價(jià)*(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<REF(C,1); STICKLINE(V3V,OPEN,CLOSE,0.5,0),COLORBLUE; D:=MA(CLOSE,80)-MA(CLOSE,10)/3; DRAWTEXT(IF(CLOSE<D AND VOL/240>MA(VOL,5)/240 AND CLOSE>REF(CLOSE,1)*1.08 AND CLOSE<MA(CLOSE,13)*1.3,1,0),LOW,'↖抄底'),COLORRED; 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;
(備注,這是一個(gè)均線和黃金分割相結(jié)合的指標(biāo)公式)
|