精品萬法歸一指標公式源碼（通達信和大智慧）

作者：通達信來源：cxh99.com 發布時間：2020年11月27日

相關標簽:

源碼：
VAR1:=(SMA(HIGH,20,2) * 1.05); STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < VAR1)) AND ((CLOSE - REF(CLOSE,1)) > 0)),CLOSE,OPEN,3,0),COLOR0090FF; STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < VAR1)) AND ((CLOSE - REF(CLOSE,1)) > 0)),CLOSE,OPEN,2,0),COLOR009FFF; STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < VAR1)) AND ((CLOSE - REF(CLOSE,1)) > 0)),CLOSE,OPEN,1,0),COLOR00B5FF; STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < VAR1)) AND ((CLOSE - REF(CLOSE,1)) > 0)),CLOSE,OPEN,0.1,0),COLOR00E4FF; STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < VAR1)) AND ((CLOSE - REF(CLOSE,1)) > 0)),OPEN,LOW,0,0),COLOR00FFFF; STICKLINE(((((CLOSE / OPEN) > 1.04) AND (CLOSE < VAR1)) AND ((CLOSE - REF(CLOSE,1)) > 0)),CLOSE,HIGH,0,0),COLOR00FFFF; STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > VAR1)) AND (CLOSE < VAR1)),OPEN,LOW,0,0),COLORFF76FF; STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > VAR1)) AND (CLOSE < VAR1)),CLOSE,HIGH,0,0),COLORFF76FF; STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > VAR1)) AND (CLOSE < VAR1)),CLOSE,OPEN,3,0),COLORFF00FF; STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > VAR1)) AND (CLOSE < VAR1)),CLOSE,OPEN,2,0),COLORFF62FF; STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > VAR1)) AND (CLOSE < VAR1)),CLOSE,OPEN,1,0),COLORFF76FF; STICKLINE(((((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,1))) AND (HIGH > VAR1)) AND (CLOSE < VAR1)),CLOSE,OPEN,0.1,0),COLORFFA8FF; N:=20; STICKLINE(L>REF(H,1),L,REF(H,1),50,1),COLORRED; STICKLINE(H<REF(L,1),H,REF(L,1),50,1),COLORGREEN; HLC:=REF(MA((HIGH+LOW+CLOSE)/3,N),1); HV:=EMA(HHV(HIGH,N),3); LV:=EMA(LLV(LOW,N),3); STOR:EMA(2*HV-LV,3),LINETHICK0; MIDR:EMA(HLC+HV-LV,3),LINETHICK1; WEKR:EMA(HLC*2-LV,3),LINETHICK1; WEKS:EMA(HLC*2-HV,3),LINETHICK1; MIDS:EMA(HLC-HV+LV,3),LINETHICK1; STOS:EMA(2*LV-HV,3),LINETHICK0; NNL:=ISLASTBAR; {DRAWTEXT(NNL,STOR,'￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLORDDAA00;} DRAWTEXT(NNL,MIDR,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),COLORDDAA00; DRAWTEXT(NNL,WEKR,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),COLOR0000FF; DRAWTEXT(NNL,HLC,'￣￣￣￣￣'),COLOR00FFFF; DRAWTEXT(NNL,WEKS,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),COLOR00FF00; DRAWTEXT(NNL,MIDS,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),COLORDDAA00; {DRAWTEXT(NNL,STOS,'￣￣￣￣￣￣￣￣￣￣￣'),ALIGN1,COLORDDAA00;}; BBI:=(2*C+H+L+O/2)/4.5; VAR2:EMA(((SLOPE(BBI,18)*27)+BBI),45),COLOR00FFFF,LINETHICK0; VAR3:(8*BBI+7*REF(BBI,1)+6*REF(BBI,2)+5*REF(BBI,3)+4*REF(BBI,4)+3*REF(BBI,5)+2*REF(BBI,6) +1*REF(BBI,7))/36,COLORFF00FF,LINETHICK0; IF(VAR3<REF(VAR3,1),VAR3,DRAWNULL),LINETHICK0; 重心:=(H+L+O+C*3)/6; NX:=(3*CLOSE+LOW+OPEN+HIGH)/6; 牛線:=(20*NX+19*REF(NX,1)+18*REF(NX,2)+17*REF(NX,3)+16*REF(NX,4) +15*REF(NX,5)+14*REF(NX,6)+13*REF(NX,7)+12*REF(NX,8)+11*REF(NX,9) +10*REF(NX,10)+9*REF(NX,11)+8*REF(NX,12)+7*REF(NX,13)+6*REF(NX,14) +5*REF(NX,15)+4*REF(NX,16)+3*REF(NX,17) +2*REF(NX,18)+REF(NX,20))/210; 牛熊線:=MA(牛線,4); IF(牛熊線<=牛線,牛熊線,DRAWNULL),COLORRED,LINETHICK2; IF(牛熊線>牛線,牛熊線,DRAWNULL),COLORGREEN,LINETHICK2;

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

原理解析：

VAR1賦值:(最高價的20日[2日權重]移動平均 * 1.05)

當滿足條件((((收盤價/開盤價)>1.04)AND(收盤價<VAR1))AND((收盤價-1日前的收盤價)>0))時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLOR0090FF

當滿足條件((((收盤價/開盤價)>1.04)AND(收盤價<VAR1))AND((收盤價-1日前的收盤價)>0))時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLOR009FFF

當滿足條件((((收盤價/開盤價)>1.04)AND(收盤價<VAR1))AND((收盤價-1日前的收盤價)>0))時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00B5FF

當滿足條件((((收盤價/開盤價)>1.04)AND(收盤價<VAR1))AND((收盤價-1日前的收盤價)>0))時,在收盤價和開盤價位置之間畫柱狀線,寬度為0.1,0不為0則畫空心柱.,COLOR00E4FF

當滿足條件((((收盤價/開盤價)>1.04)AND(收盤價<VAR1))AND((收盤價-1日前的收盤價)>0))時,在開盤價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLOR00FFFF

當滿足條件((((收盤價/開盤價)>1.04)AND(收盤價<VAR1))AND((收盤價-1日前的收盤價)>0))時,在收盤價和最高價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLOR00FFFF

當滿足條件((((收盤價<1日前的收盤價)AND(收盤價<1日前的收盤價))AND(最高價>VAR1))AND(收盤價<VAR1))時,在開盤價和最低價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLORFF76FF

當滿足條件((((收盤價<1日前的收盤價)AND(收盤價<1日前的收盤價))AND(最高價>VAR1))AND(收盤價<VAR1))時,在收盤價和最高價位置之間畫柱狀線,寬度為0,0不為0則畫空心柱.,COLORFF76FF

當滿足條件((((收盤價<1日前的收盤價)AND(收盤價<1日前的收盤價))AND(最高價>VAR1))AND(收盤價<VAR1))時,在收盤價和開盤價位置之間畫柱狀線,寬度為3,0不為0則畫空心柱.,COLORFF00FF

當滿足條件((((收盤價<1日前的收盤價)AND(收盤價<1日前的收盤價))AND(最高價>VAR1))AND(收盤價<VAR1))時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,COLORFF62FF

當滿足條件((((收盤價<1日前的收盤價)AND(收盤價<1日前的收盤價))AND(最高價>VAR1))AND(收盤價<VAR1))時,在收盤價和開盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLORFF76FF

當滿足條件((((收盤價<1日前的收盤價)AND(收盤價<1日前的收盤價))AND(最高價>VAR1))AND(收盤價<VAR1))時,在收盤價和開盤價位置之間畫柱狀線,寬度為0.1,0不為0則畫空心柱.,COLORFFA8FF

N賦值:20

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

當滿足條件最高價<1日前的最低價時,在最高價和1日前的最低價位置之間畫柱狀線,寬度為50,1不為0則畫空心柱.,畫綠色

HLC賦值:1日前的(最高價+最低價+收盤價)/3的N日簡單移動平均

HV賦值:N日內最高價的最高值的3日指數移動平均

LV賦值:N日內最低價的最低值的3日指數移動平均

輸出STOR:2*HV-LV的3日指數移動平均,線寬為0

輸出MIDR:HLC+HV-LV的3日指數移動平均,線寬為1

輸出WEKR:HLC*2-LV的3日指數移動平均,線寬為1

輸出WEKS:HLC*2-HV的3日指數移動平均,線寬為1

輸出MIDS:HLC-HV+LV的3日指數移動平均,線寬為1

輸出STOS:2*LV-HV的3日指數移動平均,線寬為0

NNL賦值:是否最后一個周期

當滿足條件NNL時,在MIDR位置書寫文字,COLORDDAA00

當滿足條件NNL時,在WEKR位置書寫文字,COLOR0000FF

當滿足條件NNL時,在HLC位置書寫文字,COLOR00FFFF

當滿足條件NNL時,在WEKS位置書寫文字,COLOR00FF00

當滿足條件NNL時,在MIDS位置書寫文字,COLORDDAA00

BBI賦值:(2*收盤價+最高價+最低價+開盤價/2)/4.5

輸出VAR2:((BBI的18日線性回歸斜率*27)+BBI)的45日指數移動平均,COLOR00FFFF,線寬為0

輸出VAR3:(8*BBI+7*1日前的BBI+6*2日前的BBI+5*3日前的BBI+4*4日前的BBI+3*5日前的BBI+2*6日前的BBI+1*7日前的BBI)/36,COLORFF00FF,線寬為0

如果VAR3<1日前的VAR3,返回VAR3,否則返回無效數,線寬為0

重心賦值:(最高價+最低價+開盤價+收盤價*3)/6

NX賦值:(3*收盤價+最低價+開盤價+最高價)/6

牛線賦值:(20*NX+19*1日前的NX+18*2日前的NX+17*3日前的NX+16*4日前的NX+15*5日前的NX+14*6日前的NX+13*7日前的NX+12*8日前的NX+11*9日前的NX+10*10日前的NX+9*11日前的NX+8*12日前的NX+7*13日前的NX+6*14日前的NX+5*15日前的NX+4*16日前的NX+3*17日前的NX+2*18日前的NX+20日前的NX)/210

牛熊線賦值:牛線的4日簡單移動平均

如果牛熊線<=牛線,返回牛熊線,否則返回無效數,畫紅色,線寬為2

如果牛熊線>牛線,返回牛熊線,否則返回無效數,畫綠色,線寬為2

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