精诚 2006-12-3 08:41
A01:=DYNAINFO(7);<br />A03:=BARSCOUNT(CLOSE);<br />A04:=(SMA((CLOSE / HHV(HIGH,120)),3,1) * 100);<br />A05:=IF((A03 > 20),A04,0);<br />A06:=IF((LOW > A01),0,IF((HIGH < A01),1,(((A01 - LOW) + 0.009) / ((HIGH - LOW) + 0.009))));<br />A07:=DMA(A06,(VOL / CAPITAL)) * 60;<br />A09:=IF((((A07 > 0) AND (A07 > REF(A07,1))) AND (A05 <= 88)),A07,0);<br />Var1:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);<br />Var2:=EMA(Var1,8);<br />Var3:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);<br />趋势:=EMA(Var3,3)-10;<br />FILLRGN(趋势>80,趋势,80);<br />DRAWICON(CROSS(趋势,0),0,1);<br />FILLRGN((A09 > 0 AND (趋势<20 OR 趋势>REF(趋势,1)AND 趋势<50)),0,A09),colorFFFF00;<br />机构建仓区:0,LINETHICK0,colorFFFF00;<br />Var4:=(趋势-REF(趋势,1))/REF(趋势,1)*100;<br />STICKLINE(趋势<=13,0,20,5,0),colorcc9900;<br />DRAWTEXT(FILTER(趋势<=13,15),30,'准备现金'),colorcc9900;<br />STICKLINE(趋势<=13 AND Var4>13,0,50,5,0),color0099ff;<br />Var5:=FILTER((趋势<=13 AND Var4>13),10);<br />DRAWTEXT(Var5,60,'买入'),color0099ff;<br />STICKLINE(趋势>=90 AND Var4,0,30,5,0),colorgray;<br />Var6:=FILTER((趋势>=90 AND Var4),10);<br />DRAWTEXT(Var6,40,'清仓'),colorgray;<br />Var7:=LLV(LOW,30);<br />Var8:=HHV(HIGH,30); <br />Var9:=EMA((CLOSE-Var7)/(Var8-Var7)*4,4)*25; <br />STICKLINE(Var9>90,100,105,10,2),COLORRED; <br />Var10:=(Var9-LLV(Var9,4))/(HHV(Var9,4)-LLV(Var9,4))*100; <br />DRAWTEXT(IF(CROSS(Var9,Var10) AND Var9>87,95,0),88,'险'),Color00FF00,ALIGN1;<br />DRAWICON(CROSS(90,Var9),95,9);<br />Var11:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1)*100;<br />Var12:=HHV(Var11,30)*8;<br />火焰山:EMA(IF(LOW<=Var7 AND 趋势<40,(Var11+Var12),0),3)/618,COLORRED,linethick2;<br />STICKLINE(火焰山>0,0 ,火焰山*1.2,8,0 ),COLORRED; <br />Var13:=(MA(C,1)+MA(C,3)+MA(C,5)+MA(C,7)+MA(C,9))/5;<br />Var14:=(MA(C,2)+MA(C,4)+MA(C,6)+MA(C,8)+MA(C,10))/5;<br />趋势线: 趋势,colorff0000;<br />Var16:=MAX(EMA(Var13,2)-EMA(Var14,5),0)*200;<br />Var17:=EMA(Var16,5);<br />波浪峰:Var17,stick,colorff00ff;<br />STICKLINE(Var17<REF(Var17,1),0,Var17,1,0),color00ff00;<br />Var18:=MA(趋势线,8);<br />if(CROSS(Var2,Var18) AND Var2<15,50,0),COLORRED;<br />DRAWTEXT(CROSS(趋势线,Var2)AND 趋势线>REF(趋势线,1)AND 趋势线<50,50,'追涨'),COLORFF0000;