Re: [Komunitas AmiBroker] Re: help afl

Ini penyempurnaannya:

//Made by Christopher Tahir, Ideas by Yulius Kurniawan//
SetChartOptions(0,chartShowArrows|chartShowDates,0);
GfxSetOverlayMode(1);
GfxSetTextAlign(0|8);
GfxSelectFont("Arial", Status("pxheight")/18);
GfxSetBkMode(0);
GfxSetTextColor(colorBlack);
GfxTextOut("© 2011"+" - "+"Made by Christopher Tahir,\nIdeas by Yulius Kurniawan",Status("pxwidth")/6, Status("pxheight")/2 );

_SECTION_BEGIN("Top Gain / Loss Explorer");
P = Param("Period" , 250 , 1 , 1000 , 1);
Gain = ROC(C,P) > 0;
Loss = ROC(C,P) < 0;

ROCCOlor = ParamColor("Line Color",colorBlue);
ROCStyle = ParamStyle("Line Style",styleLine);
Plot(ROC(C,P),"Gain or Loss" , ROCColor , ROCStyle);

Filter = Gain OR Loss;
SetOption("NoDefaultColumns", True );
AddTextColumn(Name(),"Ticker",1.0,colorDefault,colorDefault,60);
AddColumn( DateTime(), "Date", formatDateTime,colorDefault,colorDefault,68 );
GainLoss = WriteIf( Gain , "Gain" , WriteIf( Loss , "Loss" , "Unchange"));
GainLossColor = IIf( Gain , colorBrightGreen , IIf( Loss , colorRed , colorYellow));
AddTextColumn( GainLoss , "Gain or Loss" , 1.0 , colorDefault , GainLossColor ,50);
AddColumn( ROC(C,P) , "Change" , 1.2 , colorDefault , GainLossColor , 63);
AddColumn(C, "Close",1.2,colorDefault,colorDefault,63);
AddColumn(Ref(C,-P), "Close-"+P,1.2,colorDefault,colorDefault,63);

_SECTION_END();

 

Best Regards,
Christopher Tahir
Blog: http://ez-stock.blogspot.com
MSN: chris_tahir@hotmail.com
YM: chris_tahir@ymail.com

Mail to my Y!Group:
ez-stock-subscribe@yahoogroups.com

---

From: yulius_kurniawan1983 <yulius.kurniawan@gmail.com>
To: amibroker-4-bei@yahoogroups.com
Sent: Thu, February 3, 2011 9:28:42 PM
Subject: [Komunitas AmiBroker] Re: help afl

 

wuihh, mantap, cepet banget :)

thanks a lot yah n salam kenal chris

--- In amibroker-4-bei@yahoogroups.com, Christopher Tahir <chris_tahir@...> wrote:
>
> OK deh...
> DONE!!!!
>
> //Made by Christopher Tahir, Ideas by Yulius Kurniawan//
>
> GfxSetOverlayMode(1);
> GfxSetTextAlign(6|24);
> GfxSelectFont("Arial", Status("pxheight")*2);
> GfxSetBkMode(0);
> GfxSetTextColor(colorBlack);
> GfxTextOut("© 2011"+" - "+"Made by Christopher Tahir,\nIdeas by Yulius
> Kurniawan",Status("pxwidth")/2, Status("pxheight")/2 );
>
> _SECTION_BEGIN("Top Gain / Loss Explorer");
> P = Param("Period" , 250 , 1 , 1000 , 1);
> Gain = ROC(C,P) > 0;
> Loss = ROC(C,P) < 0;
>
> Filter = Gain OR Loss;
> SetOption("NoDefaultColumns", True );
> AddTextColumn(Name(),"Ticker",1.0,colorDefault,colorDefault,60);
> AddColumn( DateTime(), "Date", formatDateTime,colorDefault,colorDefault,68 );
> GainLoss = WriteIf( Gain , "Gain" , WriteIf( Loss , "Loss" , "Unchange"));
> GainLossColor = IIf( Gain , colorBrightGreen , IIf( Loss , colorRed ,
> colorYellow));
> AddTextColumn( GainLoss , "Gain or Loss" , 1.0 , colorDefault , GainLossColor
> ,50);
> AddColumn( ROC(C,P) , "Change" , 1.2 , colorDefault , GainLossColor , 50 );
> _SECTION_END();
>
>
> Semoga ini yg dimaksud yah....
> Sy set default period 250 = +-1 thn
>
> Best Regards,
> Christopher Tahir
> Blog: http://ez-stock.blogspot.com
> MSN: chris_tahir@...
> YM: chris_tahir@...
>
>
> Mail to my Y!Group:
> ez-stock-subscribe@yahoogroups.com
>
>
>
>
> ________________________________
> From: yulius_kurniawan1983 <yulius.kurniawan@...>
> To: amibroker-4-bei@yahoogroups.com
> Sent: Thu, February 3, 2011 8:55:38 PM
> Subject: [Komunitas AmiBroker] Re: help afl
>
>
> Halo pak chris,
>
> bagus dalam arti return tertinggi pak :)
>
> thanks
>
> --- In amibroker-4-bei@yahoogroups.com, "Christopher Tahir" <chris_tahir@>
> wrote:
> >
> > Bagus dl arti apa Pak?
> >
> > Best Regards,
> > Christopher Tahir
> > Blog: http://ez-stock.blogspot.com
> > MSN: chris_tahir@
> > YM: chris_tahir@
> >
> >
> > Mail to my Y!Group:
> > ez-stock-subscribe@yahoogroups.com
> > -----Original Message-----
> > From: yulius_kurniawan1983
> > Sent: 03/02/2011 7:50:00 PM
> > Subject: [Komunitas AmiBroker] help afl
> >
> >
> > apakah ad yg bisa bantu rumus afl untuk mencari saham yg performancenya paling
> >bagus dalam 1 thn terakhir?
> >
> > thanks
> >
>

__._,_.___

Apabila membutuhkan software AmiBroker, Realtime Intraday Data & Pelatihan silahkan kontak : Dendo Valentino | Cell : 08159304868 | e-mail: amibrokerfreak{at}yahoo.co.id | YM id : dendov | http://www.facebook.com/dendo.amibrokerfreak | http://www.amibroker-4-bei.org

Your email settings: Individual Email|Traditional
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch to Fully Featured
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

__,_._,___