相關標簽:

?

波底寶塔雙底飛狐、通達信、大智慧 通用

?

?

原理解析：
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日前的收盤價 VAR1賦值:收盤價>1日前的收盤價 AND 收盤價>2日前的收盤價 PL5賦值:收盤價5%的之字轉向 EN1賦值:收盤價5%的之字轉向>1日前的收盤價5%的之字轉向 AND 1日前的收盤價5%的之字轉向<=2日前的收盤價5%的之字轉向 AND 2日前的收盤價5%的之字轉向<=3日前的收盤價5%的之字轉向 EX1賦值:收盤價5%的之字轉向<1日前的收盤價5%的之字轉向 AND 1日前的收盤價5%的之字轉向>=2日前的收盤價5%的之字轉向 AND 2日前的收盤價5%的之字轉向>=3日前的收盤價5%的之字轉向 PL10賦值:收盤價10%的之字轉向 EN2賦值:收盤價10%的之字轉向>1日前的收盤價10%的之字轉向 AND 1日前的收盤價10%的之字轉向<=2日前的收盤價10%的之字轉向 AND 2日前的收盤價10%的之字轉向<=3日前的收盤價10%的之字轉向 EX2賦值:收盤價10%的之字轉向<1日前的收盤價10%的之字轉向 AND 1日前的收盤價10%的之字轉向>=2日前的收盤價10%的之字轉向 AND 2日前的收盤價10%的之字轉向>=3日前的收盤價10%的之字轉向 PL20賦值:收盤價20%的之字轉向 EN3賦值:收盤價20%的之字轉向>1日前的收盤價20%的之字轉向 AND 1日前的收盤價20%的之字轉向<=2日前的收盤價20%的之字轉向 AND 2日前的收盤價20%的之字轉向<=3日前的收盤價20%的之字轉向 EX3賦值:收盤價20%的之字轉向<1日前的收盤價20%的之字轉向 AND 1日前的收盤價20%的之字轉向>=2日前的收盤價20%的之字轉向 AND 2日前的收盤價20%的之字轉向>=3日前的收盤價20%的之字轉向 PL40賦值:收盤價40%的之字轉向 走強1賦值:上次PL5<1日前的PL5距今天數 走弱1賦值:上次PL5>1日前的PL5距今天數 走強2賦值:上次PL10<1日前的PL10距今天數 走弱2賦值:上次PL10>1日前的PL10距今天數 走強3賦值:上次PL20<1日前的PL20距今天數 走弱3賦值:上次PL20>1日前的PL20距今天數 ZTJZ5賦值:如果PL10>1日前的PL10,返回統計走強2日中滿足EN1的天數,否則返回0 ZTJD5賦值:如果PL10>1日前的PL10,返回統計走強2日中滿足EX1的天數,否則返回0 DTJZ5賦值:如果PL10<1日前的PL10,返回統計走弱2日中滿足EN1的天數,否則返回0 DTJD5賦值:如果PL10<1日前的PL10,返回統計走弱2日中滿足EX1的天數,否則返回0 ZTJZ10賦值:如果PL20>1日前的PL20,返回統計走強3日中滿足EN2的天數,否則返回0 ZTJD10賦值:如果PL20>1日前的PL20,返回統計走強3日中滿足EX2的天數,否則返回0 DTJZ10賦值:如果PL20<1日前的PL20,返回統計走弱3日中滿足EN2的天數,否則返回0 DTJD10賦值:如果PL20<1日前的PL20,返回統計走弱3日中滿足EX2的天數,否則返回0 TJ1賦值:EN2 AND ZTJZ5=1 TJ2賦值:EN1 AND PL10>1日前的PL10 AND ZTJZ5=2 TJ3賦值:EN2 AND DTJZ10=1 TJ4賦值:EN3 AND ZTJZ10=1 TJ5賦值:EN2 AND PL20>1日前的PL20 AND ZTJZ10=2 輸出XG:TJ1 OR TJ2 OR TJ3 OR TJ4 OR TJ5 OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18 AND VAR1 <!--{cke_protected}{C}%3C!%2D%2D%2B%2B%20PLUGIN_CODE%20QCOMIC%20BEGIN%2D%2D%3E-->

?

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

源碼：

?

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);
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);


PL5:=ZIG(3,5);
EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3);
EX1:=ZIG(3,5)<REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)>=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3);
PL10:=ZIG(3,10);
EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3);
EX2:=ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)>=REF(ZIG(3,10),3);
PL20:=ZIG(3,20);
EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)<=REF(ZIG(3,20),3);
EX3:=ZIG(3,20)<REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)>=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)>=REF(ZIG(3,20),3);
PL40:=ZIG(3,40);
走強1:=BARSLAST(PL5<REF(PL5,1));
走弱1:=BARSLAST(PL5>REF(PL5,1));
走強2:=BARSLAST(PL10<REF(PL10,1));
走弱2:=BARSLAST(PL10>REF(PL10,1));
走強3:=BARSLAST(PL20<REF(PL20,1));
走弱3:=BARSLAST(PL20>REF(PL20,1));
ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走強2),0);
ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走強2),0);
DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0);
DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0);
ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走強3),0);
ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走強3),0);
DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0);
DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0);
TJ1:=EN2 AND ZTJZ5=1;
TJ2:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2;
TJ3:=EN2 AND DTJZ10=1;
TJ4:=EN3 AND ZTJZ10=1;
TJ5:=EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2;
XG:TJ1 OR TJ2 OR TJ3 OR TJ4 OR TJ5 OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18 AND VAR1 ;<!--++ plugin_code qcomic begin-->{程序化交易 www.kzuj.com.cn }

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

?