DÒNG TIỀN CHỨNG KHOÁN: AFL CODE-BỘ LỌC CỔ PHIẾU KHỎE NHẤT THỊ TRƯỜNG

Friday, October 11, 2024

//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