|
|
楼主 |
发表于 2006-8-16 09:20
|
显示全部楼层
原帖由 myw 于 2006-8-16 09:04 发表
老师的帖一定要顶,小底公式有飞狐的吗
有原码,自己改改吧
INPUT:N1(45,1,50,1),M1(15,1,50,1),M2(1,1,10,1);
R:=(CLOSE-LLV(LOW,N1))/(HHV(HIGH,N1)-LLV(LOW,N1))*100;
WK:SMA(R,M1,M2),LINETHICK2,COLORCC8888;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:SMA(RSV,3,1),COLORGREEN;D:SMA(K,3,1),COLORWHITE;J:=3*K-2*D;
T1:=REF(J,1)-REF(J,2)<0 AND J>ref(J,1)-0.7 AND J-REF(J,1)>REF(J,1)-REF(J,2);
T2:=REF(J,1)-REF(J,2)>0 AND J>ref(J,1);T:=T1 OR T2;
PARTLINE(J,T,RGB(255,0,0),T=0,RGB(255,255,0));
K1:=WK>35;
K2:=WK<36 AND J>WK AND WK>REF(LLV(WK,20),5);
KK:=K1 OR K2;
TJ:=T AND J<18 AND KK;
小底:STICKLINE(TJ,46,54,8,0 ),COLORFF7700;
STICKLINE(TJ,46,54,6.6,0),COLORFF8811;
STICKLINE(TJ,46,54,4.4,0),COLORFFAA22;
STICKLINE(TJ,46,54,3.3,0),COLORFFBB33;
STICKLINE(TJ,46,54,2.2,0),COLORFFDD44;
STICKLINE(TJ,46,54,1.1,0),COLORFFFF55;
小顶:STICKLINE(J>98,45,55,8,0 ),COLOR00AAFF;
STICKLINE(J>98,45,55,6.6,0),COLOR00BBFF;
STICKLINE(J>98,45,55,4.4,0),COLOR00CCFF;
STICKLINE(J>98,45,55,3.3,0),COLOR00DDFF;
STICKLINE(J>98,45,55,2.2,0),COLOR00EEFF;
STICKLINE(J>98,45,55,1.1,0),COLOR00FFFF; |
|
|