查看完整版本: 均线拐点

tzwxlj1 2006-8-12 15:18

均线拐点

{均线拐点}
{60}
ma5:=SUM(AMOUNT,5)/SUM(VOL,5)/100;ma10:=SUM(AMOUNT,10)/SUM(VOL,10)/100;ma15:=SUM(AMOUNT,15)/SUM(VOL,15)/100;
ma20:=SUM(AMOUNT,20)/SUM(VOL,20)/100;ma25:=SUM(AMOUNT,25)/SUM(VOL,25 )/100;ma30:=SUM(AMOUNT,30)/SUM(VOL,30)/100;
ma35:=SUM(AMOUNT,35)/SUM(VOL,35)/100;ma40:=SUM(AMOUNT,40)/SUM(VOL,40 )/100;ma45:=SUM(AMOUNT,45)/SUM(VOL,45)/100;
ma50:=SUM(AMOUNT,50)/SUM(VOL,50)/100; ma55:=SUM(AMOUNT,55)/SUM(VOL,55 )/100; ma60:=SUM(AMOUNT,60)/SUM(VOL,60)/100;
gl5:=-(ma60-ma5)/ma5*100;gl10:=-(ma60-ma10)/ma10*100;gl15:=-(ma60-ma15 )/ma15 *100;
gl20:=-(ma60-ma20)/ma20*100;gl25:=-(ma60-ma25)/ma25*100;gl30:=-(ma60-ma30 )/ma30 *100;
gl35:=-(ma60-ma35)/ma35*100;gl40:=-(ma60-ma40)/ma40*100;gl45:=-(ma60-ma45 )/ma45 *100;
gl50:=-(ma60-ma50)/ma50*100; gl55:=-(ma60-ma55)/ma55*100;
jxfx60:=(gl5+gl10+gl15+gl20+gl25+gl30+gl35+gl40+gl45+gl50+gl55)/11,LINETHICK;
{zqs60}
ZQ60:=if(cross(jxfx60,0) or cross(0,jxfx60) or jxfx60=0,0,1);
ZQ61:=if(jxfx60>0,1,0);
ZQ62:=if(jxfx60<0,-1,0);
ZQS60:=ZQ60*ZQ61+ZQ60*ZQ62,LINETHICK;
W60:=BARSLAST(ZQ60=0)+1;
{120}
ma70:=SUM(AMOUNT,70)/SUM(VOL,70)/100;
ma80:=SUM(AMOUNT,80)/SUM(VOL,80)/100;
ma90:=SUM(AMOUNT,90)/SUM(VOL,90)/100;
ma100:=SUM(AMOUNT,100)/SUM(VOL,100)/100;
ma110:=SUM(AMOUNT,110)/SUM(VOL,110)/100;
ma120:=SUM(AMOUNT,120)/SUM(VOL,120)/100;
gl10:=-(ma120-ma10 )/ma10*100;
gl20:=-(ma120-ma20 )/ma20*100;
gl30:=-(ma120-ma30 )/ma30*100;
gl40:=-(ma120-ma40 )/ma40*100;
gl50:=-(ma120-ma50 )/ma50*100;
gl60:=-(ma120-ma60 )/ma60*100;
gl70:=-(ma120-ma70 )/ma70*100;
gl80:=-(ma120-ma80 )/ma80*100;
gl90:=-(ma120-ma90 )/ma90*100;
gl100:=-(ma120-ma100)/ma100*100;
gl110:=-(ma120-ma110)/ma110*100;
jxfx120:=(gl10+gl20+gl30+gl40+gl50+gl60+gl70+gl80+gl90+gl100+gl110)/11;
{zqs120}
ZQ120:=if(cross(jxfx120,0) or cross(0,jxfx120) or jxfx120=0,0,1);
ZQ121:=if(jxfx120>0,1,0);
ZQ122:=if(jxfx120<0,-1,0);
ZQS120:=ZQ120*ZQ121+ZQ120*ZQ122,LINETHICK;
W120:=BARSLAST(ZQ120=0)+1;

{240}
ma130:=SUM(AMOUNT,130)/SUM(VOL,130)/100;
ma140:=SUM(AMOUNT,140)/SUM(VOL,140)/100;
ma150:=SUM(AMOUNT,150)/SUM(VOL,150)/100;
ma160:=SUM(AMOUNT,160)/SUM(VOL,160)/100;
ma170:=SUM(AMOUNT,170)/SUM(VOL,170)/100;
ma180:=SUM(AMOUNT,180)/SUM(VOL,180)/100;
ma190:=SUM(AMOUNT,190)/SUM(VOL,190)/100;
ma200:=SUM(AMOUNT,200)/SUM(VOL,200)/100;
ma210:=SUM(AMOUNT,210)/SUM(VOL,210)/100;
ma220:=SUM(AMOUNT,220)/SUM(VOL,220)/100;
ma230:=SUM(AMOUNT,230)/SUM(VOL,230)/100;
ma240:=SUM(AMOUNT,240)/SUM(VOL,240)/100;
gl10:=-(ma240-ma10)/ma10*100;
gl20:=-(ma240-ma20)/ma20*100;
gl30:=-(ma240-ma30)/ma30*100;
gl40:=-(ma240-ma40)/ma40*100;
gl50:=-(ma240-ma50)/ma50*100;
gl60:=-(ma240-ma60)/ma60*100;
gl70:=-(ma240-ma70)/ma70*100;
gl80:=-(ma240-ma80)/ma80*100;
gl90:=-(ma240-ma90)/ma90*100;
gl100:=-(ma240-ma100)/ma100*100;
gl110:=-(ma240-ma110)/ma110*100;
gl120:=-(ma240-ma120)/ma120*100;
gl130:=-(ma240-ma130)/ma130*100;
gl140:=-(ma240-ma140)/ma140*100;
gl150:=-(ma240-ma150)/ma150*100;
gl160:=-(ma240-ma160)/ma160*100;
gl170:=-(ma240-ma170)/ma170*100;
gl180:=-(ma240-ma180)/ma180*100;
gl190:=-(ma240-ma190)/ma190*100;
gl200:=-(ma240-ma200)/ma200*100;
gl210:=-(ma240-ma210)/ma210*100;
gl220:=-(ma240-ma220)/ma220*100;
gl230:=-(ma240-ma230)/ma230*100;
jxfx240:=(gl10+gl20+gl30+gl40+gl50+gl60+gl70+gl80+gl90+gl100+gl110+gl120+gl130+gl140+gl150+gl60+gl170+gl180+gl190+gl200+gl210+gl220+gl230)/23;
{zqs240}
ZQ240:=if(cross(jxfx240,0) or cross(0,jxfx240) or jxfx240=0,0,1);
ZQ241:=if(jxfx240>0,1,0);
ZQ242:=if(jxfx240<0,-1,0);
ZQS240:=ZQ240*ZQ241+ZQ240*ZQ242,LINETHICK;
W240:=BARSLAST(ZQ240=0)+1;
{计算时间拐点}
零:0,LINEDASHDOT,COLORAAACCC;
{gd30:zqs30;}
gd60:SUM(ZQS60,W60),COLORYELLOW,LINETHICK2;
gd120:SUM(ZQS120,W120),COLORMAGENTA,LINETHICK2;
gd240:SUM(ZQS240,W240),COLORGREEN;

tzwxlj1 2006-8-13 15:00

支持一下!

绿色通道 2006-8-17 07:13

谢谢

czhao 2006-8-17 09:57

谢谢源码!

文印 2006-8-17 11:45

谢谢发布源码! !!

gjl01 2008-4-4 15:37

飞狐???
页: [1]
查看完整版本: 均线拐点