https://www.facebook.com/AmibrokerPlatform

คิดว่าน่าจะมีประโยชน์สำหรับคนดูกราฟมากๆ

รูปแบบ Chart 4 Style งานง่าย มีฟังชั่นสามารถปรับเปลี่ยนรูปเเบบได้ เเละปรับสีของเเท่งราคาได้

ฟังชั่นปรับทั้งหมดอยู่ใน Parameters คลิกขาวหมด

สีมี 3 รูปแบบ คือ
<div class=”text_exposed_show”>

Price Bull คือ ราคาหุ้นขึ้นปิมากกว่าเปิด
Price Bear ราคาหุ้นลงปิดต่ำกว่าเปิด
Price Line ราคาเปิดปิดเท่ากัน

Chart 4 Style // Candle / Bar / Line / Heikin-Ashi

Code นี้ผมรวบรวมมาจากหลายๆที่ Code เดิมจะเเยก Chart ออกจากกัน ผมเอามาปรับให้อยู่รวมกันเเละเพิ่มฟั่งชั่นปรับเเต่งลงไปเพิ่มเติม

เพราะ Amibroker เดิมๆจะไม่มี Chart พวกนี้ปรับเปลี่ยนสีก็ยุ่งยาก ต้องเขียนเองหมด มี Candle มีให้เเต่ปรับเปลี่ยนสีเเท่งไม่ได้ตามต้องการ ส่วน Bar ปรับสียุ่งยาก ผมหวังว่า Code ชุดนี้จะทำให้การใช้งาน Amibroker ใช้งานง่ายขึ้น

_SECTION_BEGIN(“Price Chart”);
///////////////////Code AFL by Chaiset Setindex Chart V 2.0 ///////////
PriceStyle = ParamList(“Price Style”, “Bar|Solid Candle|Line|Heikin-Ashi”,1);
ColorBull = ParamColor(“Price Bull”, colorGreen);
ColorBear = ParamColor(“Price Bear”, colorRed);
ColorLine = ParamColor(“Price Line”, colorBlack);

SetChartOptions(0,chartShowArrows|chartShowDates);

ThisStyle = styleCandle;
ThisTitle = “”;

_O=O; _C=C; _H=H; _L=L;

ThisColor = IIf( _C>_O, ColorBull, IIf(_C<_O, ColorBear, ColorLine));

switch (PriceStyle)
{

case “Solid Candle”:
SetBarFillColor( ThisColor );
PlotOHLC( _O, _H, _L, _C, ThisTitle, ThisColor, ThisStyle|styleNoLabel,0,-5,0);
break;

case “Bar”:
ThisStyle = styleBar;
PlotOHLC( _O, _H, _L, _C, ThisTitle, ThisColor, ThisStyle|styleThick|styleNoLabel,0,-5,0);
break;

case “Line”:
ThisStyle = styleLine;
ThisColor = IIf(_C >= _O,ColorBull, ColorBear); SetBarFillColor( ThisColor );
PlotOHLC( _O, _H, _L, _C, ThisTitle, ThisColor, ThisStyle|styleNoLabel,0,-5,0);
break;

case “Heikin-Ashi”:

_C = (C+H+L+C)/4;
_O = AMA( Ref( _C, -1 ), 0.5 );
_H = Max( H, Max( _C, _O ) );
_L = Min( L, Min( _C, _O ) );

ThisColor = IIf(_C >= _O,ColorBull, ColorBear);
SetBarFillColor( ThisColor );

ThisColor = IIf(_C >= _O,ColorBull, ColorBear);//cLine
ThisTitle = “Heikin-Ashi”;
PlotOHLC( _O, _H, _L, _C, ThisTitle, ThisColor, ThisStyle|styleNoLabel,0,-5,0);
break;

default:
SetBarFillColor( ThisColor );
ThisColor = cLine;
break;

}
_SECTION_END();

</div>