pw100200
级别: 新手上路
精华:
0
发帖: 4
威望: 5 点
金钱: 40 RMB
贡献值: 0 点
注册时间:2008-07-24
最后登录:2008-07-24
|
以下是公式源码：
一、{ 参数： D 34 90 72 }
{公式名：个股监控 在5、15分钟K线使用极准确}
Var1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
Var2:=2*ABS(Var1);
Var3:=100-3*SMA((CLOSE-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1),15,1);
Var4:=100-3*SMA((OPEN-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,D))/(HHV(HIGH,D)-LLV(LOW,D))*100,20,1),15,1);
Var5:=(HIGH+LOW+CLOSE)/3;
Var6:=(Var5-MA(Var5,14))/(0.015*AVEDEV(Var5,14));
Var7:=(Var5-MA(Var5,89))/(0.015*AVEDEV(Var5,89));
Var8:=IF(Var6>=150 AND Var6<200 AND Var7>=150 AND Var7<200,10,0);
Var9:=IF(Var6<=-150 AND Var6>-200 AND Var7<=-150 AND Var7>-200,-10,Var8);
VarA:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VarB:=100-ABS(VarA);
VarC:=3*SMA((INDEXC-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,D))*100,20,1)-2*SMA(SMA
((INDEXC-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,75))*100,20,1),15,1);
VarD:=3*SMA((INDEXO-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,D))*100,20,1)-2*SMA(SMA
((INDEXO-LLV(INDEXL,D))/(HHV(INDEXH,D)-LLV(INDEXL,75))*100,20,1),15,1);
VarE:=REF(LOW,1)*0.9;
VarF:=LOW*0.9;
Var10:=(VarF*VOL+VarE*(CAPITAL-VOL))/CAPITAL;
Var11:=EMA(Var10,30);
Var12:=Var11-CLOSE;
Var13:=REF(CLOSE,1);
Var14:=SMA(MAX(CLOSE-Var13,0),7,1)/SMA(ABS(CLOSE-Var13),7,1)*100;
Var15:=SMA(MAX(CLOSE-Var13,0),13,1)/SMA(ABS(CLOSE-Var13),13,1)*100;
Var16:=BARSCOUNT(CLOSE);
Var17:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;
Var18:=((-100)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+50)*2;
Var19:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
Var1A:=(SMA(Var19,4,1)-50)*2;
Var1B:=SMA(Var1A,3,1);
Var1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
Var1D:=SMA(Var1C,4,1);
Var1E:=SMA(Var1D,3,1);
Var1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
Var20:=IF(Var17<=25 AND Var18<-95 AND Var1F>20 AND Var1B<-30 AND Var1E<30 AND Var12>=-0.25 AND Var14<22 AND Var15<28 AND Var16>50,80,0);
活筹OAMV: Var3,colorff00ff;
OX: IF(VarB<90,VarB,100),colorffcc66;
Var21:=IF(Var1>0,Var1,0);
核能: IF(Var1<0,Var2,0), LINESTICK;
牛角: Var20,coloryellow;
预警: IF(Var7>=200 AND Var6>=150,15,IF(Var7<=-200 AND Var6<=-150,-15,Var9))
+60,color00ff00;
Var22:=100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34));
Var23:=MA(Var22,3);
Var24:=EMA(AMOUNT/VOL/100,5);
Var25:=EMA(AMOUNT/VOL/100,13);
Var26:=Var24-Var25;
势能: IF(1000*Var26/Var24>0,1000*Var26/Var24,0),colorred;
STICKLINE(Var3>=REF(Var4,1),Var3,Var4,8,1),colorred;
STICKLINE(Var3<REF(Var4,1),Var3,Var4,8,1),color00ff00;
Var27:=CLOSE>MA(CLOSE,20) AND MA(CLOSE,20)>=REF(MA(CLOSE,20),1);
Var28:=CLOSE<MA(CLOSE,20) AND MA(CLOSE,20)<REF(MA(CLOSE,20),1);
Var29:=Var21>50 AND 预警>60 AND OX=100;
Var2A:=Var21>48 AND 预警>60 AND OX<100;
Var2B:=核能>38 AND 预警<55;
Var2C:=牛角>50 AND OX<90;
Var2D:=Var3<REF(Var4,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
Var2E:=Var3>=REF(Var4,1) AND CLOSE<REF(CLOSE,1) AND 预警=60 AND 牛角=0 AND 核能>=REF(核能,1) AND VarC<REF(VarD,1);
DRAWTEXT(Var27 AND COUNT(Var27,30)=1,90,'持股待涨'),colorff00ff;
DRAWTEXT(Var28 AND COUNT(Var28,30)=1,10,'减仓为佳'),color00ff00;
DRAWTEXT(Var29 AND COUNT(Var29,30)=1,70,'上涨过急'),colorwhite;
DRAWTEXT(Var2A AND COUNT(Var2A,30)=1,80,'狂牛开跑'),coloryellow;
DRAWTEXT(Var2B AND COUNT(Var2B,30)=1,20,'不必杀跌 '),colorwhite;
DRAWTEXT(Var2C AND COUNT(Var2C,30)=1,30,'阶段底部 '),colorffcc66;
DRAWTEXT(Var2D AND COUNT(Var2D,30)=1,60,'大资金进场'),color0099ff;
DRAWTEXT(Var2E AND COUNT(Var2E,30)=1,40,'高点回落'),colorblue;
说明：以上公式源码导入时要加参数，否则不行。
|
|
|
[3476 楼]
|
Posted: 2008-07-24 22:26 |
| |
勇华股票论坛 -> 〖技术分析交流区〗 -> 超级简单的准确买入法，不准不看。
