{ ZWL2000      pj}
交易系统公式：!神点2  缺省周期：日线
=======================================================================================
多头买入：次周期开盘价  多头卖出：次周期开盘价  
=======================================================================================
Var1:=MA(CLOSE,30);
Var2:=CLOSE-Var1;
Var3:=EMA(CLOSE,5)/EMA(CLOSE,10);
Var4:=EMA(INDEXC,5)/EMA(INDEXC,10);
Var5:=(Var3/Var4-1)*1000;
Var6:=REF(CLOSE,1);
Var7:=SMA(MAX(CLOSE-Var6,0),6,1)/SMA(ABS(CLOSE-Var6),6,1)*100;
Var8:=(HIGH+LOW+CLOSE)/3;
Var9:=IF(HIGH=LOW,1,HIGH-MAX(OPEN,CLOSE));
VarA:=IF(HIGH=LOW,1,Var8-MIN(CLOSE,OPEN));
VarB:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
VarC:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
VarD:=IF(CLOSE>OPEN,0-VarC*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,0-VarC*(HIGH-LOW),0-VOL/2));
VarE:=IF(CLOSE>OPEN,VarC*(HIGH-LOW),IF(CLOSE<OPEN,VarC*(HIGH-OPEN+CLOSE-LOW),VOL/2));
VarF:=ABS(Var9*VarB/1000);
Var10:=ABS(VarA*VarB/1000);
Var11:=ABS(VarE-Var10);
Var12:=ABS(VarD-VarF);(来源:中国股票网 www.yz21.org)
Var13:=REF(VarF,1);
Var14:=REF(Var10,1);
Var15:=REF(Var12,1);
Var16:=REF(Var11,1);
ENTERLONG: YEAR<2002 AND Var2>0 AND Var5>0 AND Var10>VarF AND Var11>Var12 AND CLOSE>REF(CLOSE,2) AND Var14>Var13 AND Var16>Var15 AND Var2>0 AND Var5>0 AND CLOSE>REF(CLOSE,2);
EXITLONG: CROSS(0,Var2);