回复 3# 的帖子
{多方,空方}{副图}
VAR01:=IF((DATE<1080930) AND (DATE>900101),1,0);
T:=20;
S1:=STD(CLOSE,30);
ZF:=(S1-REF(S1,1))/(S1);
A:=INTPART((T)*(1+ZF));
B:=MIN(T,60);
M:=MAX(T,20);
MID:MA(CLOSE,T),CoLor00FFFF;
X:=STD(CLOSE,T);
UP:MID+(2)*(X),CoLor00A600;
DN:MID-(2)*(X),CoLor5E5EFF;
MA30:=MA(CLOSE,30);
通道上轨:MA30+(2)*(STD(CLOSE,65)),Linethick3,CoLor489100;
通道下轨:MA30-(2)*(STD(CLOSE,60)),Linethick3,CoLor5200CC;
VAR1:=MA(CLOSE,5);
VAR2:=MA(CLOSE,34);
VAR3:=MA(CLOSE,60);
VARA:=REF(CLOSE,1);
VARE:=((SMA(MAX(CLOSE-VARA,0),6,1))/(SMA(ABS(CLOSE-VARA),6,1)))*(100);
DRAWTEXT((CROSS(84,VARE) or CROSS(84,VARE) AND (UP>通道上轨)),HIGH,'见好就收'),CoLor008000;
VARF:=((2)*(CLOSE)+HIGH+LOW)/(4);
VAR4:=LLV(LOW,34);
VAR5:=HHV(HIGH,34);
VAR6:=EMA(((VARF-VAR4)/(VAR5-VAR4))*(100),6);
VAR7:=EMA((0.667)*(REF(VAR6,1))+(0.333)*(VAR6),4);
DRAWTEXT(IF(((COUNT((CLOSE<REF(CLOSE,1)),8))/(8)>0.3) AND COUNT((VAR6>VAR7),3) AND (REF(LOW,1)=LLV(LOW,120)) AND (CLOSE>OPEN),1,0),LOW,'出▲击'),CoLor00FFFF;
出击XG:IF(((COUNT((CLOSE<REF(CLOSE,1)),8))/(8)>0.3) AND COUNT((VAR6>VAR7),3) AND (REF(LOW,1)=LLV(LOW,120)) AND (CLOSE>OPEN),1,0),CoLorFF0000;
仙人指: (((CLOSE)*(2)+HIGH+LOW)/(4))*(VAR01),CoLor778877;
KK3:=(CLOSE>MID) AND REF((SUM((CLOSE<MID),2)=2),2) AND (SUM(CROSS(CLOSE,MID),2)>0);
VAR1A:=LLV(LOW,21);
VAR2A:=HHV(HIGH,21);
快１:=EMA(((CLOSE-VAR1A)/(VAR2A-VAR1A))*(100),5);
VAR3A:=EMA(((CLOSE-VAR1A)/(VAR2A-VAR1A))*(50),13);
VAR4A:=EMA((0.667)*(REF(快１,1))+(0.333)*(快１),2);
VAR5A:=LLV(LOW,55);
VAR6A:=HHV(HIGH,34);
VAR7A:=EMA(((CLOSE-VAR5A)/(VAR6A-VAR5A))*(100),3);
VAR8A:=(VAR3A+VAR7A)/(2);
VAR9A:=EMA((0.667)*(REF(VAR7A,1))+(0.333)*(快１),2);
VARAA:=EMA(VAR8A,5);
VARB:=EMA((0.667)*(REF(VARAA,1))+(0.333)*(VARAA),2);
快２:=MA(快１,5);
DRAWTEXT(CROSS(快１,VARB) AND (VARB<30),LOW,'低点'),CoLor0073FF;
X1:=(CLOSE+LOW+HIGH)/(3);
X2:=EMA(X1,6);
X3:=EMA(X2,5);
VARB1:=((CLOSE-LLV(LOW,24))/(HHV(HIGH,24)-LLV(LOW,24)))*(100);
VARB2:=SMA(VARB1,3,1);
V3:=(SMA(VARB2,3,1))*(VARB1);
V4:=SMA(V3,3,1);
K1:=CROSS(V3,V4);
KK2:=K1 AND (SUM(K1,BARSLAST(CROSS(X3,X2)))=1);
VAR1D:=EMA(CLOSE,2)-EMA(CLOSE,89);
VAR1E:=EMA(VAR1D,30);
VAR1F:=((2)*(VAR1D-VAR1E))*(10);
VAR20:=(POW(VAR1F,3))*(0.1)+POW(VAR1F,2);
VAR25:=((IF((YEAR<2058) AND (VAR1F>0.015),VAR20,0))/(45))/(4);
JJ:=((CLOSE)*(2)+HIGH+LOW)/(4);
SKK:=(EMA(JJ,13)-EMA(JJ,21))*(180);
SDD:=EMA(SKK,2);
多方:=(SKK-SDD)*(0);
空方:=(((-1))*(SKK-SDD))*(0);
KK1:=CROSS(多方,空方);
M1:=1;
RSV:=((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9)))*(100);
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=(2)*(DIFF-DEA);
K1K:=(VOL>=MA(VOL,5)) AND (CLOSE>=REF(CLOSE,1)) AND CROSS(K,D) AND (K<=30);
K2K:=(MAX(DIFF,MAX(DEA,MACD))<=0);
[ 本帖最后由 m330724m 于 2008-7-6 11:52 编辑 ]
