相關標簽:

?

選股 源碼 通達信

?

原理解析：
輸出MA5:收盤價的5日簡單移動平均,線寬為1,畫白色 輸出MA10:收盤價的10日簡單移動平均,線寬為1,畫黃色 輸出MA20:收盤價的20日簡單移動平均,線寬為2,畫洋紅色 輸出MA60:收盤價的60日簡單移動平均,線寬為1,畫綠色 買線賦值:收盤價的4日指數移動平均 賣線賦值:收盤價的20日線性回歸斜率*10+收盤價的35日指數移動平均 當滿足條件買線上穿賣線時,在最低價*1.00位置書寫文字,畫紅色,線寬為2 當滿足條件賣線上穿買線時,在最高價*1.01位置書寫文字,畫綠色 LC賦值:1日前的收盤價 RSI賦值:收盤價-LC和0的較大值的6日[1日權重]移動平均/收盤價-LC的絕對值的6日[1日權重]移動平均*100 當滿足條件90上穿RSI時,在最高價*1.01位置書寫文字,COLOR00FF00 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 輸出主力成本:X的13日指數移動平均,COLORFF00FF,線寬為0 ZZ賦值:(開盤價+最高價+最低價)/3 YC賦值:(最高價+最低價)/2 YCHJX賦值:(ZZ的4日指數移動平均)+(YC-3日前的ZZ)/4 輸出今日買點:ZZ的3日指數移動平均,畫黃色,線寬為0 輸出明日買點:YCHJX,線寬為0 輸出名揚環宇買點:1日前的YCHJX,線寬為0 FF賦值:收盤價的3日指數移動平均 MA15賦值:收盤價的21日指數移動平均 當滿足條件MA15上穿FF時,在(最高價*1.02)位置書寫文字,COLOR00FF00 當滿足條件FF上穿MA15時,在(最低價*0.99)位置書寫文字,COLOR00FFFF 主力進場信號+名揚環宇黑馬選股 源碼 通達信DRAWTEXT_FIX(收陽線,0.01,0.9,0,' www.kzuj.com.cn '),畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色 VAR1賦值:收盤價的5日簡單移動平均 VAR2賦值:收盤價的10日簡單移動平均 VAR3賦值:收盤價的30日簡單移動平均 VAR4賦值:收盤價的60日簡單移動平均 VAR5賦值:獲利盤為85%的成本分布的7日指數移動平均 VAR6賦值:獲利盤為15%的成本分布的7日指數移動平均 VAR7賦值:收盤價*成交量(手)*100的4日累和/成交量(手)*100的4日累和 VAR8賦值:VAR7*100的整數部分/100 VAR9賦值:收盤價*成交量(手)*100的7日累和/成交量(手)*100的7日累和 VARA賦值:VAR9*100的整數部分/100 VARB賦值:收盤價*成交量(手)*100的28日累和/成交量(手)*100的28日累和 VARC賦值:VARB*100的整數部分/100 VARD賦值:收盤價的5日指數移動平均-收盤價的10日指數移動平均 VARE賦值:VARD的9日指數移動平均 VARF賦值:(-100)*(5日內收盤價的最高值-收盤價)/(5日內收盤價的最高值-5日內最低價的最低值)+100 VAR10賦值:(-100)*(10日內收盤價的最高值-收盤價)/(10日內收盤價的最高值-10日內最低價的最低值)+100 VAR11賦值:(-100)*(20日內收盤價的最高值-收盤價)/(20日內收盤價的最高值-20日內最低價的最低值)+100 VAR12賦值:(-100)*(30日內收盤價的最高值-收盤價)/(30日內收盤價的最高值-30日內最低價的最低值)+100 VAR13賦值:1日前的VARE VAR14賦值:VARE VAR15賦值:VAR14-VAR13 VAR16賦值:1日前的VARD VAR17賦值:VARD VAR18賦值:VAR17-VAR16 VAR19賦值:開盤價 VAR1A賦值:收盤價 輸出黑馬選股: VAR19<=VAR1 AND VAR19<=VAR2 AND VAR19<=VAR3 AND VAR1A>=VAR1 AND VAR1A>=VARC AND VAR15>0 AND VAR18>0 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

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

源碼：

?

?

?

MA5:MA(CLOSE,5),LINETHICK1,COLORWHITE;
MA10:MA(CLOSE,10),LINETHICK1,COLORYELLOW;
MA20:MA(CLOSE,20),LINETHICK2,COLORMAGENTA;
MA60:MA(CLOSE,60),LINETHICK1,COLORGREEN;
買線:=EMA(C,4);
賣線:=EMA(SLOPE(C,20)*10+C,35);
DRAWTEXT(CROSS(買線,賣線),LOW*1.00,'←主力進場'),COLORRED,LINETHICK2;
DRAWTEXT(CROSS(賣線,買線),HIGH*1.01,'.'),COLORGREEN;
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
DRAWTEXT(CROSS(90,RSI) , HIGH*1.01,'←獲利先出'),COLOR00FF00 ;
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;
主力成本:EMA(X,13),COLORFF00FF,LINETHICK0;
ZZ:=(O+H+L)/3;
YC:=(H+L)/2;
YCHJX:=(EMA(ZZ,4))+(YC-REF(ZZ,3))/4;
今日買點:EMA(ZZ,3),COLORYELLOW,LINETHICK0;
明日買點:YCHJX,LINETHICK0;
名揚環宇買點:REF(YCHJX,1),LINETHICK0;
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
DRAWTEXT(CROSS(MA15,FF),(HIGH * 1.02),'.'),COLOR00FF00;
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'←主力建倉'),COLOR00FFFF;主力進場信號+名揚環宇黑馬選股 源碼 通達信DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;



VAR1:=MA(CLOSE,5);
VAR2:=MA(CLOSE,10);
VAR3:=MA(CLOSE,30);
VAR4:=MA(CLOSE,60);
VAR5:=EMA(COST(85),7);
VAR6:=EMA(COST(15),7);
VAR7:=SUM(CLOSE*VOL*100,4)/SUM(VOL*100,4);
VAR8:=INTPART(VAR7*100)/100;
VAR9:=SUM(CLOSE*VOL*100,7)/SUM(VOL*100,7);
VARA:=INTPART(VAR9*100)/100;
VARB:=SUM(CLOSE*VOL*100,28)/SUM(VOL*100,28);
VARC:=INTPART(VARB*100)/100;
VARD:=EMA(CLOSE,5)-EMA(CLOSE,10);
VARE:=EMA(VARD,9);
VARF:=(-100)*(HHV(CLOSE,5)-CLOSE)/(HHV(CLOSE,5)-LLV(LOW,5))+100;
VAR10:=(-100)*(HHV(CLOSE,10)-CLOSE)/(HHV(CLOSE,10)-LLV(LOW,10))+100;
VAR11:=(-100)*(HHV(CLOSE,20)-CLOSE)/(HHV(CLOSE,20)-LLV(LOW,20))+100;
VAR12:=(-100)*(HHV(CLOSE,30)-CLOSE)/(HHV(CLOSE,30)-LLV(LOW,30))+100;
VAR13:=REF(VARE,1);
VAR14:=VARE;
VAR15:=VAR14-VAR13;
VAR16:=REF(VARD,1);
VAR17:=VARD;
VAR18:=VAR17-VAR16;
VAR19:=OPEN;
VAR1A:=CLOSE;
黑馬選股: VAR19<=VAR1 AND VAR19<=VAR2 AND VAR19<=VAR3 AND VAR1A>=VAR1 AND VAR1A>=VARC AND VAR15>0 AND VAR18>0;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.kzuj.com.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;


?

?

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

?