http://bbs.fjfox.com/t-15232.html
Var1:=EMA(HHV(HIGH,500),21);
Var2:=EMA(HHV(HIGH,250),21);
Var3:=EMA(HHV(HIGH,90),21);
Var4:=EMA(LLV(LOW,500),21);
Var5:=EMA(LLV(LOW,250),21);
Var6:=EMA(LLV(LOW,90),21);
Var7:=EMA((Var4*0.96+Var5*0.96+Var6*0.96+Var1*0.558+Var2*0.558+Var3*0.558)/6,21);
Var8:=EMA((Var4*1.25+Var5*1.23+Var6*1.2+Var1*0.55+Var2*0.55+Var3*0.65)/6,21);
Var9:=EMA((Var4*1.3+Var5*1.3+Var6*1.3+Var1*0.68+Var2*0.68+Var3*0.68)/6,21);
VarA:=EMA((Var7*3+Var8*2+Var9)/6*1.738,21);
VarB:=REF(LOW,1);
VarC:=SMA(ABS(LOW-VarB),3,1)/SMA(MAX(LOW-VarB,0),3,1)*100;
VarD:=EMA(IF(CLOSE*1.35<=VarA,VarC*10,VarC/10),3);
VarE:=LLV(LOW,30);
VarF:=HHV(VarD,30);
Var10:=IF(MA(CLOSE,58),1,0);
爱神: EMA(IF(LOW<=VarE,(VarD+VarF*2)/2,0),3)/618*Var10;
爱欲: STICKLINE(爱神>0,0, 爱神,4,1);
激情: 爱神;
STICKLINE(爱神>0,0, 激情*1.2,8,0) COLOR0000ff;
STICKLINE(爱神>0,0, 激情*0.8,8,0) COLOR0066ff;
STICKLINE(爱神>0,0, 激情*0.6,8,0) COLOR0099ff;
STICKLINE(爱神>0,0, 激情*0.4,8,0) COLOR00ccff;
STICKLINE(爱神>0,0, 激情*0.2,8,0) COLOR00ffff;
Var11:=REF(LOW,1);
Var12:=SMA(ABS(LOW-Var11),13,1)/SMA(MAX(LOW-Var11,0),13,1)*100;
Var13:=EMA(IF(CLOSE*1.2,Var12*13,Var12/13),13);
Var14:=LLV(LOW,34);
Var15:=HHV(Var13,34);
Var16:=IF(LLV(LOW,56),1,0);
Var17:=EMA(IF(LOW<=Var14,(Var13+Var15*2)/2,0),3)/618*Var16;
Var18:=EMA(CLOSE,5);
Var19:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*(-10);
STICKLINE(Var18>REF(Var18,1),0,Var18*0.08,4,1),color10E410;
减仓:IF(Var18>REF(Var18,1),Var18,0),color10E410,linethick0;
STICKLINE(Var18<REF(Var18,1),0,Var18*0.08,4,1),color1010FF;
增仓:IF(Var18<REF(Var18,1),Var18,0),color1010FF,linethick0;
STICKLINE(Var17>REF(Var17,1),0,Var17,4,1),color10FFFF;
主力进场:IF(Var17>REF(Var17,1),Var17*8,0),color10FFFF,linethick0;
STICKLINE(Var17<REF(Var17,1),0,Var17,4,1),colorFFF810;
洗盘:IF(Var17<REF(Var17,1),Var17*10,0),colorFFF810,linethick0;
主力持仓LOW*5),colorFF10FF,linethick0;
增减力度:Var19,colorFF7676;
AM:=IF(DATE<=1031231,1,0);
AA:=CLOSE/REF(CLOSE,1)>=1.099;
AB:=VOL/REF(VOL,1);
预警:IF(CLOSE/REF(CLOSE,1)>=1.07 AND AB<1,33,0),COLOR00FFFF;
目标:IF(AA AND AB<1,55,0)*AM,COLOR0000FF,LINETHICK2;
if(c/ref(c,1)>1.07,v/capital*100,0);
↑爆炒RAWICON(c/ref(c,1)>1.07,v/capital*100,0),COLORRED;
Var20:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100)/3;
0, VOLSTICK;
拉%: IF(Var20>0,Var20,0), , COLORGREEN;
拉10%: STICKLINE(Var20>9 AND FILTER(Var20< REF(Var20,1),5),Var20+2,0,3,0), , COLORRED;
拉20%: STICKLINE(Var20>20 AND FILTER(Var20< REF(Var20,1),5),Var20+5,0,7,0), , COLORCYAN;
AM:=IF(DATE<=1031231,1,0);
AA:=CLOSE/REF(CLOSE,1)>=1.099;
AB:=VOL/REF(VOL,1);
涨停:IF(CLOSE/REF(CLOSE,1)>=1.07 AND AB<1,33,0),COLOR00FFFF;
Var21:=HHV(Var21>20,10);
危险: STICKLINE(Var21 AND CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),Var21+10,0,4,0);
止损: STICKLINE(Var21 AND FILTER(Var21< REF(Var21,1),6) AND CROSS(MA(CLOSE,5),MA(CLOSE,2)),Var21+6,0,3,0);
XL1:=MA(LOW,2)*0.96;
XL2:=MA(LOW,26)*0.85;
XL3:=REF(XL1,1)<XL2 AND REF(XL1,1)<XL1 AND REF(XL1,1)<REF(XL1,2);
STICKLINE(XL3,0,Var8*3,4,0),Color006EFF;
DRAWTEXT(XL3,Var8*2,'做'),ColorRED;
↑做RAWICON(XL3,0,4),COLORRED;
附件 1: 爱神垂青.ALG (更新: 2005-2-21 10:54 PM 大小: 2.19 K 下载次数: 40)
本贴由 清风斜阳 于 2005-3-7 06:40 最后编辑