Forum Replies Created
-
Posts
-
มีสูตรดังนี้ครับ แต่ไม่ใช่สูตร official ของชมรมนะครับ
zz=2;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);โปรแกรม CDCDL วันนี้ใช้ได้ปกติดีนะครับ …
ส่วนตัวผมแก้ปัญหาด้วยการลบ folder SET ใน C:\MetaStock Data\SET แล้วดาวน์โหลดมาใหม่ครับ (ถ้าไม่อยากให้เส้นต่างๆหายให้ย้าย folder MSSmart ไปเก็บไว้ที่อื่นก่อนลบ เสร็จแล้วค่อยย้ายกลับมาที่เดิมครับ) และเลือก download ใน CDCDL ด้วยวิธี force checksum (slower) (ตั้งค่าในหน้า Advance Options ครับ) ไม่รู้ว่าถูกต้องไหมนะครับ แต่ลองแก้แล้วหายดีครับ
หรืออีกวิธีคือย้ายทุกอย่างทั้งโปรแกรม Metastock (ทั้ง folder Equis ที่ C:\Program Files (x86)\Equis) และฐานข้อมูลไปไว้ใน drive D: แทน ก็จะแก้ปัญหาได้เหมือนกันครับ (แต่อันนี้ยังไม่เคยลองเองครับ)
โปรแกรม CDCDL วันนี้ใช้ได้ปกติดีนะครับ …
ส่วนตัวผมแก้ปัญหาด้วยการลบ folder SET ใน C:\MetaStock Data\SET แล้วดาวน์โหลดมาใหม่ครับ (ถ้าไม่อยากให้เส้นต่างๆหายให้ย้าย folder MSSmart ไปเก็บไว้ที่อื่นก่อนลบ เสร็จแล้วค่อยย้ายกลับมาที่เดิมครับ) และเลือก download ใน CDCDL ด้วยวิธี force checksum (slower) (ตั้งค่าในหน้า Advance Options ครับ) ไม่รู้ว่าถูกต้องไหมนะครับ แต่ลองแก้แล้วหายดีครับ
หรืออีกวิธีคือย้ายทุกอย่างทั้งโปรแกรม Metastock (ทั้ง folder Equis ที่ C:\Program Files (x86)\Equis) และฐานข้อมูลไปไว้ใน drive D: แทน ก็จะแก้ปัญหาได้เหมือนกันครับ (แต่อันนี้ยังไม่เคยลองเองครับ)
วิธีแก้ไขเพิ่มเติมดังนี้นะครับ
ทดลองเข้าห้อง Member ดูนะครับ ถ้ายังใช้งานไม่ได้ สามารถแจ้งไปที่ info@chaloke.com ได้เลยนะครับ
ขอให้ท่านแจ้งไปที่ info@chaloke.com นะครับ ทางทีมงานจะมี user/pass อื่นให้ใช้งานได้แทนนะครับ
ขอให้ท่านแจ้งไปที่ info@chaloke.com นะครับ ทางทีมงานจะมี user/pass อื่นให้ใช้งานได้แทนนะครับ
{CDC RSI Over Bot/Sold 160516}
x1:=Mov(RSI(14),5,S);
x2:=OscP(12,26,E,%)<=-3 AND ROC(OscP(12,26,E,%),5,$)=-Sum(Abs(ROC(OscP(12,26,E,%),1,$)),5) OR (x1<=30);
x3:=x2 OR Ref(x2,-1) OR Ref(x2,-2) OR Ref(x2,-3) OR Ref(x2,-4);
x4:=OscP(12,26,E,%)>=3 AND ROC(OscP(12,26,E,%),5,$)=Sum(Abs(ROC(OscP(12,26,E,%),1,$)),5) OR (x1>=70);
x5:=x4 OR Ref(x4,-1) OR Ref(x4,-2) OR Ref(x4,-3) OR Ref(x4,-4);
x6:=BarsSince((x3=0 AND Ref(x3,-1)=1))>3 AND BarsSince((x3=0 AND Ref(x3,-1)=1))<11 AND C>Ref(HHV(C,3),-1);
x7:=BarsSince((x5=0 AND Ref(x5,-1)=1))>3 AND BarsSince((x5=0 AND Ref(x5,-1)=1))<11 AND C<Ref(LLV(C,3),-1);
x1; If(x3,20,30); If(x5,80,70); If(x6,40,48); If(x7,60,52); 30; 70;gold spot จะอยู่ใน major world indices ชื่อ XAU_USD ครับ
gold futures จะอยู่ใน usfu ชื่อ NYMEX_GC ครับ
import ได้ตามตัวอย่างเอกสารไฟล์นี้เลยครับ
http://bit.ly/2vHwp7rจากนั้นเปิดโปรแกรม Metastock และเปิดกราฟที่ต้องการ จากนั้นไปที่ Tools (ที่เมนูบาร์ด้านบนครับ) >>> Expert Advisor >>> เลือกสูตร CDC ที่ต้องการ เช่น CDC ActionZone … แล้วกดที่ Attach (ปุ่ม Attach จะเปลี่ยนเป็น Detach ครับ) จากนั้นกด Close ครับ
รบกวนแจ้งรายละเอียดการสมัครสมาชิกไปที่ info@chaloke.com นะครับ จะมีทีมงานจัดการให้นะครับ
โปรแกรม Metastock (~199MB) สำหรับเปิดกราฟหุ้น (ตัวทดลองใช้ได้ 30 วัน)
http://tinyurl.com/p2xxgya
วิธีติดตั้ง
http://tinyurl.com/pg9syfo
Serial Demo
ABQZ-CXTQ-LASGCลองแก้ตามเอกสารดังนี้ดูนะครับ
- สูตรสำหรับ Metastock ครับ
{CDC Hi-Lo 5 V.20150502}
Prd:=5;
Upper:=Ref(HHV(H,Prd),-1);
Lower:=Ref(LLV(L,Prd),-1);
Buy:=Cross(H,Upper);
Sell:=Cross(Lower,L);
Bullish:=BarsSince(Buy)<BarsSince(Sell);
Bearish:=BarsSince(Sell)<BarsSince(Buy);
BuyPrice:=ValueWhen(1,Bullish AND Ref(Bearish,-1),Upper);
ProfitLong:=((C-BuyPrice)/BuyPrice);
SellPrice:=ValueWhen(1,Bearish AND Ref(Bullish,-1),Lower);
ProfitShort:=((SellPrice-C)/SellPrice);
BuyPrice; SellPrice;2. สูตรสำหรับ Amibroker ครับ
//CDC Hi-Lo 5 V.20150502
Prd=5;
Upper=Ref(HHV(H,Prd),-1);
Lower=Ref(LLV(L,Prd),-1);
Buy=Cross(H,Upper);
Sell=Cross(Lower,L);
Bullish=BarsSince(Buy)<BarsSince(Sell);
Bearish=BarsSince(Sell)<BarsSince(Buy);
Buy1=Buy AND Ref(bearish,-1);
Sell1=Sell AND Ref(bullish,-1);
Plot(upper,”Upper”,colorGreen,styleDashed);
Plot(lower,”Lower”,colorRed,styleDashed);
PlotShapes(Buy1*shapeUpArrow,colorGreen,0,L);
PlotShapes(sell1*shapeDownArrow,colorRed,0,H);
Plot(C,”Close”,IIf(bullish,colorGreen,IIf(bearish,colorRed,colorGrey40)),styleCandle);- ขอสอบถามทีมข้อมูลให้ต่อไปนะครับ
- ปกติทีมข้อมูลจะแก้ไขให้เองนะครับ ถ้าตัวไหนยังไม่ได้ปรับแจ้งไปได้ที่ info@chaloke.com ครับ
- สูตรตัวอย่างโดยครูอนันต์ดังนี้ครับ (สำหรับ explorer นะครับ)
zz=2;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);ข้อมูลมาปกติดีนะครับ (ดังภาพครับ) รบกวนลองดาวน์โหลดดูใหม่อีก
ครั้งนะครับ ถ้ายังไม่หาย กรณีนี้แนะนำให้ลบ เฉพาะ folder SET ที่ C:\MetaStock Data\SET แล้วดาวน์โหลดมาใหม่ครับ โดยให้เก็บ folder MSSmart ใน SET ไปไว้ที่อื่นก่อนลบนะครับ พอลบและดาวน์โหลดมาใหม่แล้ว ค่อยเอา MSSmart มาใส่ไว้ที่เดิมครับ (เส้นต่างๆที่ขีดไว้บนกราฟจะได้ ไม่หายครับ) 1. ทดลองยกเลิกการ download ข้อมูลตลาด Tocom และ forex ครับ
2. ถ้ายังไม่หาย ลอง install เฉพาะ cygwin ใหม่ตามที่ CDC-Admin ตอบด้านบนเลยครับ
หรือ
3. download folder cygwin จากที่นี่ http://www.mediafire.com/download/5il0wn5j073nd1w/cygwin.rar และแตกไฟล์ (extract) แล้ว copy ทั้ง folder ไปใส่ในเครื่องของท่านใน C: แทนที่ folder cygwin อันเก่า (ลบ folder cygwin อันเก่าออกก่อนนะครับ) เสร็จแล้ว restart เครื่อง 1 ครั้ง ก็จะใช้งานได้ครับ
สูตร atr trailing stop ครับ
prd = 14;
x = 2;
plt0 = HHV(H-x*ATR(prd),prd);
plt1 = IIf(C>plt0,plt0,Null);
Plot(plt1,”ATR trailing stop”,colorRed,styleThick);ตัวอย่างสูตร explorer โดยครูอนันต์นะครับ
zz=2;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);
