通达信淘股七信号及选股指标(源码)

DRAWTEXT(LHT,0.3,'牛势'),COLORRED;
DRAWICON(LHT,0.1,1);
KK:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.14159,COLORSTICK;
MAA:=(KK/REF(KK,1)>=2 AND KK>0 AND C>0 AND (H=HHV(H,10) OR C=HHV(C,10)))*80,STICK,COLORWHITE,LINETHICK3;
QMM:=(MA(C,30)>REF(MA(C,30),1) AND KK/REF(KK,1)>=2 AND KK>0 AND COUNT(KK<REF(KK,1),4)>=1
AND CROSS(KK,45) AND (H=HHV(H,10) OR C=HHV(C,10)))*100,COLORWHITE,LINETHICK2;
N:=14;MM:=6;
MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),N);
HD:=HIGH-REF(HIGH,1);
LD1:=REF(LOW,1)-LOW;
DMP:=EXPMEMA(IF(HD>0&&HD>LD1,HD,0),N);
DMM:=EXPMEMA(IF(LD1>0&&LD1>HD,LD1,0),N);
PDI:=DMP*100/MTR;
MDI:=DMM*100/MTR;
ADX:=EXPMEMA(ABS(MDI-PDI)/(MDI+PDI)*100,MM);
ADXR:=EXPMEMA(ADX,MM);
MAI:=IF(CROSS(PDI,MDI) AND (C >1.05*REF(C,1) OR REF(C,1)>1.05*REF(C,2)) AND (V>2*REF(V,1) OR REF(V,1)>2*REF(V,2))AND MA(V,5)>MA(V,60) ,20,0),COLORRED,LINETHICK2;
RSV9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K1:=SMA(RSV9,3,1);
DK1:=K1-REF(K1,1),COLORSTICK;
MA10:=MA(CLOSE,10),;
MA20:=MA(CLOSE,20);
MA30:=MA(CLOSE,30);
MA60:=MA(CLOSE,60);
Q5:=MA5>REF(MA5,1),;
Q10:=MA10>REF(MA10,1),;
Q20:=MA20>REF(MA20,1),;
Q30:=MA30>REF(MA30,1),;
Q60:=MA60>REF(MA60,1),;
XJQ:=(Q5 AND Q10)*0.5,;
JJD:=(H+L+C)/3;
QSX1:=HHV(MA((((LOW + HIGH) + CLOSE) / 3),8),60),COLORRED,LINETHICK2;
QSX2:=HHV(MA((((LOW + HIGH) + CLOSE) / 3.18),8),20),COLORWHITE,LINETHICK2;
QSX3:=HHV(MA((((LOW + HIGH) + CLOSE) / 3.258),8),10),COLORYELLOW,LINETHICK2;
QSX4:=HHV(MA((((LOW + HIGH) + CLOSE) / 3.08),80),13),COLORLIMAGENTA,LINETHICK2;
ZQ1:=QSX1>REF(QSX1,1),;
ZQ2:=QSX2>REF(QSX2,1),;
ZQ3:=QSX3>REF(QSX3,1),;
ZQ4:=QSX4>REF(QSX3,1),;
SQ1:=ZQ1 AND ZQ2,;
SQ2:=ZQ2 AND ZQ3,;
SQ3:=ZQ2 AND ZQ3,;
SQ4:=ZQ3 AND ZQ4,;
Q3:=ZQ1 AND ZQ2 AND ZQ3,;
Q4:=ZQ1 AND ZQ2 AND ZQ3 AND ZQ4,;
QSWW:=SQ1 OR SQ2 OR SQ3 OR SQ4 OR Q3 OR Q4,;
VV:=(C+L+H)/3;
DSA:=SMA(XMA(VV,15),2,1)LINETHICK3;
DU1:=DSA*0.9518,COLORLICYAN,LINETHICK1;
MA1:=MA(CLOSE,5);
MA2:=MA(CLOSE,10);
MA3:=MA(CLOSE,20);
MA4:=MA(CLOSE,60);
Z5Q:=MA1>REF(MA1,1),;
Z10Q:=MA2>REF(MA2,1),;
Z20Q:=MA3>REF(MA3,1),;
Z60Q:=MA4>REF(MA4,1),;
DS:=Z5Q AND Z10Q AND Z60Q,;
ZSL:=Z5Q AND Z10Q AND Z20Q,;
DZSL:=Z10Q AND Z20Q AND Z60Q,;
DZSL2:=Z5Q AND Z10Q AND Z20Q AND Z60Q,;
ZZS:=ZSL AND DZSL AND DZSL2,;
ZZSL:=DS OR ZSL OR DZSL OR DZSL2 OR ZZS,;
QSZ:=(L<DU1 AND ZZSL AND QSWW AND C<DSA AND UP)*0.5,COLORYELLOW,LINETHICK2;
LO:=(L<DU1 AND C<DSA AND QSWW AND UP)*0.5,COLORMAGENTA,LINETHICK2,LINESTICK;
CJ:=QSZ AND LO AND H<DSA,COLORRED,;
A:=MA(C,30);
A1:=A*1.1;
A4:=A*0.9;
A2:=A1-(A1-A4)*0.191;
CCC:=IF(HIGH*1.01>A2 OR REF(HIGH,1)>REF(A2,1),A1,A4),LINETHICK3,COLORRED;
SSS:=IF(HIGH*1.01>A2 OR REF(HIGH,1)>REF(A2,1),A2,A4),LINETHICK3,COLORFFFFFF;
ZC:=CCC>SSS,;
ZA1:=CCC>REF(CCC,1),;
ZA2:=SSS>REF(SSS,1),;
ZA:=ZA1 AND ZA2,;
ZW:=(CJ AND ZC AND ZA) OR (LO AND ZC AND ZA),;
SSSSS:=((ZW AND XJQ) OR (LO AND XJQ) AND UP)*0.5,COLORLIRED,LINETHICK4,STICK;
DRAWICON(SSSSS>0,0.1,1);




{
选股公式:

VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);
OBV:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);
MAOBV:=MA(OBV,30);
DIF:=(EMA(CLOSE,12)-EMA(CLOSE,26))*1;
DEA:=(EMA(DIF,9))*1;
MACD:=(DIF-DEA)*2;
M:=CROSS(DIF,DEA);
HJZ:=(3*C+H+L+O)/6;
HJZ2:=(8*HJZ+7*REF(HJZ,1)+6*REF(HJZ,2)+5*REF(HJZ,3)+4*REF(HJZ,4)+3*REF(HJZ,5)+2*REF(HJZ,6)+REF(HJZ,8))/36;
HJZ3:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>HJZ2 AND C>O;
H1:=FILTER(HJZ3,5);
HJ:=COUNT(H1,6)=1;
MA6:=MA(CLOSE,60);
MA5:=MA(CLOSE,5);
V05:=MA(VOL,5);
V35:=MA(VOL,35);
VL135:=MA(VOL,135);
ML:=(CROSS(V05,VL135) OR CROSS(V05,V35)) AND OBV>MAOBV;
MLL:=CROSS(C,MA6);
MA13:=EMA(C,13);
UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),0),COLOR0000FF;
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
(MA13,MA5))+1),0),COLOR00FF00;
HR:=HHV(HIGH,55);
HRY:=LLV(LOW,55);
HRY11:=HR*HRY;
HRY33:=SQRT(HRY11);
TJ202:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HRY33;
抓牛:=ML AND MLL AND COUNT(TJ202,50)>=1;
VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA
((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR10:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA

上一页  [1] [2] [3] [4]  下一页