相關標簽:

?

原大智慧的指標，現傳上來大家共享！

?

?

原理解析：
VAR2賦值:1日前的最低價 VAR3賦值:最低價-VAR2的絕對值的13日[1日權重]移動平均/最低價-VAR2和0的較大值的13日[1日權重]移動平均*100 VAR4賦值:如果收盤價*1.2,返回VAR3*13,否則返回VAR3/13的13日指數移動平均 VAR5賦值:34日內最低價的最低值 VAR6賦值:34日內VAR4的最高值 VAR7賦值:如果56日內最低價的最低值,返回1,否則返回0 VAR8賦值:如果最低價<=VAR5,返回(VAR4+VAR6*2)/2,否則返回0的3日指數移動平均/618*VAR7 VAR9賦值:收盤價的5日指數移動平均 VAR10賦值:(收盤價-收盤價的34日簡單移動平均)/收盤價的34日簡單移動平均*(-10) 當滿足條件VAR9>1日前的VAR9時,在0和VAR9*0.25位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR10E410 輸出減倉:如果VAR9>1日前的VAR9,返回VAR9*0.25,否則返回0,COLOR10E410,STICK 當滿足條件VAR9<1日前的VAR9時,在0和VAR9*0.25位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR1010FF 輸出增倉:如果VAR9<1日前的VAR9,返回VAR9*0.25,否則返回0,COLOR1010FF,STICK 當滿足條件VAR8>1日前的VAR8時,在0和VAR8位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLOR10FFFF 輸出主力進場:如果VAR8>1日前的VAR8,返回VAR8,否則返回0,COLOR10FFFF,STICK 當滿足條件VAR8<1日前的VAR8時,在0和VAR8*1.5位置之間畫柱狀線,寬度為4,0不為0則畫空心柱.,COLORFFF810 輸出洗緩:如果VAR8<1日前的VAR8,返回VAR8*1.5,否則返回0,COLORFFF810,STICK 輸出增減力度:VAR10*0.2,COLORFF7676 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則畫空心柱.,COLOR006EFF 輸出↑買↑:XL3,COLOR006EFF,STICK 當滿足條件XL3時,在VAR8*3.5位置書寫文字,COLOR006EFF 當滿足條件XL3時,在15位置畫1號圖標,畫紅色 TIPTEXT(ISNULL(1日后的&收盤價),0,' www.kzuj.com.cn '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

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

源碼：

?

?

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,34);
Var6:=HHV(Var4,34);
Var7:=IF(LLV(LOW,56),1,0);
Var8:=EMA(IF(LOW<=Var5,(Var4+Var6*2)/2,0),3)/618*Var7;
Var9:=EMA(CLOSE,5);
Var10:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*(-10);
STICKLINE(Var9>REF(Var9,1),0,Var9*0.25,4,0),color10E410;
減倉:IF(Var9>REF(Var9,1),Var9*0.25,0),color10E410,STICK;
STICKLINE(Var9<REF(Var9,1),0,Var9*0.25,4,0),color1010FF;
增倉:IF(Var9<REF(Var9,1),Var9*0.25,0),color1010FF,STICK;
STICKLINE(Var8>REF(Var8,1),0,Var8,4,0),color10FFFF;
主力進場:IF(Var8>REF(Var8,1),Var8,0),color10FFFF,STICK;
STICKLINE(Var8<REF(Var8,1),0,Var8*1.5,4,0),colorFFF810;
洗緩:IF(Var8<REF(Var8,1),Var8*1.5,0),colorFFF810,STICK;
增減力度:Var10*0.2,colorFF7676;
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),Color006EFF;
↑買↑:XL3,Color006EFF,STICK;
DRAWTEXT(XL3,Var8*3.5,'買'),Color006EFF;
DRAWICON(XL3,15,1),colorred;
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?