RRG on Amibroker (fail)

bác chia sẻ được không? Thực sự nhìn RRG thì cũng chưa ra được tiền đâu nhưng nếu tích hợp và Amibroker để lọc cùng các bộ lọc khác thì sẽ có thêm hữu ích

 

Dân tình hứng thú cái lạ và tích hợp tiện ích vào ami cho nó tiện thôi. chứ chỉ có RRG thì oánh không ra tiền đc. share anh em cùng học hỏi biết đâu có ý tưởng thêm để hữu ích hơn

 

Mình nhìn qua thì công thức này có vẻ không đúng khi lấy giá trị min max, vì giả sử có 9 mã đưa vào chart với các giá trị khác nhau và plot ra chart. Nếu bạn bỏ đi một mã mà mã đó nằm trong giá trị min hoặc max thì nó sẽ ảnh hưởng đến kết quả của 8 mã còn lại. Trong khi đó trên stockchart hay optuma khi bạn loại bớt mã thì giá trị các mã còn lại không thay đổi.

 

Chúc mừng bạn đã khám phá ra được công thức, mình đã đọc bài của bạn trên forum Amibroker. Vietnamese Coder trên đó không nhiều, cám ơn bạn đã làm cho họ nhìn chúng ta với ánh mắt khác hơn, nếu không phiền bạn PM mình contact để có thể giao lưu.

 

Thớt cho anh em đi

 

Ông Danielkhanhnguyen đã code dc nhưng chưa share, còn ông khanhmd thì lâu nay ko thấy.

 

Có lẽ đợi bán!

 

Bán cũng ok mà. Thử hỏi mọi người có ai đi làm ở cơ quan hay kinh doanh lĩnh vực gì trừ khi làm từ thiện có ai muốn làm không lương không ? Nên công sức người ta bỏ ra nghiên cứu và viết mặc dù là revese engine từ code khác mà dùng được tốt thì cũng đáng trân trọng. Hiện giá phí dùng RRGs trên stockchart cũng k quá đắt, ai thích thì có thể đăng ký trên đó nó cho dùng thử 1 tháng free

 

Ý em là bác chủ đợi hoàn thiện xong sẽ bán?

 

Ủng hộ bạn. Đôi khi mày mò cod chỉ vì đam mê chinh phục. Chứ chỉ có nó oánh không ra tiền đc. Đc cái dùng để chém gió ngành này tăng ngành kia giảm đc . Vạn sự tùy duyên. Nhân duyên hoạch định. Có kiến thức trong đầu mới nảy số đầu tư đc

 

Ý bác là market profile hay volume at price bác, vì e thấy 2 thằng này hơi khác nhau chút, mong bác chỉ bảo thêm

 

Hi Bác, bác cho hỏi code chia ô thế nào nhỉ?

 

Các bác có bán cho em để em ủng hộ với nhé

 

Mới sưu tầm được bác Khánh, bác xem có giúp ích được gì k
// Downloaded From https://www.WiseStockTrader.com
_SECTION_BEGIN( "XY-Rotation Chart" );

_N( base = ParamStr( "Base", "IHSG" ) );
_N( list = ParamStr( "Symbols", "IDXBASIC,IDXCYCLIC,IDXENERGY,IDXFINANCE,IDXHEALTH,IDXINDUST,IDXINFRA,IDXNONCYC,IDXPROPERT,IDXTECHNO,IDXTRANS" ) );
tbar = Param( "Trailing Bar", 12, 1, 100, 1 );

EnableTextOutput( False );
GfxSetOverlayMode( 2 );

pxl = Status( "pxchartleft" );
pxr = Status( "pxchartright" );
pxt = Status( "pxcharttop" );
pxb = Status( "pxchartbottom" );
pxw = ( pxr - pxl ) / 2;
pxh = ( pxb - pxt ) / 2;
xm = pxl + pxw;
ym = pxt + pxh;

GfxMoveTo( pxl, ym );
GfxLineTo( pxr, ym );
GfxMoveTo( xm, pxt );
GfxLineTo( xm, pxb );

function getrs ( sc, t )
{
bc = Foreign( base, "C" );
sbr = sc / bc;

rs1 = MA( sbr, 12 );
rs2 = MA( sbr, 26 );
rs = 100 * ( ( rs1 - rs2 ) / rs2 + 1 );

rm1 = MA( rs, 1 );
rm2 = MA( rs, 9 );
rm = 100 * ( ( rm1 - rm2 ) / rm2 + 1 );

return IIf( t, rs , rm ) - 100;
}

function drawpos ( x, y, sym, text )
{
rsl = VarGet( "rsl" );
rsh = VarGet( "rsh" );
rml = VarGet( "rml" );
rmh = VarGet( "rmh" );

xx = pxl + pxw + x * ( pxw / ( Max( rsh, -rsl ) * 1.10 ) );
yy = pxb - pxh - y * ( pxh / ( Max( rmh, -rml ) * 1.10 ) );

xp = Nz( VarGet( "xp" + sym ), xx );
yp = Nz( VarGet( "yp" + sym ), yy );

VarSet( "xp" + sym, xx );
VarSet( "yp" + sym, yy );

GfxMoveTo( xp, yp );
GfxLineTo( xx, yy );

GfxCircle( xx, yy, IIf( text == "", 2, 4 ) );

if ( text != "" ) GfxTextOut( sym, xx + 6 , yy - 3 );
}

for ( i = 0; ( sym = StrExtract( list, i ) ) != ""; i++ )
{
SetForeign( sym );

rs = getrs( C, 1 );
rm = getrs( C, 0 );

for ( ii = BarCount - tbar; ii < BarCount; ii++ )
{
rs_ = rs[ ii ];
rm_ = rm[ ii ];

rsh = Nz( VarGet( "rsh" ), rs_ );
if ( rs_ >= rsh )
VarSet( "rsh", rs_ );

rsl = Nz( VarGet( "rsl" ), rs_ );
if ( rs_ <= rsl )
VarSet( "rsl", rs_ );

rmh = Nz( VarGet( "rmh" ), rm_ );
if ( rm_ >= rmh )
VarSet( "rmh", rm_ );

rml = Nz( VarGet( "rml" ), rm_ );
if ( rm_ <= rml )
VarSet( "rml", rm_ );
}

RestorePriceArrays( True );
}

for ( i = 0; ( sym = StrExtract( list, i ) ) != ""; i++ )
{
SetForeign( sym );

rs = getrs( C, 1 );
rm = getrs( C, 0 );

for ( ii = BarCount - tbar; ii < BarCount; ii++ )
{
drawpos( rs[ ii ], rm[ ii ], sym, WriteIf( ii == BarCount - 1, sym, "" ) );
}

RestorePriceArrays( True );
}

_SECTION_END();

 

ACE tự thêm mã nhóm ngành vào RRG nhé)

 

Em làm không được như của bác.

 

chỉnh preperence về nền basic đi

 

Em đã làm được. Cảm ơn bác.

 

bác nào cao siêu làm cái code này cho amibroke cho em xin cái để học hỏi