同花順收費軟件中的智能追漲公式代碼源碼

作者：同花順來源：cxh99.com 發布時間：2021年11月22日

相關標簽:

智能追漲公式是從一個收費軟件中導出，加密不限時，我用起來效果很好

原理解析：

輸出MA5:收盤價的M1日簡單移動平均,線寬為2

輸出MA10:收盤價的M2日簡單移動平均,線寬為2

輸出MA20:收盤價的M3日簡單移動平均,線寬為2,COLOR00FF00

ZDF賦值:(收盤價-1日前的收盤價)/1日前的收盤價*100

當滿足條件ZDF>9.8時,在開盤價和收盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,畫紅色

當滿足條件ZDF<-9.8時,在開盤價和收盤價位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,畫藍色

VAR1賦值:收盤價>1日前的收盤價 AND 收盤價>2日前的收盤價

VAR2賦值:1日前的VAR1 AND 收盤價<=1日前的收盤價 AND 收盤價>=2日前的收盤價

VAR3賦值:1日前的VAR2 AND 收盤價>=1日前的收盤價 AND 收盤價<=2日前的收盤價

VAR4賦值:1日前的VAR3 AND 收盤價<=1日前的收盤價 AND 收盤價>=2日前的收盤價

VAR5賦值:1日前的VAR4 AND 收盤價>=1日前的收盤價 AND 收盤價<=2日前的收盤價

VAR6賦值:1日前的VAR5 AND 收盤價<=1日前的收盤價 AND 收盤價>=2日前的收盤價

VAR7賦值:1日前的VAR6 AND 收盤價>=1日前的收盤價 AND 收盤價<=2日前的收盤價

VAR8賦值:1日前的VAR7 AND 收盤價<=1日前的收盤價 AND 收盤價>=2日前的收盤價

VAR9賦值:1日前的VAR8 AND 收盤價>=1日前的收盤價 AND 收盤價<=2日前的收盤價

VARA賦值:1日前的VAR9 AND 收盤價<=1日前的收盤價 AND 收盤價>=2日前的收盤價

VARB賦值:1日前的VARA AND 收盤價>=1日前的收盤價 AND 收盤價<=2日前的收盤價

VARC賦值:1日前的VARB AND 收盤價<=1日前的收盤價 AND 收盤價>=2日前的收盤價

當滿足條件VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC時,在收盤價和1日前的收盤價位置之間畫柱狀線,寬度為3,1不為0則畫空心柱.,畫紅色

VARD賦值:收盤價<1日前的收盤價 AND 收盤價<2日前的收盤價

VARE賦值:1日前的VARD AND 收盤價>=1日前的收盤價 AND 收盤價<=2日前的收盤價

VARF賦值:1日前的VARE AND 收盤價<=1日前的收盤價 AND 收盤價>=2日前的收盤價

VAR10賦值:1日前的VARF AND 收盤價>=1日前的收盤價 AND 收盤價<=2日前的收盤價

VAR11賦值:1日前的VAR10 AND 收盤價<=1日前的收盤價 AND 收盤價>=2日前的收盤價

VAR12賦值:1日前的VAR11 AND 收盤價>=1日前的收盤價 AND 收盤價<=2日前的收盤價

VAR13賦值:1日前的VAR12 AND 收盤價<=1日前的收盤價 AND 收盤價>=2日前的收盤價

VAR14賦值:1日前的VAR13 AND 收盤價>=1日前的收盤價 AND 收盤價<=2日前的收盤價

VAR15賦值:1日前的VAR14 AND 收盤價<=1日前的收盤價 AND 收盤價>=2日前的收盤價

VAR16賦值:1日前的VAR15 AND 收盤價>=1日前的收盤價 AND 收盤價<=2日前的收盤價

VAR17賦值:1日前的VAR16 AND 收盤價<=1日前的收盤價 AND 收盤價>=2日前的收盤價

VAR18賦值:1日前的VAR17 AND 收盤價>=1日前的收盤價 AND 收盤價<=2日前的收盤價

當滿足條件VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18時,在收盤價和1日前的收盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFFCC66

VAR19賦值:1日前的VARDORVAREORVARFORVAR10ORVAR11ORVAR12ORVAR13ORVAR14ORVAR15ORVAR16ORVAR17ORVAR18 AND VAR1

當滿足條件VAR19時,在1日前的收盤價和2日前的收盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,畫黃色

VAR1A賦值:1日前的VAR1ORVAR2ORVAR3ORVAR4ORVAR5ORVAR6ORVAR7ORVAR8ORVAR9ORVARAORVARBORVARC AND VARD

當滿足條件VAR1A時,在1日前的收盤價和2日前的收盤價位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,COLOR00FF00

當滿足條件VAR19時,在1日前的收盤價和2日前的收盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫紅色

當滿足條件VAR1A時,在1日前的收盤價和2日前的收盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,畫藍色

如果MA5>=1日前的MA5ANDMA5>=MA10,返回MA5,否則返回無效數,畫紅色,線寬為3

SS賦值:(最低價+最高價+收盤價)/3的5日簡單移動平均>1日前的(最低價+最高價+收盤價)/3的5日簡單移動平均 ANDREF((最低價+最高價+收盤價)/3的5日簡單移動平均,1)<2日前的(最低價+最高價+收盤價)/3的5日簡單移動平均

SC賦值:最低價<13日內(最低價+最高價+收盤價)/3的5日簡單移動平均的最高值 ANDH>13日內(最低價+最高價+收盤價)/3的5日簡單移動平均的最高值 AND 收盤價>1日前的收盤價 AND 收陽線

MR賦值:SC AND 統計2日中滿足SS的天數

買賦值:MR AND 取反,畫黃色

當滿足條件買時,在最低價和最低價*0.95位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,畫紅色

當滿足條件買時,在最低價*0.95位置書寫文字,畫紅色

VAR3P賦值:如果收盤價/1日前的收盤價>1.050ANDHIGH/收盤價<1.010ANDIF(收盤價>1日前的收盤價,88,0)>0,返回91,否則返回0

當滿足條件VAR3P>90時,在最低價和最低價*0.92位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFF00FF

當滿足條件VAR3P>90時,在最低價*0.92位置書寫文字,COLORFF00FF

源碼：

MA5:MA(CLOSE,M1),LINETHICK2;
MA10:MA(CLOSE,M2),LINETHICK2;
MA20:MA(CLOSE,M3),LINETHICK2,COLOR00FF00;
ZDF:=(C-REF(C,1))/REF(C,1)*100;
STICKLINE(ZDF>9.8,O,C,6,0),COLORRED;
STICKLINE(ZDF<-9.8,O,C,6,0),COLORBLUE;
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,CLOSE,REF(CLOSE,1),3,1),COLORRED;{紅1}
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR
VAR18,CLOSE,REF(CLOSE,1),3,0),COLORFFCC66;
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),4,0),COLORYELLOW;
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR
VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),4,1),COLOR00FF00{98FD};
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0),COLORRED;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),COLORBLUE;
IF(MA5>=REF(MA5,1) AND MA5>=MA10,MA5,DRAWNULL),COLORRED,LINETHICK3;
SS:=MA((LOW+HIGH+CLOSE)/3,5)>REF(MA((LOW+HIGH+CLOSE)/3,5),1) AND
REF(MA((LOW+HIGH+CLOSE)/3,5),1)<REF(MA((LOW+HIGH+CLOSE)/3,5),2);
SC:=L<HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND
H>HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND C>REF(C,1) AND C>O;
MR:=SC AND COUNT(SS,2);
買:=MR AND NOT(REF(MR,1)),COLORYELLOW;
STICKLINE(買,L,L*0.95,1,0),COLORRED;
DRAWTEXT(買,L*0.95, '必漲'),COLORRED;
VAR3P:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND
IF(CLOSE>REF(CLOSE,1),88,0)>0, 91, 0);
STICKLINE(VAR3P>90,L,L*0.92,1,0),COLORFF00FF;
DRAWTEXT(VAR3P>90,LOW*0.92,'追漲'),COLORFF00FF;

{來源:www.tumamayizhan.com　程序化交易}

{來源:www.tumamayizhan.com　程序化交易}

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