| Dear Pak Irwan, Mudah2an sesuai dengan yg diminta: _SECTION_BEGIN("MACD"); r1 = Param( "Fast avg", 12, 2, 200, 1 ); r2 = Param( "Slow avg", 26, 2, 200, 1 ); r3 = Param( "Signal avg", 9, 2, 200, 1 ); Plot ( ml = MACD(r1, r2), StrFormat(_SECTION_NAME()+"(%g,%g)", r1, r2), ParamColor("MACD color", colorRed ), ParamStyle("MACD style") ); Plot ( sl = Signal(r1,r2,r3), "Signal" + _PARAM_VALUES(), ParamColor("Signal color", colorBlue ), ParamStyle("Signal style") ); //Plot ( ml-sl, "MACD Histogram", ParamColor("Histogram color", colorBlack ), styleNoTitle | ParamStyle("Histogram style", styleHistogram | styleNoLabel, maskHistogram ) ); Plot (0, "", colorBlue,styleNoLabel); r1 = Param( "Fast avg", 12, 2, 200, 1 ); r2 = Param( "Slow avg", 26, 2, 200, 1 ); r3 = Param( "Signal avg", 9, 2, 200, 1 ); ml = MACD(r1, r2); sl = Signal(r1,r2,r3); Hist = ml-sl; MACUP = Hist > Ref(Hist,-1); MACDN = Hist < Ref(Hist,-1); BarColor = IIf(MACUP,colorGreen,IIf(MACDN,colorRed,colorBlue)); //Plot( Hist, "MACD Histogram", ParamColor("Histogram color", colorBlack ), styleNoTitle | ParamStyle("Histogram style", styleHistogram | styleNoLabel,maskHistogram ) ; Plot( Hist, "MACD Histogram", BarColor , styleHistogram ); Plot(0, "0", colorBlueGrey ); Buy = Cross(ml,sl); Sell = Cross(sl,ml); PlotShapes(shapeUpArrow*Buy,colorGreen); PlotShapes(shapeDownArrow*Sell,colorRed); // Salam, Samuel --- Pada Sen, 7/2/11, ps3 expert <xp3max@gmail.com> menulis:
|
__._,_.___



No comments:
Post a Comment