相關標簽:

?

?

原理解析：
LC賦值:1日前的收盤價 品種0賦值:收盤價-LC和0的較大值的N日[1日權重]移動平均/收盤價-LC的絕對值的N日[1日權重]移動平均*100 IC賦值:1日前的大盤的收盤價 指數0賦值:大盤的收盤價-IC和0的較大值的N日[1日權重]移動平均/大盤的收盤價-IC的絕對值的N日[1日權重]移動平均*100 FILLRGN(品種0>=指數0,指數0,品種0),畫紅色 FILLRGN(品種0<指數0,指數0,品種0),畫綠色 輸出品種強弱:品種0,畫綠色 輸出指數強弱:指數0,畫洋紅色 輸出強弱度:品種強弱-指數強弱,線寬為0 品種強弱的8日簡單移動平均 20,畫洋紅色 50,畫黃色,線寬為2 80,畫綠色 EXPLAIN(收盤價>0,'** 強弱研判 **'),畫黃色 EXPLAIN(強弱度>0,'該品種現階段強于指數'),畫紅色 EXPLAIN(強弱度=0,'該品種現階段與指數同步'),畫白色 EXPLAIN(強弱度<0,'該品種現階段弱于指數'),畫綠色 EXPLAIN(品種強弱>=50,'該品種現階段屬于強勢'),畫紅色 EXPLAIN(品種強弱<50,'該品種現階段屬于弱勢'),畫綠色 EXPLAIN(品種強弱>=品種強弱的8日簡單移動平均,'指標處于多頭趨勢'),畫紅色 EXPLAIN(品種強弱<品種強弱的8日簡單移動平均,'指標處于空頭趨勢\N股價可能進入調整'),畫綠色 EXPLAIN(收盤價>0,'** K線研判 **'),COLOR00FFFF EXPLAIN(收盤價>1日前的最高價 AND 品種強弱>=品種強弱的5日簡單移動平均,'多頭攻擊K線\N做多以當日最低價為止損位'),畫紅色 EXPLAIN(收盤價<1日前的最低價 AND 最高價<1日前的最高價 AND 品種強弱<品種強弱的8日簡單移動平均,'空頭攻擊K線\N多頭注意止損'),畫綠色 EXPLAIN(最高價>1日前的最高價 AND 最低價<1日前的最低價 AND 收陽線AND 品種強弱>=品種強弱的5日簡單移動平均,'變盤K線，\N多頭設置當日最低點為止損位。'),畫紅色 EXPLAIN(最高價>1日前的最高價 AND 最低價<1日前的最低價 AND 收盤價<=開盤價,'變盤K線，\N多頭小心,設置當日最低點為止損位。'),畫綠色

?

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

源碼：

?

?

?

{n 14 0 1000}
LC:=REF(CLOSE,1);
品種0:=SMA(MAX(CLOSE-LC,0),N,1)/SMA(ABS(CLOSE-LC),N,1)*100;
IC:=ref(indexc,1);
指數0:=SMA(MAX(indexc-IC,0),N,1)/SMA(ABS(indexc-IC),N,1)*100;
FILLRGN(品種0>=指數0,指數0,品種0),colorred;
FILLRGN(品種0<指數0,指數0,品種0),colorgreen;

品種強弱:品種0,colorgreen;指數強弱:指數0,colormagenta;
強弱度:品種強弱-指數強弱,linethick0;
MA(品種強弱,8);
20,colormagenta;50,coloryellow,linethick2;80,colorgreen;
EXPLAIN(C>0,'** 強弱研判 **'),ColorYELLOW;
EXPLAIN(強弱度>0,'該品種現階段強于指數'),ColorRED;
EXPLAIN(強弱度=0,'該品種現階段與指數同步'),ColorWHITE;
EXPLAIN(強弱度<0,'該品種現階段弱于指數'),colorgreen;
EXPLAIN(品種強弱>=50,'該品種現階段屬于強勢'),ColorRED;
EXPLAIN(品種強弱<50,'該品種現階段屬于弱勢'),colorgreen;
EXPLAIN(品種強弱>=MA(品種強弱,8),'指標處于多頭趨勢'),ColorRED;
EXPLAIN(品種強弱<MA(品種強弱,8),'指標處于空頭趨勢\n股價可能進入調整'),colorgreen;
EXPLAIN(C>0,'** K線研判 **'),Color00FFFF;
EXPLAIN(C>REF(H,1) AND 品種強弱>=MA(品種強弱,5),'多頭攻擊K線\n做多以當日最低價為止損位'),ColorRED;
EXPLAIN(C<REF(L,1) AND H<REF(H,1) AND 品種強弱<MA(品種強弱,8),'空頭攻擊K線\n多頭注意止損'),colorgreen;
EXPLAIN(H>REF(H,1) AND L<REF(L,1) AND C>O AND 品種強弱>=MA(品種強弱,5),'變盤K線，\n多頭設置當日最低點為止損位。'),ColorRED;
EXPLAIN(H>REF(H,1) AND L<REF(L,1) AND C<=O,'變盤K線，\n多頭小心,設置當日最低點為止損位。'),colorgreen;

?

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

?