相關標簽:

?

略戰大 主力趨勢雷達源碼

?

原理解析：
R0賦值:((如果ISNULL(ZDMR[-1]),返回0,否則返回ZDMR+如果ISNULL(BDMR[-1]),返回0,否則返回BDMR)-(如果ISNULL(ZDMC[-1]),返回0,否則返回ZDMC+如果ISNULL(BDMC[-1]),返回0,否則返回BDMC))/SHGZG*100 MA5賦值:R0的5日簡單移動平均 輸出超買:3.2,畫黃色 輸出超賣:0.5,畫黃色 HH賦值:1.75 FF賦值:10日內最低價的最低值 GG賦值:25日內最高價的最高值 CC賦值:(收盤價-FF)/(GG-FF)*4的4日指數移動平均 輸出布林極限:CC的3日指數移動平均 AA賦值:BB>=1日前的BB DD賦值:收盤價>收盤價的20日簡單移動平均AND 收盤價>收盤價的5日簡單移動平均 EE賦值:收盤價<收盤價的10日簡單移動平均AND 收盤價<收盤價的5日簡單移動平均 量賦值:成交量(手)>成交量(手)的5日簡單移動平均 當滿足條件BB>=1日前的BB時,在CC和1日前的CC位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,畫紅色 當滿足條件BB<1日前的BB時,在CC和1日前的CC位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,畫綠色 D=AA=1 AND 1日前的AA=0 AND (2日前的AA+3日前的AA=0) AND BB<0.5 S=AA=1 AND 1日前的AA=0 AND (2日前的AA+3日前的AA=0) AND DD=1 AND 1日前的DD=0 AND 量=1 DD賦值:BB>2 AND (AA=0 AND 1日前的AA=1) AND (2日前的AA+3日前的AA=2) TZ賦值:(AA=0 AND 1日前的AA=1) AND (2日前的AA+3日前的AA=2) AND MA5<0 AND EE=1 AND BB>1 當滿足條件D=1時,在BB位置書寫文字 當滿足條件S=1時,在BB位置書寫文字 當滿足條件DD=1時,在BB位置書寫文字 當滿足條件TZ=1時,在BB位置書寫文字 PARTLINE(BB,BB>=1日前的BB,畫紅色,BB<1日前的BB,畫綠色) TIPTEXT(ISNULL(1日后的&收盤價),0,' m.kzuj.com.cn '),畫紅色

?

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

源碼：

?

?

r0:=((IF(ISNULL(ZDMR[-1]),0,ZDMR)+IF(ISNULL(BDMR[-1]),0,BDMR))-(IF(ISNULL(ZDMC[-1]),0,ZDMC)+IF(ISNULL(BDMC[-1]),0,BDMC)))/SHGZG*100;
MA5:=MA(r0,5);
超買:3.2,coloryellow;
超賣:0.5,coloryellow;
HH:=1.75;
FF:=LLV(LOW,10);
GG:=HHV(HIGH,25);
CC:=EMA((CLOSE-FF)/(GG-FF)*4,4);
BB:EMA(CC,3);
aa:=BB>=REF(BB,1);
DD:=CLOSE>MA(CLOSE,20)AND CLOSE>MA(CLOSE,5);
EE:=CLOSE<MA(CLOSE,10)AND CLOSE<MA(CLOSE,5);
量:=VOL>MA(VOL,5);
STICKLINE(BB>=REF(BB,1),CC,REF(CC,1),5,0),colorred;
STICKLINE(BB<REF(BB,1),CC ,REF(CC,1),5,0),colorgreen;
d=aa=1 AND REF(aa,1)=0 AND (REF(aa,2)+REF(aa,3)=0) AND BB<0.5;
s=aa=1 AND REF(aa,1)=0 AND (REF(aa,2)+REF(aa,3)=0) AND DD=1 AND REF(DD,1)=0 AND 量=1;
dd:=BB>2 AND (aa=0 AND REF(aa,1)=1) AND (REF(aa,2)+REF(aa,3)=2);
tz:=(aa=0 AND REF(aa,1)=1) AND (REF(aa,2)+REF(aa,3)=2) AND MA5<0 AND EE=1 AND BB>1;
DRAWTEXT(d=1,BB,'底');
DRAWTEXT(s=1,BB,'升');
DRAWTEXT(dd=1,BB,'頂');
DRAWTEXT(tz=1,BB,'下');
PARTLINE(BB,BB>=REF(BB,1),colorred,BB<REF(BB,1),colorgreen);TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' m.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?