相關標簽:

?

同花順建倉區副圖指標源碼

?

原理解析：
填充背景 VAR2賦值:1日前的最低價 VAR3賦值:最低價-VAR2的絕對值的13日[1日權重]移動平均/最低價-VAR2和0的較大值的13日[1日權重]移動平均*100 VAR4賦值:如果收盤價*1.2,返回VAR3*13,否則返回VAR3/13的13日指數移動平均 VAR5賦值:21日內最低價的最低值 VAR6賦值:21日內VAR4的最高值 VAR7賦值:如果34日內最低價的最低值,返回1,否則返回0 VAR8賦值:如果最低價<=VAR5,返回(VAR4+VAR6*2)/2,否則返回0的3日指數移動平均/618*VAR7 VAR9賦值:收盤價的4日指數移動平均 VAR10賦值:(收盤價-收盤價的21日簡單移動平均)/收盤價的21日簡單移動平均*(10) VAR11賦值:如果最低價<=VAR5,返回(VAR4+VAR6*2)/2,否則返回0的3日指數移動平均/618*VAR7*(-1) VAR12賦值:收盤價的4日指數移動平均*(-1) 輸出個股:100*(收盤價-14日內最低價的最低值)/(14日內最高價的最高值-14日內最低價的最低值)的3日指數移動平均,畫黃色,線寬為0 當滿足條件個股>個股OR個股>1日前的個股時,在100和0位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLORFF4AA5 當滿足條件個股<個股OR個股<1日前的個股時,在50和0位置之間畫柱狀線,寬度為10,?不為0則畫空心柱.,COLOR418060 FILLRGN(個股,1日前的個股,個股>1日前的個股,自定色,個股<1日前的個股,自定色) 當滿足條件VAR12<1日前的VAR12時,在0和VAR12*0.08位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,COLOR10E410 輸出主力進場:如果VAR8>1日前的VAR8,返回VAR8*8,否則返回0,畫紅色,線寬為2 當滿足條件VAR11>1日前的VAR11時,在0和VAR11位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,COLORFFF810 輸出洗盤:如果VAR11>1日前的VAR11,返回VAR11*8,否則返回0,COLOR00FF00,線寬為2 XL1賦值:最低價的2日簡單移動平均*0.96 XL2賦值:最低價的26日簡單移動平均*0.85 XL3賦值:1日前的XL1<XL2 AND 1日前的XL1<XL1 AND 1日前的XL1<2日前的XL1 當滿足條件XL3時,在0和VAR8*3位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFF0000 當滿足條件XL3時,在VAR8*2位置書寫文字,COLORFF0000 輸出↑買:當滿足條件XL3時,在VAR8*3位置畫4號圖標,畫紅色 TIPTEXT(ISNULL(1日后的&收盤價),0,' www.kzuj.com.cn '),畫紅色

?

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

源碼：

?

DRAWGBK(V>1,STRIP(RGB(60,100,255),RGB(180,180,255),2));
var2:=REF(LOW,1);
Var3:=SMA(ABS(LOW-Var2),13,1)/SMA(MAX(LOW-Var2,0),13,1)*100;
Var4:=EMA(IF(CLOSE*1.2,Var3*13,Var3/13),13);
Var5:=LLV(LOW,21);
Var6:=HHV(Var4,21);
Var7:=IF(LLV(LOW,34),1,0);
Var8:=EMA(IF(LOW<=Var5,(Var4+Var6*2)/2,0),3)/618*Var7;
Var9:=EMA(CLOSE,4);
Var10:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*(10);
Var11:=EMA(IF(LOW<=Var5,(Var4+Var6*2)/2,0),3)/618*Var7*(-1);
Var12:=EMA(CLOSE,4)*(-1);
個股:EMA(100*(C-LLV(LOW,14))/(HHV(H,14)-LLV(LOW,14)),3),coloryellow,LINETHICK0;
STICKLINE(個股>個股 OR 個股>REF(個股,1),100,0,10,0),ColorFF4AA5;
STICKLINE(個股<個股 OR 個股<REF(個股,1),50,0,10),Color418060;
FILLRGN(個股,REF(個股,1),個股>REF(個股,1),RGB(255,255,0),個股<REF(個股,1),RGB(0,0,255));
STICKLINE(Var12<REF(Var12,1),0,Var12*0.08,4,1),color10E410;
主力進場:IF(Var8>REF(Var8,1),Var8*8,0),colorred,linethick2;
STICKLINE(Var11>REF(Var11,1),0,Var11,4,1),colorFFF810;
洗盤:IF(Var11>REF(Var11,1),Var11*8,0),COLOR00FF00,linethick2;
XL1:=MA(LOW,2)*0.96;
XL2:=MA(LOW,26)*0.85;
XL3:=REF(XL1,1)<XL2 AND REF(XL1,1)<XL1 AND REF(XL1,1)<REF(XL1,2);
STICKLINE(XL3,0,Var8*3,4,0),COLORFF0000;
DRAWTEXT(XL3,Var8*2,'買'),COLORFF0000;
↑買:DRAWICON(XL3,Var8*3,4),colorred;
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?