相關標簽:

?

出現藍柱關注，紅柱持股綠柱持幣。
使用時請結合其他技術指標、成交量、大盤走勢等多因素進行綜合判斷。

?

?

原理解析：
N賦值:5 N1賦值:21 VAR1賦值:4*(收盤價-N日內最低價的最低值)/(N日內最高價的最高值-N日內最低價的最低值)*100的5日[1日權重]移動平均-3*(收盤價-N日內最低價的最低值)/(N日內最高價的最高值-N日內最低價的最低值)*100的5日[1日權重]移動平均的3.2日[1日權重]移動平均 輸出小試牛刀: 如果VAR1上穿8,返回8,否則返回0,STICK,畫紅色 當滿足條件小試牛刀>0時,在8位置畫7號圖標 輸出發現莊跡: 如果VAR1<=8,返回15,否則返回0,STICK,畫青色,線寬為2 VARO5賦值:27日內最低價的最低值 VARO6賦值:34日內最高價的最高值 VARO7賦值:(收盤價-VARO5)/(VARO6-VARO5)*4的4日指數移動平均*25 輸出建倉區: 如果(VARO7<10),返回100,否則返回118 ,COLOR00CCFF,線寬為1 CD1賦值:(9日內最高價的最高值-收盤價)/(9日內最高價的最高值-9日內最低價的最低值)-0.7 CD2賦值:(收盤價-9日內最低價的最低值)/(9日內最高價的最高值-9日內最低價的最低值) CD3賦值:CD2的3日[1日權重]移動平均的3日[1日權重]移動平均 CD4賦值:(CD3-CD1的9日[1日權重]移動平均)-0.5 CD5賦值:如果CD4>0.00,返回CD4,否則返回0.00 CD6賦值:1日前的CD5 VAR81賦值:收盤價的9日簡單移動平均 空頭1賦值:如果CD6-CD5,返回CD6,否則返回CD5 VAR1A賦值:(9日內最高價的最高值-收盤價)/(9日內最高價的最高值-9日內最低價的最低值)*100-70 VAR2A賦值:VAR1A的9日[1日權重]移動平均+100 VAR3A賦值:(收盤價-9日內最低價的最低值)/(9日內最高價的最高值-9日內最低價的最低值)*100 VAR4A賦值:VAR3A的3日[1日權重]移動平均 VAR5A賦值:VAR4A的3日[1日權重]移動平均+100 VAR6A賦值:VAR5A-VAR2A 輸出端莊窩:如果VAR6A>N1,返回VAR6A-N1,否則返回0,畫紅色 輸出果斷出擊:如果端莊窩上穿0.01,返回18,否則返回0,STICK,COLOR0000CC,線寬為2 當滿足條件果斷出擊>0時,在18位置畫7號圖標 XG賦值:端莊窩上穿0.01 輸出選底:如果XG=1,返回16,否則返回0,STICK,線寬為3 LC賦值:1日前的收盤價 RSI賦值:收盤價-LC和0的較大值的6日[1日權重]移動平均/收盤價-LC的絕對值的6日[1日權重]移動平均*100 E賦值:83上穿RSI 減倉空倉賦值:CD6上穿CD5 OR E 當滿足條件減倉空倉>0時,在113位置畫5號圖標 當滿足條件1日前的端莊窩<端莊窩時,在端莊窩和1日前的端莊窩位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,畫紅色 當滿足條件1日前的端莊窩>端莊窩時,在端莊窩和1日前的端莊窩位置之間畫柱狀線,寬度為7,0不為0則畫空心柱.,COLOR00FF00 輸出紅持綠空:0,畫綠色 TIPTEXT(ISNULL(1日后的&收盤價),0,' www.kzuj.com.cn '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

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

源碼：

?

N:=5;
N1:=21;
VAR1:=4*SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1)-3*SMA(SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1),3.2,1);
小試牛刀: IF(CROSS(VAR1,8),8,0),STICK,colorred;
DRAWICON(小試牛刀>0,8,7);
發現莊跡: IF(VAR1<=8,15,0),STICK,colorcyan,LINETHICK2;
VARO5:=LLV(LOW,27);
VARO6:=HHV(HIGH,34);
VARO7:=EMA((CLOSE-VARO5)/(VARO6-VARO5)*4,4)*25;
建倉區: IF((VARO7<10),100,118) ,COLOR00CCFF,LINETHICK1;
CD1:=(HHV(H,9)-C)/(HHV(H,9)-LLV(L,9))-0.7;
CD2:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9));
CD3:=SMA(SMA(CD2,3,1),3,1);
CD4:=(CD3-SMA(CD1,9,1))-0.5;
CD5:=IF(CD4>0.00,CD4,0.00);
CD6:=REF(CD5,1);
VAR81:=MA(C,9);
空頭1:=IF(CD6-CD5,CD6,CD5);
VAR1A:=(HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100-70;
VAR2A:=SMA(VAR1A,9,1)+100;
VAR3A:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR4A:=SMA(VAR3A,3,1);
VAR5A:=SMA(VAR4A,3,1)+100;
VAR6A:=VAR5A-VAR2A;
端莊窩:IF(VAR6A>N1,VAR6A-N1,0),colorred;
果斷出擊:IF(CROSS(端莊窩,0.01),18,0),STICK,COLOR0000CC,LINETHICK2;
DRAWICON(果斷出擊>0,18,7);
XG:=CROSS(端莊窩,0.01);
選底:IF(XG=1,16,0),STICK,LINETHICK3;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
E:=CROSS(83,RSI);
減倉空倉:=CROSS(CD6,CD5) OR E;
DRAWICON(減倉空倉>0,113,5);
STICKLINE(REF(端莊窩,1)<端莊窩,端莊窩,REF(端莊窩,1),7,0),colorred;
STICKLINE(REF(端莊窩,1)>端莊窩,端莊窩,REF(端莊窩,1),7,0),COLOR00FF00;
紅持綠空:0,colorgreen;TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.kzuj.com.cn '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?