相關標簽:

?

?

原理解析：
輸出天知1: 3*(收盤價-27日內最低價的最低值)/(27日內最高價的最高值-27日內最低價的最低值)*100的5日[1日權重]移動平均-2*(收盤價-27日內最低價的最低值)/(27日內最高價的最高值-27日內最低價的最低值)*100的5日[1日權重]移動平均的3日[1日權重]移動平均 當滿足條件1日前的天知1>天知1時,在天知1和1日前的天知1位置之間畫柱狀線,寬度為8,1不為0則畫空心柱.,畫青色 當滿足條件1日前的天知1<天知1時,在天知1和1日前的天知1位置之間畫柱狀線,寬度為8,1不為0則畫空心柱., 畫紅色 ABV賦值:如果收盤價>1日前的收盤價,返回成交量(手),否則返回如果收盤價<1日前的收盤價,返回-成交量(手),否則返回0的歷史累和/25000的2日簡單移動平均 M1賦值:ABV的12日指數移動平均 M2賦值:ABV的26日指數移動平均 MTM賦值:收盤價-1日前的收盤價 MMS賦值:((100)*(MTM的6日指數移動平均的6日指數移動平均))/(MTM的絕對值的6日指數移動平均的6日指數移動平均) MMM賦值:((100)*(MTM的12日指數移動平均的12日指數移動平均))/(MTM的絕對值的12日指數移動平均的12日指數移動平均) MML賦值:((100)*(MTM的26日指數移動平均的26日指數移動平均))/(MTM的絕對值的26日指數移動平均的26日指數移動平均) MTGJ賦值:收盤價-1日前的收盤價 ZLGJ賦值:100*MTGJ的9日指數移動平均的9日指數移動平均/MTGJ的絕對值的9日指數移動平均的9日指數移動平均 MAZL賦值:ZLGJ的5日簡單移動平均 A賦值:((成交量(手))/(當前流通股本(手)))*(100) S賦值:((A的30日簡單移動平均)/(大盤的成交額的10日簡單移動平均))*(大盤的成交額的60日簡單移動平均) Y賦值:((A的120日簡單移動平均)/(大盤的成交額的10日簡單移動平均))*(大盤的成交額的60日簡單移動平均) X賦值:1 V1賦值:(最高價+開盤價+最低價+(2)*(收盤價))/(5) V2賦值:1日前的V1 V3賦值:V1-V2和0的較大值 V4賦值:V1-V2的絕對值 V5賦值:V3的10日[1日權重]移動平均 V6賦值:V4的10日[1日權重]移動平均 V8賦值:統計5日中滿足((V5)/(V6)<0.2)的天數 V9賦值:統計10日中滿足(10日內V1的最低值=V1)的天數 輸出主力進出:如果(MMS>1日前的MMSANDZLGJ>1日前的ZLGJANDCROSS(ABV,M2)ANDABV>1日前的ABVANDM1>1日前的M1ANDM2>1日前的M2),返回65,否則返回0,畫白色,POINTDOT 主進主軌賦值:ABV>M2 AND ABV上穿M1 AND ZLGJ上穿MAZL 當滿足條件主力進出OR主進主軌時,在65和0位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,畫白色 精準買賣賦值:V8>=1 AND V9>=1 AND 收陽線ANDSE 1日前的收盤價>1日前的開盤價 AND (成交量(手)>1日前的成交量(手)) AND MMS>MML AND ABV上穿M2 短線買點賦值:V8>=1 AND V9>=1 AND 收陽線ANDSE 1日前的收盤價>1日前的開盤價 AND (成交量(手)>1日前的成交量(手)) AND MMS上穿MML AND ABV>1日前的ABV 中線買點賦值:V8>=1 AND V9>=1 AND 收陽線ANDSE 1日前的收盤價>1日前的開盤價 AND (成交量(手)>1日前的成交量(手)) AND ABV>1日前的ABV AND MMS>MML AND MMM上穿MML AND MMS>1日前的MMS AND MMM>1日前的MMM AND MML>1日前的MML 主進主買賦值:ABV>M2 AND ZLGJ>MAZL AND MMS上穿MML AND MMS>1日前的MMS AND MMM>1日前的MMM AND MML>1日前的MML 短中精賦值:精準買賣 OR 短線買點 OR 中線買點 OR 主進主買 輸出主力買賣:如果短中精,返回60,否則返回0,COLORFF00FF,POINTDOT 當滿足條件主力買賣時,在60和0位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,COLORFF00FF 輸出主力軌跡:如果ABV>M2ANDMMS>MMLANDCROSS(ZLGJ,MAZL)ANDZLGJ>1日前的ZLGJANDMAZL>1日前的MAZL,返回55,否則返回0,COLORFFCC66,POINTDOT 當滿足條件主力軌跡時,在55和0位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,COLORFFCC66 輸出拉升在即:如果S<XANDY<XANDMMS>MMLANDABV>M1ANDCROSS(S,Y),返回50,否則返回0,畫黃色,POINTDOT 當滿足條件拉升在即時,在50和0位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,畫黃色 輸出底部構成:如果V8>=1ANDV9>=1ANDCLOSE>OPENANDREF(收盤價,1)>1日前的開盤價ANDVOL>1日前的成交量(手)ANDABV>M2ANDZLGJ>MAZL,返回45,否則返回0,COLOR00FF00,POINTDOT 當滿足條件底部構成時,在45和0位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,COLOR00FF00 ROC賦值:(收盤價-12日前的收盤價)/12日前的收盤價*100 HSL賦值:100*成交量(手)/當前流通股本(手) 輸出沖擊波:如果ROC上穿16ANDHSL>3.5,返回40,否則返回0,COLOR0099FF,POINTDOT 當滿足條件沖擊波時,在40和0位置之間畫柱狀線,寬度為4,1不為0則畫空心柱.,COLOR0099FF 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

?

?

天知1: 3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
STICKLINE(REF(天知1,1) >天知1, 天知1,REF(天知1,1),8,1),colorcyan ;
STICKLINE(REF(天知1,1)<天知1, 天知1,REF(天知1,1),8,1), colorred;
ABV:=MA(SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),-VOL,0)),0)/25000,2);
M1:=EMA(ABV,12);
M2:=EMA(ABV,26);
MTM:=CLOSE-REF(CLOSE,1);
MMS:=((100)*(EMA(EMA(MTM,6),6)))/(EMA(EMA(ABS(MTM),6),6));
MMM:=((100)*(EMA(EMA(MTM,12),12)))/(EMA(EMA(ABS(MTM),12),12));
MML:=((100)*(EMA(EMA(MTM,26),26)))/(EMA(EMA(ABS(MTM),26),26));
mtgj:=C-REF(C,1);
ZLGJ:=100*EMA(EMA(mtgj,9),9)/EMA(EMA(ABS(mtgj),9),9);
MAZL:=MA(ZLGJ,5);
A:=((VOL)/(CAPITAL))*(100);
S:=((MA(A,30))/(MA(INDEXA,10)))*(MA(INDEXA,60));
Y:=((MA(A,120))/(MA(INDEXA,10)))*(MA(INDEXA,60));
X:=1;
V1:=(HIGH+OPEN+LOW+(2)*(CLOSE))/(5);
V2:=REF(V1,1);
V3:=MAX(V1-V2,0);
V4:=ABS(V1-V2);
V5:=SMA(V3,10,1);
V6:=SMA(V4,10,1);
V8:=COUNT(((V5)/(V6)<0.2),5);
V9:=COUNT((LLV(V1,10)=V1),10);
主力進出:IF((MMS>REF(MMS,1) AND ZLGJ>REF(ZLGJ,1) AND CROSS(ABV,M2) AND ABV>REF(ABV,1) AND M1>REF(M1,1) AND M2>REF(M2,1)),65,0),colorwhite,POINTDOT;
主進主軌:=ABV>M2 AND CROSS(ABV,M1) AND CROSS(ZLGJ,MAZL);
STICKLINE(主力進出 OR 主進主軌,65,0,4,1),colorwhite;
精準買賣:=V8>=1 AND V9>=1 AND CLOSE>OPEN AND REF(CLOSE,1)>REF(OPEN,1) AND (VOL>REF(VOL,1)) AND MMS>MML AND CROSS(ABV,M2);
短線買點:=V8>=1 AND V9>=1 AND CLOSE>OPEN AND REF(CLOSE,1)>REF(OPEN,1) AND (VOL>REF(VOL,1)) AND CROSS(MMS,MML) AND ABV>REF(ABV,1);
中線買點:=V8>=1 AND V9>=1 AND CLOSE>OPEN AND REF(CLOSE,1)>REF(OPEN,1) AND (VOL>REF(VOL,1)) AND ABV>REF(ABV,1) AND MMS>MML AND CROSS(MMM,MML) AND MMS>REF(MMS,1) AND MMM>REF(MMM,1) AND MML>REF(MML,1);
主進主買:=ABV>M2 AND ZLGJ>MAZL AND CROSS(MMS,MML) AND MMS>REF(MMS,1) AND MMM>REF(MMM,1) AND MML>REF(MML,1);
短中精:=精準買賣 OR 短線買點 OR 中線買點 OR 主進主買;
主力買賣:IF(短中精,60,0),COLORFF00FF,POINTDOT;
STICKLINE(主力買賣,60,0,4,1),COLORFF00FF;
主力軌跡:IF(ABV>M2 AND MMS>MML AND CROSS(ZLGJ,MAZL) AND ZLGJ>REF(ZLGJ,1) AND MAZL>REF(MAZL,1),55,0),COLORFFCC66,POINTDOT;
STICKLINE(主力軌跡,55,0,4,1),COLORFFCC66;
拉升在即:IF(S<X AND Y<X AND MMS>MML AND ABV>M1 AND CROSS(S,Y),50,0),coloryellow,POINTDOT;
STICKLINE(拉升在即,50,0,4,1),coloryellow;
底部構成:IF(V8>=1 AND V9>=1 AND CLOSE>OPEN AND REF(CLOSE,1)>REF(OPEN,1) AND VOL>REF(VOL,1) AND ABV>M2 AND ZLGJ>MAZL,45,0),COLOR00FF00,POINTDOT;
STICKLINE(底部構成,45,0,4,1),COLOR00FF00;
ROC:=(CLOSE-REF(CLOSE,12))/REF(CLOSE,12)*100;
HSL:=100*VOL/CAPITAL;
沖擊波:IF(CROSS(ROC,16) AND HSL>3.5,40,0),COLOR0099FF,POINTDOT;
STICKLINE(沖擊波,40,0,4,1),COLOR0099FF;
DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?