{【精靈樂】}

DRAWGBK(O>C,RGB(158,41,124),RGB(0,0,0),0,'1',0);
VAR3AA:=IF((CLOSE>REF(CLOSE,1)),88,0);
VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR3AA>0),91,0);
XG:=(FILTER((VAR4AA>90),45)),COLORYELLOW;
STICKLINE(XG,180,0,4.8,0),COLOR0000FF;
STICKLINE(XG,180,0,4,0),COLOR000099;
STICKLINE(XG,160,0,2,0),COLOR0000BB;
STICKLINE(XG,140,0,1,0),COLOR0000DD;
STICKLINE(XG,120,0,0.9,0),COLOR0000FF;

VP:=IF(CAPITAL=0,AMOUNT/100000000,VOL);
VA:=IF(CLOSE>REF(CLOSE,1),VP,-VP);
A1:=REF(OBV,5)=HHV(OBV,2*5+1);
B1P:=FILTER(A1,5);
C1:=BACKSET(B1P,5+1);
D1:=FILTER(C1,5);{高點}
A2:=REF(OBV,5)=LLV(OBV,2*5+1);
B2:=FILTER(A2,5);
C2:=BACKSET(B2,5+1);
D2:=FILTER(C2,5);{低點}
上:=REF(OBV,BARSLAST(D1)),COLORFF00FF{,NODRAW};
下:=REF(OBV,BARSLAST(D2)),COLOR00FF00{,NODRAW};
向上:(CROSS(OBV,上*1.001))*60{,NODRAW};
相對能量:MA((OBV-下)/(上-下),2)*30,COLORYELLOW{,NODRAW};
相對能量1:MA((OBV-下)/(上-下),1)*30,COLORYELLOW{,NODRAW};
B1:IF(CROSS(相對能量1,36),相對能量1,DRAWNULL),CROSSDOT,LINETHICK5,COLOR0000FF;
B1X:IF((相對能量1>=36),相對能量,DRAWNULL){,CROSSDOT},LINETHICK3,COLOR0000FF;
牛市:DRAWTEXT(B1 AND H/C<1.021 ,33*1.00,'個股牛市 '),COLOR00FFFF;

精靈樂1:DRAWTEXT(CROSS(相對能量,12) AND H/C<1.021 ,16*1.00,' ==上升== '),COLORFFFF00;
牛:DRAWICON(CROSS(相對能量,12),16*0.97,23);

{----------------------------}

{【精靈選股】}

VAR3AA:=IF((CLOSE>REF(CLOSE,1)),88,0);
VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR3AA>0),91,0);
XG:(FILTER((VAR4AA>90),45)),COLORYELLOW;