|
|

楼主 |
发表于 2004-4-30 09:23
|
显示全部楼层
屠庄指标(原码)
var101:=ma(slope(close,3)/ref(close,14),13);
var102:=ma(slope(indexc,3)/ref(indexc,14),13);
var103:=var101-var102;
var104:=sma(var103,3,1);
var105:=amount/100000000;
var106:=if(close>ref(close,1),var105,if(close<ref(close,1),(-1)*var105,0));
var107:=sum(var106,21);
var108:=var107*close;
var109:=sma(var108,3,1);
var110:=sma(var109,3,1);
var111:=ma(var108,30);
var112:=if(var108>var109 and var109>var110 and var108>var111,1,0);
var113:=ema(close,12.5)-ema(close,25);
var114:=ema(var113,13);
var115:=(var113-var114)*2;
var116:=if(var115>0.3,pow(var115,3)*5/10+pow(var115,2),0);
var117:=ema(var116,3);
var118:=sma((close-llv(low,31))/(hhv(high,31)-llv(low,31))*100,5,1);
var119:=3*var118-2*sma(var118,3,1);
var120:=sma(var119,3,1);
var121:=if(var119>var120 and var119<50,1,0);
var122:=if(barslast(cross(var103,var104))<=5 and llv(var103,10)=llv(var103,60)and var112,1,0);
drawtext(filter(var121=1 and var122=1,5),low,'*送钱了'),coloryellow,linethick7;
drawtext(cross(var104*10000,99),low,'*屠庄'),colorwhite,linethick7;
rsv1:=(c-llv(l,20))/(hhv(h,20)-llv(l,20));
rsv2:=(rsv1-0.5)*ema(c,20)/5;
k:=sma(rsv2,5,1);
d:=sma(k,5,1);
j:=k*3-d*2;
var140:=ma(k+ema(c,20),3);
var139:=ma(j+ema(c,20),3);
var141:=if(cross(var139,var140),1,0);
var142:=if(cross(var140,var139),1,0);
移动峰位:=100*ema((winner(c*1.1)-winner(c*0.95)),5);
主力进出:=100*ema(winner(c)-winner(c*0.7),5);
出货过程:=100*(1-ema(winner(c*0.7),5));
※主力:cost(主力进出),colormagenta,linethick2;
※峰位:cost(移动峰位),color339966,linethick2;
※沉淀:cost(0.5*(100-100*ema(winner(c)-winner(c*0.7),5))+0.5*ema(100-(winner(c*1.05)-winner(c*0.90))*100,5)),pointdot,coloryellow;
※买点:drawicon(var141,low*0.97,4),colorred;
※卖点:drawicon(var142,high*1.03,5),colorgreen;
var1a:=ma(slope(close,5)/ref(close,14),13);
var2a:=ma(slope(indexc,5)/ref(indexc,14),13); |
|
|