相關標簽:

?

以持股線為依據，K線站上持股線根據當時股票的具體情況買進，K線向下破了持股線賣出。

?

原理解析：
輸出短期線:收盤價的6日指數移動平均 輸出持股線:收盤價的14日指數移動平均,線寬為2 輸出雙月線:收盤價的56日指數移動平均 輸出牛熊線:收盤價的166日指數移動平均 X1賦值:(收盤價+最低價+最高價)/3 BB13賦值:X1的13日指數移動平均-1日前的X1的13日指數移動平均的反正切*3.1416*10 EMA8賦值:收盤價的8日指數移動平均 當滿足條件BB13>1ANDEMA(X1,13)>1日前的X1的8日指數移動平均的10日過濾時,在EMA8位置書寫文字,畫黃色 輸出支撐:1日前的30日內收盤價的最低值的2日簡單移動平均 C1賦值:(收盤價+最低價+最高價)/3 C2賦值:C1的6日指數移動平均 C3賦值:C2的5日指數移動平均 C4賦值:C2上穿C3 當滿足條件C4時,在最低價/1.01位置書寫文字,畫紅色 X賦值:((收盤價的21日線性回歸斜率*20)+收盤價)的68日指數移動平均 Y賦值:收盤價的10日指數移動平均 LL賦值:2日前的收盤價 MM賦值:(((收盤價-LL)和0的較大值的6日[1日權重]移動平均 / (收盤價-LL)的絕對值的6日[1日權重]移動平均) * 100) DB賦值:如果((MM<1日前的MM)AND(MM>79)),返回MM,否則返回0 當滿足條件Y上穿X時,在(最低價*0.985)位置書寫文字,線寬為2,畫紅色 LC賦值:1日前的收盤價 RSI賦值:(((收盤價-LC)和0的較大值的3日[1日權重]移動平均 / (收盤價-LC)的絕對值的3日[1日權重]移動平均) * 100) 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為3.1,0不為0則畫空心柱.,畫紅色 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為1.7,0不為0則畫空心柱.,COLOR7040FF 當滿足條件收盤價>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,畫黃色 當滿足條件收盤價<=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為3.1,0不為0則畫空心柱.,COLORCC0000 當滿足條件收盤價<=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為1.7,0不為0則畫空心柱.,COLORFF4411 當滿足條件收盤價<=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為0.5,0不為0則畫空心柱.,COLORFFCC33 TIPTEXT(ISNULL(1日后的&收盤價),0,' www.kzuj.com.cn '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

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

源碼：

?

短期線:EMA(CLOSE,6);
持股線:EMA(CLOSE,14),LINETHICK2;
雙月線:EMA(CLOSE,56);
牛熊線:EMA(CLOSE,166);
X1:=(C+L+H)/3;
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),
EMA8,'∠35上升'),coloryellow;
支撐:MA(REF(LLV(C,30),1),2);
C1:=(CLOSE+LOW+HIGH)/3;
C2:=EMA(C1,6);
C3:=EMA(C2,5);
C4:=CROSS(C2,C3);
DRAWTEXT(C4,LOW/1.01,'買'),colorred;
X:=EMA(((SLOPE(CLOSE,21) * 20) + CLOSE),68);
Y:=EMA(CLOSE,10);
LL:=REF(CLOSE,2);
MM:=((SMA(MAX((CLOSE - LL),0),6,1) / SMA(ABS((CLOSE - LL)),6,1)) * 100);
DB:=IF(((MM < REF(MM,1)) AND (MM > 79)),MM,0);
DRAWTEXT(CROSS(Y,X),(LOW * 0.985),'▲加倉'),LINETHICK2,colorred;
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
STICKLINE(C>=O,C,O,3.1,0),colorred;
STICKLINE(C>=O,C,O,1.7,0),COLOR7040FF;
STICKLINE(C>=O,C,O,0.5,0),coloryellow;
STICKLINE(C<=O,C,O,3.1,0),COLORCC0000;
STICKLINE(C<=O,C,O,1.7,0),COLORFF4411;
STICKLINE(C<=O,C,O,0.5,0),COLORFFCC33;
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

?

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

?