软件名称:[B]操盘附图(源码)[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/
软件语言:简体中文
授权方式:解密版
软件大小:0 Bytes
官方主页:Home Page
更新时间:2009-09-06 19:28:39
软件简介:
操盘附图
VAR1:=(3*CLOSE+HIGH+LOW)/4;
VAR2:=EMA(EMA(EMA(VAR1,4),4),4);
J:=(VAR2-REF(VAR2,1))/REF(VAR2,1)*100;
D: MA(J,3)+0.03,LINETHICK1;
K: MA(J,1),COLORRED,LINETHICK1;
Y:=0;
U:1.8,COLORGREEN;
I:5.5,COLORRED;
Y1:=100*VOL/FINANCE(7);
DRAWICON(Y1>0.16,K*1.04,10);
DRAWICON(CROSS(D,K),D+0.6,15),COLORGREEN;
DRAWICON(CROSS(K,D),D-0.3,9),COLORYELLOW;
AA:=WINNER(CLOSE+CLOSE*15/100)*100;
BB:=WINNER(CLOSE+CLOSE*0/100)*100;
CC:=AA-BB;
DD:=(WINNER(CLOSE-CLOSE*0.1/100)-WINNER(CLOSE-CLOSE*15/100))*100;
EE:=CC<3 AND DD<0.5 AND (OPEN<LOW OR OPEN>LOW);
A1:=DYNAINFO(6);
A2:=IF(LOW>A1,0,IF(HIGH<A1,1,(A1-LOW+0.01)/(HIGH-LOW+0.01)));
A3:=VOL/WINNER(LOW);
A4:=REF(HHV(CLOSE,120),1);
A5:=REF(LLV(CLOSE,120),1);
A6:=100*(CLOSE-A5)/(A4-A5);
A7:=A2>0 OR A2=1;
A8:=A7 AND A3/REF(A3,3)>=3 AND A6<80;
A9:=REF(A8,1) OR REF(A8,2) OR REF(A8,3) OR REF(A8,4);
A10:=A8 AND A9;
A11:=IF(FILTER(A8,3),5,0);
A12:=IF(FILTER(A10,3) OR EE,10,0);
DRAWTEXT(A11=5,2,'资金进场'),COLORRED;
DRAWTEXT(A12=10,-2,'资金增仓'),COLORYELLOW;
VAR11:=REF(LOW,1);
VAR12:=SMA(ABS(LOW-VAR11),13,1)/SMA(MAX(LOW-VAR11,0),13,1)*4;
VAR13:=EMA(VAR12,13);
VAR14:=LLV(LOW,34);
VAR15:=EMA(IF(LOW<=VAR14,VAR13,0),3);
主力进场:IF(VAR15>REF(VAR15,1),VAR15,0),COLORRED;
STICKLINE(VAR15>REF(VAR15,1),0,VAR15,4,0 ),COLORRED;
洗盘:IF(VAR15<REF(VAR15,1),VAR15,0),COLORLIGREEN;
STICKLINE(VAR15<REF(VAR15,1),0,VAR15,4,0),COLORLIGREEN;
VAR6:=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);
VAR7:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR8:=VAR6<REF(VAR7,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
DRAWTEXT(VAR8 AND COUNT(VAR8,30)=1,-3,'资金增筹');
AA1:=DOWNNDAY(MA(C,10),1);
AA2:=ABS(C-REF(C,1))/REF(C,1)<=0.03;
AA3:=(C-O)/O<=0.03 AND (REF(C,1)-REF(O,1))/REF(O,1)<=0.03;
AA4:=COUNT(C<O,4)>=2;
AA5:=C>O AND C>REF(C,1) AND (C-REF(C,5))/REF(C,5)<-0.02;
B1:=CLOSE<MA(CLOSE,5) AND MA(CLOSE,5)<MA(CLOSE,10) AND MA(CLOSE,10)<MA(CLOSE,30) AND MA(CLOSE,30)<MA(CLOSE,60);
预备:IF(AA1 AND AA2 AND AA3 AND AA4 AND AA5 AND NOT(B1),1,0),COLORMAGENTA;
【本网提示:本文仅仅提供源码,并无公式提供下载,需要公式的,请参考下面的公式编辑录像自己编辑一下】
[url=http://www.70822.com/soft/sort013/sort02/down-12433.html]操盘附图(源码)[/url]