- This topic has 1 ข้อความตอบกลับ, 2 เสียง, and was last updated 5 years, 8 months มาแล้ว by .
-
กระทู้
-
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>
- คุณต้องเข้าสู่ระบบเพื่อตอบกลับกระทู้นี้