相關標簽:

?

?

原理解析：
VAR2賦值:(最高價+最低價+(收盤價)*(2))/(4) BH賦值:(((VAR2-15日內VAR2的最低值)/(15日內最低價的最高值-15日內VAR2的最低值)的2日指數移動平均)*(38)),COLOR0000FF,LINESTICK BL賦值:((((-1))*((VAR2-15日內VAR2的最低值)/(15日內最低價的最高值-15日內VAR2的最低值)的2日指數移動平均)+0.01)*(38)),COLOR339999,LINESTICK VAR22賦值:((收盤價-10日內最低價的最低值)/(10日內最高價的最高值-10日內最低價的最低值))*(100) VAR33賦值:VAR22的10日指數移動平均 VAR44賦值:VAR33的10日指數移動平均 VAR55賦值:(3)*(VAR33)-(2)*(VAR44) VAR66賦值:VAR55的5日指數移動平均 輸出橋:(VAR66的1日指數移動平均),COLOR007700,線寬為1 輸出跨:(橋的相反數),COLORFFFFFF,線寬為1 趨勢賦值:(5)*(((收盤價-27日內最低價的最低值)/(27日內最高價的最高值-27日內最低價的最低值))*(100)的5日[1日權重]移動平均)-(3)*(((收盤價-27日內最低價的最低值)/(27日內最高價的最高值-27日內最低價的最低值))*(100)的5日[1日權重]移動平均的3日[1日權重]移動平均)-((收盤價-27日內最低價的最低值)/(27日內最高價的最高值-27日內最低價的最低值))*(100)的5日[1日權重]移動平均的3日[1日權重]移動平均的2日[1日權重]移動平均 底部賦值:5 當滿足條件(趨勢)上穿底部時,在15位置書寫文字,COLOR00FFFF VARA1賦值:((收盤價>=1日前的收盤價) AND (1日前的收盤價>=2日前的收盤價) AND (1日前的收盤價<=3日前的收盤價)AND (2日前的收盤價<=3日前的收盤價) AND ((4日前的收盤價>2日前的收盤價) OR (4日前的收盤價<=2日前的收盤價)AND (5日前的收盤價>=3日前的收盤價)) OR (收盤價>=1日前的收盤價) AND (1日前的收盤價<=2日前的收盤價)AND (收盤價>=2日前的收盤價) AND ((3日前的收盤價>1日前的收盤價) OR (3日前的收盤價<=1日前的收盤價) AND (4日前的收盤價>=2日前的收盤價))) VARA2賦值:5日內最低價的最低值 VARA3賦值:5日內最高價的最高值 VARA4賦值:((收盤價-VARA2)/(VARA3-VARA2))*(100)的1日指數移動平均 VARA5賦值:(0.66699999)*(1日前的VARA4)+(0.333)*(VARA4)的2日指數移動平均 VARA6賦值:(VARA5<24) AND (開盤價<收盤價的20日簡單移動平均) VARA1 AND (VARA6),COLORFF0000 當滿足條件VARA1AND(VARA6)時,在-40和40位置之間畫柱狀線,寬度為10,1不為0則畫空心柱.,COLOR2894FF VARB2賦值:((收盤價-10日內最低價的最低值)/(10日內最高價的最高值-10日內最低價的最低值))*(100) VARB3賦值:VARB2的7日指數移動平均 VARB4賦值:VARB3的10日指數移動平均 VARB5賦值:(3)*(VARB3)-(2)*(VARB4) VARB6賦值:VARB5的5日指數移動平均 趨勢1賦值:(3)*(((收盤價-27日內最低價的最低值)/(27日內最高價的最高值-27日內最低價的最低值))*(100)的5日[1日權重]移動平均)-(2)*(((收盤價-27日內最低價的最低值)/(27日內最高價的最高值-27日內最低價的最低值))*(100)的5日[1日權重]移動平均的3日[1日權重]移動平均) 輸出探底:如果(趨勢<=5),返回58,否則返回0,COLORFF00FF 橋1賦值:VARB6的1日指數移動平均 美化賦值:如果1日前的(統計5日中滿足(橋1<=1日前的橋1)的天數=5)AND(橋1>1日前的橋1),返回10,否則返回0 當滿足條件(美化)時,在-20和20位置之間畫柱狀線,寬度為15,1不為0則畫空心柱.,COLORFFFF00 輸出MTM1:(收盤價-13日前的收盤價)*31的5日簡單移動平均,線寬為1,COLOR7711EE VARF1賦值:485日內最高價的最高值的17日簡單移動平均 VARF2賦值:222日內最高價的最高值的17日簡單移動平均 VARF3賦值:96日內最高價的最高值的17日簡單移動平均 VARF4賦值:485日內最低價的最低值的17日簡單移動平均 VARF5賦值:222日內最低價的最低值的17日簡單移動平均 VARF6賦值:96日內最低價的最低值的17日簡單移動平均 VARF7賦值:(VARF4*0.96+VARF5*0.96+VARF6*0.96+VARF1*0.558+VARF2*0.558+VARF3*0.558)/6的17日簡單移動平均 VARF8賦值:(VARF4*1.25+VARF5*1.23+VARF6*1.2+VARF1*0.55+VARF2*0.55+VARF3*0.65)/6的17日簡單移動平均 VARF9賦值:(VARF4*1.3+VARF5*1.3+VARF6*1.3+VARF1*0.68+VARF2*0.68+VARF3*0.68)/6的17日簡單移動平均 VARFA賦值:(VARF7*3+VARF8*2+VARF9)/6*1.738的17日簡單移動平均 VARFB賦值:如果收盤價=收盤價,返回VARFA,否則返回VARFA*日 VARFC賦值:最低價 VARFD賦值:1日前的最低價 VARFE賦值:VARFC-VARFD的絕對值的3日[1日權重]移動平均/VARFC-VARFD和0的較大值的3日[1日權重]移動平均*100 VARFF賦值:如果收盤價*1.35<=VARFB,返回VARFE*10,否則返回VARFE/10的3日簡單移動平均 VARF10賦值:30日內最低價的最低值 VARF11賦值:30日內VARFF的最高值 輸出絕佳買點:如果收盤價=收盤價,返回如果最低價<=VARF10,返回(VARFF+VARF11*2)/2,否則返回0的3日簡單移動平均,否則返回100000000/(200),畫紅色,線寬為2 I賦值:如果收盤價<1日前的收盤價,返回0,否則返回成交量(手)/當前流通股本(手) 驟雨初晴賦值:I的13.3日指數移動平均-18的絕對值/以收盤價計算的獲利盤比例*如果(收盤價-收盤價的6日簡單移動平均)/收盤價的6日簡單移動平均<-0.04,返回1,否則返回0 W賦值:獲利盤為10%的成本分布*0 DIFF賦值:收盤價的12日指數移動平均 - 收盤價的26日指數移動平均,畫紅色 DEA賦值:DIFF的9日指數移動平均,畫黃色 MACD賦值:2*(DIFF-DEA)*231,STICK,畫紅色,線寬為1 當滿足條件MACD<1日前的MACDANDMACD>0時,在0和MACD位置之間畫柱狀線,寬度為0.9,0不為0則畫空心柱.,COLOR00FFFF 當滿足條件MACD<=1日前的MACDANDMACD<0時,在0和MACD位置之間畫柱狀線,寬度為0.8,0不為0則畫空心柱.,COLORFFEE44 當滿足條件MACD>=1日前的MACDANDMACD>0時,在0和MACD位置之間畫柱狀線,寬度為1.1,0不為0則畫空心柱.,COLOR0055FF 當滿足條件MACD>1日前的MACDANDMACD<0時,在0和MACD位置之間畫柱狀線,寬度為1.1,0不為0則畫空心柱.,COLORFF55BB 當滿足條件絕佳買點上穿1.20000時,在-32位置書寫文字,畫黃色,線寬為2 當滿足條件絕佳買點上穿4.50000時,在63位置書寫文字,COLOR00FFFF,線寬為2 當滿足條件絕佳買點上穿3.60000時,在28位置書寫文字,COLORFF00FF,線寬為4 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

?

?

?

VAR2:=(HIGH+LOW+(CLOSE)*(2))/(4);
BH:=((EMA((VAR2-LLV(VAR2,15))/(HHV(LOW,15)-LLV(VAR2,15)),2))*(38)),COLOR0000FF,LINESTICK;
BL:=((((-1))*(EMA((VAR2-LLV(VAR2,15))/(HHV(LOW,15)-LLV(VAR2,15)),2))+0.01)*(38)),COLOR339999,LINESTICK;
VAR22:=((CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10)))*(100);
VAR33:=EMA(VAR22,10);
VAR44:=EMA(VAR33,10);
VAR55:=(3)*(VAR33)-(2)*(VAR44);
VAR66:=EMA(VAR55,5);
橋:(EMA(VAR66,1)),COLOR007700,LINETHICK1;
跨:(REVERSE(橋)),COLORFFFFFF,LINETHICK1;
{(0),COLORFFFF00,LINETHICK3;}
趨勢:=(5)*(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100),5,1))-(3)*(SMA(SMA(((CLOSE-LLV(LOW,27))
/(HHV(HIGH,27)-LLV(LOW,27)))*(100),5,1),3,1))-SMA(SMA(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100),5,1),3,1),2,1);
底部:=5;
{底:DRAWTEXT((CROSS(趨勢,底部)),0,'◥◤'),COLOR00FFFF;}DRAWTEXT(CROSS((趨勢),底部),15,'◢◣'),COLOR00FFFF;
{DRAWTEXT(CROSS(趨勢,底部),0,''),COLORRED;
DRAWTEXT(CROSS(趨勢,底部),20,'●'),COLORGREEN;}
VARA1:=((CLOSE>=REF(CLOSE,1)) AND (REF(CLOSE,1)>=REF(CLOSE,2)) AND (REF(CLOSE,1)<=REF(CLOSE,3))
AND (REF(CLOSE,2)<=REF(CLOSE,3)) AND ((REF(CLOSE,4)>REF(CLOSE,2)) OR (REF(CLOSE,4)<=REF(CLOSE,2))
AND (REF(CLOSE,5)>=REF(CLOSE,3))) OR (CLOSE>=REF(CLOSE,1)) AND (REF(CLOSE,1)<=REF(CLOSE,2))
AND (CLOSE>=REF(CLOSE,2)) AND ((REF(CLOSE,3)>REF(CLOSE,1)) OR (REF(CLOSE,3)<=REF(CLOSE,1)) AND (REF(CLOSE,4)>=REF(CLOSE,2))));
VARA2:=LLV(LOW,5);
VARA3:=HHV(HIGH,5);
VARA4:=EMA(((CLOSE-VARA2)/(VARA3-VARA2))*(100),1);
VARA5:=EMA((0.66699999)*(REF(VARA4,1))+(0.333)*(VARA4),2);
VARA6:=(VARA5<24) AND (OPEN<MA(CLOSE,20));
VARA1 AND (VARA6),COLORFF0000;
STICKLINE(VARA1 AND (VARA6),-40,40,10,1),COLOR2894FF;
VARB2:=((CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10)))*(100);
VARB3:=EMA(VARB2,7);
VARB4:=EMA(VARB3,10);
VARB5:=(3)*(VARB3)-(2)*(VARB4);
VARB6:=EMA(VARB5,5);
趨勢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));
探底:IF((趨勢<=5),58,0),COLORFF00FF;
橋1:=EMA(VARB6,1);
美化:=IF(REF((COUNT((橋1<=REF(橋1,1)),5)=5),1) AND (橋1>REF(橋1,1)),10,0);
STICKLINE((美化),-20,20,15,1),COLORFFFF00;
MTM1:MA((CLOSE-REF(CLOSE,13))*31,5),LINETHICK1,COLOR7711EE;
VARF1:=MA(HHV(HIGH,485),17);
VARF2:=MA(HHV(HIGH,222),17);
VARF3:=MA(HHV(HIGH,96),17);
VARF4:=MA(LLV(LOW,485),17);
VARF5:=MA(LLV(LOW,222),17);
VARF6:=MA(LLV(LOW,96),17);
VARF7:=MA((VARF4*0.96+VARF5*0.96+VARF6*0.96+VARF1*0.558+VARF2*0.558+VARF3*0.558)/6,17);
VARF8:=MA((VARF4*1.25+VARF5*1.23+VARF6*1.2+VARF1*0.55+VARF2*0.55+VARF3*0.65)/6,17);
VARF9:=MA((VARF4*1.3+VARF5*1.3+VARF6*1.3+VARF1*0.68+VARF2*0.68+VARF3*0.68)/6,17);
VARFA:=MA((VARF7*3+VARF8*2+VARF9)/6*1.738,17);
VARFB:=IF(C=C,VARFA,VARFA*DAY);
VARFC:=LOW;
VARFD:=REF(LOW,1);
VARFE:=SMA(ABS(VARFC-VARFD),3,1)/SMA(MAX(VARFC-VARFD,0),3,1)*100;
VARFF:=MA(IF(CLOSE*1.35<=VARFB,VARFE*10,VARFE/10),3);
VARF10:=LLV(LOW,30);
VARF11:=HHV(VARFF,30);
絕佳買點:IF(C=C,MA(IF(LOW<=VARF10,(VARFF+VARF11*2)/2,0),3),100000000)/(200),COLORRED,LINETHICK2;
I:=IF(CLOSE<REF(CLOSE,1),0,VOL/CAPITAL);
驟雨初晴:=ABS(EMA(I,13.3)-18)/WINNER(CLOSE)*IF((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)<-0.04,1,0);
W:=COST(10)*0;
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26),COLORRED;
DEA:=EMA(DIFF,9),COLORYELLOW;
MACD:=2*(DIFF-DEA)*231,STICK,COLORRED,LINETHICK1;
STICKLINE(MACD<REF(MACD,1)AND MACD>0,0,MACD,0.9,0),COLOR00FFFF;
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,0,MACD,0.8,0 ),COLORFFEE44;
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,0,MACD,1.1,0 ),COLOR0055FF;
STICKLINE(MACD>REF(MACD,1)AND MACD<0,0,MACD,1.1,0 ),COLORFF55BB;
DRAWTEXT(CROSS(絕佳買點,1.20000) ,-32,'瘋牛'),COLORYELLOW,LINETHICK2 ;
DRAWTEXT(CROSS(絕佳買點,4.50000) ,63,'傾家蕩產買'),COLOR00FFFF,LINETHICK2;
{DRAWTEXT(CROSS(絕佳買點,7.00000) ,88,'瘋牛3'),COLORCYAN,LINETHICK4;}
DRAWTEXT(CROSS(絕佳買點,3.60000) ,28,'瘋牛2'),COLORFF00FF,LINETHICK4;
{DRAWTEXT(CROSS(絕佳買點,2.40000) ,-55,'瘋牛1'),COLORFFFFCC,LINETHICK3 ; };DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?