[dreamscatKeymaster]

1. ข้อมูลบนกราฟ = ให้เก็บข้อมูลใน C:\MetaStock Data (หรือที่ path อื่นตามที่กำหนดไว้ครับ) ไว้ทั้งหมดและนำไปใส่ในเครื่องใหม่ที่เดิมได้เลยครับ
2. สูตร Metastock = ให้ export สูตรออกมาโดยไป Tools >>> Expert Advisor >>> Organizer… >>> เลือก export formula files >>> Next >>> จากนั้นเลือกสูตรทั้งหมดในแต่ละหน้า แล้วกำหนด folder ที่จะเก็บไฟล์นี้ไว้ครับ เมื่อติดตั้ง Metastock ในเครื่องใหม่แล้วค่อยมา import สูตรจากที่นี่กลับเข้าไปเหมือนเดิมครับ (การ import ทำเหมือน export ครับแต่เลือก import ในหน้าแรกของ organizer แทนครับ)
3. Chart ต่างๆที่เคยทำไว้ สามารถ copy เก็บไว้ได้จากที่นี่ครับ C:\Program Files (x86)\Equis\MetaStock\Charts

หรือถ้าท่านจะใช้ Metastock version เดิมก็สามารถ copy folder Metastock ทั้งอันที่ C:\Program Files x86)\Equis\MetaStock ย้ายไปเครื่องใหม่เลยก็ได้เหมือนกันครับ (สูตรจะมาพร้อมกับ chart ต่างๆด้วยครับ) แต่ export สูตรตามข้อ 2 มาเก็บไว้ด้วยเพื่อความปลอดภัยก็จะยิ่งดีครับ

• This reply was modified 1 day, 3 hours ago by  dreamscat.
• This reply was modified 1 day, 3 hours ago by  dreamscat.
• This reply was modified 1 day, 3 hours ago by  dreamscat.

[dreamscatKeymaster]

CDC – 1 ATR Channel 20170502.afl

// CDC 1 ATR Channel 20170502
Prc=C;
X=1;
Smth=2;
Upper=Ref(EMA(Prc+X*ATR(14),Smth),-1);
Lower=Ref(EMA(Prc-X*ATR(14),Smth),-1);
Buy=Cross(Prc,Upper);
Sell=Cross(Lower,Prc);
Bullish=BarsSince(Buy)<BarsSince(Sell);
Bearish=BarsSince(Buy)>BarsSince(Sell);
Green=Bullish AND Prc>Lower;
Red=Bearish AND Prc<Upper;

Plot(C,””,IIf(Green,colorGreen,IIf(Red,colorRed,colorWhite)),stylecandle);
Plot(Upper,”Upper”,colorblue,styleLine|styleDashed);
Plot(Lower,”Lower”,colorRed,styleLine|styleDashed);

[dreamscatKeymaster]

RSI Over Bought – Over Sold

zz=2;
rs=RSI(14);
Bullrtr1=ValueWhen(TroughBars(C,zz,1)==0,rs,1);
Bullrtr2=ValueWhen(TroughBars(C,zz,1)==0,rs,2);
Bullctr1=ValueWhen(TroughBars(C,zz,1)==0,C,1);
Bullctr2=ValueWhen(TroughBars(C,zz,1)==0,C,2);
BullDVG=Bullrtr1>Bullrtr2 AND Bullctr2>Bullctr1; //AND Bullrtr1<30
BullDVG=Ref(BullDVG AND Ref(BullDVG,-1)==0,-1);

Setsortcolumns(-2);
SetOption(“NoDefaultColumns”,1);
filter = IIf(StrLen(Name())<=5,1,IIf(StrToNum(StrLeft(Strright(Name(),3),1))+StrToNum(StrLeft(Strright(Name(),4),1))==0,1,0))
AND Strright(Name(),2)!=”-F” AND Strright(Name(),2)!=”-P” AND Strright(Name(),2)!=”_I” AND Strright(Name(),4)!=”_CON” AND Strleft(Name(),1)!=”!” AND Strleft(Name(),1)!=”$”
AND Strright(Name(),2)!=”17″ AND Strright(Name(),2)!=”.1″
AND C>0.5
AND Now(3)-Datenum()<8900 AND Status(“lastbarinrange”)
AND MA(C*V,2)>500000 ;

AddTextColumn(Name(),”Ticker”,formatChar,colorDefault,colorDefault,80);
AddColumn(DateTime(),”Date/time”,formatDateTime,colorDefault,colorDefault,70);

AddColumn(IIf(IsEmpty(BarsSince(BullDVG)<=15),0,BarsSince(BullDVG)<=15),
“Divergence”,1.0,colorDefault,colorDefault,35);

OB=IIf(rs>70,1,0);
OS=IIf(rs<30,1,0);
AddColumn(OB,”Overbought”,1.0,colorDefault,colorDefault,35);
AddColumn(OS,”Oversold”,1.0,colorDefault,colorDefault,35);

[dreamscatKeymaster]

ATR trailing stop.afl (สูตรเฉพาะ indicator ครับ)

prd = 14;
x = 2;
plt0 = HHV(H-x*ATR(prd),prd);
plt1 = IIf(C>plt0,plt0,Null);
Plot(plt1,”ATR trailing stop”,colorRed,styleThick);
//Plot(C,”Price”,colorGrey40,styleCandle);

[dreamscatKeymaster]

PnT 1.1

Pct=Param(“Pct”,1,0.1,2,0.1);
Pk=Peak(C,Pct,1); Tr=Trough(C,Pct,1);
Upper=Ref(ValueWhen(Pk!=Ref(Pk,-1),C,1),-1);
Lower=Ref(ValueWhen(Tr!=Ref(Tr,-1),C,1),-1);
Grn=BarsSince(Cross(C,Upper))<BarsSince(Cross(Lower,C));
Red=BarsSince(Cross(C,Upper))>BarsSince(Cross(Lower,C));
BarColor=Iif(Grn,colorGreen,colorRed);
Plot(C,_DEFAULT_NAME(),BarColor,styleCandle);
Plot(Upper,”Upper”,colorGreen,styleDashed);
Plot(Lower,”Lower”,colorRed,styleDashed);

[dreamscatKeymaster]

CDC Actionzone 170101 for Amibroker.afl

///////////////////////////
// CDC Actionzone 170101 //
// Amibroker Edition //
// Converted 17/01/2017 //
///////////////////////////

_N( Title = StrFormat( “{{NAME}} – {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) Vol ” + WriteVal( V, 1.0 ) + ” {{VALUES}}”, O, H, L, C, SelectedValue( ROC( C, 1 ) ) ) );

src = ParamField(“Data Source”,3);

sprd = Optimize(“Slow MA”,26,15,50,1);
fprd = Optimize(“Fast Period”,0.3,0.1,0.6,0.05)*sprd;

fast = EMA(src,fprd);
slow = EMA(src,sprd);
macdv = fast-slow;
sig = MA(macdv,9);

Bullish = macdv>0;
Bearish = macdv<0;

Green = Bullish AND src>fast;
Yellow = Bullish AND src<fast AND src>slow;
Brown = Bullish AND src<fast AND src<slow;

Red = Bearish AND src<fast;
Aqua = Bearish AND src>fast AND src<slow;
Blue = Bearish AND src>fast AND src>slow;

buysig = Bullish AND Ref(Bearish,-1);
PreBuy = Blue AND Ref(Blue,-1) AND Ref(Blue,-2) AND Ref(Blue,-3) AND src<Ref(src,-2);
BuyMore=BarsSince(Bullish)<26 AND Yellow AND src=LLV(src,9);

sellsig = Bearish AND Ref(Bullish,-1);
PreSell=Yellow AND BarsSince(buysig)>25 AND src<Ref(src,-2);
SellMore=Yellow AND BarsSince(Yellow)>2 AND src<Ref(src,-2);

//Plot(sig,”Signal Line”,colorBlue,styleLine);
//SetGradientFill(colorLime,colorRed,0,GetChartBkColor());
//Plot(macdv,”MACD”,colorGrey50,styleGradient);

plotcolor = IIf(Green,colorGreen,IIf(Yellow,colorYellow,iif(Brown,colorBrown,iif(Red,colorRed,iif(Aqua,colorAqua,iif(Blue,colorBlue,colorWhite))))));

Plot(c,”Price”,plotcolor,styleCandle);
Plot(fast,”Fast EMA”,colorRed,styleDashed);
Plot(slow,”Slow EMA”,colorBlueGrey,styleDashed);
PlotOHLC(fast,fast,slow,slow,”2ma zone”,IIf(fast>slow,ColorBlend(colorGreen,GetChartBkColor()),ColorBlend(colorRed,GetChartBkColor())),styleCloud);

// Exploration //

pctchange = ((C-Ref(C,-1))/Ref(C,-1))*100;
Filter = pctchange;
AddColumn(C,”Close”);
AddColumn(buysig,”Buy”);
AddColumn(prebuy,”PreBuy”);
AddColumn(BuyMore,”Buy More”);
AddColumn(sellsig,”Sell”);
AddColumn(PreSell,”PreSell”);
AddColumn(SellMore,”Sell More”);
AddColumn(pctchange,”Percent Change”);

// Quick Scan //
Buy = buysig;
Sell = sellsig;

// System Test //
// DO NOT FORGET TO EDIT THIS PART TO FIT YOUR SYSTEM TEST SETTINGS!! //

maxpos = 500;

SetPositionSize(100/maxpos,spsPercentOfEquity);
SetOption(“InitialEquity”, 1000000);
SetOption(“AllowPositionShrinking”, True);
SetOption(“MaxOpenPositions”,maxpos);

[dreamscatKeymaster]

CDC Action Zone Basic.afl

///////////////////////////
// CDC Action ZOne Basic //
// 21st April 2017 //
///////////////////////////

// Basic Parameter Setup //

PlotStyle = ParamToggle(“Plot Style”,”Price Chart|MACD”,0);
PlotLine = ParamList(“Plot MA Lines”,”Plot Lines|Plot Bullish and Bearish Trend|Plot Lines and Trend|Do not Plot”,0);
Price = ParamField(“Price”,3);

FastPrd = Param(“Fast MA Period”,12);
SlowPrd = Param(“Slow MA Period”,26);

// Un-comment these to enable optimization //
// Do not forget to set your own lower and upper limits //
// Do not forget to comment the FastPrd and SlowPrd lines above //
/*
SlowPrd = Optimize(“Slow MA Period”,26,12,125,2);
FastPrd = round(Optimize(“Fast MA Period”,0.1,0.1,0.6,0.05)*SlowPrd);
*/

// Main functions //
Fast = EMA(Price,FastPrd);
Slow = EMA(Price,SlowPrd);

Bullish = Fast > Slow;
Bearish = Fast < Slow;

// Bar Colors //
Green = Bullish AND Price > Fast;
Yellow = Bullish AND Price < Fast AND Price > Slow;
Brown = Bullish AND Price < Slow;

Red = Bearish AND Price < Fast;
Aqua = Bearish AND Price > Fast AND Price < Slow;
Blue = Bearish AND Price > Slow;

BarColor = IIf(Green,colorGreen,IIf(Yellow,colorYellow,IIf(Brown,colorOrange,IIf(Red,colorRed,IIf(Aqua,colorAqua,IIf(Blue,colorBlue,colorDefault))))));

// Buy & Sell //
// Amibroker recognize these functions and use them in system tests and scans //
Buy = Bullish AND Ref(Bearish,-1);
Sell = Bearish AND Ref(Bullish,-1);

// Explorer //
// A more detailed report //

Filter = 1; // Basically means we don’t filter anything

// This part here is also mainly cosmetics //
// The codes are mostly about how the exploration should be displayed //

pctchange = ((C-Ref(C,-1))/C)*100;
buyp = ValueWhen(Ref(Buy,-1),O,1);
sellp = ValueWhen(Ref(Sell,-1),O,1);

longpct = IIf(BarsSince(Buy) < BarsSince(Sell),(C-buyp)/buyp,Null);
longcolor = iif (SelectedValue(longpct) > 0,IIf(SelectedValue(longpct) < 1, SelectedValue(longpct), 1),IIf(SelectedValue(longpct) > -1, abs(SelectedValue(longpct)) , 1));

shortpct = IIf(BarsSince(Sell) < BarsSince(Buy),(buyp-C)/buyp,Null);
shortcolor = iif (SelectedValue(shortpct) > 0,IIf(SelectedValue(shortpct) < 1, SelectedValue(shortpct), 1),IIf(SelectedValue(shortpct) > -1, abs(SelectedValue(shortpct)) , 1));

colorGV = ColorBlend(GetChartBkColor(),colorGreen,longcolor);
colorRV = ColorBlend(GetChartBkColor(),colorRed,shortcolor);

AddColumn(C,”Last Price”,1.4);
AddColumn(pctchange,”% Change”,1.2,IIf(pctchange>0,colorGreen,colorRed));
AddColumn(Buy,”Buy Order”,1.0,colorDefault,IIf(Buy==1,colorLime,colorDefault));
AddColumn(Sell,”Sell Order”,1.0,colorDefault,IIf(Sell==1,colorRed,colorDefault));

AddColumn(IIf(BarsSince(Buy) < BarsSince(Sell),BarsSince(Buy),Null),”Buy Since (Bars)”,1.0);
AddColumn(longpct*100,”Long %”,1.2,colorDefault,IIf(SelectedValue(longpct) > 0,ColorBlend(colorDefault,colorGreen,longcolor),ColorBlend(colorDefault,colorRed,longcolor)));

AddColumn(IIf(BarsSince(Sell) < BarsSince(Buy),BarsSince(Sell),Null),”Sell Since (Bars)”,1.0);
AddColumn(shortpct*100,”Short %”,1.2,colorDefault,IIf(SelectedValue(shortpct) > 0,ColorBlend(colorDefault,colorGreen,shortcolor),ColorBlend(colorDefault,colorRed,shortcolor)));

// Plots //
// This part does not have to be complicated at all //
// What you see here is mostly for cosmetic purpose //

if(PlotStyle == 0)
{
if(PlotLine == “Plot Lines”)
{
Plot(Fast,”Fast MA”,colorRed,styleLine);
Plot(Slow,”Slow MA”,colorBlue,styleLine | styleThick);
}
if(PlotLine == “Plot Bullish and Bearish Trend”)
{
GraphZOrder = 1;
PlotOHLC(Fast,Fast,Slow,Slow,”Action Zone Trend Cloud”,IIf(Bullish,ColorBlend(colorGreen,GetChartBkColor()),ColorBlend(colorRed,GetChartBkColor())),styleCloud);
}
if(PlotLine == “Plot Lines and Trend”)
{
GraphZOrder = 1;
PlotOHLC(Fast,Fast,Slow,Slow,”Action Zone Trend Cloud”,IIf(Bullish,ColorBlend(colorGreen,GetChartBkColor()),ColorBlend(colorRed,GetChartBkColor())),styleCloud);
Plot(Fast,”Fast MA”,colorRed,styleLine);
Plot(Slow,”Slow MA”,colorBlue,styleLine | styleThick);
}
if(PlotLine == “Do not Plot”)
{
}
Plot(Close,”Price”,BarColor,GetPriceStyle());
}
else
{
macdline = Fast – Slow;
signalline = MA(macdline,9);
Plot(signalline,”Signal Line”,colorBlack,styleLine | styleThick);
Plot(macdline,”Action Zone Basic | MACD”,BarColor,styleArea);

}

// Modify Jan 2018
Maxpos = 50;
SetPositionSize(100/Maxpos,spsPercentOfEquity); // 1 % of Equity
//

[dreamscatKeymaster]

เขียนอย่างนี้ก็ได้ครับ (ใส่ในช่อง filter ของ explorer ได้เลยครับ) บรรทัดสุดท้ายเป็นการกำหนดให้หาสัญญาณซื้อในแท่งล่าสุด และแท่งก่อนหน้าจะต้องยังไม่มีสัญญาณซื้อมาก่อนด้วยครับ

 

Prd:=5;
HLne:=Ref(HHV(H,Prd),-1);
LLne:=Ref(LLV(L,Prd),-1);
Buy:=Cross(H,HLne);
Sell:=Cross(LLne,L);
Bullish:=BarsSince(Buy)<=BarsSince(Sell);
Bearish:=BarsSince(Sell)<=BarsSince(Buy);
Buy AND Ref(bearish,-1);

• This reply was modified 3 weeks, 4 days ago by  dreamscat.
• This reply was modified 3 weeks, 4 days ago by  dreamscat.

1 user thanked author for this post.

rt

[dreamscatKeymaster]

ขณะนี้มีแต่สูตรดังนี้ครับ แต่ไม่ใช่ของ CDC นะครับ

 

prd = 14;
x = 2;
plt0 = HHV(H-x*ATR(prd),prd);
plt1 = IIf(C>plt0,plt0,Null);
Plot(plt1,”ATR trailing stop”,colorRed,styleThick);
//Plot(C,”Price”,colorGrey40,styleCandle);

[dreamscatKeymaster]

กรณีนี้แนะนำให้ลบข้อมูลเฉพาะ folder SET ที่ C:\MetaStock Data\SET\Set แล้วดาวน์โหลดมาใหม่นะครับ

และถ้าใช้โปรแกรม Metastock ขอให้เก็บ folder MSSmart ใน Set ไปไว้ที่อื่นก่อนลบนะครับ พอลบและดาวน์โหลดมาใหม่แล้ว ค่อยเอา MSSmart มาใส่ไว้ที่เดิมครับ (เส้นต่างๆที่ขีดไว้บนกราฟจะได้ไม่หายครับ)

[dreamscatKeymaster]

ขออนุญาตนำสูตรมาให้ดาวน์โหลดผ่านทางนี้แทนนะครับ (ลิ้งค์ไหนเสียแจ้งได้นะครับ)

CDC Hi-Lo 5 Channel – fixed!
https://www.dropbox.com/s/rpil53r6x9r1mod/CDC%20Hi-Lo%205%20Channel%20-%20fixed%21.zip?dl=0
CDC Aroon 20150506
https://www.dropbox.com/s/oquthmhcb5r7x4s/CDC%20Aroon%2020150506.zip?dl=0
CDC RSC 1226 fixed
https://www.dropbox.com/s/wf6eor2sw35tuyf/CDC%20RSC%201226%20fixed.zip?dl=0
CDC PnT 1.1 Original
https://www.dropbox.com/s/lvea3jx8305sbe6/CDC%20PnT%201.1%20Original.zip?dl=0
CDC 2015 Systems.rar
https://www.dropbox.com/s/x8gugdzj467n6sd/CDC%202015%20Systems.rar.lnk?dl=0
CDC Stochastic 20170315 Explorer
https://www.dropbox.com/s/zn2pluex0l4cch5/CDC%20Stochastic%2020170315%20Explorer.zip?dl=0
CDC Action Zone 1830, RSC 1226 และ Sto170315
https://www.dropbox.com/s/jn04ri7g8bb78ww/CDC%20AZ1830%20RSC1226%20Sto170315%20.zip?dl=0
CDC Action Zone Basic
https://www.dropbox.com/s/hh4ggdlo3c6mvrn/CDC%20Action%20Zone%20Basic.zip?dl=0
CDC Action Zone 20170101
https://www.dropbox.com/s/u7kditcn75cnqci/CDC%20Action%20Zone%2020170101.zip?dl=0
CDC RSI 161012
https://www.dropbox.com/s/92iehbnden031un/CDC%20RSI%20161012.zip?dl=0
CDC Action Zone 20160804
https://www.dropbox.com/s/v118uayqk2ijq9y/CDC%20Action%20Zone%2020160804.zip?dl=0
cdc Rsi over botsold
https://www.dropbox.com/s/wwvhizn9b1fhxi6/cdc%20Rsi%20over%20botsold.rar?dl=0
actionzone Default
https://www.dropbox.com/s/dve8lopr62fbl1k/actionzone%20Default.zip?dl=0
CDC Action Zone 20160404 Full
https://www.dropbox.com/s/dkaqi70g63k43nf/CDC%20Action%20Zone%2020160404%20Full.zip?dl=0
CDC ATR TRAILING STOP V2.0
https://www.dropbox.com/s/j2tglajc5nyfl79/CDC%20ATR%20TRAILING%20STOP%20V2.0.zip?dl=0
Beta CDC ActionZone Default
https://www.dropbox.com/s/4x7ay2fgkwwgqnz/Beta%20CDC%20ActionZone%20Default.zip?dl=0
CDC Action Zone 1026
https://www.dropbox.com/s/yz3p2zxzy1ttphp/1026.zip?dl=0
All CDC formulars 2015 from Art
https://www.dropbox.com/s/ebpzfh6i29t2fbg/All%20CDC%20formulars%202015%20from%20Art.zip?dl=0
CDC 2015 systems
https://www.dropbox.com/s/o2ct1nlgag6ihem/CDC%202015%20Systems.rar?dl=0
CDC Action Zone 150228
https://www.dropbox.com/s/9djdngvpi3q0qn4/CDC%20Action%20Zone%20150228.txt?dl=0
Actionzone 20150128
https://www.dropbox.com/s/i69dlxzugr3a5rf/Actionzone%2020150128.rar?dl=0
CDC System 1 Explorer
https://www.dropbox.com/s/xmfgjqnko1bnu5y/CDC%20System%201%20Explorer.zip?dl=0
CDC MACD 20150405
https://www.dropbox.com/s/aoe4zjpn5b0jai5/CDC%202015%20MACD%20150405.rar?dl=0
CDC ActionZone 20150126
https://www.dropbox.com/s/jtrcxbqcte3q8ls/Actionzone%2020150126.rar?dl=0
CDC ActionZone 150114
https://www.dropbox.com/s/tk6g7sgz4hpgptz/ActionZone150114.rar?dl=0
CDC ActionZone 141201
https://www.dropbox.com/s/p2z95sldx68lkxp/CDC%20Action%20Zone%20141201.rar?dl=0
cdc system 1
https://www.dropbox.com/s/dca9796irmzsb2c/CDC%20System%201.zip?dl=0
สูตรจากงาน CDC 2014
https://www.dropbox.com/s/q59aiyug432k9cg/CDC2014%20formula.zip?dl=0
CDC Scalp Trade 140823
https://www.dropbox.com/s/uvwgvc162d6mu1t/CDC%20Scalp%20Trade%20140823.zip?dl=0
CDC direction 140620
https://www.dropbox.com/s/aldayooyg25oxui/cdc%20direction%20140620.zip?dl=0
Ausiris Scalp 140823
https://www.dropbox.com/s/heahdphoxkcu15y/Ausiris%20Scalp%20140823.zip?dl=0
CDC Action Zone
https://www.dropbox.com/s/86nfyoty55uxs33/CDC%20Action%20Zone.rar?dl=0
Ausiris Swing Trade 20140524
https://www.dropbox.com/s/rr6piy16t8n2zui/20140524%20Ausiris%20Swingtrade.rar?dl=0
สูตรต่างๆจากเครื่องคุณลุง 19oct14
https://www.dropbox.com/s/q59aiyug432k9cg/CDC2014%20formula.zip?dl=0
All in One (สูตรต่างๆของชมรมครับ)
http://www.mediafire.com/download/5a603txnexdmm6n/all_in_one_(original).zip
CDC MACD
http://www.mediafire.com/download/2nfbrd50fa880s3/CDC_MACD_kaoyai_54-55.zip
PnT 1.1
http://www.mediafire.com/download/cxadzfaszpwi751/PnT_Manual.pdf
สูตรต่างๆจากเครื่องของชมรม 7jan12
http://www.mediafire.com/download/223c28jugdybo55/CDC_MS_formulars_7jan12.zip
วิธี import สูตร
https://www.dropbox.com/s/exqskfb0rr54dat/How%20to%20Import.pdf?dl=0
system tester manual
http://www.mediafire.com/download/j22e4rjmmen/MetaStock_8_System_Tester_Manual.pdf

[dreamscatKeymaster]

ขออนุญาตแปะสูตรให้อีกรอบนะครับ เผื่อสูตรจะผิดครับ (อันนี้ลองแล้วใช้งานได้ครับ) หรือถ้ายังไม่ได้อาจจะเป็นเพราะ amibroker version ไม่ตรงกันก็ได้ครับ (อันนี้กำลังสอบถามอาจารย์ให้อยู่นะครับ)

 

 

///////////////////////////
// CDC Actionzone 170101 //
// Amibroker Edition //
// Converted 17/01/2017 //
///////////////////////////

_N( Title = StrFormat( “{{NAME}} – {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) Vol ” + WriteVal( V, 1.0 ) + ” {{VALUES}}”, O, H, L, C, SelectedValue( ROC( C, 1 ) ) ) );

src = ParamField(“Data Source”,3);

sprd = Optimize(“Slow MA”,26,15,50,1);
fprd = Optimize(“Fast Period”,0.3,0.1,0.6,0.05)*sprd;

fast = EMA(src,fprd);
slow = EMA(src,sprd);
macdv = fast-slow;
sig = MA(macdv,9);

Bullish = macdv>0;
Bearish = macdv<0;

Green = Bullish AND src>fast;
Yellow = Bullish AND src<fast AND src>slow;
Brown = Bullish AND src<fast AND src<slow;

Red = Bearish AND src<fast;
Aqua = Bearish AND src>fast AND src<slow;
Blue = Bearish AND src>fast AND src>slow;

buysig = Bullish AND Ref(Bearish,-1);
PreBuy = Blue AND Ref(Blue,-1) AND Ref(Blue,-2) AND Ref(Blue,-3) AND src<Ref(src,-2);
BuyMore=BarsSince(Bullish)<26 AND Yellow AND src=LLV(src,9);

sellsig = Bearish AND Ref(Bullish,-1);
PreSell=Yellow AND BarsSince(buysig)>25 AND src<Ref(src,-2);
SellMore=Yellow AND BarsSince(Yellow)>2 AND src<Ref(src,-2);

//Plot(sig,”Signal Line”,colorBlue,styleLine);
//SetGradientFill(colorLime,colorRed,0,GetChartBkColor());
//Plot(macdv,”MACD”,colorGrey50,styleGradient);

plotcolor = IIf(Green,colorGreen,IIf(Yellow,colorYellow,iif(Brown,colorBrown,iif(Red,colorRed,iif(Aqua,colorAqua,iif(Blue,colorBlue,colorWhite))))));

Plot(c,”Price”,plotcolor,styleCandle);
Plot(fast,”Fast EMA”,colorRed,styleDashed);
Plot(slow,”Slow EMA”,colorBlueGrey,styleDashed);
PlotOHLC(fast,fast,slow,slow,”2ma zone”,IIf(fast>slow,ColorBlend(colorGreen,GetChartBkColor()),ColorBlend(colorRed,GetChartBkColor())),styleCloud);

// Exploration //

pctchange = ((C-Ref(C,-1))/Ref(C,-1))*100;
Filter = pctchange;
AddColumn(C,”Close”);
AddColumn(buysig,”Buy”);
AddColumn(prebuy,”PreBuy”);
AddColumn(BuyMore,”Buy More”);
AddColumn(sellsig,”Sell”);
AddColumn(PreSell,”PreSell”);
AddColumn(SellMore,”Sell More”);
AddColumn(pctchange,”Percent Change”);

// Quick Scan //
Buy = buysig;
Sell = sellsig;

// System Test //
// DO NOT FORGET TO EDIT THIS PART TO FIT YOUR SYSTEM TEST SETTINGS!! //

maxpos = 500;

SetPositionSize(100/maxpos,spsPercentOfEquity);
SetOption(“InitialEquity”, 1000000);
SetOption(“AllowPositionShrinking”, True);
SetOption(“MaxOpenPositions”,maxpos);

 

 

 

2 users thanked author for this post.

Tong, abaper

[dreamscatKeymaster]

แจ้งได้ที่ info@chaloke.com ครับ

[dreamscatKeymaster]

สามารถโหลดสูตรสำหรับ import ได้จากลิ้งค์นี้เลยนะครับ

https://bit.ly/2zkuKGX

2 users thanked author for this post.

cniruj, pisitku

[dreamscatKeymaster]

ทางทีมงานดำเนินการให้เรียบร้อยนะครับ ขอบพระคุณอย่างสูงครับ

[dreamscatKeymaster]

ทีมงานดำเนินการให้เรียบร้อยนะครับ ขอบพระคุณครับ

[dreamscatKeymaster]

อันนี้ไม่ใช่สูตรของคุณลุงนะครับ แต่มี divergence, overbought, oversold เหมือนกัน ลองดูได้นะครับ

 

zz=2;
rs=RSI(14);
Bullrtr1=ValueWhen(TroughBars(C,zz,1)==0,rs,1);
Bullrtr2=ValueWhen(TroughBars(C,zz,1)==0,rs,2);
Bullctr1=ValueWhen(TroughBars(C,zz,1)==0,C,1);
Bullctr2=ValueWhen(TroughBars(C,zz,1)==0,C,2);
BullDVG=Bullrtr1>Bullrtr2 AND Bullctr2>Bullctr1; //AND Bullrtr1<30
BullDVG=Ref(BullDVG AND Ref(BullDVG,-1)==0,-1);

Setsortcolumns(-2);
SetOption(“NoDefaultColumns”,1);
filter = IIf(StrLen(Name())<=5,1,IIf(StrToNum(StrLeft(Strright(Name(),3),1))+StrToNum(StrLeft(Strright(Name(),4),1))==0,1,0))
AND Strright(Name(),2)!=”-F” AND Strright(Name(),2)!=”-P” AND Strright(Name(),2)!=”_I” AND Strright(Name(),4)!=”_CON” AND Strleft(Name(),1)!=”!” AND Strleft(Name(),1)!=”$”
AND Strright(Name(),2)!=”17″ AND Strright(Name(),2)!=”.1″
AND C>0.5
AND Now(3)-Datenum()<8900 AND Status(“lastbarinrange”)
AND MA(C*V,2)>500000 ;

AddTextColumn(Name(),”Ticker”,formatChar,colorDefault,colorDefault,80);
AddColumn(DateTime(),”Date/time”,formatDateTime,colorDefault,colorDefault,70);

AddColumn(IIf(IsEmpty(BarsSince(BullDVG)<=15),0,BarsSince(BullDVG)<=15),
“Divergence”,1.0,colorDefault,colorDefault,35);

OB=IIf(rs>70,1,0);
OS=IIf(rs<30,1,0);
AddColumn(OB,”Overbought”,1.0,colorDefault,colorDefault,35);
AddColumn(OS,”Oversold”,1.0,colorDefault,colorDefault,35);

[dreamscatKeymaster]

สูตรของชมรมใน tradingview สามารถใช้ได้เลยนะครับ โดยพิมพ์ cdc หาจากในช่อง indicator ครับ

• This reply was modified 5 days, 3 hours ago by  dreamscat.

[dreamscatKeymaster]

อาจารย์พิริยะอธิบายวิธีการไว้ดังนี้ครับ

[dreamscatKeymaster]

สูตร actionzone สามารถดาวน์โหลดได้จากที่นี่เลยครับ

https://bit.ly/2GY4nK8

ตัวอย่างวิธีการ import เข้า metastock ดังนี้ครับ

https://bit.ly/27XjaJM

[dreamscatKeymaster]

ทีมงานดำเนินการให้เรียบร้อยนะครับ ขอบพระคุณครับ

[dreamscatKeymaster]

ทีมงานดำเนินการให้เรียบร้อยนะครับ ขอบพระคุณครับ

1 user thanked author for this post.

suphatcharin

[dreamscatKeymaster]

อยู่นี้กระทู้นี้ครับ …

CDC Action Zone Basic / Default

[dreamscatKeymaster]

ทีมงานดำเนินการให้เรียบร้อยนะครับ ขอบพระคุณครับ

[dreamscatKeymaster]

ทีมงานดำเนินการให้เรียบร้อยนะครับ ขอบพระคุณครับ

[dreamscatKeymaster]

ทีมงานดำเนินการให้เรียบร้อยนะครับ ขอบพระคุณครับ

[dreamscatKeymaster]

ทีมงานดำเนินการให้เรียบร้อยนะครับ ขอบพระคุณครับ

1 user thanked author for this post.

sockman

[dreamscatKeymaster]

ขอแก้ลิ้งค์ใหม่ดังนี้นะครับ

CDC 2015 Systems.rar
https://www.dropbox.com/s/o2ct1nlgag6ihem/CDC%202015%20Systems.rar?dl=0

[dreamscatKeymaster]

รบกวนลองรอสักพักแล้ว download ใหม่ดูไหมครับ อาจจะเป็นเพราะ internet ได้ครับ แต่ถ้ายังไม่หาย ขออนุญาตแนะนำขั้นตอนการแก้ไขดังนี้นะครับ
(1) uninstall โปรแกรม CDCDL
(2) ลบ folder ที่ชื่อ cygwin ใน drive C:\
(2.1) Restart เครื่องใหม่
(3) ติดตั้งโปรแกรม CDCDL version 17Apr17 ตาม link นี้ครับ http://bit.ly/2E0oToN
(3.1) เลือกที่ File.EXE แล้วเลือก Run as administrator
(4) เมื่อติดตั้งโปรแกรมเสร็จแล้วต้อง Restart เครื่องใหม่ 1 ครั้งครับ
(5) หลังเปิดเครื่องใหม่แล้ว ให้เรียกโปรแกรม CDCDL ด้วยการคลิกเม้าส์ปุ่มขวาที่โลโก้ CDCDL แล้วเลือก Run as administrator ครับ

• This reply was modified 1 month ago by  dreamscat.

[dreamscatKeymaster]

ทางทีมงานดำเนินการให้เรียบร้อยนะครับ ขอบพระคุณอย่างสูงครับ

[Author]

Posts