相關標簽:

?

面積背馳指標對于學習禪理的有一定的幫助大家試試如何

?

?

原理解析：
DIF賦值:收盤價的12日指數移動平均-收盤價的26日指數移動平均 DEA賦值:DIF的9日指數移動平均 MACD0賦值:(DIF-DEA)*2 MJ賦值:MACD0 S05賦值:MJ的歷史累和 QST賦值:上次MJ<0ANDREF(MJ,1)>0距今天數+1 QXT賦值:上次MJ>0ANDREF(MJ,1)<0距今天數+1 S5賦值:如果MJ>0,返回S05-上次MJ<0距今天數日前的S05,否則返回S05-上次MJ>0距今天數日前的S05/10 ST賦值:如果MJ>0,返回QXT日前的QST+QXT,否則返回QST日前的QXT+QST RS5賦值:ST日前的S5 輸出BC:如果MJ>0ANDS5<RS5,返回0,否則返回如果MJ<0ANDS5>RS5ANDDEA<0,返回1,否則返回0 TIPTEXT(ISNULL(1日后的&收盤價),0,' www.kzuj.com.cn '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

?來源:程序化99（ www.kzuj.com.cn ）

源碼：

?

?

DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD0:=(DIF-DEA)*2;
MJ:=MACD0;
S05:=SUM(MJ,0);
QST:=BARSLAST(MJ<0 AND REF(MJ,1)>0)+1;
QXT:=BARSLAST(MJ>0 AND REF(MJ,1)<0)+1;
S5:=IF(MJ>0,S05-REF(S05,BARSLAST(MJ<0)),S05-REF(S05,BARSLAST(MJ>0)))/10;
ST:=IF(MJ>0,REF(QST,QXT)+QXT,REF(QXT,QST)+QST);
RS5:=REF(S5,ST);
BC:IF(MJ>0 AND S5<RS5,0,IF(MJ<0 AND S5>RS5 AND DEA<0,1,0));TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?