同花順獲利盤附圖公式公式、代碼源碼

相關標簽:

?

?

?

原理解析：

R賦值:((收盤價 - 9日內最低價的最低值)/(9日內最高價的最高值 - 9日內最低價的最低值))*(100)

K賦值:R的3日指數移動平均

D賦值:K的3日指數移動平均

輸出一年12倍:20,畫紅色

陡峭度賦值:如果(收盤價的有效數據周期數>7),返回(100)*((收盤價的7日簡單移動平均)/(7日內收盤價的7日簡單移動平均的最低值)-1),否則返回1

N賦值:如果(陡峭度>0.35),返回6,否則返回65

VAR1賦值:((-((100)*(N日內最高價的最高值 - 收盤價))/(N日內最高價的最高值 - N日內最低價的最低值)))

VAR1A賦值:((-((100)*(N日內最高價的最高值 - 收盤價))/(N日內最高價的最高值 - N日內最低價的最低值)) + 100)

獲利盤賦值:(以收盤價計算的獲利盤比例)*(100)

獲利線賦值:獲利盤的7日線性回歸預測值

線賦值:(VAR1A的7日線性回歸預測值)

滿倉賦值:((線 > 1日前的線) AND (線 < 25) AND (統計5日中滿足(線>1日前的線)的天數 = 1) AND 如果(N=6),返回(獲利盤<60),否則返回(獲利盤<40) AND (統計20日中滿足(獲利線>20)的天數 > 0))*(40)

當滿足條件滿倉時,在0和40位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR008000

當滿足條件滿倉時,在45位置書寫文字,COLOR008000

輕倉賦值:如果(獲利盤>=60)AND(線>1日前的線)AND(1日前的線<20)AND(線<40)AND(統計5日中滿足(線>1日前的線)的天數=1)AND(1日前的N=6),返回1,否則返回0

當滿足條件輕倉時,在20和D位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,COLORFF00FF

當滿足條件輕倉時,在45位置書寫文字,COLORFF00FF

出擊賦值:線上穿20 AND 如果(統計3日中滿足K上穿D的天數=1)AND(D<40),返回1,否則返回(線>D)OR(K>D)AND(D<60) AND 如果(N=6),返回(獲利盤<70),否則返回(獲利盤<40) AND (統計20日中滿足(獲利線>20)的天數 > 0)

當滿足條件出擊時,在0和50位置之間畫柱狀線,寬度為3,1不為0則畫空心柱.,COLOR44BB00

當滿足條件出擊時,在55位置書寫文字,畫紅色

進1賦值:線上穿D AND (D > 30) AND (D > 1日前的D) AND (D < 80)

進2賦值:線上穿獲利線 AND (D > 30) AND (獲利線 > 25) AND (D > 1日前的D)

低進賦值:如果進1AND(D>獲利線),返回進2,否則返回進1

當滿足條件低進時,在30位置書寫文字,COLORFF0000

當滿足條件低進時,在20和30位置之間畫柱狀線,寬度為3,1不為0則畫空心柱.,COLOR000080

當滿足條件進2時,在50位置書寫文字,COLOR800080

當滿足條件進2時,在30和50位置之間畫柱狀線,寬度為3,1不為0則畫空心柱.,畫黃色

狂喜賦值:(30)*(VAR1上穿(-2))

當滿足條件狂喜時,在0和20位置之間畫柱狀線,寬度為3,1不為0則畫空心柱.,畫黃色

當滿足條件狂喜時,在(-5)位置書寫文字,畫黃色

狂喜過望賦值:(50)*((VAR1 = 0))

輸出恐慌:(-20)*((VAR1 < (-94))),COLORC1C1C1

當滿足條件恐慌時,在0和(-20)位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLORC1C1C1

當滿足條件恐慌時,在(-25)位置書寫文字,COLORC1C1C1

輸出極度恐慌:(-40)*((VAR1 = (-100))),COLOR800000

當滿足條件極度恐慌時,在0和(-40)位置之間畫柱狀線,寬度為7,1不為0則畫空心柱.,COLOR800000

當滿足條件極度恐慌時,在(-45)位置書寫文字,COLOR800000

半倉賦值:(30)*(VAR1上穿(-94) AND (統計5日中滿足恐慌的天數 > 0) AND (N = 1日前的N) AND 如果(N=6),返回(獲利盤<60),否則返回(獲利盤<40) AND (統計20日中滿足(獲利線>20)的天數 > 0))

當滿足條件半倉時,在0和30位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,COLORFFFF00

當滿足條件半倉時,在35位置書寫文字,COLORFFFF00

加倉賦值:(30)*(K上穿20 AND (統計5日中滿足半倉的天數 > 0))

當滿足條件加倉時,在0和20位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,COLOR808080

當滿足條件加倉時,在25位置書寫文字,COLOR808080

背離賦值:(統計2日中滿足恐慌的天數 > 0) AND (收盤價 < 1日前的收盤價) AND (VAR1 > 1日前的VAR1)

當滿足條件背離時,在0位置畫1號圖標,COLORFFFFFF

(-55),畫紅色

源碼：

?

R:=((CLOSE - LLV(LOW,9))/(HHV(HIGH,9) - LLV(LOW,9)))*(100);
K:=EMA(R,3);
D:=EMA(K,3);
一年12倍:20,colorred;
陡峭度:=IF((BARSCOUNT(CLOSE) > 7),(100)*((MA(CLOSE,7))/(LLV(MA(CLOSE,7),7)) - 1),1);
N:=IF((陡峭度 > 0.35),6,65);
VAR1:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))));
VAR1A:=((-((100)*(HHV(HIGH,N) - CLOSE))/(HHV(HIGH,N) - LLV(LOW,N))) + 100);
獲利盤:=(WINNER(CLOSE))*(100);
獲利線:=FORCAST(獲利盤,7);
線:=(FORCAST(VAR1A,7));
滿倉:=((線 > REF(線,1)) AND (線 < 25) AND (COUNT((線 > REF(線,1)),5) = 1) AND IF((N = 6),(獲利盤 < 60),(獲利盤 < 40)) AND (COUNT((獲利線 > 20),20) > 0))*(40);
STICKLINE(滿倉,0,40,5,0),Color008000;
DRAWTEXT(滿倉,45,'滿倉'),Color008000;
輕倉:=IF((獲利盤 >= 60) AND (線 > REF(線,1)) AND (REF(線,1) < 20) AND (線 < 40) AND (COUNT((線 > REF(線,1)),5) = 1) AND (REF(N,1) = 6),1,0);
STICKLINE(輕倉,20,D,4,1),ColorFF00FF;
DRAWTEXT(輕倉,45,'輕倉'),ColorFF00FF;
出擊:=CROSS(線,20) AND IF((COUNT(CROSS(K,D),3) = 1) AND (D < 40),1,(線 > D) OR (K > D) AND (D < 60)) AND IF((N = 6),(獲利盤 < 70),(獲利盤 < 40)) AND (COUNT((獲利線 > 20),20) > 0);
STICKLINE(出擊,0,50,3,1),Color44BB00;
DRAWTEXT(出擊,55,'出擊'),colorred;
進1:=CROSS(線,D) AND (D > 30) AND (D > REF(D,1)) AND (D < 80);
進2:=CROSS(線,獲利線) AND (D > 30) AND (獲利線 > 25) AND (D > REF(D,1));
低進:=IF(進1 AND (D > 獲利線),進2,進1);
DRAWTEXT(低進,30,'低進'),ColorFF0000;
STICKLINE(低進,20,30,3,1),Color000080;
DRAWTEXT(進2,50,'高進'),Color800080;
STICKLINE(進2,30,50,3,1),coloryellow;
狂喜:=(30)*(CROSS(VAR1,(-2)));
STICKLINE(狂喜,0,20,3,1),coloryellow;
DRAWTEXT(狂喜,(-5),'要漲停'),coloryellow;
狂喜過望:=(50)*((VAR1 = 0));
恐慌:(-20)*((VAR1 < (-94))),ColorC1C1C1;
STICKLINE(恐慌,0,(-20),5,0),ColorC1C1C1;
DRAWTEXT(恐慌,(-25),'恐慌'),ColorC1C1C1;
極度恐慌:(-40)*((VAR1 = (-100))),Color800000;
STICKLINE(極度恐慌,0,(-40),7,1),Color800000;
DRAWTEXT(極度恐慌,(-45),'極度恐慌'),Color800000;
半倉:=(30)*(CROSS(VAR1,(-94)) AND (COUNT(恐慌,5) > 0) AND (N = REF(N,1)) AND IF((N = 6),(獲利盤 < 60),(獲利盤 < 40)) AND (COUNT((獲利線 > 20),20) > 0));
STICKLINE(半倉,0,30,4,1),ColorFFFF00;
DRAWTEXT(半倉,35,'半倉'),ColorFFFF00;
加倉:=(30)*(CROSS(K,20) AND (COUNT(半倉,5) > 0));
STICKLINE(加倉,0,20,6,1),Color808080;
DRAWTEXT(加倉,25,'加倉'),Color808080;
背離:=(COUNT(恐慌,2) > 0) AND (CLOSE < REF(CLOSE,1)) AND (VAR1 > REF(VAR1,1));
DRAWICON(背離,0,1),ColorFFFFFF;(-55),colorred;{來源:www.tumamayizhan.com　程序化交易}

?

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

?

原理解析：

?

源碼：

?