TRO Candle Color - Multi TF

candu · August 14, 2008

sy pake indikator TRo Multi color candle forex untuk hang seng, tapi setting daily musti 1440 dan weekly 10080, saya mau ubah daily ke 285(sessi I + sesi II) dan weekly 1425(5 hari kerja) malah jadi error,

ini ada file ex.4-nya; kalo bisa dibuat file mq.4-nya yg bisa diubah2 setting-nya

buat rekan2 yang punya skill coding mohon bantuannya,

http://rapidshare.com/files/137370654/_TRO_CandleColor_Multi.ex4.html

THANKS very much!

William1713006271 · August 14, 2008

Re: Mohon Bantuan Coding

ini ada file ex.4-nya; kalo bisa dibuat file mq.4-nya yg bisa diubah2 setting-nya buat rekan2 yang punya skill coding mohon bantuannya,

Hm, kayaknya ga bakalan bisa bro. Di forum manapun dan oleh programmer manapun juga kayaknya susah untuk dibuat jadi mq4.

Kl mo minta bantuan coding, bro harus tau dulu cara kerja mendetail dari indicator itu. Kasih rumusnya. Misalnya waktu Bro Gyverd minta dibuatin coding. Dia kasih rumusnya, misal harga running dikali high dikurang low jadinya apa. Itu baru bisa dibuat rumusnya.

Kl cuman ex4 para programmer cuman bisa nebak2. Kl indicatornya pake algoritma yg agak ribet, pasti ga ketebak. Alhasil percuma.

Begini aja, coba bro cari rumusnya. Atau cari kira2 rumusnya bagaimana. Biasanya pas indicator ini pertama kali dikeluarkan oleh si penciptanya, dia ada share kira2 dia pake algoritma yg mana. Trus post disini, nanti aku coba bantu buatin. Ato bro kasih tebakan kira2 pake rumus yg mana.

Satu hal lagi. Kalo cuman ex4 ato mq4, jangan di post di rapidshare. Forum ini bisa attached ex4 dan mq4. Tidak semua orang (aku contohnya) bisa download dari rapidshare. Alhasil orang yg mo bantu, karena ga bisa download, jadi males bantuinnya. :P Apalagi kl taro di rapidshare bisa saja dihapus oleh para hacker ato oleh si rapidshare sendiri. Kl taro di forum ini kan lebih gampang.

Regards,

candu · August 15, 2008

Re: Mohon Bantuan Coding

wah rumus apaan ya :hammer: ? waktu itu download dari mana juga lupa, musti searching lagi kayaknya ....entar deh diinget2 dulu

emang sebenarnya sih daily dan weekly gak kepake di intraday hang seng,

cuma nambah sugesti aja kalo liat indikator yg kita pake bisa kasi signal akurat......

tapi ya enggak begitu pentinglah

bisa nyusul lain waktu kalo lagi nyantai :mrgreen:

btw ini ada file mq.4 untuk tampilin chart dari yahoo, tapi setelah sy coba error,

kali ada yg bisa benerin manstap bro !

SEFC · August 15, 2008

Re: Mohon Bantuan Coding

sy pake indikator TRo Multi color candle forex untuk hang seng, tapi setting daily musti 1440 dan weekly 10080, saya mau ubah daily ke 285(sessi I + sesi II) dan weekly 1425(5 hari kerja) malah jadi error,

ini ada file ex.4-nya; kalo bisa dibuat file mq.4-nya yg bisa diubah2 setting-nya
buat rekan2 yang punya skill coding mohon bantuannya,

http://rapidshare.com/files/137370654/_TRO_CandleColor_Multi.ex4.html

THANKS very much!

Bro Candu.. ini codingnya.. semoga bermanfaat.. saya sudah decode dari ex4 ke mq4 pakai program decoding yang saya punya..

[color=#0000BF]// Decoding by SEFC 

#property library
// indicator settings 
#property indicator_chart_window


string gs70[]={ "i", "h", "g", "f", "e", "d", "c", "b", "a" };
extern string myPair = "USDJPY";
extern int myPeriod1 = 1;
extern int myPeriod2 = 15;
extern int myPeriod3 = 60;
extern int myPeriod4 = 240;
extern int myPeriod5 = 1440;
extern int myPeriod6 = 10080;
extern int myPeriod7 = 43200;


int init()
{

/* !!! block begin */
initGraph();
return( 0 );
}

int deinit()
{

/* !!! block begin */
return( 0 );
}

void Period2Text(int li0)
{
int li4;

/* !!! block begin */
li4 = li0;
if (li4 == 1) return;
if (li4 == 5) return;
if (li4 == 15) return;
if (li4 == 30) return;
if (li4 == 60) return;
if (li4 == 240) return;
if (li4 == 1440) return;
if (li4 == 10080) return;
if (li4 == 43200) return;
return( "ERR" );
}

double prOpen(string ls0, int li8, int liC)
{
double ld10;

/* !!! block begin */
ld10 = iOpen( ls0, li8, liC );
return;
}

double prHigh(string ls0, int li8, int liC)
{
double ld10;

/* !!! block begin */
ld10 = iHigh( ls0, li8, liC );
return;
}

double prMid(string ls0, int li8, int liC)
{

/* !!! block begin */
return( ((iHigh( ls0, li8, liC ) + iLow( ls0, li8, liC )) * 0.5) );
}

double prLow(string ls0, int li8, int liC)
{
double ld10;

/* !!! block begin */
ld10 = iLow( ls0, li8, liC );
return;
}

double prClose(string ls0, int li8, int liC)
{
double ld10;

/* !!! block begin */
ld10 = iClose( ls0, li8, liC );
return;
}

double prRange(string ls0, int li8, int liC)
{

/* !!! block begin */
return( (iHigh( ls0, li8, liC ) - iLow( ls0, li8, liC )) );
}

int start()
{
double ld0, ld8, ld20, ld28, ld30, ld38, ld50, ld58, ld60, ld68, ld80, ld88, ld90, ld98, ldB0, ldB8, ldC0, ldC8, ldE0, ldE8, ldF0, ldF8, ld110, ld118, ld120, ld128, ld140, ld148, ld150, ld158, ld160, ld168, ld170, ld178, ld180;

/* !!! block begin */
ld0 = prHigh( myPair, myPeriod1, 0 );
ld8 = prLow( myPair, myPeriod1, 0 );
ld20 = prMid( myPair, myPeriod1, 0 );
ld28 = prRange( myPair, myPeriod1, 0 );
ld30 = prHigh( myPair, myPeriod2, 0 );
ld38 = prLow( myPair, myPeriod2, 0 );
ld50 = prMid( myPair, myPeriod2, 0 );
ld58 = prRange( myPair, myPeriod2, 0 );
ld60 = prHigh( myPair, myPeriod3, 0 );
ld68 = prLow( myPair, myPeriod3, 0 );
ld80 = prMid( myPair, myPeriod3, 0 );
ld88 = prRange( myPair, myPeriod3, 0 );
ld90 = prHigh( myPair, myPeriod4, 0 );
ld98 = prLow( myPair, myPeriod4, 0 );
ldB0 = prMid( myPair, myPeriod4, 0 );
ldB8 = prRange( myPair, myPeriod4, 0 );
ldC0 = prHigh( myPair, myPeriod5, 0 );
ldC8 = prLow( myPair, myPeriod5, 0 );
ldE0 = prMid( myPair, myPeriod5, 0 );
ldE8 = prRange( myPair, myPeriod5, 0 );
ldF0 = prHigh( myPair, myPeriod6, 0 );
ldF8 = prLow( myPair, myPeriod6, 0 );
ld110 = prMid( myPair, myPeriod6, 0 );
ld118 = prRange( myPair, myPeriod7, 0 );
ld120 = prHigh( myPair, myPeriod7, 0 );
ld128 = prLow( myPair, myPeriod7, 0 );
ld140 = prMid( myPair, myPeriod7, 0 );
ld148 = prRange( myPair, myPeriod7, 0 );
objectBlank();
paintCol1( (prClose( myPair, myPeriod1, 0 ) - prOpen( myPair, myPeriod1, 0 )) );
paintCol2( (prClose( myPair, myPeriod2, 0 ) - prOpen( myPair, myPeriod2, 0 )) );
paintCol3( (prClose( myPair, myPeriod3, 0 ) - prOpen( myPair, myPeriod3, 0 )) );
paintCol4( (prClose( myPair, myPeriod4, 0 ) - prOpen( myPair, myPeriod4, 0 )) );
paintCol5( (prClose( myPair, myPeriod5, 0 ) - prOpen( myPair, myPeriod5, 0 )) );
paintCol6( (prClose( myPair, myPeriod6, 0 ) - prOpen( myPair, myPeriod6, 0 )) );
paintCol7( (prClose( myPair, myPeriod7, 0 ) - prOpen( myPair, myPeriod7, 0 )) );
paintLine();
return( 0 );
}

void initGraph()
{

/* !!! block begin */
deleteObject();
objectCreate( "Col1_5", 130, 11 );
objectCreate( "Col1", 132, 12, Period2Text( myPeriod1 ), 7, "Arial Narrow", 15453831 );
objectCreate( "Col1p", 134, 21, DoubleToStr( 9, 1 ), 8, "Arial Narrow", 12632256 );
objectCreate( "Col2_5", 110, 11 );
objectCreate( "Col2", 112, 12, Period2Text( myPeriod2 ), 7, "Arial Narrow", 15453831 );
objectCreate( "Col2p", 114, 21, DoubleToStr( 9, 1 ), 8, "Arial Narrow", 12632256 );
objectCreate( "Col3_5", 90, 11 );
objectCreate( "Col3", 92, 12, Period2Text( myPeriod3 ), 7, "Arial Narrow", 15453831 );
objectCreate( "Col3p", 94, 21, DoubleToStr( 9, 1 ), 8, "Arial Narrow", 12632256 );
objectCreate( "Col4_5", 70, 11 );
objectCreate( "Col4", 72, 12, Period2Text( myPeriod4 ), 7, "Arial Narrow", 15453831 );
objectCreate( "Col4p", 74, 21, DoubleToStr( 9, 1 ), 8, "Arial Narrow", 12632256 );
objectCreate( "Col5_5", 50, 11 );
objectCreate( "Col5", 52, 12, Period2Text( myPeriod5 ), 7, "Arial Narrow", 15453831 );
objectCreate( "Col5p", 54, 21, DoubleToStr( 9, 1 ), 8, "Arial Narrow", 12632256 );
objectCreate( "Col6_5", 30, 11 );
objectCreate( "Col6", 32, 12, Period2Text( myPeriod6 ), 7, "Arial Narrow", 15453831 );
objectCreate( "Col6p", 34, 21, DoubleToStr( 9, 1 ), 8, "Arial Narrow", 12632256 );
objectCreate( "Col7_5", 10, 11 );
objectCreate( "Col7", 13, 12, Period2Text( myPeriod7 ), 7, "Arial Narrow", 15453831 );
objectCreate( "Col7p", 14, 21, DoubleToStr( 9, 1 ), 8, "Arial Narrow", 12632256 );
objectCreate( "line97", 10, 69, "-----------------------------------", 10, "Arial", 6908265 );
objectCreate( "sign", 11, 1, "»»»Candle Color Multi  © «««", 8, "Arial Narrow", 6908265 );
return;
}

void objectCreate(string ls0, int li8, int liC, string ls10="-", int li18=2A, string ls1C="Arial", int li24=FFFFFFFF)
{

/* !!! block begin */
ObjectCreate( ls0, OBJ_LABEL, 0, 0, 0 );
ObjectSet( ls0, 101, 3 );
ObjectSet( ls0, 6, li24 );
ObjectSet( ls0, 102, li8 );
ObjectSet( ls0, 103, liC );
ObjectSetText( ls0, ls10, li18, ls1C, li24 );
return;
}

void deleteObject()
{

/* !!! block begin */
ObjectDelete( "Col1_5" );
ObjectDelete( "Col1" );
ObjectDelete( "Col1p" );
ObjectDelete( "Col2_5" );
ObjectDelete( "Col2" );
ObjectDelete( "Col2p" );
ObjectDelete( "Col3_5" );
ObjectDelete( "Col3" );
ObjectDelete( "Col3p" );
ObjectDelete( "Col4_5" );
ObjectDelete( "Col4" );
ObjectDelete( "Col4p" );
ObjectDelete( "Col5_5" );
ObjectDelete( "Col5" );
ObjectDelete( "Col5p" );
ObjectDelete( "Col6_5" );
ObjectDelete( "Col6" );
ObjectDelete( "Col6p" );
ObjectDelete( "Col7_5" );
ObjectDelete( "Col7" );
ObjectDelete( "Col7p" );
return;
}

void objectBlank()
{

/* !!! block begin */
ObjectSet( "Col1_5", 6, -1 );
ObjectSet( "Col1", 6, -1 );
ObjectSet( "Col1p", 6, -1 );
ObjectSet( "Col2_5", 6, -1 );
ObjectSet( "Col2", 6, -1 );
ObjectSet( "Col2p", 6, -1 );
ObjectSet( "Col3_5", 6, -1 );
ObjectSet( "Col3", 6, -1 );
ObjectSet( "Col3p", 6, -1 );
ObjectSet( "Col4_5", 6, -1 );
ObjectSet( "Col4", 6, -1 );
ObjectSet( "Col4p", 6, -1 );
ObjectSet( "Col5_5", 6, -1 );
ObjectSet( "Col5", 6, -1 );
ObjectSet( "Col5p", 6, -1 );
ObjectSet( "Col6_5", 6, -1 );
ObjectSet( "Col6", 6, -1 );
ObjectSet( "Col6p", 6, -1 );
ObjectSet( "Col7_5", 6, -1 );
ObjectSet( "Col7", 6, -1 );
ObjectSet( "Col7p", 6, -1 );
ObjectSet( "line98", 6, -1 );
ObjectSet( "line97", 6, -1 );
return;
}

void paintCol1(double ld0)
{
string ls10;

/* !!! block begin */
if (ld0 < 0.0) ObjectSet( "Col1_5", 6, 255 );
if (ld0 == 0.0) ObjectSet( "Col1_5", 6, 65535 );
if (ld0 > 0.0) ObjectSet( "Col1_5", 6, 65280 );
ObjectSet( "Col1", 6, 15453831 );
ObjectSetText( "Col1p", DoubleToStr( ld0, 1 ), 8, "Arial Narrow", 12632256 );
GlobalVariableSet( "Col1", ld0 );
return;
}

void paintCol2(double ld0)
{
string ls10;

/* !!! block begin */
if (ld0 < 0.0) ObjectSet( "Col2_5", 6, 255 );
if (ld0 == 0.0) ObjectSet( "Col2_5", 6, 65535 );
if (ld0 > 0.0) ObjectSet( "Col2_5", 6, 65280 );
ObjectSet( "Col2", 6, 15453831 );
ObjectSetText( "Col2p", DoubleToStr( ld0, 1 ), 8, "Arial Narrow", 12632256 );
GlobalVariableSet( "Col2", ld0 );
return;
}

void paintCol3(double ld0)
{
string ls10;

/* !!! block begin */
if (ld0 < 0.0) ObjectSet( "Col3_5", 6, 255 );
if (ld0 == 0.0) ObjectSet( "Col3_5", 6, 65535 );
if (ld0 > 0.0) ObjectSet( "Col3_5", 6, 65280 );
ObjectSet( "Col3", 6, 15453831 );
ObjectSetText( "Col3p", DoubleToStr( ld0, 1 ), 8, "Arial Narrow", 12632256 );
GlobalVariableSet( "Col3", ld0 );
return;
}

void paintCol4(double ld0)
{
string ls10;

/* !!! block begin */
if (ld0 < 0.0) ObjectSet( "Col4_5", 6, 255 );
if (ld0 == 0.0) ObjectSet( "Col4_5", 6, 65535 );
if (ld0 > 0.0) ObjectSet( "Col4_5", 6, 65280 );
ObjectSet( "Col4", 6, 15453831 );
ObjectSetText( "Col4p", DoubleToStr( ld0, 1 ), 8, "Arial Narrow", 12632256 );
GlobalVariableSet( "Col4", ld0 );
return;
}

void paintCol5(double ld0)
{
string ls10;

/* !!! block begin */
if (ld0 < 0.0) ObjectSet( "Col5_5", 6, 255 );
if (ld0 == 0.0) ObjectSet( "Col5_5", 6, 65535 );
if (ld0 > 0.0) ObjectSet( "Col5_5", 6, 65280 );
ObjectSet( "Col5", 6, 15453831 );
ObjectSetText( "Col5p", DoubleToStr( ld0, 1 ), 8, "Arial Narrow", 12632256 );
GlobalVariableSet( "Col5", ld0 );
return;
}

void paintCol6(double ld0)
{
string ls10;

/* !!! block begin */
if (ld0 < 0.0) ObjectSet( "Col6_5", 6, 255 );
if (ld0 == 0.0) ObjectSet( "Col6_5", 6, 65535 );
if (ld0 > 0.0) ObjectSet( "Col6_5", 6, 65280 );
ObjectSet( "Col6", 6, 15453831 );
ObjectSetText( "Col6p", DoubleToStr( ld0, 1 ), 8, "Arial Narrow", 12632256 );
GlobalVariableSet( "Col6", ld0 );
return;
}

void paintCol7(double ld0)
{
string ls10;

/* !!! block begin */
if (ld0 < 0.0) ObjectSet( "Col7_5", 6, 255 );
if (ld0 == 0.0) ObjectSet( "Col7_5", 6, 65535 );
if (ld0 > 0.0) ObjectSet( "Col7_5", 6, 65280 );
ObjectSet( "Col7", 6, 15453831 );
ObjectSetText( "Col7p", DoubleToStr( ld0, 1 ), 8, "Arial Narrow", 12632256 );
GlobalVariableSet( "Col7", ld0 );
return;
}

void paintLine()
{

/* !!! block begin */
ObjectSet( "line98", 6, 6908265 );
ObjectSet( "line97", 6, 6908265 );
return;
}[/color]

candu · August 15, 2008

Re: Mohon Bantuan Coding

wah cepet bener, bro SEFC emang :arrow: ,

aduh jadi malu saya udah dibantu tapi saya save di meta editor kok gak muncul ya

maaf bos , saya nyubi nih, buta soal coding, mau nanya itu berderet2 coding diapain ya biar muncul?

:hammer:

SEFC · August 15, 2008

Re: Mohon Bantuan Coding

wah cepet bener, bro SEFC emang :arrow: ,
aduh jadi malu saya udah dibantu tapi saya save di meta editor kok gak muncul ya
maaf bos , saya nyubi nih, buta soal coding, mau nanya itu berderet2 coding diapain ya biar muncul?
:hammer:

Bro.. waktu saya download mungkin filenya ada kurang sempurna.. nah letak kesalahannya ada pada baris

void objectCreate(string ls0, int li8, int liC, string ls10="-", int li18=2A, string ls1C="Arial", int li24=FFFFFFFF)

int li18=2A -> ganti jadi int li18=24

FFFFFFFF -> ganti jadi warna biru dalam bhs hex-nya

abis itu compile ulang dan lihat dimana lagi ada errornya..

sehingga kalau di compile masih ada status error.. maka untuk konsul mungkin boleh minta bantuan bro William kalau nggak sibuk aja nih.. :D .. soalnya saya beberapa minggu ini sibuk sekali sih.. tadi aja pas ada waktu, iseng2 ke forum ini.. jadi saya penasaran aja kayak gimana program TRO itu jadi saya decode program itu... :mrgreen:

Oh ya Bro Will .. ntar saya kirim via email dari kantor saya aja ya..soalnya kalau dari rumah uploadnya lama banget... :mrgreen:

Thanks..

candu · August 16, 2008

Re: Mohon Bantuan Coding

oke bos, gpp yg ini bisa nyusul belakangan, sy perlu belajar banyak nih

maap ya ngerepotin :mrgreen:

William1713006271 · August 16, 2008

Re: Mohon Bantuan Coding

Neh aku uda coba benerin dari hasil decode bro SEFC.

Hasilnya bener ga? Codingnya seh ribet banget, yah hasil decode gitu seh. Tau deh bener ato ga algoritmanya.

Di test yah.

Regards,

William1713006271 · August 16, 2008

Re: Mohon Bantuan Coding

Setelah diperhatikan dengan seksama ternyata rumusnya simple banget yah?

Cuman menentukan apakah candle dalam tiap timeframe itu bullish / bearish dalam arti candle naik / turun.

- Kl candle naik kasih warna hijau,

- kl candle turun kasih warna merah,

- kl candle doji kasih warna kuning,

Bener ga kira2?

Karena itu g buat aja dari nol, lebih gampang diliat codingnya. Yg hasil decode itu lumayan kacau, banyak redundant memory, dll. Tp berguna sekali untuk tau rumus dasar dia seh.

Ada 1 external input. Tergantung pake screen putih atau hitam. Kl pake screen black tulisan jadi putih, kl pake screen putih tulisan jadi hitam.

Regards,

candu · August 17, 2008

Re: Mohon Bantuan Coding

oh ternyata untuk ngeliat warna candle toh

tadinya dikirain kalo 1,5,15,30,60...dst itu untuk menghitung 1,5,15,30,60... candle ke belakang(trend)

thanks berat bro, jadi paham make indikator-nya

btw, kalo yg ngerti sih gampang kali, tapi kalo gak ngerti kayak gw boro2 ngerti, baru ngeliat aja udah pusing :D

William1713006271 · August 17, 2008

Re: Mohon Bantuan Coding

Iy, tadinya juga aku pikir ada sesuatu yg spesial. Taunya sesuai namanya "Candle Color Multi TimeFrame" :D

Regards,

candu · August 17, 2008

Re: Mohon Bantuan Coding

Iy, tadinya juga aku pikir ada sesuatu yg spesial. Taunya sesuai namanya "Candle Color Multi TimeFrame" :D

Regards,

1 pertanyaan lagi bro, angka yang diatas itu : 2,4,4,4,-... itu artinya apaan ya ?

William1713006271 · August 17, 2008

Re: Mohon Bantuan Coding

Angka2 itu adalah beda harga closing(running) dan open dari candle terakhir di timeframe itu. Jadi C-O.

Kalau ada minus artinya close dibawah harga open (candle bearish), kalau ga ada minus artinya harga close diatas harga open (candle bullish).

Kalau Nol, artinya doji.

regards,

candu · August 17, 2008

Re: Mohon Bantuan Coding

Angka2 itu adalah beda harga closing(running) dan open dari candle terakhir di timeframe itu. Jadi C-O.

Kalau ada minus artinya close dibawah harga open (candle bearish), kalau ga ada minus artinya harga close diatas harga open (candle bullish).

Kalau Nol, artinya doji.

regards,

:arrow:

SEFC · August 18, 2008

Re: TRO Candle Color - Multi TF

Bro Will,

Coba bro cek deh emailnya ya... Thanks.. :arrow:

Sign In

TRO Candle Color - Multi TF

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Join the conversation

Announcements

Latest Updated Topics

About us

Indo-Investasi Community

Important Pages