Pak Timur, hehehe.. seneng jg di puji sama senior saya, monggo pak kl mau ditambahkan cuma pertimbangan saya kl arrownya dibuat satu juga bisa tampak mirip dgn arrow stoch cross apalagi didaerah OB/OS ada cloud jd sering luput dr pandangan mata. tp bisa juga pak jika color nya aja dibedakan ya.. monggo deh pak..
salam, ________________________________ From: Timur Langit <timurlangit.is.h...@gmail.com> To: amibroker-4-bei@yahoogroups.com Sent: Mon, August 2, 2010 4:37:13 PM Subject: Re: [Komunitas AmiBroker] Stochastic (ditambahin) Supp-Resist, afl Kalau Pak Isfandi mah, top markotop.... . This one is superb..... tapi gimana ya agar keluar hanya satu arrow buy di lembah yg ke-2 yg divergen? tapi gimana ya agar keluar hanya satu arrow sell di puncak yg ke-2 yg divergen? Timur.... 2010/8/2 tjhai lioe <tjhail...@gmail. com> >wah selalu ada yang baru dari pak ISFANDI ,terima kasih koleksi saya tambah >lagi . >cara bacanya yang efektif gimana ya pak .panah merah yang banyak itu >menunjukan >apa ya pak. > >pak saya ada lihat chart candle 3 warna ,setiap perubahan dari bull(candle >biru) ke bear (candle merah )muncul candle kuning . >sepertinya bagus tuh kalau boleh tolong buatkan AFL nya pak . >mantap tuh. >terima kasih ya pak > > >2010/8/2 <isfandi2001@ yahoo.com> > > > >>Just Sharing, >> >>kalo stoch pake support & resistance line jdnya kaya apa ya..? saya coba >>tambahin sepertinya jd ada trigger buat signal sell yg kmrn udh muncul pd >>GJTL, >>jd gak semua signal sell dianggap hrs jual semua paling gak afl ini bisa >>menjadi >>pembanding alokasi sell yg akan anda putuskan. >> >>seperti himbauan pak eco yg lalu, pls.. temen2 yg blm pake AB asli tolong >>diperbaharui jd kita2 enak berbaginya nih... setuju gak? >> >>semoga menambah perbendaharaan trading tools anda. >> >> >>happy operating >>salam, >> >> >>Isfandi >> >>xxxxxxxxxxxxxxxxxxx xxxxxxxxxxxxxxxx xxxxxxxxx stoch pake supp rest >>xxxxxxxxxxxxxxxxxxx xxxxxxxxxxxxxxxx x >> >>_SECTION_BEGIN("Stochastic"); >> >>periods = Param( "Periods", 14, 1, 200, 1 ); >>Ksmooth = Param( "%K avg", 3, 1, 200, 1 ); >>Dsmooth = Param( "%D avg", 3, 1, 200, 1 ); >>myStochD =StochD( periods , Ksmooth, DSmooth ); >>myStochK =StochK( periods , Ksmooth); >>Overbought = 80 ; >>Oversold =20 ; >>Center = 50 ; >> >>Buy1 = Cross(myStochK, Oversold ) ; >>Buy2 = Cross(myStochK, Center ) ; >>Sell1 = Cross( Overbought, myStochK ); >>Sell2 = Cross( Center, myStochK ); >> >> >>Plot( myStochD, "Stochastic %D"+_PARAM_VALUES( ), ParamColor( "ColorD", >>colorRed >>), ParamStyle("StyleD") ); >>Plot( myStochK, "Stochastic %K", ParamColor( "ColorK", colorBlue ), >>ParamStyle("StyleK") ); >> >>PlotShapes(IIf( Sell1, shapeDownArrow , shapeNone), colorRed,0, Offset=Null) ; >>PlotShapes(IIf( Sell2, shapeDownArrow , shapeNone), colorRed,0, Offset=Null) ; >>PlotShapes(IIf( Buy1 , shapeUpArrow , shapeNone), colorGold,0, Offset=Null) ; >>PlotShapes(IIf( Buy2 , shapeUpArrow , shapeNone), colorGold,0, Offset=Null) ; >> >>Plot(Overbought,"",colorRed); >>Plot(Oversold,"",colorGreen) ; >>Plot(Center,"",colorWhite, styleDashed) ; >> >>y0=LastValue( Trough(StochD( periods , Ksmooth, DSmooth ),1,2)); >>y1=LastValue( Trough(StochD( periods , Ksmooth, DSmooth ),1,1)); >>x0=BarCount - 1 - LastValue(TroughBar s(StochD( periods , Ksmooth, DSmooth >>),1,2)); >>price_start= Close[x0] ; >>x1=BarCount - 1 - LastValue(TroughBar s(StochD( periods , Ksmooth, DSmooth >>),1,1)); >> >>price_end=Close[ x1]; >>Line = LineArray( x0, y0, x1, y1, 0 ); >>Plot( Line, "Support line", colorYellow ); >>Buy = y1>y0 AND price_end<price_start; >>PlotShapes(shapeUpA rrow * Buy, colorGreen,0, Line); >> >>y00=LastValue( Peak(StochD( periods , Ksmooth, DSmooth ),1,2)); >>y11=LastValue( Peak(StochD( periods , Ksmooth, DSmooth ),1,1)); >>x00=BarCount - 1 - LastValue(PeakBars( StochD(periods , Ksmooth, DSmooth >>),1,2)); >> >>price_start1= Close[x00] ; >>x11=BarCount - 1 - LastValue(PeakBars( StochD(periods , Ksmooth, DSmooth >>),1,1)); >>price_end1=Close[ x11]; >>Line = LineArray( x00, y00, x11, y11, 0 ); >>Plot( Line, "Resistance line", colorBlue ); >>Sell = y11<y00 AND price_end1>price_start1; >>PlotShapes(shapeDow nArrow * Sell, colorRed,0,Line) ; >> >> >>PlotOHLC( myStochK,myStochK, 50,myStochK, "", colorAqua, styleCloud | >>styleClipMinMax, Oversold , Overbought); >>PlotOHLC( myStochD,myStochD, 50,myStochD, "", colorPink, styleCloud | >>styleClipMinMax, Oversold , Overbought); >> >> >>//Optimize >> >>range = Optimize( "Range", 8, 8, 14, 1 ); >>Ksmooth = Optimize("%K smooth", 3, 2, 5, 1 ); >>Dsmooth = Optimize("%D smooth", 3, 2, 5, 1 ); >>Buy=Cross( StochK (range,Ksmooth) , StochD (range,Ksmooth, Dsmooth) ); >>Sell = Cross( StochD(range, Ksmooth,Dsmooth) , StochK(range, Ksmooth) ); >> >> >>_SECTION_END( ); >> >> >> >> >> >> >