المتوسط&.afl

一个更精度的平滑涵数, 可用于股票交易系统.用于Amibroker 平台

//------------------------------------------------------------------------------
//
//  Formula Name:    المتوسط&
//  Author/Uploader: ali 
//  E-mail:          [e-mail]
//  Date/Time Added: 2006-09-26 20:15:15
//  Origin:          المتوسطات
//  Keywords:        المتوسطات
//  Level:           basic
//  Flags:           exploration
//  Formula URL:     http://www.amibroker.com/library/formula.php?id=719
//  Details URL:     http://www.amibroker.com/library/detail.php?id=719
//
//------------------------------------------------------------------------------
//
// 
//  المتوسطات
//
//------------------------------------------------------------------------------

ScriptVersion = " explorativo del Main al 12 de set 2005";

//////////////////// PRECIO //////////////////////////////////////////////

Plot(C,"",colorBlack,styleCandle|styleNoLabel);

Filter = Close > 5;
AddColumn(Close,"Close");

PositionSize = 50;

///////////////////////	MEDIAS MOVILES///////////////////

slope = Param("slope",2,2,50,1);
Color20= IIf(LinRegSlope(MA(C,5),slope)<0,colorRed,colorBrightGreen);
event1= LinRegSlope(MA(C,5),slope)<1;
Plot( MA( C,9), "",Color20, styleLine);
//Plot( event1, "", colorRose, styleArea|styleOwnScale);
Color50= IIf(LinRegSlope(MA(C,50),slope)<0,colorRed,colorBlue); 
Plot( MA( C, 60), "",Color50  , styleLine);
Color100= IIf(LinRegSlope(MA(C,100),slope)<0,colorRed,colorYellow);
Plot( MA( C,  90), "",Color100 , styleLine);
Color150= IIf(LinRegSlope(MA(C,150),slope)<0,colorRed,10); 
Plot( MA( C, 150), "",Color150  , styleLine);

event1=Cross(MA(C,2),MA(C,7));
PlotShapes( IIf(event1 ,shapeDigit1,0) ,5, 1, L,-30);
event4=Cross(MA(C,7),MA(C,2));
PlotShapes( IIf(event4 ,shapeDigit4,0) ,4, 1, H,30);