อยากได้สูตร AFL Code ระบบ Trade แบบ Mark minervini ครับ

[werawut164]

ในชมรมผมเชื่อว่าน่าจะมีการศึกษาระบบ Trade แบบ ต่างๆ จึงอยากได้สูตร AFL  ของระบบ

1.<b>Mark minervini</b>

2.CANSLIM

เพื่อได้ลองไปศึกษาการเขียน AFL และลองทำ Back test ครับ

[dreamscat]

มีแต่สูตรผมลองเขียนเองครับ (ไม่ใช่สูตรของชมรมนะครับ) และใช้ ema แทน ma ครับ ลองไปดัดแปลงดูได้ครับ

 

// mark minervini – trend template (use EMA>MA) p.79
MA50 = EMA(C,50);
MA150 = EMA(C,150);
MA200 = EMA(C,200);
YrLo = LLV(L,240);
YrHi = HHV(H,240);
Con1 = C>MA150 AND C>MA200;
Con2 = MA150>MA200;
Con3 = MA200>Ref(MA200,-20);
Con4 = MA50>MA150 AND MA50>MA200;
Con5 = C>MA50;
Con6 = C>1.3*YrLo;
Con7 = C>0.75*YrHi;
tr3m = 0.4*(((C-Ref(C,-60))/Ref(C,-60))*100);
tr6m = 0.2*(((C-Ref(C,-120))/Ref(C,-130))*100);
tr9m = 0.2*(((C-Ref(C,-180))/Ref(C,-180))*100);
tr12m = 0.2*(((C-Ref(C,-240))/Ref(C,-240))*100);
IBDrs = tr3m + tr6m + tr9m + tr12m;
Bull = Con1 AND Con2 AND Con3 AND Con4 AND Con5 AND Con6 AND Con7;
bigwhite = C>Ref(C,-1) AND C>O AND C>L+(0.75*(H-L)) AND (H-L)>ATR(10);
set = Foreign(“set”,”c”,True);
rs = C/set;
rsma = EMA(rs,5);
diff = rs-rsma;
diffpct = (diff/rsma)*100;

//plots
SetChartOptions(0,chartShowArrows|chartShowDates);
Plot(C,”Mark Minervini’s Trend Template”,IIf(Bull,colorLime,colorLightGrey),styleCandle);
Plot(MA50,””,colorLightBlue);
Plot(MA150,””,colorBlue);
Plot(MA200,””,colorDarkBlue);
//Plot(YrHi,”1yr high”,colorGreen);
Plot(.75*YrHi,””,colorGreen,styleDashed);
//Plot(YrLo,”1yr low”,colorRed);
Plot(1.3*YrLo,””,colorRed,styleDashed);
//Plot(IBDrs,”IBD RS” ,colorBlue,styleThick|styleOwnScale) ;
//PlotShapes(Buy*shapeUpArrow,colorGreen,0,L);
//PlotShapes(Sell*shapeDownArrow,colorRed,0,H);

// Explorer = 1 month stronger than SET + Value that than more than 5M
HiVal = V*C>5000000;
Filter = Bull AND HiVal AND StrLen(Name())<=6 AND StrRight(Name(),2)!=”-F” AND StrRight(Name(),2)!=”-P”;
AddColumn(Close,”Close”);
AddColumn(Volume,”Volume”);
AddColumn(V*C,”Trading Value”);
AddColumn(IBDrs,”IBD RS (higher = better)”,1.0);
AddColumn(diffpct,”% RS ema”,1.2);
AddColumn(bigwhite,”big white”,1.0);
SetSortColumns(-6);

 

[narupon-n]

ตามอ่านอยู่ครับ แล้วสูตรนี้ดียังไงครับ ขอคำอธิบายเพิ่มเติมเพื่อคนไม่รู้ว่า Mr. Mark เค้าว่ายังไงด้วยครับ
ขอบคุณครับ

[werawut164]

ขอบคุณมากครับ

แต่ งงว่าทำไมในเครื่องผมขึ้น Error ควรแก้ไงครับ ยังไม่ค่อยรู้เรื่องCode มากครับตอนไปเรียนBasic Amibroker ไปเรียนได้แค่วันเดียว วันที่2 ติดงานเลยไม่ได้เรียน ดูย้อนก็งงๆ รอไปเรียนคอร์สใหญ่ปีนี้อีกที

[dreamscat]

เข้าใจว่าเกิดปัญหาขณะ copy สูตรไปแปะใน amibroker นะครับ สังเกตจากในสูตรเครื่องหมาย > (มากกว่า) กลายเป็น &gt หมดเลยครับ ลอง copy ไปใส่ใน formula editor โดยตรงดูนะครับ หรือ เอาไฟล์ afl ไปใส่ใน C:\Program Files (x86)\AmiBroker\Formulas\Custom ก็ได้ครับ (สูตรจะอยู่ใน folder custom นะครับ หรือจะย้ายไป folder ก็ได้ครับ)

https://www.dropbox.com/s/vgabqpeoxdxzdhr/Mark.afl?dl=0

 

 

[Lieak Peeradet]

แปะ AFL แบบนี้ น่าจะมี REPORT ผลการ Backtest ละบทสรุป

ค่า Profit, MDD, … เพื่อวิเคราะห์ค่าด้วย จะดีมากเลยครับ 😉

[arjibakoh3]

มีของ metastock ไหมครับ

[Author]

Posts