//Loc RS
_SECTION_BEGIN("Relative Strength");
MinSymbos = Param("So luong ma toi thieu de tinh RS", 80, 10, 5000, 10);
MinRank = Param("Filter voi rank toi thieu", 50, 0, 100, 1);
MinPrice = Param("Gia dong cua toi thieu", 1, 0, 1000, 0.1);
MinVolume = Param("Khoi luong khop toi thieu", 1000, 0, 100000000, 100);
MinBars = 52 * 5;
//Rank = RelStrength(MinSymbos);
//rank = SetOption(MinSymbos);
Rank = 0.4*ROC(C,65)+ 0.3*ROC(C,130) +0.3*ROC(C,260);
rank100 = PercentRank( Rank, 100 );
_SECTION_END();
v20= MA(V,20);
// relative strength IBD style
w12RS = 0.4*((C)/Ref(C,-96));
w24RS = 0.2*((C)/Ref(C,-168));
w36RS = 0.2*((C)/Ref(C,-252));
w48RS = 0.2*((C)/Ref(C,-336));
RS = w12RS + w24RS + w36RS + w48RS;
Uptrend = MA(C, 50)> MA(C, 150) AND MA(C, 50)> MA(C, 200) AND C> MA(C, 150) AND C> MA(C, 200) AND MA(C, 200)> Ref(MA(C,200),-20);
Growth52W=(C-Ref(C,-260))/Ref(C,-260);
Growth5W=(C-Ref(C,-25))/Ref(C,-25);
listnum = 0;
Filter= C > 5 AND V > 100000;; // Example Filter
AddColumn(rank100,"RS");
AddRankColumn();
SetSortColumns( -3 );
AddTextColumn( WriteIf (Uptrend, "Uptrend ","Downtrend")," Xu Huong ",1,IIf(Uptrend,colorWhite,colorRed),IIf(Uptrend,colorGreen,colorYellow),100);
AddColumn(C,"Gia",1.2,IIf(C>Ref(C,-1),colorGreen,colorRed));
AddColumn(V/V20,"V/V20 ",1.2,IIf(V/v20>1.2,colorGreen,colorRed));
👉Tải tại đây
https://drive.google.com/file/d/15Yl3QcKOGefEwDXMbj3keJEPuGMVM4wL/view?usp=drive_link
Cách sử dụng AFL cho Amibroker
Tải xuống tệp Amibroker AFL.
Bây giờ hãy sao chép tệp afl và dán vào vị trí cài Amibroker
D:\A KY PC\Win\Amibroker\Formulas\VIP free
