通達信公式

fengfengyu12 2011-12-08

展開全文

一。主圖
{私募操盤線}
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),LINETHICK2,COLORFF00FF;
強弱線:MA(C,20),LINETHICK2,COLORYELLOW;
KKA:=EMA(C,5);
KKB:=EMA(KKA,8);
KKC:=EMA(KKB,13);
趨勢線:EMA(KKC,50),LINETHICK2, COLORGREEN;
N1:=5;
N4:=34;
CQ:=100*(C-LLV(L,N4))/(HHV(C,N4)-LLV(L,N4));
SAT:=(AMOUNT/C)/(HHV(AMOUNT,N4)/HHV(C,N4));
飽和度:=IF(SAT>1,1,SAT)*100;
KAAA:=飽和度>=97 AND CQ>90;
KBBB:=EXIST(KAAA,20);
牛熊線:IF(KBBB,REF(L,BARSLAST(KAAA)+1),REF(L,BARSLAST(KAAA)+1)),LINETHICK4,COLORLIRED;
N:=80;
M:=3;
MA5X:=MA(C,5);
MA13X:=MA(C,13);
高:=REF(HHV(H,N),M);
低:=REF(LLV(L,N),M);
H19:=高-(高-低)*0.191;
H38:=高-(高-低)*0.382;
H中:=高-(高-低)*0.5;
H61:=高-(高-低)*0.618;
H80:=高-(高-低)*0.809;
一:REFDATE(高,DATE),POINTDOT,COLORWHITE;
二:REFDATE(H19,DATE),POINTDOT,COLORYELLOW;
三:REFDATE(H38,DATE),POINTDOT,COLORMAGENTA;
四:REFDATE(H中,DATE),POINTDOT,COLORRED;
五:REFDATE(H61,DATE),POINTDOT,COLORMAGENTA;
六:REFDATE(H80,DATE),POINTDOT,COLORYELLOW;
七:REFDATE(低,DATE),POINTDOT,COLORWHITE;
A60:MA(C,60),COLORBLUE;
A120:MA(C,120),COLORGRAY;
A250:MA(C,250),COLORLICYAN;
DRAWTEXT(ISLASTBAR,一,' 一'),COLORWHITE;
DRAWTEXT(ISLASTBAR,二,' 二'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,三,' 三'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,四,' 四'),COLORRED;
DRAWTEXT(ISLASTBAR,五,' 五'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,六,' 六'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,七,' 七'),COLORWHITE;
AA:=CLOSE/REF(CLOSE,1)>=1.09;
STICKLINE(AA,OPEN,CLOSE,1,0),COLORYELLOW;

副圖一：
{私募成交量}
SHORT:=12;
LONG:=26;
MID:=9;
DIF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA:=EMA(DIF,MID);
MACD:=(DIF-DEA)*2,COLORSTICK;
STICKLINE(DIF>DEA,0,VOL,2,0),COLORRED;
STICKLINE(DIF<DEA,0,VOL,2,0),COLORYELLOW;
N:=9;
M1:=3;
M2:=3;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,M1,1);
D:=SMA(K,M2,1);
J:=3*K-2*D;
STICKLINE(J>D,VOL/2,VOL,2,0),COLORRED;
STICKLINE(J<D,VOL/2,VOL,2,0),COLORYELLOW;

飽和成交量公式
成交量:=VOL/100,VOLSTICK;
VAR1:=成交量/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主買:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),成交量/2)),NODRAW;
主賣:IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-成交量/2)),NODRAW;
STICKLINE(成交量>0,成交量,0,2.5,0),COLORCYAN;
STICKLINE(主買>0,0,主買,2.5,0),COLORRED;
主持倉:EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),COLORFF00FF;
主集中度:WINNER(C)*100,COLORRED;
散集中度: (WINNER(C*1.1)-WINNER(C*0.9))*100,COLORGREEN;
地量:=成交量<LLV(成交量,14)*1.001;
買賣差:(主買+主賣),NODRAW,COLORYELLOW;
買賣比:(主買/主賣),NODRAW,COLORYELLOW;
換手率:=VOL/CAPITAL*100;
換手55:SUM(換手率,55),NODRAW,COLORLICYAN;
買賣差55:SUM(買賣差,55),NODRAW,COLORGRAY;
量能飽和度:IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))>1,1,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20)))*100,COLORYELLOW,NODRAW;
中點:=REFDATE(HHV(EMA(買賣差,9),120),DATE)*2;
STICKLINE(CURRBARSCOUNT=19,中點*1.9,中點*1.5,120,1),COLOR00DDDD;
STICKLINE(CONST(C>O)=1 AND CURRBARSCOUNT=19,中點*1.88,中點*1.52,量能飽和度*1.2,0),COLOR0033FF;
STICKLINE(CONST(C>O)=1 AND CURRBARSCOUNT=19,中點*1.82,中點*1.58,量能飽和度*1.2,0),COLOR0077FF;
STICKLINE(CONST(C>O)=1 AND CURRBARSCOUNT=19,中點*1.76,中點*1.64,量能飽和度*1.2,0),COLOR0099FF;
STICKLINE(CONST(C>O)=1 AND CURRBARSCOUNT=19,中點*1.7,中點*1.7,量能飽和度*1.2,0),COLOR00DDFF;
STICKLINE(CONST(C<O)=1 AND CURRBARSCOUNT=19,中點*1.88,中點*1.52,量能飽和度*1.2,0),COLORFF7700;
STICKLINE(CONST(C<O)=1 AND CURRBARSCOUNT=19,中點*1.82,中點*1.58,量能飽和度*1.2,0),COLORFF9900;
STICKLINE(CONST(C<O)=1 AND CURRBARSCOUNT=19,中點*1.76,中點*1.64,量能飽和度*1.2,0),COLORFFBB00;
STICKLINE(CONST(C<O)=1 AND CURRBARSCOUNT=19,中點*1.71,中點*1.69,量能飽和度*1.2,0),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=22,中點*2.3,量能飽和度),COLORYELLOW;
持股:IF(SAR(10,2,20)<=L,SAR(10,2,20),DRAWNULL),NODRAW,COLOR000099;
V2:=IF(CURRBARSCOUNT=1,成交量*240/FROMOPEN/REF(成交量,1)-1,成交量/REF(成交量,1)-1);
STICKLINE(成交量>0,成交量,0,2,1),COLORWHITE;
STICKLINE(主買>成交量/2,0,成交量,2,0),COLORYELLOW;
STICKLINE(主買<=成交量/2,0,成交量,2,0),COLORWHITE;
STICKLINE(主買>0,0,主買,2,0),COLORRED;
STICKLINE(主賣<0,0,主賣,2,0),COLOR00FF00;
STICKLINE(地量>0,0,成交量,1,0),COLORMAGENTA;
STICKLINE(V2>=1,成交量,0,1,0),COLORYELLOW;

用背離法確定你買入賣出,無未來,非常準

A:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1));
B:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1);
分水嶺:IF(MA(CLOSE,17)<B,B,MA(CLOSE,17)),COLORFF00FF,LINETHICK1;
PMA:=分水嶺;
DD:=分水嶺<REF(分水嶺,1);
IF(DD,分水嶺,DRAWNULL),COLOR00FF00,LINETHICK1;
操作線:分水嶺-(EMA(C,3)-分水嶺),COLOR00FFFF,LINETHICK1;
S:=(PMA>操作線);
IF(S,分水嶺,DRAWNULL),COLOR00FF00,POINTDOT,LINETHICK1;
PM:MA(C,5),COLORFFFFCC,LINETHICK1;
IF(PM>REF(PM,1),PM,DRAWNULL),COLORRED,LINETHICK1;
IF(PM=REF(PM,1),PM,DRAWNULL),COLORRED;
IF(PM<REF(PM,1),PM,DRAWNULL),COLORFF9900,LINETHICK1;
DRAWTEXT(CROSS(分水嶺,操作線),分水嶺-0.1,'三底背離');
A1:=BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1));
B1:=REF(C,A1+1)>C AND REF("MACD.DIF",A1+1)<"MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA");
DRAWTEXT(B1>0,L-0.02,'M底背離'),COLOR00FFFF;
A2:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1));
B2:=REF(C,A2+1)>C AND REF("KDJ.K",A2+1)<"KDJ.K" AND CROSS("KDJ.K","KDJ.D");
DRAWTEXT(B2,L-0.10,'K底背離'),COLORFF00FF;
A3:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1",A3+1)<"RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2");
DRAWTEXT(B3>0,L-0.18,'R底背離'),COLOR0000FF;
C1:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1));
D1:=REF(C,C1+1)<C AND REF("MACD.DIF",C1+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF");
DRAWTEXT(D1>0,H+0.16,'M頂背離'),COLOR00FF00;
C2:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1));
D2:=REF(C,C2+1)<C AND REF("KDJ.K",C2+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K");
DRAWTEXT(D2>0,H+0.08,'K頂背離'),COLORFFFFCC;
C3:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));
D3:=REF(C,C3+1)<C AND REF("RSI.RSI1",C3+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1");
DRAWTEXT(D3>0,H+0.04,'R頂背離'),COLORFF9900;

洗盤清理，對到打壓，一目了然

Var2:=REF(LOW,1);
Var3:=SMA(ABS(LOW-Var2),13,1)/SMA(MAX(LOW-Var2,0),13,1)*100;
Var4:=EMA(IF(CLOSE*1.2,Var3*13,Var3/13),13);
Var5:=LLV(LOW,34);
Var6:=HHV(Var4,34);
Var7:=IF(LLV(LOW,56),1,0);
Var8:=EMA(IF(LOW<=Var5,(Var4+Var6*2)/2,0),3)/618*Var7;
Var9:=EMA(CLOSE,5);
Var10:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*(-10);
STICKLINE(Var9>REF(Var9,1),0,Var9*0.25,4,0),COLORRED;
拉升出貨:IF(Var9>REF(Var9,1),Var9*0.25,0),COLORRED,STICK;
STICKLINE(Var9<REF(Var9,1),0,Var9*0.25,4,0),COLORGREEN;
對倒打壓:IF(Var9<REF(Var9,1),Var9*0.25,0),COLORGREEN,STICK;
STICKLINE(Var8>REF(Var8,1),0,Var8,4,0),COLORMAGENTA;
主力進場:IF(Var8>REF(Var8,1),Var8,0),COLORMAGENTA,STICK;
STICKLINE(Var8<REF(Var8,1),0,Var8*1.5,4,0),colorFFF810;
洗盤清理跟風戶:IF(Var8<REF(Var8,1),Var8*1.5,0),colorFFF810,STICK;
XL1:=MA(LOW,2)*0.96;
XL2:=MA(LOW,26)*0.85;
XL3:=REF(XL1,1)<XL2 AND REF(XL1,1)<XL1 AND REF(XL1,1)<REF(XL1,2);
STICKLINE(XL3,0,Var8*3,4,1),COLORMAGENTA;
↑金牛買點↑:XL3,COLORMAGENTA,STICK;
DRAWTEXT(XL3,Var8*3.5,'買'),COLORMAGENTA;
DRAWICON(XL3,15,4),COLORRED;