打印本文
關(guān)閉窗口
相關(guān)標(biāo)簽:
?
?
原理解析：
?
?來(lái)源:程序化99（ www.tumamayizhan.com ）
源碼：
?
?
?
SDRAW:=O;
EDRAW:=C;
LW:=3;
QSA:=(MA(C,60)-REF(MA(C,60),10))/REF(MA(C,60),10)*100;
QS:=SMA(QSA,10,1);
STICKLINE(QS>3 AND C>O,SDRAW,EDRAW,LW,0),COLOR0000CC;
STICKLINE(QS<-3 AND C<O,SDRAW,EDRAW,LW,1),COLORFFFF00;
PZ:=QS<3 AND QS>-3;
HBPZ:=PZ AND MA(C,20)>MA(C,120)AND C>MA(C,250) AND MA(C,60)<HHV(MA(C,60),5);
DRAWTEXT(HBPZ AND HBPZ!=REF(HBPZ,1),H*1.05,'△大頂'),COLORYELLOW;
LBPZ:=PZ AND MA(C,20)<MA(C,60)AND C<MA(C,250) AND MA(C,120)>LLV(MA(C,120),5) AND MA(C,60)>LLV(MA(C,60),5);
DRAWTEXT(LBPZ AND LBPZ!=REF(LBPZ,1),L*0.95,'▼大底'),COLORYELLOW;
RSV:=(C - LLV(LOW,27))/(HHV(HIGH,3) - LLV(LOW,27)) * 100;
F := SMA(RSV, 3, 1);
K := SMA(F,3, 1);
D := SMA(K,3, 1);
WAV:=3*K-2*D;
A1:=IF(1,C,IF(C<REF(O,1) AND L<REF(L,1),L,C));
A2:=IF(C<REF(L,1),L,A1);
A3:=IF(H<REF(O,1),L,A2);
A4:=IF(O<=REF(C,1) AND C<REF(O,1),L,A3);
A:=IF(C<O AND O<REF(O,1) AND L<REF(L,1),L,A4);
AJ1:=ATAN((A/REF(A,1)-1)*100)*180/3.1416;
LJIAO:=ATAN((VOL/REF(VOL,1)-1)*100)*180/3.1416;
DSLJ:=LJIAO>0 AND ABS(LJIAO-AJ1)<30;
JIA5:=WAV-REF(WAV,4)>50;
DSALE:=DSLJ AND (JIA5 OR WAV>90);
DILJ:=LJIAO<0 AND ABS(LJIAO-AJ1)<30;
JIA6:=WAV-REF(WAV,4)<-50;
DBUY:=DILJ AND (JIA6 OR WAV<10);
PLX:=((C-MA(C,10))/MA(C,10)+(C-MA(C,5))/MA(C,5))*100;
DING1:=PLX>25;
DI1:=PLX<-25;
跌幅:=(C-HHV(C,10))/HHV(C,10)*100;
DI2:=跌幅<-20;
漲幅:=(C-LLV(C,10))/LLV(C,10)*100;
DING2:=漲幅>20;
DING:=DSALE OR DING2;
DI:=DBUY OR DI1 OR DI2;
DS:=QS<-3 OR MA(C,60)<REF(MA(C,60),1);
QC:=DS AND DING AND DING!=REF(DING,1);
DRAWTEXT(QC,H*1.05,'◇做空'),COLORRED;
SS:=QS>3 AND C/MA(C,60)>0.9;
CD:=SS AND DI AND DI!=REF(DI,1);
DRAWTEXT(CD,L*0.98,'◆做多'),COLORGREEN;
RSVL:=(VOL-LLV(VOL,20))/(HHV(VOL,20)-LLV(VOL,20))*100;
KL:=SMA(RSVL,3,1);
DL:=SMA(KL,3,1);
JL:=3*KL-2*DL;
RSVL1:=(L-LLV(L,17))/(HHV(L,17)-LLV(L,17))*100;
KL1:=SMA(RSVL1,3,1);
DL1:=SMA(KL1,3,1);
SL1:=QS<-3 AND ((CROSS(JL,DL) AND DL<30) OR KL<10);
SL:=IF(REF(SL1,1),REF(SL1,1),SL1);
DFC:=(HHV(C,10)-C)/HHV(C,10)*100;
抄底:=(DFC>15 AND (CROSS(KL1,DL1) OR KL1<1) AND HHV(SL,10));
CDX:=HHV(抄底,15) AND HHV(QC,10)=0;
RSVH:=(H-LLV(H,17))/(HHV(H,17)-LLV(H,17))*100;
KH:=SMA(RSVH,3,1);
DH:=SMA(KH,3,1);
FL1:=QS>3 AND ((CROSS(KL,DL) AND DL>50) OR KL>90);
FL:=IF(REF(FL1,1),REF(FL1,1),FL1);
ZFC:=(C-LLV(C,10))/LLV(C,10)*100;
逃頂:=(ZFC>15 AND (CROSS(DH,KH) OR KH>95) AND HHV(FL,10));
TDX:=HHV(逃頂,15) AND HHV(CD,10)=0;
STICKLINE(CDX+TDX,SDRAW,EDRAW,LW,IF(CDX,1,0)),COLORYELLOW;
SXGL:=(ABS(MA(C,5)-MA(C,20))/MA(C,20)+ABS(MA(C,10)-MA(C,20))/MA(C,20))*100;
RSVJ:=(SXGL - LLV(SXGL,10))/(HHV(SXGL,10) - LLV(SXGL,10)) * 100;
KJ:=SMA(RSVJ,3, 1);
變盤(pán):=IF(KJ>98,IF(MA(C,60)>REF(MA(C,60),2),-1,IF(MA(C,60)<REF(MA(C,60),2),1,0)),0);
STICKLINE(變盤(pán)>0 OR 變盤(pán)<0,SDRAW,EDRAW,LW,IF(變盤(pán)>0,1,0)),COLORFF00FF;
MA1:MA(C,5),COLORRED,LINETHICK2;
MA2:MA(C,10),COLORYELLOW,LINETHICK2;
MA3:MA(C,30),COLOR9933CC,LINETHICK2;
MA4:MA(C,60),COLORGREEN,LINETHICK1;
K1:=BACKSET(MA1<REF(MA1,1),2);
MA5:IF(K1,MA1,DRAWNULL),COLOR00CC33,LINETHICK2;
K2:=BACKSET(MA2<REF(MA2,1),2);
MA10:IF(K2,MA2,DRAWNULL),COLORFFCC66,LINETHICK2;
K3:=BACKSET(MA3<REF(MA3,1),2);
MA30:IF(K3,MA3,DRAWNULL),COLORBLUE,LINETHICK2;
Y:=(MA(C,5)-MA(C,30))/MA(C,5)*100;
YY1:=C>MA(C,5) AND OPEN<MA(C,5);{蛟龍出海}
YY3:=C>MA(C,10) AND OPEN<MA(C,10);
YY5:=C>MA(C,30) AND OPEN<MA(C,30);
DRAWTEXT(YY1 AND YY5 AND YY3,LOW-0.1,'←蛟龍出海'),COLORRED;<!--++ plugin_code qcomic begin--><!--++ plugin_code qcomic end-->
?
公式導(dǎo)入教程: 【通達(dá)信公式源碼導(dǎo)入方法教程】 【同花順公式源碼導(dǎo)入方法教程】 【大智慧新一代公式源碼導(dǎo)入方法教程】
?