相關標簽:

?

//DRAWGBK((CLOSE > 0),COLORRGB(0,0,0),COLORRGB(0,0,0),1);
DRAWGBK(CLOSE>0,COLORRGB(95,95,95),COLORRGB(0,0,0),1);
//DRAWGBK(CLOSE,COLORRGB(10,100,0),COLORRGB(25,15,0),1);
//DRAWGBK(CLOSE>0,COLORRGB(1,1841,3411),COLORRGB(1,1881,6532),3);
DIFF:EMA(CLOSE,12)-EMA(CLOSE,26),LINETHICK0,color99FF;
DEA:EMA(DIFF,9),LINETHICK0,colorFF9999;
MACD:2*(DIFF-DEA),LINETHICK0,colorCCCC;

趨勢:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),linethick3,color800080;
KX:=SYSPARAM(3)-SYSPARAM(2)+1;

QSH:=HHV(趨勢,KX);
QSL:=LLV(趨勢,KX);
HQMAX:=QSH[DATACOUNT];
LQMIN:=QSL[DATACOUNT];
QHLB:=(HQMAX+LQMIN)/2;
QHLC:=HQMAX-LQMIN;
MHF:=HHV(DIFF,KX);
MHD:=HHV(DEA,KX);
MHM:=HHV(MACD,KX);
MLF:=LLV(DIFF,KX);
MLD:=LLV(DEA,KX);
MLM:=LLV(MACD,KX);
HMAX:=MAX(MHF[DATACOUNT],MAX(MHD[DATACOUNT],MHM[DATACOUNT]));
LMIN:=MIN(MLF[DATACOUNT],MIN(MLD[DATACOUNT],MLM[DATACOUNT]));
FHLB:=(HMAX-LMIN)/100;
FHLC:=HMAX-LMIN;
SH:=(-FHLB)*QHLC/FHLC+QHLB;
DIFFA:(DIFF-FHLB)*QHLC/FHLC+QHLB;
DEAA:(DEA-FHLB)*QHLC/FHLC+QHLB;
fillrgn(DIFFA>DEAA ,DIFFA,DEAA ),Color32329B;
fillrgn(DIFFA<DEAA ,DIFFA,DEAA ),Color447B53;

MACDA:=(MACD-FHLB)*QHLC/FHLC+QHLB;
CDA:=MACD<REF(MACD,1) AND MACD>0;
CDB:=MACD>=REF(MACD,1) AND MACD>0;
CDC:=MACD>REF(MACD,1) AND MACD<0;
CDD:=MACD<=REF(MACD,1) AND MACD<0;
STICKLINE(CDA,SH,MACDA,4,0),color11CC;
STICKLINE(CDA,SH,MACDA,4.4,0),colorAACC;
STICKLINE(CDA,SH,MACDA,2.2,0),colorBBCC;
STICKLINE(CDA,SH,MACDA,1.1,0),colorCCCC;
STICKLINE(CDA,SH,MACDA,1,0),colorDDCC;
//STICKLINE(CDA,SH,MACDA,0.1,0),colorEECC;
STICKLINE(CDB,SH,MACDA,4,0),colorAA;
STICKLINE(CDB,SH,MACDA,4.4,0),color11BB;
STICKLINE(CDB,SH,MACDA,3.3,0),color22CC;
STICKLINE(CDB,SH,MACDA,2.2,0),color33DD;
STICKLINE(CDB,SH,MACDA,1.1,0),color44EE;
//STICKLINE(CDB,SH,MACDA,1.1,0),color55FF;
STICKLINE(CDC,SH,MACDA,4,0),colorAA00BB;
STICKLINE(CDC,SH,MACDA,4.4,0),colorBB11BB;
STICKLINE(CDC,SH,MACDA,3.3,0),colorCC22BB;
STICKLINE(CDC,SH,MACDA,2.2,0),colorDD33BB;
STICKLINE(CDC,SH,MACDA,1.1,0),colorEE44BB;
//STICKLINE(CDC,SH,MACDA,1.1,0),colorFF55BB;
STICKLINE(CDD,SH,MACDA,4,0),colorFF7700;
STICKLINE(CDD,SH,MACDA,4.4,0),colorFF8811;
STICKLINE(CDD,SH,MACDA,3.3,0),colorFFAA22;
STICKLINE(CDD,SH,MACDA,2.2,0),colorFFBB33;
STICKLINE(CDD,SH,MACDA,1.1,0),colorFFDD44;
//STICKLINE(CDD,SH,MACDA,1.1,0),colorFFDD55;


INPUT:N(9,2,90),M1(3,2,30),M2(3,2,30);
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,LINETHICK2;
K:SMA(RSV,M1,1),LINETHICK1;
D:SMA(K,M2,1),LINETHICK1;
J:3*K-2*D,COLORFF00FF,LINETHICK1;
PARTLINE(J<0,J),COLORGREEN,LINETHICK2;
PARTLINE(K>90,K),COLOR0000FF,LINETHICK2;
PARTLINE(D>85,D),COLORFFFF11,LINETHICK2;
DRAWICON(CROSS(J,1),J,4);
DRAWICON(K>80 AND D>80 AND CROSS(D,K),D,5),PXUP30;
選股:COUNT(J<0,8)>=3 AND CROSS(J,1) AND K>=REF(K,1),LINETHICK0;
DRAWICON(選股,MIN(MIN(K,D),J),14);

本文僅提供源碼，請參考輯錄像，自己編輯公式{程序化交易 www.weiqiv.net.cn }

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?