A:=VOL*CLOSE;
B:=SUM(A,1)/SUM(VOL,1);
B1:=EMA(B,17);
主力:=(B-B1)*100/B,COLORYELLOW;
買:IF(主力>0 AND 0>=REF(主力,1),6,DRAWNULL),CROSSDOT,LINETHICK3,COLORRED;
買1:IF(REF(主力,1)<3 AND REF(主力,1)>0 AND (主力-REF(主力,1))>6,6,DRAWNULL),CROSSDOT,LINETHICK3,COLORRED;
買2:IF(REF(主力,1)<0 AND (主力-REF(主力,1))>6,6,DRAWNULL),CROSSDOT,LINETHICK3,COLORRED;
賣:IF(主力<0 AND 0<=REF(主力,1),6,DRAWNULL),CROSSDOT,LINETHICK3,COLORGREEN;
賣1:IF(REF(主力,1)>8 AND REF(主力,1)-主力>6,6,DRAWNULL),CROSSDOT,LINETHICK3,COLORGREEN;
{黃金中線作為中線指標}
JJ:=(CLOSE+HIGH+LOW)/3;
AA:=EMA(JJ,5);
BB:=REF(AA,1);
CC:IF(AA>BB,0,DRAWNULL),CIRCLEDOT,LINETHICK3,COLORRED;
DD:IF(AA<=BB,0,DRAWNULL),CIRCLEDOT,LINETHICK3,COLORGREEN;
{20日均線作為長線指標}
EE:=EMA(JJ,20);
持股:IF(EE>REF(EE,1),-3,DRAWNULL),CROSSDOT,LINETHICK3,COLORRED;
持幣:IF(EE<=REF(EE,1),-3,DRAWNULL),CROSSDOT,LINETHICK3,COLORGREEN;
{3日均線作為短線指標}
FF:IF(EMA(CLOSE,3)>REF(EMA(CLOSE,3),1),3,DRAWNULL),CIRCLEDOT,LINETHICK3,COLORRED;
GG:IF(EMA(CLOSE,3)<=REF(EMA(CLOSE,3),1),3,DRAWNULL),CIRCLEDOT,LINETHICK3,COLORGREEN;
{利多方舟}
VAR100:=(100 – ((90 * (HHV(HIGH,20) – CLOSE)) / (HHV(HIGH,20) – LLV(LOW,20))));
VAR200:=(100 – ((90 * (HHV(HIGH,20) – CLOSE)) / (HHV(HIGH,20) – LLV(LOW,20))));
VAR300:=(100 – MA(((100 * (HHV(HIGH,5) – CLOSE)) / (HHV(HIGH,5) – LLV(LOW,5))),34));
{綜合判斷}
HH:=IF(CLOSE>(HIGH+LOW)/2,1,0)+IF(CROSS(VAR200,MA(VAR300,5)),2,0)
+IF(FF=3,1,0)+IF(持股=-3,1,0)+IF(CC=0,1,0)+IF(買=6,2,0)
+IF(買1=6,2,0)+IF(買2=6,2,0);
II:=IF(CLOSE<=(HIGH+LOW)/2,-1,0)+IF(CROSS(MA(VAR300,5),VAR100),-2,0)+IF(DD=0,-1,0)
+IF(GG=3,-1,0)+IF(持幣=-3,-1,0)+IF(賣=6,-2,0)+IF(賣1=6,-2,0);
DRAWICON(HH>=5,-7,7);
DRAWICON(II<=-5,-7,8);
KK:15;
LL:-15;