自動R畫線macd指標公式

作者：飛狐來源：cxh99.com 發布時間：2022年06月11日

相關標簽:bias指標畫線公式、畫線macd指標公式、操盤手畫線公式指標、趨勢畫線指標公式、股票畫線指標公式、通達信自動畫線指標、同花順自動畫線指標、背離指標公式自動畫線、 rsi自動畫線指標公式、益盟自動畫線指標公式、

{自動R畫線}

原理解析：

PARTLINE(收盤價,80),LINEDOT,COLOR00BCBE

PARTLINE(收盤價,20),LINEDOT,COLOR00BCBE

輸出R:收盤價-1日前的收盤價和0的較大值的8日[1日權重]移動平均/收盤價-1日前的收盤價的絕對值的8日[1日權重]移動平均*100,PRECISION2,畫白色

A1賦值:如果當前流通股本(手)=0,返回3日前的最高價=21日內最高價的最高值,否則返回3日前的最高價=13日內最高價的最高值

B1賦值:A1的3日過濾

C1賦值:若B1則將最近3+1周期置為1

D1賦值:C1的3日過濾

A2賦值:如果當前流通股本(手)=0,返回3日前的最低價=21日內最低價的最低值,否則返回3日前的最低價=13日內最低價的最低值

B2賦值:A2的3日過濾

C2賦值:若B2則將最近3+1周期置為1

D2賦值:C2的3日過濾

E1賦值:(1日前的2*3日內最低價的最低值+1日前的2*3日內最高價的最高值)/2

E2賦值:(最高價+最低價)/2

H1賦值:(D1 AND 取反) OR 是否最后一個周期 OR 收盤價的有效數據周期數=1

L1賦值:(D2 AND 取反)

X1賦值:1日前的上次H1距今天數+1

F1賦值:若H1ANDCOUNT(L1,X1)>0則將最近X1日內如果L1,返回最低價,否則返回10000距今天數周期置為1

G1賦值:F1>1日前的F1

I1賦值:若G1則將最近2周期置為1

LD賦值:I1>1日前的I1

L2賦值:LD OR 是否最后一個周期 OR 收盤價的有效數據周期數=1

X2賦值:1日前的上次L2距今天數+1

F2賦值:若L2ANDCOUNT(H1,X2)>0則將最近X2日內如果H1,返回最高價,否則返回0距今天數周期置為1

G2賦值:F2>1日前的F2

I2賦值:若G2則將最近2周期置為1

HD賦值:I2>1日前的I2

XL_1賦值:上次HD距今天數+1

XL_2賦值:如果XL_1>0,返回R>=XL_1日內R的最高值,否則返回0

XL_3賦值:XL_1>0 AND BARPOS=SYSPARAM(1)

當滿足條件XL_2時,在R位置畫直線起點，當滿足條件XL_3時,在R位置畫直線終點,1表示是否延長.,畫黃色

值賦值:LINEVALUE(XL_2,R,XL_3,R,0,0)

當滿足條件R上穿值ANDR>值*1.03時,在值位置畫4號圖標,PXDN8

源碼：

{R(射線)}
PARTLINE(C,80),LINEDOT,Color00BCBE;
PARTLINE(C,20),LINEDOT,Color00BCBE;
R:SMA(MAX(C-REF(C,1),0),8,1)/SMA(ABS(C-REF(C,1)),8,1)*100,PRECISION2,COLORWHITE;
A1:=IF(CAPITAL=0,REF(H,3)=HHV(H,21),REF(H,3)=HHV(H,13));
B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1); D1:=FILTER(C1,3);
A2:=IF(CAPITAL=0,REF(L,3)=LLV(L,21),REF(L,3)=LLV(L,13));
B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1); D2:=FILTER(C2,3);
E1:=(REF(LLV(L,2*3),1)+REF(HHV(H,2*3),1))/2; E2:=(H+L)/2;
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(C)=1; L1:=(D2 AND NOT(D1 AND E1=E2));
X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,L,10000),X1));
G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);
L2:=LD OR ISLASTBAR OR BARSCOUNT(C)=1; X2:=REF(BARSLAST(L2),1)+1;
F2:=BACKSET(L2 AND COUNT(H1,X2)>0,HHVBARS(IF(H1,HIGH,0),X2)); G2:=F2>REF(F2,1); I2:=BACKSET(G2,2);
HD:=I2>REF(I2,1);
XL_1:=BARSLAST(HD)+1; XL_2:=if(XL_1>0,R>=HHV(R,XL_1),0);{起點} XL_3:=XL_1>0 and BARPOS=SYSPARAM(1);{支點}
DRAWLINE(XL_2,R,XL_3,R,1),COLORYELLOW;{射線}
值:=LINEVALUE(XL_2,R,XL_3,R,0,0);
DRAWICON(CROSS(R,值) and R>值*1.03,值,4),PXDN8

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