【图】【抄底系列

（源码转贴，稍作加工，仅供参考。）
//------------------------------------------------
Var1:=DATE<1991231;
Var2:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
Var3:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
Var4:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
Var5:=REF(CLOSE,1);
Var6:=SMA(MAX(CLOSE-Var5,0),5,1)/SMA(ABS(CLOSE-Var5),5,1)*100;
Var7:=(HIGH+LOW+CLOSE)/3;
Var8:=(Var7-MA(Var7,14))/(0.015*AVEDEV(Var7,14));
Var9:=Var2>=-15.8 AND Var2<=-12.2 AND Var3<=-20.8 AND Var4<=-27.5
AND Var6<=11.7 AND Var8<=-140;
VarA:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>-0.098;
VarB:=VOL/CAPITAL*100<6;
VarC:=ZIG(2,5);
VarD:=LLVBARS(VarC,50);
VarE:=REF(OPEN,VarD-1)*1.1;
VarF:=VOL/CAPITAL*100;
Var10:=REF(VOL,1)/CAPITAL*100;
Var11:=VarF/Var10;
Var12:=SUM(VarF,10);
Var13:=VarF/Var12*10;
Var14:=CLOSE/REF(CLOSE,1)>1.09 AND Var11>2.5;
a:=(Var9 AND VarA AND VarB)*30*Var1;
果断出击:if(a>0,30,0) STICK,COLORWHITE;
DRAWICON( 果断出击>0,30 ,1 );
DRAWTE55188(果断出击>0,18, '★果断')COLORWHITE ;
Var15:=BARSLAST(a);
b:=(Var1*CLOSE>=REF(CLOSE,Var15)*1.05 AND Var15<20)*5,;
短线:if(b>0,8,0) STICK, ,COLORYELLOW ;
DRAWICON(短线>0,8,10);
//DRAWTE55188(短线>0,5, '★短线') ,COLORYELLOW ;
长线: (Var1*CLOSE>=REF(CLOSE,Var15)*1.3 AND Var15<250)*30,COLORGREEN,LINESTICK;

中线: (Var1*CLOSE>=REF(CLOSE,Var15)*1.1 AND Var15<100)*10,LINESTICK,COLORMAGENTA;
DRAWICON(a=30,30,1);
Var16:=Var14 AND Var13;
关注:if(果断出击>0 or 短线>0,1,0),STICK,COLORCYAN;

PARTLINE(C>0,0),COLOR000000;
PARTLINE(C>0,0),COLORFFAA00,LINEDOT;

//---------- END ----------

[ Last edited by 南山雾 on 2005-9-17 at 12:08 ]股票论坛 www.55188.com