相關標簽:

?

?

原理解析：
VARTIME賦值:如果年份>=2050ANDMONTH>=11ANDDAY>=07,返回0,否則返回1 VARDTIME賦值:如果年份=2050ANDMONTH=11ANDDAY=06,返回1,否則返回0 RSV賦值:(收盤價*最高價)/(收盤價*最低價) RV賦值:(收盤價*最低價)/(收盤價*最高價) RS賦值:(收盤價*開盤價) DI賦值:(RV的2日指數移動平均 - RSV的10日指數移動平均)*100/RS DE賦值:RS的10日指數移動平均 MAC賦值:2*(DI+DE)/2 輸出RK7:MAC的1日指數移動平均,COLOR0000FF,線寬為1 輸出生命線:RK7的5日指數移動平均, 畫黃色 輸出生命線1:RK7的10日指數移動平均,畫深灰色,線寬為1 輸出生命線2:RK7的20日指數移動平均,畫藍色,線寬為1 當滿足條件RK7<1日前的RK7*VARTIME時,在RK7和RK7的3日簡單移動平均位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLOR007700 當滿足條件RK7<1日前的RK7*VARTIME時,在RK7和RK7的3日簡單移動平均位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR008800 當滿足條件RK7<1日前的RK7*VARTIME時,在RK7和RK7的3日簡單移動平均位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR009900 當滿足條件RK7<1日前的RK7*VARTIME時,在RK7和RK7的3日簡單移動平均位置之間畫柱狀線,寬度為6,0不為0則畫空心柱.,COLOR00AA00 當滿足條件RK7<1日前的RK7*VARTIME時,在RK7和RK7的3日簡單移動平均位置之間畫柱狀線,寬度為5,0不為0則畫空心柱.,COLOR00BB00 當滿足條件RK7<1日前的RK7*VARTIME時,在RK7和RK7的3日簡單移動平均位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR00CC00 當滿足條件RK7<1日前的RK7*VARTIME時,在RK7和RK7的3日簡單移動平均位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR00DD00 當滿足條件RK7<1日前的RK7*VARTIME時,在RK7和RK7的3日簡單移動平均位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR00EE00 當滿足條件RK7<1日前的RK7*VARTIME時,在RK7和RK7的3日簡單移動平均位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00FF00 當滿足條件RK7>1日前的RK7時,在RK7和RK7的3日指數移動平均位置之間畫柱狀線,寬度為0,0不為0則畫空心柱. ,COLOR00BBFF 當滿足條件RK7>1日前的RK7時,在RK7和RK7的3日指數移動平均位置之間畫柱狀線,寬度為8,0不為0則畫空心柱. ,COLOR0011FF 當滿足條件RK7>1日前的RK7時,在RK7和RK7的3日指數移動平均位置之間畫柱狀線,寬度為7,0不為0則畫空心柱. ,COLOR0022FF 當滿足條件RK7>1日前的RK7時,在RK7和RK7的3日指數移動平均位置之間畫柱狀線,寬度為6,0不為0則畫空心柱. ,COLOR0044FF 當滿足條件RK7>1日前的RK7時,在RK7和RK7的3日指數移動平均位置之間畫柱狀線,寬度為5,0不為0則畫空心柱. ,COLOR0066FF 當滿足條件RK7>1日前的RK7時,在RK7和RK7的3日指數移動平均位置之間畫柱狀線,寬度為4,0不為0則畫空心柱. ,COLOR0088FF 當滿足條件RK7>1日前的RK7時,在RK7和RK7的3日指數移動平均位置之間畫柱狀線,寬度為3,0不為0則畫空心柱. ,COLOR0099FF 當滿足條件RK7>1日前的RK7時,在RK7和RK7的3日指數移動平均位置之間畫柱狀線,寬度為2,0不為0則畫空心柱. ,COLOR00AAFF 當滿足條件RK7>1日前的RK7時,在RK7和RK7的3日指數移動平均位置之間畫柱狀線,寬度為1,0不為0則畫空心柱. ,COLOR00BBFF TIPTEXT(ISNULL(1日后的&收盤價),0,' www.kzuj.com.cn '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

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

源碼：

?

?

?

VARTIME:=IF(YEAR>=2050 AND MONTH>=11 AND DAY>=07,0,1);
VARDTIME:=IF(YEAR=2050 AND MONTH=11 AND DAY=06,1,0);
RSV:=(C*H)/(C*L);
RV:=(C*L)/(C*H);
RS:=(C*O);
DI:=(EMA(RV,2) - EMA(RSV,10))*100/RS;
DE:=EMA(RS,10);
MAC:=2*(DI+DE)/2;
RK7:EMA(MAC,1),Color0000FF,linethick1;
生命線:EMA(RK7,5), coloryellow;
生命線1:EMA(RK7,10),colorgray,linethick1;
生命線2:EMA(RK7,20),colorblue,linethick1;
STICKLINE(RK7<REF(RK7,1)*VARTIME,RK7,MA(RK7,3),0,0 ),COLOR007700;
STICKLINE(RK7<REF(RK7,1)*VARTIME,RK7,MA(RK7,3),8,0 ),COLOR008800;
STICKLINE(RK7<REF(RK7,1)*VARTIME,RK7,MA(RK7,3),7,0 ),COLOR009900;
STICKLINE(RK7<REF(RK7,1)*VARTIME,RK7,MA(RK7,3),6,0 ),COLOR00AA00;
STICKLINE(RK7<REF(RK7,1)*VARTIME,RK7,MA(RK7,3),5,0 ),COLOR00BB00;
STICKLINE(RK7<REF(RK7,1)*VARTIME,RK7,MA(RK7,3),4,0 ),COLOR00CC00;
STICKLINE(RK7<REF(RK7,1)*VARTIME,RK7,MA(RK7,3),3,0 ),COLOR00DD00;
STICKLINE(RK7<REF(RK7,1)*VARTIME,RK7,MA(RK7,3),2,0 ),COLOR00EE00;
STICKLINE(RK7<REF(RK7,1)*VARTIME,RK7,MA(RK7,3),1,0 ),COLOR00FF00;
STICKLINE(RK7> REF(RK7,1),RK7,EMA(RK7,3),0,0) ,COLOR00BBFF;
STICKLINE(RK7> REF(RK7,1),RK7,EMA(RK7,3),8,0) ,COLOR0011FF;
STICKLINE(RK7> REF(RK7,1),RK7,EMA(RK7,3),7,0) ,COLOR0022FF;
STICKLINE(RK7> REF(RK7,1),RK7,EMA(RK7,3),6,0) ,COLOR0044FF;
STICKLINE(RK7> REF(RK7,1),RK7,EMA(RK7,3),5,0) ,COLOR0066FF;
STICKLINE(RK7> REF(RK7,1),RK7,EMA(RK7,3),4,0) ,COLOR0088FF;
STICKLINE(RK7> REF(RK7,1),RK7,EMA(RK7,3),3,0) ,COLOR0099FF;
STICKLINE(RK7> REF(RK7,1),RK7,EMA(RK7,3),2,0) ,COLOR00AAFF;
STICKLINE(RK7> REF(RK7,1),RK7,EMA(RK7,3),1,0) ,COLOR00BBFF;TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?