pak Isfandi  ini saya buat ulang di tempat kerja saya   ,sebab afl yang
kemarin ada di komputer rumah .
hasil tambal sulam pak  ,ha ha  saya belum belajar  afl ,cuma bisa oprek
aja  .tempel sana tempel sini .oleh sebab itu saya sangat terbantu oleh pak
Isfandi,Pak Timur,Suheng Hok 1, Mas Eco ,Pak Eko,Pak Arief ressa, Pak Freexx
dll  ,maaf kalau lupa sebut namanya . untuk semuanya terima kasih

2010/7/12 <isfandi2...@yahoo.com>

>
>
> pak tjhai.. bagus bgt fractalnya, kl boleh sharing pake logika apa tuh..?
> kl bpk nunggu punya saya pasti lama, tp saya janji utk melengkapi punya bpk
> aja dulu ya... pendapat dan saran saya kalo bisa ditambahkan signal penguat
> trend sehingga signal sell yg muncul tdk serta merta kita ikuti "jual"
> selama signal trend msh menunjukan bullish begitu jg sebaliknya. nanti saya
> tambahkan  afl cutloss price or buy price after reversal, jd bpk bisa tau
> exit entry dalam range bar one day.
>
> salam,
>
> Isfandi
>
>
>
>
> ------------------------------
> *From:* tjhai lioe <tjhail...@gmail.com>
> *To:* amibroker-4-bei@yahoogroups.com
> *Sent:* Sun, July 11, 2010 8:47:16 PM
>
> *Subject:* Re: [Komunitas AmiBroker] BKDP
>
>
>
> yang ini chart bkdp ,  tapi saya  ga berani ambil ,mungkin jika tembus 139
> dengan volume besar  ,akan saya pertimbangkan dengan cutloss di 135  ,
> memang saham ini turunnya ga kira kira bisa bikin bangkrut orang yang ambil
> diatas dan ga mau cutloss .mohon koreksinya pak   .terima kasih
>
> On Sun, Jul 11, 2010 at 8:42 PM, tjhai lioe <tjhail...@gmail. 
> com<tjhail...@gmail.com>
> > wrote:
>
>> pak isfandi sambil menunggu afl dari bapak , saya coba oprak oprek afl
>> yang dari dari bapak  hasilnya seperti ini
>>
>> 2010/7/11 tjhai lioe <tjhail...@gmail. com <tjhail...@gmail.com>>
>>
>> pak isfandi sambil menunggu afl dari bapak , saya coba oprak oprek afl
>>> yang dari dari bapak  hasilnya seperti ini  .
>>>
>>> 2010/7/10 <adinoe.email@ yahoo.com <adinoe.em...@yahoo.com>>
>>>
>>>
>>>>
>>>> Pake ami banyak membantu?
>>>> Pake ny mudah kah?
>>>>
>>>> Sent from my BlackBerry® smartphone from Sinyal Bagus XL, Nyambung
>>>> Teruuusss... !
>>>> ------------------------------
>>>> *From: * <isfandi2001@ yahoo.com <isfandi2...@yahoo.com>>
>>>> *Sender: * amibroker-4- b...@yahoogroups. 
>>>> com<amibroker-4-bei@yahoogroups.com>
>>>> *Date: *Fri, 9 Jul 2010 19:41:21 -0700 (PDT)
>>>> *To: *<amibroker-4- b...@yahoogroups. com<amibroker-4-bei@yahoogroups.com>
>>>> >
>>>> *ReplyTo: * amibroker-4- b...@yahoogroups. 
>>>> com<amibroker-4-bei@yahoogroups.com>
>>>> *Subject: *Re: [Komunitas AmiBroker] BKDP
>>>>
>>>>
>>>>
>>>> terima kasih pak.. afl tsb utk signal2 reversal bukan buy sell dan msh
>>>> underconstruction alias blm rampung, mungkin nanti kl sdh jd
>>>>
>>>> salam,
>>>>
>>>> ------------------------------
>>>> *From:* tjhai lioe <tjhail...@gmail. com <tjhail...@gmail.com>>
>>>> *To:* amibroker-4- b...@yahoogroups. com<amibroker-4-bei@yahoogroups.com>
>>>> *Sent:* Sat, July 10, 2010 3:34:10 AM
>>>> *Subject:* Re: [Komunitas AmiBroker] BKDP
>>>>
>>>>
>>>>
>>>> Pak Isfandi chartnya bagus sekali ,apakah saya boleh dapat AFL nya
>>>> .terima kasih
>>>>
>>>> On Fri, Jul 9, 2010 at 3:55 PM, <isfandi2001@ 
>>>> yahoo.com<isfandi2...@yahoo.com>
>>>> > wrote:
>>>>
>>>>>
>>>>>
>>>>> Juast sharing,
>>>>>
>>>>> BKDP berpeluang reversal after 5 days lower low
>>>>>
>>>>> salam,
>>>>>
>>>>>
>>>>>
>>>>>  <http://www.bandoo.com/wp/ie.php?plg=ie&ad2=117&subs=yahoo&elm=sign>
>>>>>
>>>>>
>>>>   <http://www.bandoo.com/wp/ie.php?plg=ie&ad2=117&subs=yahoo&elm=sign>
>>>>
>>>>
>>>
>>
>   <http://www.bandoo.com/wp/ie.php?plg=ie&ad2=0&subs=yahoo&elm=sign>
>
>  
>

_SECTION_BEGIN("back color");
SetChartBkGradientFill( ParamColor("BgTop", ColorRGB(02,02,02 )),

ParamColor("BgBottom", ColorRGB( 02,02,02 )),ParamColor("titleblock",ColorRGB( 
172,172,172 ))); 
_SECTION_END();



/*======================================================
                ISFANDI INTRADAY HEIKIN ASHI + PIVOT POINTS
  ======================================================*/


_SECTION_END();
_SECTION_BEGIN("Price");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, 
Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Plot( C, "Close", ParamColor("Color", colorYellow), styleNoTitle | 
ParamStyle("Style") | GetPriceStyle() ); 
_SECTION_END();
_SECTION_BEGIN("FIBONACCI AND GANN PROJECTIONS");
Change = 5; 
GannIncrement = 0.0625; 

procedure PlotShapeAt( x, y, shape, shift ) 
{ 
  PlotShapes( IIf( BarIndex() == x, shape, 0 ), colorRed, 0, y, shift ); 
}   

procedure PlotBlueDot( x, y ) 
{ 
  PlotShapes( IIf( BarIndex() == x, shapeSmallCircle, 0 ), colorBlue, 0, y, 0  
); 
   
  for( i = -2; i <= 2; i++ ) 
  { 
   if( i != 0 ) 
   { 
      yGann = ( sqrt( y ) + i * GannIncrement ) ^ 2; 
      PlotShapes( IIf( BarIndex() == x, shapeSmallCircle, 0 ), colorOrange, 0, 
yGann, 0  ); 
   } 
  } 
}   

bi = BarIndex(); 

sbi = SelectedValue( bi ); 

GraphXSpace = 2; 

Plot( Zig( C, Change ), "Zigzag", colorGreen, styleThick ); 
Plot( C, "Price", IIf( bi > sbi, colorLightGrey, colorWhite ), styleBar ); 

upshift = 15; 
if( SelectedValue( PeakBars( C, Change ) < TroughBars( C, Change ) ) ) 
{ 
   pt1 = PeakBars( C, Change, 1 ) == 0 ; 
   pt2 = TroughBars( C, Change, 1 ) == 0 ; 
} 
else 
{ 
   pt1 = TroughBars( C, Change, 1 ) == 0 ; 
   pt2 = PeakBars( C, Change, 1 ) == 0 ; 
   upshift = -upshift; 
} 

bpt1 = SelectedValue( ValueWhen( pt1, bi ) ); 
bpt2 = SelectedValue( ValueWhen( pt2, bi ) ); 
bpt3 = SelectedValue( ValueWhen( pt1, bi, 2 ) ); 
bpt4 = SelectedValue( ValueWhen( pt2, bi, 2 ) ); 
bpt5 = SelectedValue( ValueWhen( pt1, bi, 3 ) ); 
bpt6 = SelectedValue( ValueWhen( pt2, bi, 3 ) ); 

PlotShapeAt( bpt1, C, shapeDigit1, upshift ); 
PlotShapeAt( bpt2, C, shapeDigit2, -upshift  ); 
PlotShapeAt( bpt3, C, shapeDigit3, upshift ); 
PlotShapeAt( bpt4, C, shapeDigit4, -upshift ); 
PlotShapeAt( bpt5, C, shapeDigit5, upshift ); 
PlotShapeAt( bpt6, C, shapeDigit6, -upshift ); 

Level = SelectedValue( ValueWhen( pt1, C ) ); 

PlotBlueDot( round( bpt1 + 1.618 * ( bpt1 - bpt2 ) ), Level ); 
PlotBlueDot( round( bpt1 + 0.382 * ( bpt1 - bpt2 ) ), Level ); 

PlotBlueDot( round( bpt1 + 0.5 * ( bpt2 - bpt3 ) ), Level ); 
PlotBlueDot( round( bpt1 + 1.732 * ( bpt2 - bpt3 ) ), Level ); 

PlotBlueDot( round( bpt1 + 0.618 * ( bpt4 - bpt5 ) ), Level ); 
PlotBlueDot( round( bpt1 + 2 * ( bpt4 - bpt5 ) ), Level ); 

PlotBlueDot( round( bpt2 + 0.6707 * ( bpt4 - bpt2 ) ), Level ); 
PlotBlueDot( round( bpt2 + 2.618 * ( bpt4 - bpt2 ) ), Level ); 

PlotBlueDot( round( bpt2 + 1 * ( bpt6 - bpt2 ) ), Level ); 
PlotBlueDot( round( bpt2 + 3 * ( bpt6 - bpt2 ) ), Level );
_SECTION_END();



_SECTION_BEGIN("");
Buy = Cross( StochK( 15, 3 ), StochD( 15, 3, 3 ) );
Sell = Cross( StochD( 15, 3, 3 ), StochK( 15, 3 ) );
PlotShapes(IIf(Sell==1, shapeDownArrow, shapeNone), colorPink, 0,High, 
Offset=-15);
PlotShapes(IIf(Buy==1, shapeUpArrow , shapeNone), colorYellow, 0,Low, 
Offset=-15);
_SECTION_END();
LB= Param("Look Back Periods",3);
R=ValueWhen(Cross(MA(C,LB),C),HHV(H,LB),1);
S=ValueWhen(Cross(C,MA(C,LB)),LLV(L,LB),1);
Plot (R," jika tembus beli satu step diatas",colorBlue, styleLine );
Plot (s,"cutloss di",colorRed, styleLine );

<<attachment: reversal sign and breakout line.png>>

Reply via email to