相關(guān)標(biāo)簽:大智慧漲停選股公式 、 大智慧分時選股 、 編寫大智慧選股公式 、 大智慧選股公式編譯 、 大智慧選股公式編輯 、 底分型選股公式大智慧 、 大智慧選股公式大集合 、 成功率100的選股公式 、 成功率最高的選股公式 、 通達(dá)信30分鐘選股公式 、 麟龍三紅選股公式 、 大智慧公式編寫教程 、

?

霸占大牛股及選股{霸占大牛股}

?

原理解析：
A4賦值:收盤價(jià)的20日簡單移動平均 A5賦值:(收盤價(jià) > 收盤價(jià)的5日簡單移動平均) A6賦值:(收盤價(jià)的5日簡單移動平均 > 收盤價(jià)的10日簡單移動平均) A7賦值:(收盤價(jià) > 收盤價(jià)的10日簡單移動平均) A8賦值:(收盤價(jià)的5日簡單移動平均 > 收盤價(jià)的20日簡單移動平均) A9賦值:(收盤價(jià) > 收盤價(jià)的20日簡單移動平均) A10賦值:1日前的A4 A11賦值:(A4 > A10) AVX賦值:(((((如果A5,返回10,否則返回(0-10) + 如果A6,返回10,否則返回(0-10)) + 如果A7,返回10,否則返回(0-10)) + 如果A8,返回10,否則返回(0-10)) + 如果A9,返回10,否則返回(0-10)) + 如果A11,返回10,否則返回(0-10)) DSLX賦值:(收盤價(jià) / 大盤的收盤價(jià)) DSLX1賦值:DSLX的5日簡單移動平均 DSLX2賦值:DSLX的10日簡單移動平均 V1賦值:成交量(手)的5日簡單移動平均 V2賦值:成交量(手)的10日簡單移動平均 MC賦值:1日前的收盤價(jià) 阻力位賦值:如果(收盤價(jià)>200),返回(收盤價(jià)*1.01),否則返回(收盤價(jià)*1.07) 阻力位１賦值:如果(收盤價(jià)<10),返回(收盤價(jià)*1.05),否則返回阻力位 止損位賦值:如果(收盤價(jià)>200),返回(收盤價(jià)*0.99),否則返回(收盤價(jià)*0.93) 止損位１賦值:如果(收盤價(jià)<10),返回(收盤價(jià)*0.95),否則返回止損位 阻力位A賦值:如果(MC>200),返回(MC*1.01),否則返回(MC*1.07) 阻力位2賦值:如果(MC<10),返回(MC*1.05),否則返回阻力位A 止損位B賦值:如果(MC>200),返回(MC*0.99),否則返回(MC*0.93) 止損位2賦值:如果(MC<10),返回(MC*0.95),否則返回止損位B TJTS1賦值:數(shù)據(jù)位置狀態(tài)=2 AND 收盤價(jià)<200 TJTS2賦值:數(shù)據(jù)位置狀態(tài)=2 AND 收盤價(jià)>200 輸出DRAWTEXTABS(58,80,'[昨/今日 止損位 :'+NUMTOSTRN(止損位B,2)+'/'+NUMTOSTRN(止損位１,2)+'**]'),線寬為1,COLOR00FF00 輸出DRAWTEXTABS(58,95,'[昨/今日 阻力位 :'+NUMTOSTRN(阻力位2,2)+'/'+NUMTOSTRN(阻力位１,2)+']'),線寬為1,COLORFEBAF5 輸出M5:收盤價(jià)的34日指數(shù)移動平均,COLORFFAA66,線寬為2 輸出M6:收盤價(jià)的55日指數(shù)移動平均,畫藍(lán)色,線寬為3 輸出M7:收盤價(jià)的75日簡單移動平均,COLOR00FFFF,線寬為1 輸出M8:M7的3日指數(shù)移動平均,COLOR00FFFF,線寬為1 輸出M9:M8的3日指數(shù)移動平均,COLOR00FFFF,線寬為1 輸出M11:M9的3日指數(shù)移動平均,COLOR00FFFF,線寬為1 輸出MA47:收盤價(jià)的44日指數(shù)移動平均,COLORFFAA66,線寬為2 輸出MA60:收盤價(jià)的60日指數(shù)移動平均,畫藍(lán)色,線寬為3 Y賦值:(最高價(jià)+最低價(jià))/5 AO賦值:Y的5日簡單移動平均-Y的34日簡單移動平均 DU0賦值:AO上穿0 UD0賦值:0上穿AO TDU0賦值:上次DU0距今天數(shù) TUD0賦值:上次UD0距今天數(shù) DU3賦值:1日前的DU0 UD3賦值:1日前的UD0 TDU3賦值:上次DU3距今天數(shù) TUD3賦值:上次UD3距今天數(shù) 輸出UDGLINE:如果TDU3<TUD3,返回TDU3日前的2日內(nèi)最高價(jià)的最高值,否則返回TUD3日前的2日內(nèi)最低價(jià)的最低值,畫黃色 JDU0賦值:1日前的收盤價(jià)<=1日前的UDGLINE AND 收盤價(jià)>UDGLINE AND TDU0<TUD0 JUD0賦值:1日前的收盤價(jià)>=1日前的UDGLINE AND 收盤價(jià)<UDGLINE AND TUD0<TDU0 JDU1賦值:JDU0 AND 統(tǒng)計(jì)TDU0日中滿足JDU0的天數(shù)=1 JUD1賦值:JUD0 AND 統(tǒng)計(jì)TUD0日中滿足JUD0的天數(shù)=1 JDU2賦值:JDU1 AND 1日前的上次JUD1距今天數(shù)<1日前的上次JDU1距今天數(shù) JUD2賦值:JUD1 AND 1日前的上次JUD1距今天數(shù)>1日前的上次JDU1距今天數(shù) JDU3賦值:JDU1 AND 1日前的上次JUD1距今天數(shù)>1日前的上次JDU1距今天數(shù) JUD3賦值:JUD1 AND 1日前的上次JUD1距今天數(shù)<1日前的上次JDU1距今天數(shù) 當(dāng)滿足條件JDU2時,在M9*0.90位置書寫文字,畫黃色 當(dāng)滿足條件M6上穿M9時,在M9*0.98位置書寫文字,COLOR0000FF 賦值: 1日前的最高價(jià)-1日前的最低價(jià) 重心賦值:(最高價(jià) + 最低價(jià) + 收盤價(jià))/3 壓力Ⅰ賦值: 2*重心-最低價(jià) 壓力Ⅱ賦值: 重心 + PT 支撐Ⅰ賦值: 2*重心-最高價(jià) 支撐Ⅱ賦值: 重心 - PT DRAWTEXTABS(75,8,' 《霸占大牛股》'),COLORFFFF00 輸出DRAWTEXTABS(150,8,' 重心:'+重心),COLOR208FFF DRAWTEXTABS(75,27,' 支 撐'),COLORFFFFFF DRAWTEXTABS(75,44,' '+支撐Ⅰ),COLORFFFFFF DRAWTEXTABS(75,62,' '+支撐Ⅱ),COLORFFFFFF DRAWTEXTABS(75,27,' 壓 力'),COLOR00FF00 DRAWTEXTABS(75,44,' ' +壓力Ⅰ),COLOR00FF00 DRAWTEXTABS(75,62,' ' +壓力Ⅱ),COLOR00FF00 DRAWTEXTABS(75,5,'│'),COLOR00FFFF DRAWTEXTABS(75,17,'│'),COLOR00FFFF DRAWTEXTABS(75,29,'│'),COLOR00FFFF DRAWTEXTABS(75,41,'│'),COLOR00FFFF DRAWTEXTABS(75,53,'│'),COLOR00FFFF DRAWTEXTABS(75,65,'│'),COLOR00FFFF DRAWTEXTABS(218,5,'│'),COLOR00FFFF DRAWTEXTABS(218,17,'│'),COLOR00FFFF DRAWTEXTABS(218,29,'│'),COLOR00FFFF DRAWTEXTABS(218,41,'│'),COLOR00FFFF DRAWTEXTABS(218,53,'│'),COLOR00FFFF DRAWTEXTABS(218,65,'│'),COLOR00FFFF DRAWTEXTABS(146,25,'│'),COLOR00FFFF DRAWTEXTABS(146,29,'│'),COLOR00FFFF DRAWTEXTABS(146,41,'│'),COLOR00FFFF DRAWTEXTABS(146,53,'│'),COLOR00FFFF DRAWTEXTABS(146,65,'│'),COLOR00FFFF DRAWTEXTABS(80,0,'────────────'),COLOR00FFFF DRAWTEXTABS(80,20,'────────────'),COLOR00FFFF DRAWTEXTABS(80,37,'────────────'),COLOR00FFFF DRAWTEXTABS(80,54,'────────────'),COLOR00FFFF DRAWTEXTABS(80,71,'────────────'),COLOR00FFFF CXH賦值:STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1)) 輸出WARNING('HTTP://www.weiqiv.net.cn',CURRENTTIME>180000 AND (CXH=1 OR CXH=6)) DRAWTEXTREL(10 ,10 ,'指標(biāo)公式')

?

?來源:程序化99（ www.weiqiv.net.cn ）

源碼：

?

A4:=MA(CLOSE,20);
A5:=(CLOSE > MA(CLOSE,5));
A6:=(MA(CLOSE,5) > MA(CLOSE,10));
A7:=(CLOSE > MA(CLOSE,10));
A8:=(MA(CLOSE,5) > MA(CLOSE,20));
A9:=(CLOSE > MA(CLOSE,20));
A10:=REF(A4,1);
A11:=(A4 > A10);
AVX:=(((((IF(A5,10,(0 - 10)) + IF(A6,10,(0 - 10))) + IF(A7,10,(0 - 10))) + IF(A8,10,(0 - 10))) + IF(A9,10,(0 - 10))) + IF(A11,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);
mc:=REF(c,1);
阻力位:=IF((CLOSE > 200),(CLOSE * 1.01),(CLOSE * 1.07));
阻力位１:=IF((CLOSE < 10),(CLOSE * 1.05),阻力位);
止損位:=IF((CLOSE > 200),(CLOSE * 0.99),(CLOSE * 0.93));
止損位１:=IF((CLOSE < 10),(CLOSE * 0.95),止損位);
阻力位a:=IF((mc > 200),(mc * 1.01),(mc * 1.07));
阻力位2:=IF((mc < 10),(mc * 1.05),阻力位a);
止損位b:=IF((mc > 200),(mc * 0.99),(mc * 0.93));
止損位2:=IF((mc < 10),(mc * 0.95),止損位b);
TJTS1:=BARSTATUS=2 and c<200;
TJTS2:=BARSTATUS=2 and c>200;
DRAWTEXTABS(58,80,'[昨/今日 止損位 :'+NUMTOSTRn(止損位b,2)+'/'+NUMTOSTRn(止損位１,2)+'**]'),LINETHICK1,COLOR00FF00;
DRAWTEXTABS(58,95,'[昨/今日 阻力位 :'+NUMTOSTRn(阻力位2,2)+'/'+NUMTOSTRn(阻力位１,2)+']'),LINETHICK1,colorFEBAF5;
M5:EMA(C,34),COLORFFAA66,LINETHICK2;
M6:EMA(C,55),COLORBLUE,LINETHICK3;
M7:MA(C,75),COLOR00FFFF,LINETHICK1;
M8:EMA(M7,3),COLOR00FFFF,LINETHICK1;
M9:EMA(M8,3),COLOR00FFFF,LINETHICK1;
M11:EMA(M9,3),COLOR00FFFF,LINETHICK1;
MA47:EMA(CLOSE,44),COLORFFAA66,LINETHICK2;
MA60:EMA(CLOSE,60),COLORBLUE,LINETHICK3;
Y:=(H+L)/5;
AO:=MA(Y,5)-MA(Y,34 );
DU0:=CROSS(AO,0);
UD0:=CROSS(0,AO);
TDU0:=BARSLAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
UDGLINE:IF(TDU3<TUD3,REF(HHV(H,2),TDU3),REF(LLV(L,2),TUD3)),COLORYELLOW;
JDU0:=REF(C,1)<=REF(UDGLINE,1) AND C>UDGLINE AND TDU0<TUD0;
JUD0:=REF(C,1)>=REF(UDGLINE,1) AND C<UDGLINE AND TUD0<TDU0;
JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1;
JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1;
JDU2:=JDU1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
JUD2:=JUD1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
JDU3:=JDU1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
JUD3:=JUD1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
DRAWTEXT(JDU2,M9*0.90,'【鎖定】'),COLORYELLOW;
DRAWTEXT(CROSS(M6,M9),M9*0.98,'【霸占】'),COLOR0000FF;
PT := REF(HIGH,1)-REF(LOW,1);
重心:=(HIGH + LOW + CLOSE)/3;
壓力Ⅰ:= 2*重心-LOW;
壓力Ⅱ:= 重心 + PT;
支撐Ⅰ:= 2*重心-HIGH;
支撐Ⅱ:= 重心 - PT;
DRAWTEXTABS(75,8,' 《霸占大牛股》'),ColorFFFF00;
DRAWTEXTABS(150,8,' 重心:'+重心),Color208FFF;
DRAWTEXTABS(75,27,' 支 撐'),ColorFFFFFF;
DRAWTEXTABS(75,44,' '+支撐Ⅰ),ColorFFFFFF;
DRAWTEXTABS(75,62,' '+支撐Ⅱ),ColorFFFFFF;
DRAWTEXTABS(75,27,' 壓 力'),Color00FF00;
DRAWTEXTABS(75,44,' ' +壓力Ⅰ),Color00FF00;
DRAWTEXTABS(75,62,' ' +壓力Ⅱ),Color00FF00;
DRAWTEXTABS(75,5,'│'),Color00FFFF;
DRAWTEXTABS(75,17,'│'),Color00FFFF;
DRAWTEXTABS(75,29,'│'),Color00FFFF;
DRAWTEXTABS(75,41,'│'),Color00FFFF;
DRAWTEXTABS(75,53,'│'),Color00FFFF;
DRAWTEXTABS(75,65,'│'),Color00FFFF;
DRAWTEXTABS(218,5,'│'),Color00FFFF;
DRAWTEXTABS(218,17,'│'),Color00FFFF;
DRAWTEXTABS(218,29,'│'),Color00FFFF;
DRAWTEXTABS(218,41,'│'),Color00FFFF;
DRAWTEXTABS(218,53,'│'),Color00FFFF;
DRAWTEXTABS(218,65,'│'),Color00FFFF;
DRAWTEXTABS(146,25,'│'),Color00FFFF;
DRAWTEXTABS(146,29,'│'),Color00FFFF;
DRAWTEXTABS(146,41,'│'),Color00FFFF;
DRAWTEXTABS(146,53,'│'),Color00FFFF;
DRAWTEXTABS(146,65,'│'),Color00FFFF;
DRAWTEXTABS(80,0,'────────────'),Color00FFFF;
DRAWTEXTABS(80,20,'────────────'),Color00FFFF;
DRAWTEXTABS(80,37,'────────────'),Color00FFFF;
DRAWTEXTABS(80,54,'────────────'),Color00FFFF;
DRAWTEXTABS(80,71,'────────────'),Color00FFFF;CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.weiqiv.net.cn',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指標(biāo)公式');




{鎖定選股}
Y:=(H+L)/5;
AO:=MA(Y,5)-MA(Y,34 );
DU0:=CROSS(AO,0);
UD0:=CROSS(0,AO);
TDU0:=BARSLAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
UDGLINE:=IF(TDU3<TUD3,REF(HHV(H,2),TDU3),REF(LLV(L,2),TUD3));
JDU0:=REF(C,1)<=REF(UDGLINE,1) AND C>UDGLINE AND TDU0<TUD0;
JUD0:=REF(C,1)>=REF(UDGLINE,1) AND C<UDGLINE AND TUD0<TDU0;
JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1;
JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1;
JDU2:=JDU1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
霸占鎖定:JDU2;

?

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

?