- 金币:
-
- 奖励:
-
- 热心:
-
- 注册时间:
- 2003-5-13
|
|
凤舞九天 源码
参数: P{5, 1, 100} M{50, 1, 100}
R:=AMOUNT/1000000;
R1:=IF(C>REF(C,1),R,
IF(C<REF(C,1),(-1)*R,0));
R3:=SUM(R1,13);
资金监控k:R3*OPEN/200,POINTDOT,COLORFFCC00;
资金监控S:R3*C/200,POINTDOT,COLORFFCC00;
资金平衡位:MA(资金监控S,30),COLORCCCCCC;
MM:STICKLINE(资金监控S>=REF(资金监控S,1),REF(资金监控S,1),资金监控S,6,0),COLORred;
MN:STICKLINE(资金监控S<REF(资金监控S,1),REF(资金监控S,1),资金监控S,6,0),COLORgreen;
MA(资金监控S,P),COLORblue,LINETHICK1;
Var0:=(1-MA(LOW,3)/MA((HIGH+LOW+2*CLOSE)/4,20))*100-M/10;
Var1:=(1-SMA(REF(CLOSE,1)/CLOSE*LOW,3,1)/EMA((HIGH+LOW+2*CLOSE)/4,10))*100-M/10;
数值:= IF(Var0>0 ,Var0*3000*REF((HIGH+LOW+2*CLOSE)/4,3)/CLOSE,0), , ;
选股:= Var1>0 AND CLOSE/COST(50)>REF(CLOSE/COST(50),1) AND 数值>0 ;
DRAWICON(选股=1 ,2.5,1);
Var2:=DMA(CLOSE,HIGH/MA(LOW,4)/4);
Var3:=DMA(CLOSE,CLOSE/MA(LOW,30)/30);
Var4:=(LOW-Var2)/Var2*100<-5.889;
Var5:=(Var2-Var3)/Var3*100<-15.889;
Var6:=Var4 AND Var5 AND (HIGH-MA(LOW,3))/REF(LOW,2)>-0.059;
Var7:=Var6>0;
Var8:=AMOUNT/VOL/100;
Var9:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
VarA:=SUM(AMOUNT,13)/Var8/100;
VarB:=DMA(Var9,VOL/VarA);
VarC:=MA(HHV(HIGH,488),18);
VarD:=MA(HHV(HIGH,220),18);
VarE:=MA(HHV(HIGH,98),18);
VarF:=MA(LLV(LOW,488),18);
Var10:=MA(LLV(LOW,220),18);
Var11:=MA(LLV(LOW,98),18);
Var12:=MA((VarF*0.96+Var10*0.96+Var11*0.96+VarC*0.558+VarD*0.558+VarE*0.558)/6,18);
Var13:=MA((VarF*1.25+Var10*1.23+Var11*1.2+VarC*0.55+VarD*0.55+VarE*0.65)/6,18);
Var14:=MA((VarF*1.3+Var10*1.3+Var11*1.3+VarC*0.68+VarD*0.68+VarE*0.68)/6,18);
Var16:=MA((Var12*3+Var13*2+Var14)/6*1.738,18);
Var19:=SMA(ABS(LOW-REF(LOW,1)),3,1)/SMA(MAX(LOW-REF(LOW,1),0),3,1)*100;
Var1A:=MA(IF(CLOSE*1.35<=Var16,Var19*10,Var19/10),3);
Var1B:=LLV(LOW,30);
Var1C:=HHV(Var1A,30);
Var1D:=IF(LOW<=Var1B,(Var1A+Var1C*2)/2,0);
Var1E:=MA(Var1D AND CLOSE<COST(1),3) AND (CLOSE-VarB)/VarB*100<-11;
Var1F:=MA(CLOSE,5);
Var20:=MA(CLOSE,10);
Var21:=MA(CLOSE,20);
Var22:=MA(CLOSE,30);
Var23:=(Var1F+Var20+Var21+Var22)/4;
Var24:=(Var23-REF(Var23,15))/REF(Var23,15)*100;
Var25:=IF(Var24<-10 AND Var24<REF(Var24,1),20,0);
DRAWICON(Var7 AND Var1E AND Var25 AND (CLOSE-OPEN)>0,6,1);
买入1: DRAWTEXT(Var7 AND Var1E AND Var25 AND (CLOSE-OPEN)>0,6,'-->买入1'), , COLORred;
STICKLINE(Var7 AND Var1E AND Var25 AND (CLOSE-OPEN)>0,-1,5,8,0),COLORred;
bb1:=REF(CLOSE,1);
bb2:=SMA(MAX(CLOSE-bb1,0),7,1)/SMA(ABS(CLOSE-bb1),7,1)*100;
bb3:=SMA(MAX(CLOSE-bb1,0),13,1)/SMA(ABS(CLOSE-bb1),13,1)*100;
bb4:=BARSCOUNT(CLOSE);
bb5:=bb2<20 AND bb3<23 AND bb4>35;
DRAWICON(bb5 AND COUNT(bb5,30)=1 ,6,1);
买入2: DRAWTEXT(bb5 AND COUNT(bb5,30)=1,6,'-->买入2'), , COLORblue;
STICKLINE(bb5 AND COUNT(bb5,30)=1,-1,5,8,0)COLORblue; |
|
|
发表于 2005-8-17 19:14
