相關標簽:

?

?

?

原理解析：
A賦值:(3*收盤價+最低價+開盤價+最高價)/6 X賦值:(20*A+19*1日前的A+18*2日前的A+17*3日前的A+16*4日前的A+15*5日前的A+14*6日前的A+13*7日前的A+12*8日前的A+11*9日前的A+10*10日前的A+9*11日前的A+8*12日前的A+7*13日前的A+6*14日前的A+5*15日前的A+4*16日前的A+3*17日前的A+2*18日前的A+20日前的A)/210 RCC賦值:前收盤價 S2賦值:收盤價的3日[1日權重]移動平均 S6賦值:收盤價的5日[1日權重]移動平均 DK賦值:2*(S2-S6) 當滿足條件DK>0時,在RCC和RCC+DK位置之間畫柱狀線,寬度為0,1不為0則畫空心柱.,畫紅色 當滿足條件DK<0時,在RCC和RCC+DK位置之間畫柱狀線,寬度為0,1不為0則畫空心柱.,畫青色 輸出主力成本:X的13日指數移動平均,COLORFF00FF,線寬為0 輸出短期底部:30日內最高價的最低值,線寬為2,COLORFFCC00 如果收盤價的3日簡單移動平均,返回收盤價的3日簡單移動平均,否則返回無效數,畫黃色,線寬為2 如果收盤價的9日簡單移動平均,返回收盤價的9日簡單移動平均,否則返回無效數,畫洋紅色,線寬為2 如果收盤價的23.5日簡單移動平均,返回收盤價的23.5日簡單移動平均,否則返回無效數,畫白色 K線 MA5賦值:收盤價的5日簡單移動平均 MA10賦值:收盤價的10日簡單移動平均 MA30賦值:收盤價的30日簡單移動平均 FA賦值:上次MA10上穿MA5距今天數 AND MA5上穿MA10 FB賦值:FA AND MA5>MA30 AND MA10>MA30 AND MA10>1日前的MA10 當滿足條件FB時,在最低價-0.58位置書寫文字,畫紅色 V1賦值:收盤價的5日指數移動平均 V2賦值:收盤價的90日指數移動平均*1.01的10日指數移動平均 當滿足條件V1上穿V2時,在V1+0.05位置書寫文字,COLOR00FF00 VAR1賦值:21日內最低價的最低值 VAR2賦值:21日內最高價的最高值 AK1賦值:(((收盤價-VAR1)/(VAR2-VAR1))*100)的5日指數移動平均 AK賦值:(((收盤價-VAR1)/(VAR2-VAR1))*50)的13日指數移動平均 AB賦值:AK1上穿AK 當滿足條件(AB=1)時,在(最低價*0.99)位置書寫文字,畫黃色 AA1賦值:成交額(元)/成交量(手) BB1賦值:最低價<AA1*0.9 CC1賦值:(收盤價-1日前的收盤價)/1日前的收盤價*100>1.2 DD1賦值:最低價<收盤價的5日簡單移動平均*0.921 EE1賦值:成交量(手)<成交量(手)的5日簡單移動平均*1.5 老鼠倉賦值:BB1 AND CC1 AND DD1 AND EE1,線寬為0,COLOR0099FF 當滿足條件老鼠倉時,在最低價*0.99位置書寫文字,COLOR0099FF VAR3AA賦值:如果(收盤價>1日前的收盤價),返回88,否則返回0 VAR4AA賦值:如果((收盤價)/(1日前的收盤價)>1.05)AND((最高價)/(收盤價)<1.01)AND(VAR3AA>0),返回91,否則返回0 當滿足條件(VAR4AA>90)的45日過濾時,在(最低價)*(0.93)位置書寫文字,COLOR00FFFF 當滿足條件(VAR4AA>90)的35日過濾時,在(最低價)*(0.99000001)位置書寫文字,COLOR00FFFF A1AA賦值:9 A2AA賦值:(A1AA+1日前的收盤價<收盤價) 當滿足條件(A2AA>-0.5)的84日過濾時,在(最高價)*(1.05)位置書寫文字,COLORFFFFFF VAR6賦值:1日前的收盤價 VAR7賦值:收盤價-VAR6和0的較大值的6日[1日權重]移動平均/收盤價-VAR6的絕對值的6日[1日權重]移動平均*100 當滿足條件82上穿VAR7時,在最高價*1.01位置書寫文字,畫黃色 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

?

?

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

源碼：

?

A:=(3*C+L+O+H)/6;
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210;
RCC:=DYNAINFO(3);
S2:=SMA(C,3,1);
S6:=SMA(C,5,1);
DK:=2*(S2-S6);
STICKLINE(DK>0,RCC,RCC+DK,0,1),COLORRED;
STICKLINE(DK<0,RCC,RCC+DK,0,1),COLORCYAN;
主力成本:EMA(X,13),COLORFF00FF,LINETHICK0;
短期底部:LLV(HIGH,30),LINETHICK2,COLORFFCC00;
IF(MA(C,3),MA(C,3),DRAWNULL),COLORYELLOW,LINETHICK2;
IF(MA(C,9),MA(C,9),DRAWNULL),COLORMAGENTA,LINETHICK2;
IF(MA(C,23.5),MA(C,23.5),DRAWNULL),COLORWHITE;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
MA5:=MA(C,5);
MA10:=MA(C,10);
MA30:=MA(C,30);
FA:=BARSLAST(CROSS(MA10,MA5)) AND CROSS(MA5,MA10);
FB:=FA AND MA5>MA30 AND MA10>MA30 AND MA10>REF(MA10,1);
DRAWTEXT(FB,L-0.58,'紅牛'),COLORRED;
V1:=EMA(CLOSE,5);
V2:=EMA(EMA(CLOSE,90)*1.01,10);
DRAWTEXT(CROSS(V1,V2),V1+0.05,'牛起步'),COLOR00FF00;
VAR1:=LLV(LOW,21);
VAR2:=HHV(HIGH,21);
AK1:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 100),5);
AK:=EMA((((CLOSE - VAR1) / (VAR2 - VAR1)) * 50),13);
AB:=CROSS(AK1,AK);
DRAWTEXT((AB = 1),(LOW * 0.99),'○牛窩'),COLORYELLOW;
AA1:=AMOUNT/V;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
老鼠倉:=BB1 AND CC1 AND DD1 AND EE1,LINETHICK0,COLOR0099FF;
DRAWTEXT(老鼠倉,L*0.99,'老鼠倉'),COLOR0099FF;
VAR3AA:=IF((CLOSE>REF(CLOSE,1)),88,0);
VAR4AA:=IF(((CLOSE)/(REF(CLOSE,1))>1.05) AND ((HIGH)/(CLOSE)<1.01) AND (VAR3AA>0),91,0);
DRAWTEXT(FILTER((VAR4AA>90),45),(LOW)*(0.93),'大膽搏 '),COLOR00FFFF;
DRAWTEXT(FILTER((VAR4AA>90),35),(LOW)*(0.99000001),'加倉'),COLOR00FFFF;
A1AA:=9;
A2AA:=(REF(CLOSE,A1AA+1)<CLOSE);
DRAWTEXT(FILTER((A2AA>-0.5),84),(HIGH)*(1.05),'小心變盤'),COLORFFFFFF;
VAR6:=REF(C,1);
VAR7:=SMA(MAX(C-VAR6,0),6,1)/SMA(ABS(C-VAR6),6,1)*100;
DRAWTEXT(CROSS(82,VAR7),H*1.01,'▼逃頂'),COLORYELLOW;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?