特發五里7號強弱判官公式代碼

作者：飛狐來源：cxh99.com 發布時間：2021年07月27日

相關標簽:

先看圖，點擊看大圖
{程序化交易 www.tumamayizhan.com }
?

原理解析：

N1賦值:5

N2賦值:10

N3賦值:20

N4賦值:30

P賦值:2

M賦值:20

N賦值:250

M1賦值:55

輸出MA1:收盤價的N1日指數移動平均

輸出均線:收盤價的N2日指數移動平均

輸出MA3:收盤價的N3日指數移動平均

輸出MA4:收盤價的N4日指數移動平均

TJ1賦值:MA1上穿MA2 AND 收陽線AND 收盤價>1日前的收盤價 AND 收盤價/1日前的收盤價>=1.018OR MA1上穿MA4 AND 收陽線AND 收盤價>1日前的收盤價 AND 收盤價/1日前的收盤價>=1.018OR MA2上穿MA3 AND 收陽線AND 收盤價>1日前的收盤價 AND 收盤價/1日前的收盤價>=1.018OR MA1上穿MA3 AND 收陽線AND 收盤價>1日前的收盤價 AND 收盤價/1日前的收盤價>=1.018

TJ2賦值:(MA1和MA2和MA3的較大值的較大值-MA1和MA2和MA3的較小值的較小值)/MA1和MA2和MA3的較小值的較小值*100<=P

XG賦值:TJ1 AND TJ2

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

K賦值:RSV的3日[1日權重]移動平均

D賦值:K的3日[1日權重]移動平均

DIFF賦值: 收盤價的12日指數移動平均 - 收盤價的26日指數移動平均

賦值:DIFF的9日指數移動平均

MACD賦值:2*(DIFF-DEA)

做多賦值:如果K>DANDMACD>0ANDV>1,返回2,否則返回0,畫紅色

做空賦值:如果K<DANDMACD<0ANDV>1,返回-2,否則返回0,COLOR00FF00

強洗賦值:如果MACD>0ANDK<DANDV>1,返回1,否則返回0,COLOR0099FF

弱升賦值:如果MACD<0ANDK>DANDV>1,返回-1,否則返回0,COLORFFFF00

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

當滿足條件做多ANDC<開盤價時,在最低價和最高價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLORFFFF00

當滿足條件做多ANDC>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,1不為0則畫空心柱.,畫紅色

當滿足條件做多ANDC<開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR990099

當滿足條件做多ANDC<開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORCC00CC

當滿足條件做多ANDC<開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFF00FF

當滿足條件做多ANDC>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR000099

當滿足條件做多ANDC>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR0000BB

當滿足條件做多ANDC>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR0000DD

當滿足條件做多ANDC>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR0000FF

當滿足條件做空ANDC>=開盤價時,在最低價和最高價位置之間畫柱狀線,寬度為0.1,0不為0則畫空心柱.,COLOR0000FF

當滿足條件做空ANDC>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,1不為0則畫空心柱.,COLOR00FF00

當滿足條件做空ANDC<開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR009900

當滿足條件做空ANDC<開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR00CC00

當滿足條件做空ANDC<開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00FF00

當滿足條件強洗ANDC>=開盤價時,在最低價和最高價位置之間畫柱狀線,寬度為0.1,0不為0則畫空心柱.,COLOR0000FF

當滿足條件強洗ANDC>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,1不為0則畫空心柱.,COLORFFFFFF

當滿足條件強洗ANDC<開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR999999

當滿足條件強洗ANDC<開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORCCCCCC

當滿足條件強洗ANDC<開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFFFFFF

當滿足條件弱升ANDC>=開盤價時,在最低價和最高價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLOR0000FF

當滿足條件弱升ANDC>=開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,1不為0則畫空心柱.,COLOR00FFFF

當滿足條件弱升ANDC<開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR009999

當滿足條件弱升ANDC<開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR00CCCC

當滿足條件弱升ANDC<開盤價時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00FFFF

當滿足條件TJ1的3日過濾時,在收盤價和開盤價位置之間畫柱狀線,寬度為8,0不為0則畫空心柱.,COLOR0000FF

當滿足條件XG的3日過濾時,在最低價*0.97位置畫1號圖標

GET賦值:收盤價3%的之字轉向,畫黃色

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

當滿足條件EN1ANDDTJZ5=1時,在最低價*0.98位置書寫文字,COLORFFFF00

當滿足條件EX1ANDDTJD5=2時,在最高價*1.02位置書寫文字,COLORFF00FF

當滿足條件EN2ANDZTJZ5=1時,在最低價*0.98位置書寫文字,COLOR0000FF

當滿足條件EX1ANDPL10>1日前的PL10ANDZTJD5=1時,在最高價*1.02位置書寫文字,COLOR0000FF

當滿足條件EN1ANDPL10>1日前的PL10ANDZTJZ5=2時,在最低價*0.98位置書寫文字,COLOR0000FF

當滿足條件EX1ANDPL10>1日前的PL10ANDZTJZ5=2時,在最高價*1.02位置書寫文字,COLOR0000FF

當滿足條件EN1ANDPL10>1日前的PL10ANDZTJZ5=3時,在最低價*0.98位置書寫文字,COLOR0000FF

當滿足條件EX2ANDPL20>1日前的PL20ANDZTJD10=1時,在最高價*1.02位置書寫文字,COLOR0000FF

當滿足條件EN2ANDDTJZ10=1時,在最低價*0.93位置書寫文字,COLORFF00FF

當滿足條件EX2ANDDTJD10=2時,在最高價*1.05位置書寫文字,COLORFFFF00

當滿足條件EN3ANDZTJZ10=1時,在最低價*0.93位置書寫文字,COLOR0000FF

當滿足條件EX2ANDPL20>1日前的PL20ANDZTJD10=1時,在最高價*1.03位置書寫文字,線寬為3,COLOR00FFFF

當滿足條件EN2ANDPL20>1日前的PL20ANDZTJZ10=2時,在最低價*0.95位置書寫文字,線寬為3,COLOR00FFFF

當滿足條件EX2ANDPL20>1日前的PL20ANDZTJD10=2OR(ZTJD10=0ORZTJD10=2)ANDEX2時,在最高價*1.03位置書寫文字,線寬為3,COLOR00FFFF

當滿足條件EN2ANDPL20>1日前的PL20ANDZTJZ10=3時,在最低價*0.95位置書寫文字,線寬為3,COLOR00FFFF

HR賦值:M1日內最高價的最高值

HRY賦值:M1日內最低價的最低值

HRY11賦值:HR*HRY

輸出HRY33:HRY11的開方,畫綠色,線寬為2

PARTLINE(收盤價>HRY33 ANDHRY33 >=1日前的HRY33, HRY33),線寬為2,畫紅色

源碼：

N1:=5;N2:=10;N3:=20;N4:=30;P:=2;M:=20;N:=250;M1:=55;
MA1:EMA(CLOSE,N1);
MA2:EMA(CLOSE,N2);
MA3:EMA(CLOSE,N3);
MA4:EMA(CLOSE,N4);
TJ1:=CROSS(MA1,MA2) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(MA1,MA4) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(MA2,MA3) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018
OR CROSS(MA1,MA3) AND C>O AND C>REF(C,1) AND C/REF(C,1)>=1.018;
TJ2:=(MAX(MA1,MAX(MA2,MA3))-MIN(MA1,MIN(MA2,MA3)))/
MIN(MA1,MIN(MA2,MA3))*100<=P;
XG:=TJ1 AND TJ2;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);
DEA :=EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
做多:=IF(K>D AND MACD>0 AND V>1,2,0),COLORRED;
做空:=IF(K<D AND MACD<0 AND V>1,-2,0),COLOR00FF00;
強洗:=IF(MACD>0 AND K<D AND V>1,1,0),COLOR0099FF;
弱升:=IF(MACD<0 AND K>D AND V>1,-1,0),COLORFFFF00;
STICKLINE(做多,L,H,0,0),COLORRED;
STICKLINE(做多 AND C<O,L,H,0,0),COLORFFFF00;
STICKLINE(做多 AND C>=O,C,O,8,1),COLORRED;
STICKLINE(做多 AND C<O,C,O,8,0),COLOR990099;
STICKLINE(做多 AND C<O,C,O,4,0),COLORCC00CC;
STICKLINE(做多 AND C<O,C,O,2,0),COLORFF00FF;
STICKLINE(做多 AND C>=O,C,O,8,0),COLOR000099;
STICKLINE(做多 AND C>=O,C,O,4,0),COLOR0000BB;
STICKLINE(做多 AND C>=O,C,O,2,0),COLOR0000DD;
STICKLINE(做多 AND C>=O,C,O,1,0),COLOR0000FF;
STICKLINE(做空 AND C>=O,L,H,0.1,0),COLOR0000FF;
STICKLINE(做空 AND C>=O,C,O,8,1),COLOR00FF00;
STICKLINE(做空 AND C<O,C,O,8,0),COLOR009900;
STICKLINE(做空 AND C<O,C,O,4,0),COLOR00CC00;
STICKLINE(做空 AND C<O,C,O,1,0),COLOR00FF00;
STICKLINE(強洗 AND C>=O,L,H,0.1,0),COLOR0000FF;
STICKLINE(強洗 AND C>=O,C,O,8,1),COLORFFFFFF;
STICKLINE(強洗 AND C<O,C,O,8,0),COLOR999999;
STICKLINE(強洗 AND C<O,C,O,4,0),COLORCCCCCC;
STICKLINE(強洗 AND C<O,C,O,1,0),COLORFFFFFF;
STICKLINE(弱升 AND C>=O,L,H,0,0),COLOR0000FF;
STICKLINE(弱升 AND C>=O,C,O,8,1),COLOR00FFFF;
STICKLINE(弱升 AND C<O,C,O,8,0),COLOR009999;
STICKLINE(弱升 AND C<O,C,O,4,0),COLOR00CCCC;
STICKLINE(弱升 AND C<O,C,O,1,0),COLOR00FFFF;

STICKLINE(FILTER(TJ1,3),C,O,8,0),COLOR0000FF;
DRAWICON(FILTER(XG,3),L*0.97,1);
GET:=ZIG(3,3),COLORYELLOW;
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);
DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'(A)'),COLORFFFF00;
DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'(B)'),COLORFF00FF;
DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'(C)'),COLOR0000FF;
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,'⑴'),COLOR0000FF;
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,'⑵'),COLOR0000FF;
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,'⑶'),COLOR0000FF;
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,'⑷'),COLOR0000FF;
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.02,'⑸'),COLOR0000FF;
DRAWTEXT(EN2 AND DTJZ10=1,L*0.93,'Ⅰ'),COLORFF00FF;
DRAWTEXT(EX2 AND DTJD10=2,H*1.05,'Ⅱ'),COLORFFFF00;
DRAWTEXT(EN3 AND ZTJZ10=1,L*0.93,'Ⅲ'),COLOR0000FF;
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.03,'①'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.95,'②'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2)
AND EX2,H*1.03,'③'),LINETHICK3,COLOR00FFFF;
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,L*0.95,'④'),
LINETHICK3,COLOR00FFFF;
HR:=HHV(HIGH,M1);
HRY:=LLV(LOW,M1);
HRY11:=HR*HRY;
HRY33:SQRT(HRY11),COLORGREEN,LINETHICK2;PARTLINE(C>HRY33 AND
HRY33 >=REF(HRY33 ,1), HRY33),LINETHICK2,COLORRED;

{程序化交易 www.tumamayizhan.com }

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