Re: [Komunitas AmiBroker] qong xi fat choi. afl

maaf,,......afl-nya dari googling, bukan karya sendiri. --- Pada Jum, 4/2/11, Hok1 <limhok1@gmail.com> menulis: Dari: Hok1 <limhok1@gmail.com> Judul: Re: [Komunitas AmiBroker] qong xi fat choi. afl Kepada: amibroker-4-bei@yahoogroups.com Tanggal: Jumat, 4 Februari, 2011, 2:55 AM   Ha ha ha, Salut2 salut.... Saya kira Pak Hengky hendak mengembangkan AFL untuk mencari korelasi antara imlek dengan saham. Ternyata tulisan Happy New Year dan ada bintang2nya lagi. good job, Happy Chinese New Year H1 2011/2/3 Hengky B <hengkyb124@yahoo.co.id> ada yg mau coba obrek afl ini menjadi : QONG XI FAT CHOI _SECTION_BEGIN("New Year"); for( i = 1; i < BarCount; i++ ) z = (GetPerformanceCounter()/100)%30; y = (GetPerformanceCounter()/100)%255; Col=ColorHSB( ( i + y ) % 256, 255, 255 ); x=Cum(1);L1=LastValue(x); F=StochD()+30*sin(Cum(1/5))+20*sin(10*Cum(1/10)); RequestTimedRefresh(1); Plot(F,"",Col+z,styleNoLine+styleNoLabel); PlotShapes(shapeStar*(F>95)*(X>L1-180),1+(x%35)+z); PlotShapes(shapeHollowStar*(F<30>10)*(X>L1-180),Col); y0=20;y1=60;y=0.5*(y0+y1);Plot(0,"",1,styleNoLine+ styleNoLabel); Plot(y0+y1,"",3,styleNoLine+styleNoLabel); n=4;d0=140;dd=10; d=d0;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",3,1); Plot(LineArray(x[L1-d-1],y[L1-d-1],x[L1-d-1+5],y[L1-d-1+4],0),"",3,1); d1=d-n;Plot(LineArray(x[L1-d1],y0[d1],x[L1-d1+1],y1[d1],0),"",3,1); d=d0-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",3,1); Plot(LineArray(x[L1-d-1],y[L1-d-1],x[L1-d-1+5],y[L1-d-1+4],0),"",3,1); Plot(LineArray(x[L1-d-1+1],y1[L1-d-1],x[L1-d-1+5+1],y1[L1-d- 1+4],0),"",3,1); d1=d-n;Plot(LineArray(x[L1-d1],y0[d1],x[L1-d1+1],y1[d1],0),"",3,1); d=d-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",3,1); Plot(LineArray(x[L1-d-1],y[L1-d-1],x[L1-d-1+5],y[L1-d-1+4],0),"",3,1); Plot(LineArray(x[L1-d-1+1],y1[L1-d-1],x[L1-d-1+5+1],y1[L1-d- 1+4],0),"",3,1); d1=d-n;Plot(LineArray(x[L1-d1],y[d1],x[L1-d1+1],y1[d1],0),"",3,1); d=d-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",3,1); Plot(LineArray(x[L1-d-1],y[L1-d-1],x[L1-d-1+5],y[L1-d-1+4],0),"",3,1); Plot(LineArray(x[L1-d-1+1],y1[L1-d-1],x[L1-d-1+5+1],y1[L1-d- 1+4],0),"",3,1); d1=d-n;Plot(LineArray(x[L1-d1],y[d1],x[L1-d1+1],y1[d1],0),"",3,1); d=d-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+3],y1[d],0),"",3,1); Plot(LineArray(x[L1-d],y1[d],x[L1-d+1],y[d],0),"",3,1); d=d-2*dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",3,1); d1=d-n;Plot(LineArray(x[L1-d1],y0[d1],x[L1-d1+1],y1[d1],0),"",3,1); Plot(LineArray(x[L1-d+1],y1[d],x[L1-d+4],y0[d],0),"",3,1); d=d-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",3,1); Plot(LineArray(x[L1-d-1],y[L1-d-1],x[L1-d-1+5],y[L1-d-1+4],0),"",3,1); Plot(LineArray(x[L1-d-1+1],y1[L1-d-1],x[L1-d-1+5+1],y1[L1-d- 1+4],0),"",3,1); Plot(LineArray(x[L1-d-1+1],y0[L1-d-1],x[L1-d-1+5+1],y0[L1-d- 1+4],0),"",3,1); d=d-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",3,1); Plot(LineArray(x[L1-d],y0[L1-d-1],x[L1-d-1+4],y[L1-d-1+3],0),"",3,1); d1=d-n+1;Plot(LineArray(x[L1-d1],y[d1],x[L1-d1+2],y0 [d1],0),"",3,1);d=d-5; Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",3,1); d=d-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+3],y1[d],0),"",3,1); Plot(LineArray(x[L1-d],y1[d],x[L1-d+1],y[d],0),"",3,1); d=d-7;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",3,1); Plot(LineArray(x[L1-d-1],y[L1-d-1],x[L1-d-1+5],y[L1-d-1+4],0),"",3,1); Plot(LineArray(x[L1-d-1+1],y1[L1-d-1],x[L1-d-1+5+1],y1[L1-d- 1+4],0),"",3,1); Plot(LineArray(x[L1-d-1+1],y0[L1-d-1],x[L1-d-1+5+1],y0[L1-d- 1+4],0),"",3,1); d=d-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",3,1); Plot(LineArray(x[L1-d-1],y[L1-d-1],x[L1-d-1+5],y[L1-d-1+4],0),"",3,1); Plot(LineArray(x[L1-d-1+1],y1[L1-d-1],x[L1-d-1+5+1],y1[L1-d- 1+4],0),"",3,1); d1=d-n;Plot(LineArray(x[L1-d1],y0[d1],x[L1-d1+1],y1[d1],0),"",3,1); d=d-dd;Plot(LineArray(x[L1-d],y0[d],x[L1-d+1],y1[d],0),"",3,1); Plot(LineArray(x[L1-d-1],y[L1-d-1],x[L1-d-1+5],y[L1-d-1+4],0),"",3,1); Plot(LineArray(x[L1-d-1+1],y1[L1-d-1],x[L1-d-1+5+1],y1[L1-d- 1+4],0),"",3,1); d1=d-n;Plot(LineArray(x[L1-d1],y[d1],x[L1-d1+1],y1[d1],0),"",3,1); Plot(LineArray(x[L1-d],y[d],x[L1-d+5],y0[d],0),"",3,1); Title="HAPPY NEW YEAR 2011"; _SECTION_END(); ------------------------------------ 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 Yahoo! Groups Links <*> To visit your group on the web, go to:    http://groups.yahoo.com/group/amibroker-4-bei/ <*> Your email settings:    Individual Email | Traditional <*> To change settings online go to:    http://groups.yahoo.com/group/amibroker-4-bei/join    (Yahoo! ID required) <*> To change settings via email:    amibroker-4-bei-digest@yahoogroups.com    amibroker-4-bei-fullfeatured@yahoogroups.com <*> To unsubscribe from this group, send an email to:    amibroker-4-bei-unsubscribe@yahoogroups.com <*> Your use of Yahoo! Groups is subject to:    http://docs.yahoo.com/info/terms/

__._,_.___

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

__,_._,___