【图】太阳聖火源码

太阳聖火源码
Vv1:=ema(LOW,10);
Vv2:=ema(ema(LOW,30)*1.03,26)-0.16;
DRAWICON(cross(Vv1,Vv2),Vv1,9);
VarA:=IF(CLOSE and MA(VOL, 5)/240 AND CLOSE>REF(CLOSE, 1)*1.0 AND CLOSE,88,0);
VarB:=IF(CLOSE/REF(CLOSE, 1)>1.050 AND VOL/CAPITAL*100<10 AND CLOSE<17 AND HIGH/CLOSE<1.010 AND VarA>0, 91, 0);
DRAWTEXT(VarB>90,LOW*0.95,'追'),COLORYELLOW;
V1:=REF(C,1);
V2:=SMA(MAX(C-V1,0),6,1)/SMA(ABS(C-V1),6,1)*100;
DRAWICON(IF(CROSS(85,V2),1,0),h*1.06,10);
MA10:MA(C,10), coloryellow;
MA20:MA(C,20), colormagenta;
MA55:MA(C,55), colorgreen;
MACD:="MACD.MACD";
K21:="SLOWKD.K"(21,3,3,5);
D21:="SLOWKD.D"(21,3,3,5);
周无:="SLOWKD.K#WEEK"(5,3,3,2);
周名:="SLOWKD.D#WEEK"(5,3,3,2);
L000:=(K21>=D21 AND MACD>=0) OR (周无>=周名
AND MACD>=0) OR (周无>=周名 AND K21>=D21);
L001:=K21>=D21 AND 周无>=周名 AND MACD>=0;
STICKLINE(L001=0,C,O,6,0), COLORff8888;
STICKLINE(L001=0,H,L,0,0), COLORff8888;
STICKLINE(L000>0,C,O,6,0), COLORyellow;
STICKLINE(L000>0,H,L,0,0), COLORyellow;
STICKLINE(L001>0,C,O,6,0), COLORred;
STICKLINE(L001>0,H,L,0,0), COLORred;
STICKLINE(C<=REF(C,1) AND L001>0,C,O,6,0) ,COLORgreen;
STICKLINE(C<=REF(C,1) AND L001>0,H,L,0,0) ,COLORgreen;
DrawIcon(C>Ma(C,14),Min(Ma(C,6),Ma(C,14)),10);
{drawicon(cross(ma(c,5),ma(c,20)),l,1);}
注意逃:= IF(CROSS((3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)
-LLV(LOW,27))*100,5,1),3,1)),90),60,0),stick,linethick4,colorgreen;
drawicon(注意逃,H*1.01,5);
drawtext(注意逃,H*1.01,'逃'),colorgreen,shift1;
vertline(注意逃),colorgreen;
V1:=REF(CLOSE,1);
V2:=SMA(MAX(CLOSE-V1,0),6,1)/SMA(ABS(CLOSE-V1),6,1)*100;
DRAWICON(IF(CROSS(81,V2),1,0),HIGH*1.03,10);
逃:= IF(CROSS((3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)
-LLV(LOW,27))*100,5,1),3,1)),90),60,0),stick,linethick4,colorgreen;
drawicon(逃,H*1.01,5);
drawtext(逃,H*1.01,'逃'),colorgreen,shift2;
vertline(逃),colorgreen;
a:=BARSCOUNT(CLOSE);
ah:=HHV(HIGH,200);
al:=LLV(LOW,200);
b0:=(ah-al)/40;
b1:=HIGH+b0;
b2:=LOW-b0;
STICKLINE((a+0)/34=FLOOR((a+0)/34),b2,b2-3*b0,3,0),COLORYELLOW;
DRAWTEXT((a+0)/34=FLOOR((a+0)/34),b2-2*b0,'时间窗'),COLORFFFFFF;股票论坛 www.55188.com

附件:

Snap1.gif (46.14 KB)

2005-9-4 01:15