郎少
发表于 2009-8-19 15:48
N:=27;N2:=9;N3:=3;N4:=16;<BR>Var1:=IF(DATE>=1030131,1,1);<BR>Var2:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;<BR>获利盘:WINNER(CLOSE)*100*Var1;<BR>Var3:=SMA(Var2,3,1)*Var1;<BR>Var4:=SMA(Var3,N2,1)*Var1;<BR>Var5:=3*Var3-2*Var4*Var1;<BR>Var6:=VOL*Var1;<BR>角度:=(CLOSE-REF(OPEN,29))/REF(OPEN,29)*100*Var1;<BR>换手: VOL/CAPITAL*100*Var1;<BR>Var7:=SUM(换手,30)*Var1;<BR>Var8:=LLV(INDEXL,5)*Var1;<BR>Var9:=HHV(INDEXH,5)*Var1;<BR>VarA:=EMA((INDEXC-Var8)/(Var9-Var8)*100,4);<BR>VarB:=MA(EMA(0.667*REF(VarA,1)+0.333*VarA,2),9);<BR>VarC:=MA(VarB,30);<BR>VarD:=EMA(获利盘,4)*Var1;<BR>本盘亿股: CAPITAL/1000000;<BR>V5: MA(VOL,5)*2*Var1;<BR>V13: MA(VOL,13)*2*Var1;<BR>CROSS(VarB,VarC) AND VarC<29*Var1;<BR>STICKLINE(VOL AND Var5>Var4,0,VOL,9,0),color000055;<BR>STICKLINE(VOL AND Var5>Var4,0,VOL,8,0),color000066;<BR>STICKLINE(VOL AND Var5>Var4,0,VOL,7,0),color000077;<BR>STICKLINE(VOL AND Var5>Var4,0,VOL,6,0),color000088;<BR>STICKLINE(VOL AND Var5>Var4,0,VOL,5,0),color000099;<BR>STICKLINE(VOL AND Var5>Var4,0,VOL,4,0),color0000aa;<BR>STICKLINE(VOL AND Var5>Var4,0,VOL,3,0),color0000bb;<BR>STICKLINE(VOL AND Var5>Var4,0,VOL,2,0),color0000cc;<BR>STICKLINE(VOL AND Var5>Var4,0,VOL,1,0),color0000dd;<BR>STICKLINE(VOL AND Var5<Var4,0,VOL,9,0),colorFF1100;<BR>STICKLINE(VOL AND Var5<Var4,0,VOL,8,0),colorFF2200;<BR>STICKLINE(VOL AND Var5<Var4,0,VOL,7,0),colorFF3300;<BR>STICKLINE(VOL AND Var5<Var4,0,VOL,6,0),colorFF4400;<BR>STICKLINE(VOL AND Var5<Var4,0,VOL,5,0),colorFF5500;<BR>STICKLINE(VOL AND Var5<Var4,0,VOL,4,0),colorFF6600;<BR>STICKLINE(VOL AND Var5<Var4,0,VOL,3,0),colorFF7700;<BR>STICKLINE(VOL AND Var5<Var4,0,VOL,2,0),colorFF8800;<BR>STICKLINE(VOL AND Var5<Var4,0,VOL,1,0),colorFF9900;<BR>STICKLINE(VOL AND Var4<N4,0,VOL,9,0),color333333;<BR>STICKLINE(VOL AND Var4<N4,0,VOL,8,0),color444444;<BR>STICKLINE(VOL AND Var4<N4,0,VOL,7,0),color555555;<BR>STICKLINE(VOL AND Var4<N4,0,VOL,6,0),color666666;<BR>STICKLINE(VOL AND Var4<N4,0,VOL,7,0),color777777;<BR>STICKLINE(VOL AND Var4<N4,0,VOL,6,0),color888888;<BR>STICKLINE(VOL AND Var4<N4,0,VOL,5,0),color999999;<BR>STICKLINE(VOL AND Var4<N4,0,VOL,4,0),coloraaaaaa;<BR>STICKLINE(VOL AND Var4<N4,0,VOL,3,0),colorbbbbbb;<BR>STICKLINE(VOL AND Var4<N4,0,VOL,2,0),colorcccccc;<BR>STICKLINE(VOL AND Var4<N4,0,VOL,1,0),colordddddd;<BR>RSI:=SMA(MAX(CLOSE-REF(CLOSE,1),0),5,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;<BR>抛压:STICKLINE(CROSS(84,RSI),0 ,VOL,9,0),COLORFF0033;<BR>STICKLINE(CROSS(84,RSI),0 ,VOL,8,0),COLORFF0044;<BR>STICKLINE(CROSS(84,RSI),0 ,VOL,7,0),COLORff0055;<BR>STICKLINE(CROSS(84,RSI),0 ,VOL,6,0),COLORff0066;<BR>STICKLINE(CROSS(84,RSI),0 ,VOL,5,0),COLORff0077;<BR>STICKLINE(CROSS(84,RSI),0 ,VOL,4,0),COLORFF0088;<BR>STICKLINE(CROSS(84,RSI),0 ,VOL,3,0),COLORff0099;<BR>STICKLINE(CROSS(84,RSI),0 ,VOL,2,0),COLORff00aa;<BR>STICKLINE(CROSS(84,RSI),0 ,VOL,1,0),COLORff00bb;<BR><BR>VAR13:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;<BR>VAR14:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;<BR>VAR15:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;<BR>VAR16:=(VAR13+VAR14+VAR15)/3;<BR>VAR18:=IF(VAR16<=-20,10,0);<BR>VAR19:=HHV(VAR18,10);<BR>VAR20:=IF(VAR19 AND CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);<BR>底部:STICKLINE(VAR20=20,0 ,VOL,9,0),COLOR005555;<BR>STICKLINE(VAR20=20,0 ,VOL,8,0),COLOR006666;<BR>STICKLINE(VAR20=20,0 ,VOL,7,0),COLOR007777;<BR>STICKLINE(VAR20=20,0 ,VOL,6,0),COLOR008888;<BR>STICKLINE(VAR20=20,0 ,VOL,5,0),COLOR009999;<BR>STICKLINE(VAR20=20,0 ,VOL,4,0),COLOR00aaaa;<BR>STICKLINE(VAR20=20,0 ,VOL,3,0),COLOR00bbbb;<BR>STICKLINE(VAR20=20,0 ,VOL,2,0),COLOR00CCCC;<BR>STICKLINE(VAR20=20,0 ,VOL,2,0),COLOR00dddd;<BR><BR>VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;<BR>VARF:=100-3*SMA((CLOSE-LLV(LOW,66))/(HHV(HIGH,66)-LLV(LOW,66))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,66))/(HHV(HIGH,66)-LLV(LOW,66))*100,20,1),15,1);<BR>VAR100:=100-3*SMA((OPEN-LLV(LOW,66))/(HHV(HIGH,66)-LLV(LOW,66))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,66))/(HHV(HIGH,66)-LLV(LOW,66))*100,20,1),15,1);<BR>VAR111:=VARF<REF(VAR100,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);<BR>大资金活动:STICKLINE(VAR111 AND COUNT(VAR111,30)=1,0 ,VOL,9,0),COLOR006600;<BR>STICKLINE(VAR111 AND COUNT(VAR111,30)=1,0 ,VOL,8,0),COLOR007700;<BR>STICKLINE(VAR111 AND COUNT(VAR111,30)=1,0 ,VOL,7,0),COLOR008800;<BR>STICKLINE(VAR111 AND COUNT(VAR111,30)=1,0 ,VOL,6,0),COLOR009900;<BR>STICKLINE(VAR111 AND COUNT(VAR111,30)=1,0 ,VOL,5,0),COLOR00aa00;<BR>STICKLINE(VAR111 AND COUNT(VAR111,30)=1,0 ,VOL,4,0),COLOR00BB00;<BR>STICKLINE(VAR111 AND COUNT(VAR111,30)=1,0 ,VOL,3,0),COLOR00CC00;<BR>STICKLINE(VAR111 AND COUNT(VAR111,30)=1,0 ,VOL,2,0),COLOR00DD00;<BR>STICKLINE(VAR111 AND COUNT(VAR111,30)=1,0 ,VOL,1,0),COLOR00EE00;<BR><BR>A8:=(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4;<BR>B8:=A8*(1+ ((C+O+H+L)/4-SMA(C,10,1))/SMA(C,21,1));<BR>D8:=A8+3*STD(A8,10);<BR>DRAWICON(CROSS(B8,A8) AND A8>REF(A8,1) AND D8>REF(D8,1),0,1);<BR>
舜江侯
发表于 2009-8-19 15:52
月影月影
发表于 2009-8-19 16:25
没图
牛熊不分
发表于 2009-8-19 19:02
dddd
漫步雷电
发表于 2009-9-3 23:09
很好啊，谢谢
页:
[1]