儒雅2010自編指標公式源碼

作者：大智慧來源：cxh99.com 發布時間：2020年11月20日

相關標簽: 大智慧指標設計術語、通達信最貴的指標公式、大智慧超簡交易指標、大智慧雙突戰法指標、大智慧手機版能自編指標嗎、絕密分時主圖買賣指標、

源碼：
{儒雅2010} INPUT:N(3,1,100),N1(7,1,100),P(1,1,100),N3(6,1,100); XCLOSE:=EMA((OPEN+HIGH+LOW+CLOSE)/4,N) ; XOPEN:=EMA((REF(OPEN,1) + REF(XCLOSE,1))/2,N); TEMPG:=MAX(HIGH, XOPEN); XHIGH:=EMA(MAX(TEMPG, XCLOSE),N); TEMP:=MIN(LOW,XOPEN); XLOW:=EMA(MIN(TEMP, XCLOSE),N); O1:=IF(XOPEN<XCLOSE, XOPEN, XCLOSE); C1:=IF(XOPEN<XCLOSE, XCLOSE, XOPEN); STICKLINE(XOPEN>=XCLOSE,XHIGH,XLOW,1,1),COLORRED; STICKLINE(XOPEN>=XCLOSE,C1,O1,6,1),COLORRED; STICKLINE(XOPEN<XCLOSE,XHIGH,XLOW,1,1),COLORGREEN;{HTTP://www.tumamayizhan.com} STICKLINE(XOPEN<XCLOSE,C1,O1,6,1),COLORGREEN;{HTTP://www.tumamayizhan.com} X1:=REF(C,1); X2:=WMA(MAX(C-X1,0),N)/WMA(ABS(C-X1),N1)*100; X3:=((3*WMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5)- 2*WMA(WMA((C-LLV(L,27))/(HHV(H,27)-LLV(L,27))*100,5),3)-50)+50); X4:=(X2+X3)/2; X5:=WMA(C+(X4/50-1)*(MA(C,30)/20)*P,3); YELLOW:X5,COLORYELLOW,LINETHICK2; N2C:=2*N3; N3C:=2*N2C; VAR1:=REF(CLOSE,1); VAR3:=WMA(MAX(CLOSE-VAR1,0),N3)/WMA(ABS(CLOSE-VAR1),N3)*100; VAR4:=WMA(MAX(CLOSE-VAR1,0),N2C)/WMA(ABS(CLOSE-VAR1),N2C)*100; VAR5:=WMA(MAX(CLOSE-VAR1,0),N3C)/WMA(ABS(CLOSE-VAR1),N3C)*100; VAR6:=IF(CROSS(VAR3,VAR5),LOW,REF(LOW,BARSSINCE(CROSS(VAR3,VAR5)))); VAR7:=IF(CROSS(VAR5,VAR3),HIGH,REF(HIGH,BARSSINCE(CROSS(VAR5,VAR3)))); VAR8:=IF(CLOSE>=MA(CLOSE,20),80,50); VAR9:=IF(CLOSE>=MA(CLOSE,20),50,20); VARA:=IF(VAR3<VAR8 AND REF(VAR3,1)>=VAR8,HHV(REF(HIGH,1),BARSLAST(VAR3>=VAR8 AND REF(VAR3,1)<VAR8)-1), REF(HHV(REF(HIGH,1),BARSLAST(VAR3>=VAR8 AND REF(VAR3,1)<VAR8)+1), BARSLAST(VAR3<VAR8 AND REF(VAR3,1)))); VARB:=IF(HIGH>VARA,LOW,REF(LOW,BARSLAST(HIGH>VARA))); VARC:=IF(HIGH>VARA,VAR3,REF(VAR3,BARSLAST(HIGH>VARA))); VARD:=IF(HIGH>VARB AND VAR3<VARC AND VAR3<VAR5,HIGH,REF(HIGH,BARSLAST(HIGH>VARB AND VAR3<VARC AND VAR3<VAR5))); VARE:=IF(VAR3>VAR9 AND REF(VAR3,1)<=VAR9,LLV(REF(LOW,1),BARSLAST(VAR3<=VAR9 AND REF(VAR3,1)>VAR9)+1), REF(LLV(REF(LOW,1),BARSLAST(VAR3<=VAR9 AND REF(VAR3,1)>VAR9)+1),BARSLAST(VAR3>VAR9 AND REF(VAR3,1)))); VARF:=IF(LOW<VARE,HIGH,REF(HIGH,BARSLAST(LOW<VARE))); VAR10:=IF(LOW<VARE,VAR3,REF(VAR3,BARSLAST(LOW<VARE))); VAR11:=IF(LOW<VARF AND VAR3>VAR10 AND VAR3>VAR5,LOW,REF(LOW,BARSLAST(LOW<VARF AND VAR3>VAR10 AND VAR3>VAR5))); PRES: VAR11,COLORGRAY; SUP: VARD,COLORB958E2; DRAWTEXT(CROSS(X5,PRES ),XLOW,'●'),COLORBLUE,ALIGN0; DRAWTEXT(CROSS(SUP,X5 ),XHIGH,'●'),COLORMAGENTA,ALIGN0; DRAWTEXT(CROSS(X5,PRES ),XLOW,'8'),COLORWHITE,ALIGN0; DRAWTEXT(CROSS(SUP,X5 ),XHIGH,'8'),COLORWHITE,ALIGN0;

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

原理解析：

輸出INPUT:N(3,1,100),N1(7,1,100),P(1,1,100),N3(6,1,100)

XCLOSE賦值:(開盤價+最高價+最低價+收盤價)/4的N日指數移動平均?

XOPEN賦值:(1日前的開盤價+1日前的XCLOSE)/2的N日指數移動平均

TEMPG賦值:最高價和XOPEN的較大值

XHIGH賦值:TEMPG和XCLOSE的較大值的N日指數移動平均

TEMP賦值:最低價和XOPEN的較小值

XLOW賦值:TEMP和XCLOSE的較小值的N日指數移動平均

O1賦值:如果XOPEN<XCLOSE,返回XOPEN,否則返回XCLOSE

C1賦值:如果XOPEN<XCLOSE,返回XCLOSE,否則返回XOPEN

當滿足條件XOPEN>=XCLOSE時,在XHIGH和XLOW位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.,畫紅色

當滿足條件XOPEN>=XCLOSE時,在C1和O1位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,畫紅色

當滿足條件XOPEN<XCLOSE時,在XHIGH和XLOW位置之間畫柱狀線,寬度為1,1不為0則畫空心柱.,畫綠色

當滿足條件XOPEN<XCLOSE時,在C1和O1位置之間畫柱狀線,寬度為6,1不為0則畫空心柱.,畫綠色

X1賦值:1日前的收盤價

X2賦值:收盤價-X1和0的較大值的N日加權移動平均/收盤價-X1的絕對值的N1日加權移動平均*100

X3賦值:((3*(收盤價-27日內最低價的最低值)/(27日內最高價的最高值-27日內最低價的最低值)*100的5日加權移動平均-2*(收盤價-27日內最低價的最低值)/(27日內最高價的最高值-27日內最低價的最低值)*100的5日加權移動平均的3日加權移動平均-50)+50)

X4賦值:(X2+X3)/2

X5賦值:收盤價+(X4/50-1)*(收盤價的30日簡單移動平均/20)*P的3日加權移動平均

輸出YELLOW:X5,畫黃色,線寬為2

N2C賦值:2*N3

N3C賦值:2*N2C

VAR1賦值:1日前的收盤價

VAR3賦值:收盤價-VAR1和0的較大值的N3日加權移動平均/收盤價-VAR1的絕對值的N3日加權移動平均*100

VAR4賦值:收盤價-VAR1和0的較大值的N2C日加權移動平均/收盤價-VAR1的絕對值的N2C日加權移動平均*100

VAR5賦值:收盤價-VAR1和0的較大值的N3C日加權移動平均/收盤價-VAR1的絕對值的N3C日加權移動平均*100

VAR6賦值:如果VAR3上穿VAR5,返回最低價,否則返回首次VAR3上穿VAR5距今天數日前的最低價

VAR7賦值:如果VAR5上穿VAR3,返回最高價,否則返回首次VAR5上穿VAR3距今天數日前的最高價

VAR8賦值:如果收盤價>=收盤價的20日簡單移動平均,返回80,否則返回50

VAR9賦值:如果收盤價>=收盤價的20日簡單移動平均,返回50,否則返回20

VARA賦值:如果VAR3<VAR8ANDREF(VAR3,1)>=VAR8,返回上次VAR3>=VAR8ANDREF(VAR3,1)<VAR8距今天數-1日內1日前的最高價的最高值,否則返回上次VAR3<VAR8ANDREF(VAR3,1)距今天數日前的上次VAR3>=VAR8ANDREF(VAR3,1)<VAR8距今天數+1日內1日前的最高價的最高值

VARB賦值:如果最高價>VARA,返回最低價,否則返回上次最高價>VARA距今天數日前的最低價

VARC賦值:如果最高價>VARA,返回VAR3,否則返回上次最高價>VARA距今天數日前的VAR3

VARD賦值:如果最高價>VARBANDVAR3<VARCANDVAR3<VAR5,返回最高價,否則返回上次最高價>VARBANDVAR3<VARCANDVAR3<VAR5距今天數日前的最高價

VARE賦值:如果VAR3>VAR9ANDREF(VAR3,1)<=VAR9,返回上次VAR3<=VAR9ANDREF(VAR3,1)>VAR9距今天數+1日內1日前的最低價的最低值,否則返回上次VAR3>VAR9ANDREF(VAR3,1)距今天數日前的上次VAR3<=VAR9ANDREF(VAR3,1)>VAR9距今天數+1日內1日前的最低價的最低值

VARF賦值:如果最低價<VARE,返回最高價,否則返回上次最低價<VARE距今天數日前的最高價

VAR10賦值:如果最低價<VARE,返回VAR3,否則返回上次最低價<VARE距今天數日前的VAR3

VAR11賦值:如果最低價<VARFANDVAR3>VAR10ANDVAR3>VAR5,返回最低價,否則返回上次最低價<VARFANDVAR3>VAR10ANDVAR3>VAR5距今天數日前的最低價

輸出PRES: VAR11,畫深灰色

輸出SUP: VARD,COLORB958E2

當滿足條件X5上穿PRES時,在XLOW位置書寫文字,畫藍色,ALIGN0

當滿足條件SUP上穿X5時,在XHIGH位置書寫文字,畫洋紅色,ALIGN0

當滿足條件X5上穿PRES時,在XLOW位置書寫文字,畫白色,ALIGN0

當滿足條件SUP上穿X5時,在XHIGH位置書寫文字,畫白色,ALIGN0

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