六指共振指标源码
{六指共振}
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
STICKLINE(DIFF>DEA,-1,-2,3,0),COLORRED;
STICKLINE(DIFF<DEA,-1,-2,3,0),COLORGREEN;
MCDA金叉:DIFF>DEA,NODRAW;
RSV:=(CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
STICKLINE(K>D,-3,-4,3,0),COLORRED;
STICKLINE(K<D,-3,-4,3,0),COLORGREEN;
KDJ金叉:K>D,NODRAW;
LC:=REF(CLOSE,1);
RSI1:=(SMA(MAX(CLOSE-LC,0),9,1))/(SMA(ABS(CLOSE-LC),9,1))*100;
RSI2:=(SMA(MAX(CLOSE-LC,0),26,1))/(SMA(ABS(CLOSE-LC),26,1))*100;
STICKLINE(RSI1>RSI2,-5,-6,3,0),COLORRED;
STICKLINE(RSI1<RSI2,-5,-6,3,0),COLORGREEN;
RSI金叉:RSI1>RSI2,NODRAW;
LWR1:=SMA(RSV,3,1);
LWR2:=SMA(LWR1,3,1);
STICKLINE(LWR1>LWR2,-7,-8,3,0),COLORRED;
STICKLINE(LWR1<LWR2,-7,-8,3,0),COLORGREEN;
LWR金叉:LWR1>LWR2,NODRAW;
BBI:=(MA(CLOSE,3)+MA(CLOSE,9)+MA(CLOSE,12)+MA(CLOSE,26))/4;
STICKLINE(CLOSE>BBI,-9,-10,3,0),COLORRED;
STICKLINE(CLOSE<BBI,-9,-10,3,0),COLORGREEN;
BBI金叉:CLOSE>BBI,NODRAW;
MTM:=CLOSE-REF(CLOSE,1);
MMS:=100*EMA(EMA(MTM,9),9)/EMA(EMA(ABS(MTM),9),3);
MMM:=100*EMA(EMA(MTM,26),12)/EMA(EMA(ABS(MTM),26),12);
STICKLINE(MMS>MMM,-11,-12,3,0),COLORRED;
STICKLINE(MMS<MMM,-11,-12,3,0),COLORGREEN;
MMS金叉:MMS>MMM,NODRAW;
STICKLINE(MCDA金叉 AND KDJ金叉 AND RSI金叉 AND LWR金叉 AND BBI金叉 AND MMS金叉,-13,-14,3,0),COLORMAGENTA;
{量化模型}
短期1:EMA(C,10),COLORMAGENTA;
IF(短期1>CLOSE,短期1,DRAWNULL),COLORGREEN,LINETHICK1;
IF(短期1<CLOSE,短期1,DRAWNULL),COLORMAGENTA,LINETHICK1;
短期2:EMA(短期1,3),COLORMAGENTA;
IF(短期2>CLOSE,短期2,DRAWNULL),COLORGREEN,LINETHICK1;
IF(短期2<CLOSE,短期2,DRAWNULL),COLORMAGENTA,LINETHICK1;
短期3:EMA(短期2,3),COLORMAGENTA;
IF(短期3>CLOSE,短期3,DRAWNULL),COLORGREEN,LINETHICK1;
IF(短期3<CLOSE,短期3,DRAWNULL),COLORMAGENTA,LINETHICK1;
短期4:EMA(短期3,3),COLORMAGENTA;
IF(短期4>CLOSE,短期4,DRAWNULL),COLORGREEN,LINETHICK1;
IF(短期4<CLOSE,短期4,DRAWNULL),COLORMAGENTA,LINETHICK1;
短期5:EMA(短期4,3),COLORMAGENTA;
IF(短期5>CLOSE,短期5,DRAWNULL),COLORGREEN,LINETHICK1;
IF(短期5<CLOSE,短期5,DRAWNULL),COLORMAGENTA,LINETHICK1;
长期1:EMA(C,45),COLORRED;
IF(长期1>CLOSE,长期1,DRAWNULL),COLORCYAN,LINETHICK1;
IF(长期1<CLOSE,长期1,DRAWNULL),COLORRED,LINETHICK2;
长期2:EMA(长期1,3),COLORRED;
IF(长期2>CLOSE,长期2,DRAWNULL),COLORCYAN,LINETHICK1;
IF(长期2<CLOSE,长期2,DRAWNULL),COLORRED,LINETHICK1;
长期3:EMA(长期2,3),COLORRED ;
IF(长期3>CLOSE,长期3,DRAWNULL),COLORCYAN,LINETHICK1;
IF(长期3<CLOSE,长期3,DRAWNULL),COLORRED,LINETHICK1;
长期4:EMA(长期3,3),COLORRED ;
IF(长期4>CLOSE,长期4,DRAWNULL),COLORCYAN,LINETHICK1;
IF(长期4<CLOSE,长期4,DRAWNULL),COLORRED,LINETHICK1;
长期5:EMA(长期4,3),COLORRED ;
IF(长期5>CLOSE,长期5,DRAWNULL),COLORCYAN,LINETHICK1;
IF(长期5<CLOSE,长期5,DRAWNULL),COLORRED,LINETHICK1;
{涨停变色}
STICKLINE(C>O,C,O,1.7,0) ,COLOR0000E5;
STICKLINE(C=O OR (C+0.005-REF(C,1))/REF(C,1)*100>=10,C,O,2.9,0),COLORMAGENTA;
{神秘资金}
DRAWBAND((SMA(MAX(CLOSE-REF(CLOSE,1),0)*4,12,1)-SMA(ABS(CLOSE-REF(CLOSE,1)),12,1))*50+50,
RGB(255,0,0),(SMA(ABS(CLOSE-REF(CLOSE,1)),12,1)-SMA(MAX(CLOSE-REF(CLOSE,1),0),12,1)*4)*50+50,RGB(0,255,0));
神秘资金:IF(SMA(MAX(CLOSE-REF(CLOSE,1),0),12,1)*4-SMA(ABS(CLOSE-REF(CLOSE,1)),12,1)+50<50 AND
SMA(ABS(CLOSE-REF(CLOSE,1)),12,1)-SMA(MAX(CLOSE-REF(CLOSE,1),0),12,1)*4+50>50,60,50);
{红买绿卖}
X_1:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*20;
X_2:=(CLOSE-MA(CLOSE,4))/MA(CLOSE,4)*20;
红柱:SMA(X_1,3,1),COLORRED,LINETHICK0;
蓝柱:SMA(X_2,3,1),COLORSTICK,COLORCYAN;
STICKLINE(红柱<REF(红柱,0.5)AND红柱>0,0,红柱,4,0),COLORRED;
STICKLINE(红柱<REF(红柱,1)AND红柱>0,0,红柱,2,0),COLORGREEN;
STICKLINE(红柱>REF(红柱,1)AND红柱>0,0,红柱,3,0),COLORRED;
STICKLINE(蓝柱<REF(蓝柱,1)AND蓝柱>0,0,蓝柱,2,0),COLORWHITE;
STICKLINE(红柱>REF(红柱,1)AND红柱<0,0,红柱,2,0),COLORFFDD00;
STICKLINE(红柱<REF(红柱,1)AND红柱<0,0,红柱,3,0),COLORFFCC00;
STICKLINE(蓝柱>REF(蓝柱,1)AND蓝柱<0,0,蓝柱,2,0),COLORMAGENTA;