|
DIFF:=EMA(CLOSE,8)-EMA(CLOSE,13);
DEA:=EMA(DIFF,5);
DRAWICON(DIFF>DEA,1,1);
DRAWICON(DIFF<DEA,1,2);
DRAWTEXT(ISLASTBAR=1,1,'.macd'),COLORWHITE;
B1:=DIFF>DEA;
MacD金叉:=IF(B1,1,0),COLORWHITE;
RSV1:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
K:=SMA(RSV1,3,1);
D:=SMA(K,3,1);
DRAWICON(K>D,2,1);
DRAWICON(K<D,2,2);
DRAWTEXT(ISLASTBAR=1,2,'.kdj'),COLORFFFFFF;
B2:=K>D;
kdJ金叉:=IF(B2,2,0),COLORWHITE;
LC:=REF(CLOSE,1);
rsi1:=(SMA(MAX(CLOSE-LC,0),5,1))/(SMA(Abs(CLOSE-LC),5,1))*100;
RSI2:=(SMA(MAX(CLOSE-LC,0),13,1))/(SMA(ABS(CLOSE-LC),13,1))*100;
DRAWICON(RSI1>RSI2,3,1);
DRAWICON(RSI1<RSI2,3,2);
DRAWTEXT(ISLASTBAR=1,3,'.RSI'),COLORFFFFFF;
B3:=RSI1>RSI2;
RSI金叉:=IF(B3,3,0),COLORWHITE;
RSV:=-(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*100;
Lwr1:=SMA(RSV,3,1);
LWR2:=SMA(LWR1,3,1);
DRAWICON(LWR1>LWR2,4,1);
DRAWICON(LWR1<LWR2,4,2);
DRAWTEXT(ISLASTBAR=1,4,'.LWR'),COLORFFFFFF;
B4:=LWR1>LWR2;
LWR金叉:=IF(B4,4,0),COLORWHITE;
bbi:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
DRAWICON(CLOSE>BBI,5,1);
DRAWICON(CLOSE<BBI,5,2);
DRAWTEXT(ISLASTBAR=1,5,'.BBI'),COLORFFFFFF;
B5:=CLOSE>BBI;
BBI金叉:=IF(B5,5,0),COLORWHITE;
mtm:=CLOSE-REF(CLOSE,1);
mms:=100*EMA(EMA(MTM,5),3)/EMA(EMA(ABS(MTM),5),3);
MMM:=100*EMA(EMA(MTM,13),8)/EMA(EMA(ABS(MTM),13),8);
DRAWICON(MMS>MMM,6,1);
DRAWICON(MMS<MMM,6,2);
DRAWTEXT(ISLASTBAR=1,6,'.MTM'),COLORFFFFFF;
B6:=MMS>MMM;
MTM金叉:=IF(B6,6,0),COLORWHITE;
DRAWICON(MA(V,5)>MA(V,10),7,1);
DRAWICON(MA(V,5)<MA(V,10),7,2);
DRAWTEXT(ISLASTBAR=1,7,'.籌碼'),COLORFFFFFF;
B7:=MA(V,5)>MA(V,10);
籌碼金叉:=IF(B7,7,0),COLORWHITE;
TYP:=(HIGH+LOW+CLOSE)/3;
cci:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
DRAWICON(CCI>0,8,1);
DRAWICON(CCI<0,8,2);
DRAWTEXT(ISLASTBAR=1,8,'.CCI'),COLORFFFFFF;
B8:=CCI>0;
CCI金叉:=IF(B8,8,0),COLORWHITE;
CC:=(C+O+H+L)/4;
DRAWICON(CC>SAR(4,2,20),9,1);
DRAWICON(CC<sar(4,2,20),9,2);
DRAWTEXT(ISLASTBAR=1,9,'.SAR'),COLORFFFFFF;
B9:=CC>SAR(4,2,20);
SAR金叉:=IF(B9,9,0),COLORWHITE;
紅:B1+B2+B3+B4+B5+B6+B7+B8+B9,NODRAW;
綠:9-紅,NODRAW;
買:IF((B1 AND B2 AND B3 AND B4 AND B5 AND B6 AND B7 AND B8 AND B9)
AND REF(B1 AND B2 AND B3 AND B4 AND B5 AND B6 AND B7 AND B8 AND B9,1)=0,10,0),COLORYELLOW,LINETHICK2;
天數:BArslASTCOUNT(B1 AND B2 AND B3 AND B4 AND B5 AND B6 AND B7 AND B8 AND B9),NODRAW;
九:=B1 AND B2 AND B3 AND B4 AND B5 AND B6 AND B7 AND B8 AND B9;
九九歸一:IF(九 AND REF(九,1)=0,9,DRAWNULL)STICK,COLORRED,LINETHICK6;
|
