Luar biasa…..
Itu tanda bintang current juga kemunculannya?
From: amibroker-4-bei@yahoogroups.com [mailto:amibroker-4-bei@yahoogroups.com] On Behalf Of isfandi2001@yahoo.com
Sent: Wednesday, June 16, 2010 8:36 PM
To: amibroker-4-bei@yahoogroups.com
Subject: Re: [Komunitas AmiBroker] Perbaikan Mirip yg Mahal
Dear Pak Timur,
Saya lampirkan pic I fractal today pd sample IHSG, kemunculannya current tanpa menunggu konfirmasi spt yg ada pd ide Bpk juga, pengembangan analisa fractal base on indicator pd candle yg saya lakukan mungkin berbeda dgn yg sdh lbh dulu Bpk kembangkan bersama Pak Eko, namun saya msh terus menyempurnakan lbh lanjut (indikasinya IHSG akan mengalami koreksi besok atau plg telat 2 hari lg, but lets we see).
Harapan saya semakin byk ide pengembangan fractal dr berbagai perspektif yg berbeda, kita bisa semakin kaya dgn rambu2 keputusan bertransaksi.
buat rekan2 lainnya mohon maaf sebelumnya saya blm bisa berbagi afl utk pic pertama (underconstruction), namun utk pic ke II (green color) inilah yg tadinya akan saya bawa utk urun rembuk bersama sesuai maksud saya menambahkan bbrp signal pd afl mirip yg mahal tsb.
salam,
From: Timur Langit <timurlangit.is.here@gmail.com>
To: amibroker-4-bei@yahoogroups.com
Sent: Wed, June 16, 2010 1:19:13 PM
Subject: Re: [Komunitas AmiBroker] Perbaikan Mirip yg Mahal
Pak Isfandi said....apa kita gak mikirin seluruh perangkatnya dulu sampai fraksi terkecil?, tentunya explorer dgn sendirinya akan mengikuti dan akan lbh lengkap.
Betul sekali Pak, itulah yg saya harapkan kita brainstorming dahulu.... di design dulu sistemnya...
scanner mirip yg mahal ini adalah langkah awal untuk sesuatu yg lebih besar, yaitu sistem yg relatif lebih aman dan konsisten ngasi cuan.
seperti sofia katakan bahwa ada 3000 pengguna 'yg mahal' dan mereka bergerak ketika break peak.
Tetapi masa kalau kita punya modal 10jt, lalu kita masukkan ke 10 juta nya?
Masa jika pada skala 'harian' Pretty bollinger bilang bahwa ini baru mulai zona bullish yg meyakinkan dan strong, lalu kita masih menunggu break peak pada 'skala harian' juga?
Masa jika pada skala 'harian' Buaya Lucu bilang bahwa ini baru mulai zona bullish yg meyakinkan dan strong, lalu kita masih menunggu break peak pada 'skala harian' juga?
Jika kita masuk, apakah kita akan masukkan ke semua modal kita sekaligus? Tentu tidak bukan? Saya berpendapat kita lihat skala jam-an, lalu masuk bertahap sesuai dengan tool apa? 'mirip yg mahal'?
Katakanlah mirip yg mahal sebagai tool untuk masuk di intraday 1 jam-an.... kalau buaya lucu atau pretty bollinger sudah bilang aman, masa kita gak berani copet (beli di support)? tapi berapa banyak? Bagaimana jika tembus support? Berapa potensi loss? can we accept it? for how much?
at the end, bisakah semua ini di formulasikan, sehingga ketika trading, kita gak lagi mikir2 mau beli berapa dimana dan saham apa.
Ini dibawah saya copas... tapi kayanya berantakan juga... saya jauh dari lappy personal saya, sehingga gak bisa copas langsung dari afl editor...
ada teman lain yang mau bantu copas kan utk pak isfandi?
Timur
/* Mirip yang Mahal
Dibuat Lucu oleh Timur Langit
Ide Lucucnya dari Sofia Liaw
*/
_SECTION_BEGIN("Price");
SetChartOptions( 0,chartShowArrow s|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", colorBlack ), styleNoTitle | ParamStyle("Style") | GetPriceStyle( ) );
_SECTION_END( );
SetChartOptions( 0, chartShowArrows| chartShowDates );
SetChartOptions( 0, chartShowArrows| chartShowDates );
_SECTION_BEGIN("Fractal");
ntick=Param("Jumlah Tick Utk Jaga2 Sebelum Fractal",3,1,100,1 );
//V20=Param("JumlahBar_MA_ Volume_BreakOut",20,1,100,1 );
V20=20;
UpFractal= ValueWhen(
(Ref(H,-2) >= Ref(H, -3)) AND
(Ref(H,-2) >= Ref(H, -1)) AND
(Ref(H,-2) >= H), Ref(H,-2));
DownFractal= ValueWhen(
(Ref(L,-3) <= Ref(L, -4)) AND
(Ref(L,-3) <= Ref(L, -2)) AND
(Ref(L,-3) <= Ref(L, -1)) AND
(Ref(L,-3) <= L), Ref(L,-3));
Beli = C>UpFractal AND Ref(C,-1)<=UpFractal ;
//Buy = (Ref(C,-1)<=UpFractal) AND C>UpFractal AND V >= MA(V,V20);
Jual = Ref(C,-1)>=DownFractal AND C < DownFractal;
tick=IIf( C<=200,1,
IIf(C>200 AND C<=500,5,
IIf(C>500 AND C<=2000,10,
IIf(C>2000 AND C<=5000,25,
IIf(C>5000,50,0))) ));
distance1=UpFractal -C;
distance2=C- DownFractal;
batasatas=UpFractal -ntick*tick;
batasbawah =DownFractal+ ntick*tick;
riskinvalue= round(DownFracta l-tick-C) ;
riskinpercent= round((DownFract al-tick-C) *1000/C)/ 10;
Copet1="Siap2 Jual Kalau Jebol --> "+DownFractal;
Copet2=Copet1+" Kalau mau copet resikonya harus CL (Cut Loss) kalau jebol --> ";
Copet3=Copet2+ downFractal;
Copet4=Copet3+" RESIKO Rp";
Copet5=Copet4+ riskinvalue;
Copet6=Copet5+" atau ";
Copet7=Copet6+ riskinpercent;
Copet8=Copet7+"%";
riskinvalue= round(UpFractal+ tick-C);
riskinpercent= round((UpFractal +tick-C)* 1000/C)/10;
TP1="Siap2 Beli Kalau Tembus --> "+UpFractal;
TP2=TP1+" Kalau mau Take Profit resikonya BBL (Bisa Beli Lagi) kalau tembus --> ";
TP3=TP2+UpFractal;
TP4=TP3+" RESIKO Rp";
TP5=TP4+riskinvalue ;
TP6=TP5+" atau ";
TP7=TP6+riskinperce nt;
TP8=TP7+"%";
Siap2Beli=distance1<=distance2 AND C>=batasatas AND C<=UpFractal;
Siap2Jual=distance1>distance2 AND C>=DownFractal AND C<=batasbawah ;
Plot(Ref(UpFractal, 2), "spekulative buy jika tembus", ParamColor("resistance",colorBlue), ParamStyle("Up Fractal Style", styleLine));
Plot(Ref(DownFracta l,3), "cutloss jika tembus",ParamColor("suport",colorRed), ParamStyle("Down Fractal Style", styleLine));
PlotShapes(IIf( Beli,shapeUpArro w,Null), ParamColor("Warna Untuk Panah Beli", colorBrightGreen) , 0, L,-10);
PlotShapes( IIf(Jual,shapeDownA rrow,Null) ,ParamColor("Warna Untuk Panah jual", colorRed), 0, H,-10);
color1 = IIf( Beli, ParamColor("Warna Latar untuk Beli", colorDarkGreen) , IIf( Jual, ParamColor("Warna Latar untuk Jual", colorDarkRed) , IIf(Siap2Beli, ParamColor("Warna Latar untuk Siap2 Beli", colorPaleTurquoise) , IIf(Siap2Jual, ParamColor("Warna Latar untuk Siap2 Jual", colorTan),colorBlac k))));
SetChartBkColor( LastValue(color1) );
AlertIf( Beli, "SOUND C:\\Program Files\\AmiBroker\ \RekamSuara\ \Beli.wav", "Audio alert", 2 );
AlertIf( Jual, "SOUND C:\\Program Files\\AmiBroker\ \RekamSuara\ \Jual.wav", "Audio alert", 2 );
_SECTION_END( );
_SECTION_BEGIN("Exploration");
//Filter = (Buy OR Sell) AND V > 0; /*AND (C>=PriceFrom AND C<=PriceTo) AND V>0; */
Filter = (Beli OR Jual OR Siap2Beli OR Siap2Jual) AND V>1000;
//Filter = (Beli OR Jual) ;
//clorback=IIf( Beli, colorGreen, colorRed);
//clorfrnt=IIf( Beli, colorYellow, colorAqua);
clorback=IIf( Beli, colorGreen, IIf(Jual, colorRed, IIf(Siap2Beli, colorAqua, IIf(Siap2Jual, colorPink, colorWhite)) ));
clorfrnt=IIf( Beli, colorYellow, IIf(Jual, colorAqua, IIf(Siap2Beli, colorBlack, IIf(Siap2Jual, colorBlack, colorWhite)) ));
clorbacksprt= IIf(Jual, colorRed, IIf(Siap2Jual, colorPink, colorWhite)) ;
clorfrntsprt= IIf(Jual, colorBlack, IIf(Siap2Jual, colorBlack, colorBlack)) ;
clorbackrst= IIf(Beli, colorGreen, IIf(Siap2Beli, colorAqua, colorWhite)) ;
clorfrntrst= IIf(Beli, colorBlack, IIf(Siap2Beli, colorBlack, colorBlack)) ;
//AddTextColumn( WriteIf(Beli,"Beli", WriteIf(Jual, "Jual", WriteIf(Siap2Beli, "Siap2 Beli kalau tembus --> "+round(UpFractal) , WriteIf(Siap2Jual, "Siap2 Jual kalau jebol --> "+round(DownFractal) ,"")))), "Trade", 1.0, clorfrnt, clorback);
AddTextColumn( WriteIf(Beli,"Beli Sekarang", WriteIf(Jual, "Jual Sekarang", WriteIf(Siap2Beli, TP8, WriteIf(Siap2Jual, Copet8,"")))), "Trade", 1.0, clorfrnt, clorback);
//AddTextColumn( WriteIf(Beli,"Beli", "Jual"), "Trade", 1.0, clorfrnt, clorback);
AddColumn( UpFractal, "resistance",1.0,colorBlack, colorWhite, 50);
AddColumn( DownFractal, "suport",1.0,colorBlack, colorWhite, 50);
AddColumn(C,"Harga Terakhir",1.0,colorWhite, IIf(C>Ref(C,-1),colorGree n,colorRed) ,50);
_SECTION_END( );
_SECTION_BEGIN("Background Name");
GfxSetOverlayMode( 1);
GfxSelectFont("Tahoma", Status("pxheight")/40 );
GfxSetTextAlign( 6 );// center alignment
GfxSetTextColor( ParamColor( "Warna", colorLightGrey ) );
GfxSetBkMode( 0); // transparent
GfxTextOut( "Mirip Yang Mahal", Status("pxwidth")/8, Status("pxheight")/10 );
GfxTextOut( "Dibuat Lucu oleh Timur Langit", Status("pxwidth")/5.7, Status("pxheight")/6 );
GfxTextOut( "Ide Lucu nya dari SofiaLiaw", Status("pxwidth")/6, Status("pxheight")/4.2 );
C13=Param("fonts",20,10,30,1 );
C14=Param("left-right",2.1,1.0,5.0, 0.1 );
C15=Param("up-down",12,1,20,1 );
Miny = Status("axisminy");
Maxy = Status("axismaxy");
lvb = Status("lastvisiblebar");
fvb = Status("firstvisiblebar");
pxwidth = Status("pxwidth");
pxheight = Status("pxheight");
GfxSetOverlayMode( 1);
GfxSelectFont("Tahoma", Status("pxheight")/8 );
GfxSetTextAlign( 6 );// center alignment
GfxSetTextColor( colorDarkGrey );
GfxSetBkMode( 0); // transparent
GfxTextOut( Name(), Status("pxwidth")/2, Status("pxheight")/12 );
GfxSelectFont("Tahoma", Status("pxheight")/18 );
//GfxTextOut( IndustryID(1) , Status("pxwidth")/2, Status("pxheight")/4 );
GfxSelectFont("Tahoma", Status("pxheight")/18 );
GfxSelectFont("Tahoma", Status("pxheight")/36 );
//GfxTextOut( "chartistsbd. net", Status("pxwidth")/2, Status("pxheight")/3 );//GfxSelectFont("Aparajita", Status("pxheight")/C13*1 );
//GfxTextOut( IndustryID(1) , Status("pxwidth")/2, Status("pxheight")/C15*2.3 );
GfxSelectFont("Aparajita", Status("pxheight")/C13*1.1 );
GfxSetTextColor( ColorHSB( 50, 50, 50 ) );
GfxTextOut( FullName(), Status("pxwidth")/2, Status("pxheight")/C15*10.5);
_SECTION_END( );
_SECTION_BEGIN("EMA");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1, 10 );
Plot( EMA( P, Periods ), _DEFAULT_NAME( ), ParamColor( "Color", colorCycle ), ParamStyle("Style") );
_SECTION_END( );
2010/6/16 <isfandi2001@ yahoo.com>
Dear Pak Timur,
Pak boleh ikutan nimbrung gak nih?, saya tertarik utk rembukan mikirin afl mirip yg mahal, kl gak salah konsepnya pantulan S/R ya..? Apa ada konsep lainnya? Cuma saya amati bagaimana bila candle posisi ditengah2? Sedangkan ide afl ini lbh kpd opportunity how to doing like copet ya? Apa saya salah? Maksud saya apa kita gak mikirin seluruh perangkatnya dulu sampai fraksi terkecil?, tentunya explorer dgn sendirinya akan mengikuti dan akan lbh lengkap.
File text afl mirip mahal tsb saya load terbukanya berantakan, apa boleh di send lg? better di copas aja kesini (page mail/jgn text file). Semoga pekerjaan ini nanti akhirnya bisa mendekati harapan utk menjadi intraday basic trading system.
Demikian dan trm ksh.
Sent from BlackBerry® on 3
Date: Wed, 16 Jun 2010 11:24:58 +0700
ReplyTo: amibroker-4- bei@yahoogroups. com
Subject: Re: [Komunitas AmiBroker] Perbaikan Mirip yg Mahal
Saya set 3 ticks sebelum support (SF) or resistance (BF).... kalau kosong berarti masih jauh dari BF dan SF....
3 ticks itu bisa diatur2 sendiri... jadi 2 ticks or 4 ticks misalnya... coba lihat di parameters
Timur
2010/6/16 <ayahnyanadia@ yahoo.com>
Pak timur barusan sy aplikasikan utk klbf kok kolom "trade" kosong ? Apa krn blm trbentuk fractal baru yah..?
Powered by Telkomsel BlackBerry®
From: "Timur Langit" <timurlangit. is.here@gmail. com>
Date: Wed, 16 Jun 2010 05:30:09 +0700
ReplyTo: amibroker-4- bei@yahoogroups. com
Subject: [Komunitas AmiBroker] Perbaikan Mirip yg Mahal
Ma'af mBah dan Pak Dendo, numpang lewat….
Dear teman2 nubie….
Scanner mirip-yg-mahal tempo hari ternyata ada yg salah. (Terima kasih buat Pak Fauzi yg telah menemukan kesalahannya)… .
Cukup pusing juga memperbaikinya, syukurlah Pak Eko Widjajanto telah membantu….
Tips… screener mirip-yg-mahal hanya 'valid' jika dijalankan untuk data terakhir…. "Kalau explore dilakukan untuk from – to date yang sama (sehari saja) explore pak Timur berfungsi baik, kalau dipakai untuk tanggal berbeda maka hanya text dari tanggal terakhir yang akan muncul di seluruh date range." Itu quote dari Pak Eko….
Sebagai permohonan ma'af saya, berikut saya tambahkan sedikit warning bagi yg ingin TP di resistance or copet di support…. Dengan mengetahui resikonya, harapan saya kita bisa cepat mengambil keputusan untuk copet atau TP.
Kebiasaan saya;
screener ini untuk mengetahui saham2 yg saya harus pay attention… khususnya pada intraday trading misal pada timeframe 15menit…. tetapi sebelum mengikuti saran dari screener ini saya selalu check lagi buaya lucu saya untuk keputusan terakhir …..
Semoga bermanfaat. Eh lupa.. resiko tanggung sendiri ya!
Timur
Error! Filename not specified.
__._,_.___
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
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
__,_._,___
Posts
No comments:
Post a Comment