相關標簽:

?

頂和底，指標只是個參考，關鍵還是在自己的能力。

?

原理解析：
輸出FL:收盤價的13日簡單移動平均+收盤價的13日簡單移動平均-1日前的收盤價的13日簡單移動平均的絕對值 輸出FS:收盤價的13日簡單移動平均+收盤價的13日簡單移動平均-1日前的收盤價的13日簡單移動平均 輸出CG:如果收盤價的13日簡單移動平均<FS,返回FS,否則返回收盤價的13日簡單移動平均,COLORF4E202,線寬為2 K1賦值:若CG>1日前的CG則將最近2周期置為1 如果K1,返回CG,否則返回無效數,COLOR00FFFF,線寬為2 C2賦值:1日前的收盤價 漲停賦值:如果(收盤價-C2)*100/C2>=(10-0.01*100/C2),返回1,否則返回0 當滿足條件漲停時,在開盤價和收盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫黃色 跌停賦值:如果(C2-收盤價)*100/C2>=(10-0.01*100/C2),返回1,否則返回0 當滿足條件跌停時,在開盤價和收盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫綠色 當滿足條件跌停時,在最高價和最低價位置之間畫柱狀線,寬度為0,1不為0則畫空心柱.,畫綠色 日賦值:150 昨前賦值:3 高1賦值:昨前日前的日日內最高價的最高值 低1賦值:昨前日前的日日內最低價的最低值 H1賦值:高1-(高1-低1)*0.191 H2賦值:高1-(高1-低1)*0.382 H3賦值:高1-(高1-低1)*0.5 H4賦值:高1-(高1-低1)*0.618 H5賦值:高1-(高1-低1)*0.809 輸出頂:日期日高1,畫綠色,CROSSDOT,線寬為2 輸出低:日期日低1,畫紅色,CROSSDOT,線寬為2 ZF賦值:收盤價/1日前的收盤價>1.04 當滿足條件ZF時,在收盤價和開盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫黃色 當滿足條件收盤價8%的之字轉向上穿1日前的收盤價8%的之字轉向時,在最低價*0.97位置書寫文字 ,線寬為2,COLOR00FFFF 當滿足條件(收盤價5%的之字轉向>1日前的收盤價5%的之字轉向)AND(1日前的收盤價5%的之字轉向<=2日前的收盤價5%的之字轉向)AND(2日前的收盤價5%的之字轉向<=3日前的收盤價5%的之字轉向)時,在最低價*0.99位置畫1號圖標 當滿足條件(收盤價5%的之字轉向=2日前的收盤價5%的之字轉向)AND(2日前的收盤價5%的之字轉向>=3日前的收盤價5%的之字轉向)時,在最高價位置畫2號圖標 AZ6賦值:(3 * ((((收盤價-(27日內最低價的最低值))/((27日內最高價的最高值)-(27日內最低價的最低值)))*100)的5日[1日權重]移動平均)) - (2 * (((((收盤價-(27日內最低價的最低值))/((27日內最高價的最高值)-(27日內最低價的最低值)))*100)的5日[1日權重]移動平均)的3日[1日權重]移動平均)) B7賦值:(10) 當滿足條件AZ6上穿B7時,在最低價位置書寫文字,COLOR0000FF VARC賦值:(收盤價5%的之字轉向>1日前的收盤價5%的之字轉向) AND (1日前的收盤價5%的之字轉向<=2日前的收盤價5%的之字轉向) AND(2日前的收盤價5%的之字轉向<=3日前的收盤價5%的之字轉向) VARD賦值:(收盤價5%的之字轉向=2日前的收盤價5%的之字轉向) AND(2日前的收盤價5%的之字轉向>=3日前的收盤價5%的之字轉向) 當滿足條件(VARC=1)時,在最低價位置書寫文字,COLOR0000FF 當滿足條件(VARD=1)時,在最高價位置書寫文字,COLOR00FF00 A3賦值:(收盤價-9日內最低價的最低值)/(9日內最高價的最高值-9日內最低價的最低值)*100 A4賦值:A3的3日[1日權重]移動平均 A5賦值:A4的3日[1日權重]移動平均 A6賦值:3*A4-2*A5 A7賦值:收盤價-1日前的收盤價 A8賦值:100*A7的6日指數移動平均的6日指數移動平均/A7的絕對值的6日指數移動平均的6日指數移動平均 BDGD賦值:收盤價=10日內收盤價的最高值 GDSJ賦值:上次BDGD距今天數 輸出前高:如果GDSJ>0,返回GDSJ日前的收盤價,否則返回GDSJ日前的收盤價,COLORFFFF00,POINTDOT,線寬為2 買賦值:2日內A8的最低值=7日內A8的最低值 AND 統計2日中滿足A8<0的天數 AND A8上穿A8的2日簡單移動平均 當滿足條件買=1的5日過濾時,在最低價-0.1位置書寫文字,畫黃色 當滿足條件買時,在開盤價和收盤價位置之間畫柱狀線,寬度為2,0不為0則畫空心柱.,畫黃色 輸出黃柱買進:買,畫黃色,NODRAW TIPTEXT(ISNULL(1日后的&收盤價),0,' www.tumamayizhan.com '),畫紅色 TIPTEXT(ISNULL(1日前的收盤價),0,'同花順程序化交易')

?

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

源碼：

?

?

FL:MA(CLOSE,13)+ABS(MA(CLOSE,13)-REF(MA(CLOSE,13),1));
FS:MA(CLOSE,13)+MA(CLOSE,13)-REF(MA(CLOSE,13),1);
CG:IF(MA(CLOSE,13)<FS,FS,MA(CLOSE,13)),COLORF4E202,LINETHICK2;
K1:=BACKSET(CG>REF(CG,1),2);
IF(K1,CG,DRAWNULL),COLOR00FFFF,LINETHICK2;
C2:=REF(C,1);
漲停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(漲停,OPEN,CLOSE,2,0),coloryellow;
跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0);
STICKLINE(跌停,OPEN,CLOSE,2,0),colorgreen;
STICKLINE(跌停,H,L,0,1),colorgreen;
日:=150;昨前:=3;
高1:=REF(HHV(H,日),昨前);
低1:=REF(LLV(L,日),昨前);
H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
H3:=高1-(高1-低1)*0.5;
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
頂:REFDATE(高1,DATE),colorgreen,CROSSDOT,LINETHICK2;
低:REFDATE(低1,DATE),colorred,CROSSDOT,LINETHICK2;
ZF:=C/REF(C,1)>1.04;
STICKLINE(ZF,C,O,2,0),coloryellow;
DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),LOW*0.97,'←機構進場') ,
LINETHICK2,COLOR00FFFF;
DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND
(REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),LOW*0.99,1);
DRAWICON((ZIG(3,5)=REF(ZIG(3,5),2)) AND
(REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),H,2);
AZ6:=(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)));
B7:=(10);
DRAWTEXT(CROSS(AZ6,B7),L,'←底'),COLOR0000FF;
VARC:=(ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND
(REF(ZIG(3,5),2)<=REF(ZIG(3,5),3));
VARD:=(ZIG(3,5)=REF(ZIG(3,5),2)) AND
(REF(ZIG(3,5),2)>=REF(ZIG(3,5),3));
DRAWTEXT((VARC=1),L,'←買'),COLOR0000FF;
DRAWTEXT((VARD=1),H,'←賣'),COLOR00FF00;
A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
A4:=SMA(A3,3,1);
A5:=SMA(A4,3,1);
A6:=3*A4-2*A5;
A7:=C-REF(C,1);
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
BDGD:=C=HHV(C,10);
GDSJ:=BARSLAST(BDGD);
前高:IF(GDSJ>0,REF(C,GDSJ),REF(C,GDSJ)),COLORFFFF00,POINTDOT,LINETHICK2;
買:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2));
DRAWTEXT(FILTER(買=1,5),LOW-0.1,'買'),coloryellow;
STICKLINE(買,OPEN,CLOSE,2,0),coloryellow;
黃柱買進:買,coloryellow,NODRAW;
TIPTEXT(ISNULL(REFX(&CLOSE,1)),0,' www.tumamayizhan.com '),colorred;
TIPTEXT(ISNULL(REF(CLOSE,1)),0,'同花順程序化交易');

?

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

?