打印本文
關閉窗口
相關標簽: 操盤線指標公式源碼 、 操盤線生命線公式源碼 、 公式專用網操盤量源碼 、 操盤線bs指標公式源碼 、 操盤量公式源碼 、 殷保華機構操盤論源碼 、 益盟操盤手操盤線源碼 、 期貨操盤線指標源碼 、 生命線操盤線指標源碼 、
大智慧順意操盤公式源碼：
{參數:N:5,250,14;}
源碼：
X:=(CLOSE+HIGH+LOW)/3;
A:=EMA(X,10);
B:=ref(A,1);
if(A>B,A,0),pointdot,LINETHICK5,COLOR0000FF;
if(B>A,B,0),pointdot,LINETHICK5,COLOR00FF00;
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
MTM:=C-ref(C,1);{追加用}
DY:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);{買、追加用}
DIFF:=( EMA(CLOSE,7) - EMA(CLOSE,19)),COLORwhite;
DEA:=EMA(DIFF,9),COLORf00ff0 ;
MACD:=0.90*(DIFF-DEA), COLORSTICK;
tj:=(diff>=dea);
tj1:=(diff>=0);
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.kzuj.com.cn',CURRENTTIME>180000 and (CXH=4 OR CXH=9));
STICKline(tj,h,l,0.5,0),COLORyelLOW;
STICKline(tj,o,c,4,0),COLORyelLOW;
STICKline(tj1 and tj,h,l,0.5,0),colorf00ff0;
STICKline(tj1 and tj,o,c,5,1),colorf00ff0;
STICKline(diff<dea,h,l,0.5,0),colorf0f000;
STICKline(diff<dea,o,c,3,0),colorf0f000;
{買}
DX:=LLV(J,2)=LLV(J,8);
買:IF(CROSS(J,ref(J+0.01,1)) AND DX AND J<20,1,0),COLORRED;
買1:=IF(LLV(DY,2)=LLV(DY,7) AND COUNT(DY<0,2) AND CROSS(DY,MA(DY,2)),1,0);
DRAWTEXT(買=1,LOW-0.02,'買'),COLORRED;
STICKLINE(買=1,H,L,0,1),COLORRED,LINETHICK2;
STICKLINE(買=1,O,C,4,1),COLORRED,LINETHICK2;
DRAWICON(買=1 AND 買1=1,LOW*0.97,1);
DRAWTEXT(買=1 AND 買1=1,LOW*0.968,'●'),COLORWHITE;
DRAWTEXT(買=1 AND 買1=1,LOW*0.968,'優'),COLOR3300FF,LINETHICK2; {本文來至CXH99.COM}
{賣}
賣:IF(HHV(DY,2)=HHV(DY,7) AND COUNT(DY>50,2) AND CROSS(MA(DY,2),DY),1,0),COLORBLUE;
DRAWTEXT(賣=1,HIGH*1.02,'賣'),COLORBLUE;
STICKLINE(賣=1,H,L,0,1),COLORBLUE,LINETHICK2;
STICKLINE(賣=1,O,C,4,1),COLORBLUE,LINETHICK2;
{減倉}
DZ:=HHV(J,2)=HHV(J,8) AND J>80;
注意:IF(CROSS(ref(J-0.01,1),J) AND ref(DZ,1),1,0),COLORYELLOW;
DRAWTEXT(注意=1 AND CLOSE<OPEN,HIGH*1.02,'減'),COLORYELLOW;
STICKLINE(注意=1,H,L,0,1),COLORYELLOW,LINETHICK2;
STICKLINE(注意=1,O,C,4,1),COLORYELLOW,LINETHICK2;
{買跌}
{N:5,250,14;}
KA:=N/2;
DTPL:=MA(C,N)>MA(C,N*1.5) AND MA(C,N*1.5)>MA(C,N*3) AND MA(C,3)>MA(C,N*6);
連續走強:=COUNT(C>MA(C,N),KA)=KA;
ZQSJ:=BARSLAST(連續走強);
下穿:=CROSS(MA(C,N),C);
GL:=MA(C,N/2)/MA(C,N*2)>=1.05;
買跌A:=(下穿 AND ZQSJ<=3 AND DTPL AND GL)*N;
DRAWTEXT(買跌A>0 AND 賣=0,LOW-0.04,'跌'),COLOR00FF00;
買跌:IF((下穿 AND ZQSJ<=3 AND DTPL AND GL)*N,1,0),COLOR00FF00;
STICKLINE(買跌A>0 AND 賣=0,HIGH,LOW,0,1),COLOR00FF00,LINETHICK2;
STICKLINE(買跌A>0 AND 賣=0,OPEN,CLOSE,4,1),COLOR00FF00,LINETHICK2;
{老鼠倉}
AA1:=AMOUNT/V;
BB1:=LOW<AA1*0.9;
CC1:=(CLOSE-ref(CLOSE,1))/ref(CLOSE,1)*100>1.2;
DD1:=LOW<MA(CLOSE,5)*0.921;
EE1:=V<MA(V,5)*1.5;
老鼠倉:IF(BB1 AND CC1 AND DD1 AND EE1,1,0),COLOR0099FF;
DRAWTEXT(老鼠倉,l*0.96,'鼠'),COLOR0099FF;
STICKLINE(老鼠倉,H,L,0,1),COLOR0099FF,LINETHICK2;
STICKLINE(老鼠倉,O,C,4,1),COLOR0099FF,LINETHICK2; {本文來至CXH99.COM}
{加倉}
多:=EMA(CLOSE,3);
空:=EMA(CLOSE,5);
均衡:=EMA(空,5);
VARF1:=COUNT(CROSS(多,均衡),2)=1;
VARF2:=COUNT(CROSS(空,均衡),2)=1;
ADD:=FILTER(VARF1 AND VARF2,2);
X1:=IF(CLOSE>=ref(CLOSE,1) AND ref(CLOSE,1)>ref(OPEN,1),1,0);
X2:=IF(CLOSE>=ref(OPEN,1) AND ref(CLOSE,1)<ref(OPEN,1),1,0);
DRAWTEXT(ADD AND A>=ref(B,1) AND (X1=1 OR X2=1) AND 買<>1,LOW-0.03,'加'),COLORFF00FF;
STICKLINE(ADD AND 買<>1,HIGH,LOW,0,1),COLORFF00FF,LINETHICK2;
STICKLINE(ADD AND 買<>1,OPEN,CLOSE,4,1),COLORFF00FF,LINETHICK2;
加倉1:IF(ADD AND 買<>1,1,0),COLORFF00FF;
{追加} {本文來至CXH99.COM}
ZX:=100*EMA(EMA(MTM,12),12)/EMA(EMA(ABS(MTM),12),12);
DXGD:=LLV(DY,2)=LLV(DY,5) AND CROSS(DY,MA(DY,2));
加倉2:IF(DXGD AND BETWEEN(DY,0,60) AND ZX>0 AND 加倉1<>1 AND (X1=1 OR X2=1) AND 買<>1,1,0),COLORFFFFFF;
DRAWTEXT(FILTER(加倉2 AND A>=ref(B,1) AND ZX>ref(ZX,1),5) AND 買<>1,LOW-0.03,'加'),COLORFFFFFF;
STICKLINE(加倉2 AND 買<>1,H,L,0,1),COLORFFFFFF,LINETHICK2;
STICKLINE(加倉2 AND 買<>1,O,C,4,1),COLORFFFFFF,LINETHICK2; {內容來至程序化交易網 CXH99.COM}
{完美分割}
Z:INTPART(c/0.913 )*0.913,pointdot,LINETHICK2,colorgreen;
Z+(0.913),pointdot,LINETHICK2,colorgreen ;
Y:INTPART(c/3.652 )*3.652,pointdot,LINETHICK2,colorred;
Y+(3.652),pointdot,LINETHICK2,colorred;
{畫線}
mj:=ZIG(3,10)>ref(ZIG(3,10),1) AND ref(ZIG(3,10),1)>ref(ZIG(3,10),2) AND ref(ZIG(3,10),2)<ref(ZIG(3,10),3) AND ZIG(3,5)>ref(ZIG(3,5),1) AND ref(ZIG(3,5),1)>ref(ZIG(3,5),2) AND ref(ZIG(3,5),2)<ref(ZIG(3,5),3)*48;
mc:=ZIG(3,10)<ref(ZIG(3,10),1) AND ref(ZIG(3,10),1)<ref(ZIG(3,10),2) AND ref(ZIG(3,10),2)>ref(ZIG(3,10),3) AND ZIG(3,5)<ref(ZIG(3,5),1) AND ref(ZIG(3,5),1)<ref(ZIG(3,5),2) AND ref(ZIG(3,5),2)>ref(ZIG(3,5),3)*(-47);
va1:=FILTER(llv(c,5)=llv(c,110) and mj,20);
va2:=FILTER(HHV(c,5)=HHV(c,110) and mc,20);
DRAWLINE(va2,HHV(h,5),va1,HHV(h,5),1),colorwhite;
DRAWLINE(va2,llv(l,5),va1,llv(l,5),1),color00ff00;
DRAWLINE(c=HHV(c,60),HHV(h,3),c=HHV(c,30) and c<HHV(c,45),HHV(HIGH,3),1),coloryelLOW;
DRAWLINE(c=LLV(c,60),LOW,c=LLV(c,30) and c>llv(c,45),LLV(LOW,3),1),colorffcc66;
DRAWLINE(HIGH>=HHV(HIGH,60),HIGH,LOW<=LLV(LOW,60),HHV(HIGH,6),1),colorffcccc;
DRAWLINE(LOW<=LLV(LOW,60),LOW,HHV(c,6)>=HHV(h,60),LLV(LOW,6),1),colorblue;
va11:=HIGH>=HHV(HIGH,60);
v1:=(ref(va11,1)>0 and va11<1);
va12:=LOW<=LLV(LOW,60);
v2:=ref(va12,1)>0 and va12<1;
DRAWLINE(v1,HIGH,v2,HHV(HIGH,6),1),colorffff33;
DRAWLINE(v2,LOW,v1,LLV(LOW,6),1),color0099ff;
(責任編輯：程序化交易網整理)