Tuyệt Chiêu AmiBroker

[thuanphatmobile]

Cái bác mới post xài giống như Stochastic oscillator phải không?

[thuanphatmobile]

Em thấy nó giống với dạng như RMO hơn

[duocnguyen]

Các bác nhận xét đều đúng cả. Nói chung các chỉ báo đều có những nhóm nhất định thôi chứ không thể mỗi cái đều khác nhau quá xa được

/// Chaloke Reaction Trend System ///

XX=(H+L+C)/3;
BB=2*XX-H;
SS=2*XX-L;
HBOP=2*XX-2*L+H;
LBOP=2*XX-2*H+L;
color=IIf(BarsSince(Cross(H,Ref(HBOP,-1)))>
BarsSince(Cross(Ref(LBOP,-1),L)),colorRed , colorBrightGreen);
Plot(C,"",Color,64);
Plot(XX,"",colorYellow);
Plot(BB,"",colorLime);
Plot(SS,"",colorPink);
Plot(HBOP,"",colorGreen);
Plot(LBOP,"",colorDarkRed);

Title=Name()+" "+Date()+" "+EncodeColor(colorSkyblue)+" Chaloke RTS System "+EncodeColor(colorYellow)+" Vol="+NumToStr(Volume,1.0)+" "+" O="+Open+" H="+HHV(H,1)+" L="+LLV(L,1)+"
Close="+ Close+""+"("+numtostr((Close-ref(C,-1))/ref(c,-1)*100,1.2)+" %)";

[duocnguyen]

Mình gửi thêm một công thức mà các cao thủ AmiBroker không thể thiếu trong bí kíp



//|------------------------------------------------------------------
//|SECTION 21 - default buy, sell, short and cover rules. They are added to the PatternExplorer signals.
//|------------------------------------------------------------------
def_Buy = 1;
def_Sell = 1;
def_Short = 1;
def_Cover = 1;
//|------------------------------------------------------------------


//|------------------------------------------------------------------
//|SECTION 22 - Use Param from Chart
//|------------------------------------------------------------------
// NOT all parameters are possible. Currently only sensitivity is possible.
def_UseFromChart = 1;
//|------------------------------------------------------------------


//-------------------------------------------------------------------------------------------------------------------------------------
//SECTION 23 - Add custom code before PatternExplorer code.
//-------------------------------------------------------------------------------------------------------------------------------------
//The following code allows you to add any custom code to any tool. Just use the Formula names as displayed in the workspace.

procedure AddCustomCodeBeforePE()
**
if(FormulaName == "PE - SI Relative Strength")
**
def_Filter = 1;//Filter set to 1 because common filter conditions are mostly not useful in the composite indicators. }
}
else
if(FormulaName == "PE - SI Trend")
**
def_Filter = 1;//Filter set to 1 because common filter conditions are mostly not useful in the composite indicators.
}
else
if(FormulaName == "PE - Candlesticks")
**
// AddColumn(MA(C, 5) > MA(C, 20), "MA(C, 5) > MA(C, 20)", 1.0);// Example to add a column before all the PatternExplorer columns, only in the Candlestick tool.
// Plot(PeTaio(), "PeTaio", colorBlue, 1+styleOwnScale, -100, 100);//Example to overlay the TAIO indicator over the Price Chart in the Candlestick tool.
}
else
**
// do anything
}
}
//-------------------------------------------------------------------------------------------------------------------------------------


// -------------------------------------------------------------------------------------------------------------------------------------
// SECTION 24 - Add custom code after PatternExplorer code.
// -------------------------------------------------------------------------------------------------------------------------------------
procedure AddCustomCodeAfterPE()
**
if(FormulaName == "PE - Alert 1 - Price")
**
// AddColumn(H == HHV(H, 20), "H == HHV(H, 20)", 1.0);// Example to add a column after PatternExplorer columns in PE - Alert 1 - Price.
}
// AddColumn(RSI() < 30, "RSI() < 30");// Example to add a column after PatternExplorer columns in all tools.
}
//-------------------------------------------------------------------------------------------------------------------------------------


//V3 - End of settings - Caution: Never change or remove this line !

[vietthuonggroup]

Cái hệ thống phân tích kỹ thuật này xài thế nào vậy bác. Chứ code trong AmiBroker không em không hiểu nổi

Bác có cái nào tương tự trong MetaStock không[IMG]images/smilies/biggrin.gif[/IMG]

[lamkinh]

Cái hệ thống phân tích kỹ thuật này xài thế nào vậy bác. Chứ code trong AmiBroker không em không hiểu nổi

Bác có cái nào tương tự trong MetaStock không[IMG]images/smilies/biggrin.gif[/IMG]

Không có bác ạ. Đâu phải cái nào cũng có đồng thời trong hai phần mềm phân tích kỹ thuật đâu. Tùy cái chứ

[lamkinh]

Căng nhỉ em toàn phân tích kỹ thuật trên Metastock thôi

Thế là bác bị bất lợi rùi. Dân phân tích kỹ thuật đỉnh là phải xài cả hai cùng lúc

Em gửi các bác một chỉ báo mới này. Cái này xài cho AmiBroker nhé [IMG]images/smilies/biggrin.gif[/IMG][IMG]images/smilies/biggrin.gif[/IMG]

SetChartOptions(0,chartShowArrows|chartShowDates);
_SECTION_BEGIN("Vol-bands");
Vf=Param("V-b Values",0.0146,-0.0001,0.1,0.0001);
P1 = ValueWhen(TimeNum() == 095500, Open);
T0 = P1+(P1*0.25*Vf);
B0 = P1-(P1*0.25*Vf);
T1 = P1+(P1*0.5*Vf);
B1 = P1-(P1*0.5*Vf);
T2 = P1+(P1*1*Vf);
B2 = P1-(P1*1*Vf);
T3 = P1+(P1*1.28*Vf);
B3 = P1-(P1*1.28*Vf);
T4 = P1+(P1*1.5*Vf);
B4 = P1-(P1*1.5*Vf);
T5 = P1+(P1*2*Vf);
B5 = P1-(P1*2*Vf);
T6 = P1+(P1*2.5*Vf);
B6 = P1-(P1*2.5*Vf);
T7 = P1+(P1*3*Vf);
B7 = P1-(P1*3*Vf);

hts = Param ("Text Shift", -55,-150,150,1);
numbars = LastValue(Cum(Status("barvisible")));
fraction= IIf(StrRight(Name(),3) == "", 3.2, 3.2);
Today = LastValue(Day()) ;
starttime = ParamTime( "Start Time", "09:55" );
endtime = ParamTime( "End Time", "10:00" );
tn = TimeNum();
timecond = tn >= starttime AND tn <= endtime;
firstBarOfDay = timecond ;
firstBarOfDay = firstBarOfDay - Ref( firstBarOfDay, -1 );
Cb=ParamToggle("0.25 ","NO|YES",1);
Cb1=ParamToggle("0.50","NO|YES",1);
Cb2=ParamToggle("1.0 ","NO|YES",1);
Cb3=ParamToggle("1.28","NO|YES",1);
Cb4=ParamToggle("1.5 ","NO|YES",0);
Cb5=ParamToggle("2.0 ","NO|YES",0);
Cb6=ParamToggle("2.5 ","NO|YES",0);
Cb7=ParamToggle("3.0 ","NO|YES",0);
if(Cb==1)**
Plot(IIf( tn > endtime , t0, Null ) ,"",7, styleLine+ styleNoLabel);
PlotText("0.25= " + WriteVal(T0,fraction),LastValue(BarIndex())-(numbars/hts),LastValue (T0,1) , 2);
Plot(IIf( tn > endtime , b0, Null ),"",7, styleLine+ styleNoLabel);
PlotText("0.25= " + WriteVal(B0,fraction),LastValue(BarIndex())-(numbars/hts),LastValue (B0,1) , 2);
}if(Cb1==1)**
Plot(IIf( tn > endtime , t1, Null ),"",48, styleDashed+ styleNoLabel);
PlotText("0.50= " + WriteVal(T1,fraction),LastValue(BarIndex())-(numbars/hts),LastValue (T1,1) , 2);
Plot(IIf( tn > endtime , b1, Null ),"",48, styleDashed+ styleNoLabel);
PlotText("0.50= " + WriteVal(B1,fraction),LastValue(BarIndex())-(numbars/hts),LastValue (B1,1) , 2);
}if(Cb2==1)**
Plot(IIf( tn > endtime , t2, Null ),"",3, styleLine+ styleNoLabel);
PlotText("1.00= " + WriteVal(T2,fraction),LastValue(BarIndex())-(numbars/hts),LastValue (T2,1) , 2);
Plot(IIf( tn > endtime , b2, Null ),"",3, styleLine+ styleNoLabel);
PlotText("1.00= " + WriteVal(B2,fraction),LastValue(BarIndex())-(numbars/hts),LastValue (B2,1) ,2);
}if(Cb3==1)**
Plot(IIf( tn > endtime , t3, Null ),"",51, styleDashed+ styleNoLabel);
PlotText("1.28= " + WriteVal(T3,fraction),LastValue(BarIndex())-(numbars/hts),LastValue (T3,1) , 2);
Plot(IIf( tn > endtime , b3, Null ),"",51, styleDashed+ styleNoLabel);
PlotText("1.28= " + WriteVal(B3,fraction),LastValue(BarIndex())-(numbars/hts),LastValue (B3,1) , 2);
}if(Cb4==1)**
Plot(IIf( tn > endtime , t4, Null ),"",5, styleDashed+ styleNoLabel);
PlotText("1.50= " + WriteVal(T4,fraction),LastValue(BarIndex())-(numbars/hts),LastValue (T4,1) , 2);
Plot(IIf( tn > endtime , b4, Null ),"",5, styleDashed+ styleNoLabel);
PlotText("1.50= " + WriteVal(B4,fraction),LastValue(BarIndex())-(numbars/hts),LastValue (B4,1) , 2);
}if(Cb5==1)**
Plot(IIf( tn > endtime , t5, Null ),"",4, styleDashed+ styleNoLabel);
PlotText("2.00= " + WriteVal(T5,fraction),LastValue(BarIndex())-(numbars/hts),LastValue (T5,1) , 2);
Plot(IIf( tn > endtime , b5, Null ),"",4, styleDashed+ styleNoLabel);
PlotText("2.00= " + WriteVal(B5,fraction),LastValue(BarIndex())-(numbars/hts),LastValue (B5,1) , 2);
}if(Cb6==1)**
Plot(IIf( tn > endtime , t6, Null ), "",47, styleDashed+ styleNoLabel);
PlotText("2.50= " + WriteVal(T6,fraction),LastValue(BarIndex())-(numbars/hts),LastValue (T6,1) , 2);
Plot(IIf( tn > endtime , b6, Null ),"",47, styleDashed+ styleNoLabel);
PlotText("2.50= " + WriteVal(B6,fraction),LastValue(BarIndex())-(numbars/hts),LastValue (B6,1) , 2);
}if(Cb7==1)**
Plot( T7,"", colorLightBlue, 1|styleNoLabel );
Plot( B7,"", colorLightBlue, 1|styleNoLabel );}



Plot(Close, "Price", 47, styleCandle );
up= tn > endtime AND((Cross(Close,t0)OR Cross(Close,t1)OR Cross(Close,t2) OR Cross(Close,t3)OR Cross(Close,t4)OR Cross(Close,t5)OR Cross(Close,t6) OR Cross(Close,t7)
OR Cross(Close,b0) OR Cross(Close,b1) OR Cross(Close,b2) OR Cross(Close,b3) OR Cross(Close,b4) OR Cross(Close,b5) OR Cross(Close,b6) OR Cross(Close,b7)));
dn=tn > endtime AND ((Cross(b0,Close)OR Cross( b1,Close)OR Cross( b2,Close)OR Cross(b3,Close)OR Cross( b4,Close)OR Cross( b5,Close) OR Cross( b6,Close) OR Cross( b7,Close)
OR Cross(t0,Close)OR Cross( t1,Close)OR Cross( t2,Close)OR Cross(t3,Close)OR Cross( t4,Close)OR Cross( t5,Close)OR Cross( t6,Close)OR Cross( t7,Close)));

Cb7=ParamToggle("Alerts","NO|YES" ,0);if(Cb7==1)**
PlotShapes( IIf( up, shapeUpArrow, shapeNone ),10,0,L,-20 );
PlotShapes( IIf( dn, shapeDownArrow, shapeNone ),13,0,H,-20 );}
//------------------------------------------------------------
HaC=(O+H+L+C)/4;
pab=tn > endtime AND (Cross(HaC,t0)OR Cross(Hac,b0));
pb= tn > endtime AND (Cross(HaC,t1) OR Cross(Hac,b1));
pb1=tn > endtime AND (Cross(HaC,t2) OR Cross(Hac,b2));
pb2=tn > endtime AND (Cross(HaC,t3) OR Cross(Hac,b3)) ;
pb3=tn > endtime AND (Cross(HaC,t4) OR Cross(Hac,b4));
pb4=tn > endtime AND (Cross(HaC,t5)OR Cross(Hac,b5));
pb5=tn > endtime AND (Cross(HaC,t6)OR Cross(Hac,b6));
pb6=tn > endtime AND (Cross(HaC,t7)OR Cross(Hac,b7));

pas=tn > endtime AND (Cross(b0,HaC)OR Cross(t0,HaC));
ps= tn > endtime AND (Cross( b1,HaC)OR Cross( t1,HaC));
ps1=tn > endtime AND (Cross( b2,HaC)OR Cross( t2,HaC));
ps2=tn > endtime AND (Cross(b3,HaC)OR Cross(t3,HaC));
ps3=tn > endtime AND (Cross( b4,HaC)OR Cross( t4,HaC));
ps4=tn > endtime AND (Cross( b5,HaC)OR Cross( t5,HaC));
ps5=tn > endtime AND (Cross( b6,HaC)OR Cross( t6,HaC));
ps6=tn > endtime AND (Cross( b7,HaC)OR Cross( t7,HaC));

PlotP = ParamToggle("Plot Shapes","Off,On",0);
//P1Shape = Param("buy Shape Typ",35,0,50,1);
//P2Shape = Param("sell Shape Typ",36,0,50,1);
if(PlotP)**
PlotShapes(IIf(pab,shapeDigit1,shapeNone),colorAqu a,0,L,-10 );
PlotShapes(IIf(pas,shapeDigit1,shapeNone),colorCus tom2,0,H,10 );
PlotShapes(IIf(pb,shapeDigit2,shapeNone),colorLime ,0,L,-10 );
PlotShapes(IIf(ps,shapeDigit2,shapeNone),colorOran ge,0,H,10 );
PlotShapes(IIf(pb1,shapeDigit3,shapeNone),2,0,L,-10 );
PlotShapes(IIf(ps1,shapeDigit3,shapeNone),13,0,H,1 0 );
PlotShapes(IIf(pb2,shapeDigit4,shapeNone),6,0,L,-10 );
PlotShapes(IIf(ps2,shapeDigit4,shapeNone),31,0,H,1 0 );
PlotShapes(IIf(pb3,shapeDigit5,shapeNone),5,0,L,-10 );
PlotShapes(IIf(ps3,shapeDigit5,shapeNone),4,0,H,10 );
PlotShapes(IIf(pb4,shapeDigit6,shapeNone),5,0,L,-10 );
PlotShapes(IIf(ps4,shapeDigit6,shapeNone),4,0,H,10 );
PlotShapes(IIf(pb5,shapeDigit7,shapeNone),5,0,L,-10 );
PlotShapes(IIf(ps5,shapeDigit7,shapeNone),4,0,H,10 );
PlotShapes(IIf(pb6,shapeDigit8,shapeNone),5,0,L,-10 );
PlotShapes(IIf(ps6,shapeDigit8,shapeNone),4,0,H,10 );
}
Title = EncodeColor(colorWhite)+ "Volatility-Bands stocks" + " - " + Name() + " - " + EncodeColor(colorRed)+ Interval(2) + EncodeColor(colorWhite) +
" - " + Date() +" - "+"
" +EncodeColor(colorYellow) +"Op-"+O+" "+"Hi-"+H+" "+"Lo-"+L+" "+
"Cl-"+C+" "+ "Vol= "+ WriteVal(V);
_SECTION_END();
_SECTION_BEGIN("Background text");
C11=ParamColor("up panel",colorDarkOliveGreen );
C12=ParamColor("dn panel",colorDarkGrey );
C13=Param("fonts",20,10,30,1 );
C14=Param("left-right",2.1,1.0,5.0,0.1 );
C15=Param("up-down",12,1,20,1 );
Miny = Status("axisminy");
Maxy = Status("axismaxy");
lvb = Status("lastvisiblebar");
fvb = Status("firstvisiblebar");
pxwidth = Status("pxwidth");
pxheight = Status("pxheight");
GfxSetBkMode( 0 );
GfxSetOverlayMode(1);
GfxGradientRect(0,0,pxwidth, pxheight, C11, C12 );
GfxSelectFont("Tahoma", Status("pxheight")/C13 );
GfxSetTextAlign( 6 );
GfxTextOut( Name(), Status("pxwidth")/C14, Status("pxheight")/C15 );
GfxSelectFont("Tahoma", Status("pxheight")/C13*0.5 );
GfxTextOut( "Volatility Bands - stocks", Status("pxwidth")/C14, Status("pxheight")/C15*2.5 );
GfxSelectFont("Tahoma", Status("pxheight")/C13*0.5 );
GfxTextOut( " www.TAtechnics.in", Status("pxwidth")/C14, Status("pxheight")/C15*4 );
_SECTION_END();
NewDay = Day() != Ref( Day(), -1 );
DailyBarNum = BarsSince( NewDay ) + 1;
DBN = DailyBarNum <= 1;
Plot( DBN, "Day Seprator", 31, styleHistogram| styleOwnScale | styleNoLabel);

Cái công thức của bác dài thế kia thì ngay cả dân phân tích kỹ thuật chuyên nghiệp cũng khiếp vía đấy

Mình nghĩ công thức dài ngắn không quan trọng chủ yếu là phải đáp ứng hai tiêu chuẩn:

- Thứ nhất, tỷ lệ chính xác phải tương đối

- Thứ hai, phải đảm bảo dễ sử dụng (chứ nếu không thì căng đấy [IMG]images/smilies/biggrin.gif[/IMG] )