Jump to content

EA 1,979 US DOLAR


Recommended Posts

Re: EA 1,979 US DOLAR

 

// GetMySources: ex4-to-mq4 ver 1.0.26 on 14.06.2008 licensed to Lim Jun You <[email protected]>

 

#property copyright "Copyright © 2008, Megatron-EA"

#property link "http://pipscollector.com"

#property library

 

 

extern int MaxTrades = 5;

int gi50 = 25;

extern int MagicNumber = 1234567890;

double gd58 = 100.0;

double gd60 = 15.0;

extern double InitialStop = 0.0;

extern string Note1 = "Use InitialStop for StopLoss";

extern bool MM = false;

extern string Note2 = "Use MM for Broker with MoneyManagement";

extern string nameEA = "Megatron-EA";

int gi8C = 50;

int gi90 = 1;

int gi94 = 5;

int gi98 = 0;

double gd9C;

int giA4;

int giA8;

double gdAC;

int giB4 = 1;

double gdB8;

double gdC0;

double gdC8;

double gdD0;

double gdD8;

int giE0;

int giE4;

int giE8;

double gdEC;

int giF4;

double gdF8;

int gi100;

int gi104;

double gd108;

double gd110;

double gd118;

string gs120;

string gs128;

double gd138 = 0.0;

double gd140 = 12.0;

double gd148 = 0.0;

int gi150 = 8;

int gi154 = 17;

int gi158 = 9;

bool gb15C = true;

 

 

int init()

{

 

/* !!! block begin */

return( 0 );

}

 

int deinit()

{

 

/* !!! block begin */

return( 0 );

}

 

int start()

{

int liC, liB0, liE0;

double ld10, ld18, ld20, ld28, ld30, ld38, ld40, ld48, ld50, ld58, ld60, ld68, ld70, ld78, ld80, ld88, ld90, ld98, ldA0, ldA8, ldB8, ldD8;

string ls0, lsC0, lsC8, lsD0, lsF0, lsF8, ls100;

 

/* !!! block begin */

ls0 = "2009.08.31 00:00";

 

 

if (MM == 1)

{

if (AccountFreeMargin() > 10000.0) gd9C = ((AccountFreeMargin() * (1 - (gd140 / 100.0))) / 100000.0);

}

 

gdD8 = gd9C;

if (gdD8 > 100.0) gdD8 = 100;

if (gdD8 < 0.01) gdD8 = 0.1;

giA4 = 0;

giA8 = 0;

while (giA8 < OrdersTotal()) {

OrderSelect( giA8, 0, 0 );

if (((OrderSymbol() == Symbol()) && (OrderMagicNumber() == MagicNumber)) == 1) giA4 = giA4+1;

giA8 = giA8+1;

}

 

liC = IndicatorCounted();

ld10 = iMACD( 0, 1, gi150, gi154, gi158, 0, 0, 0 );

ld18 = iMACD( 0, 1, gi150, gi154, gi158, 0, 1, 0 );

ld20 = iMACD( 0, 5, gi150, gi154, gi158, 0, 0, 0 );

ld28 = iMACD( 0, 5, gi150, gi154, gi158, 0, 1, 0 );

ld30 = iMACD( 0, 15, gi150, gi154, gi158, 0, 0, 0 );

ld38 = iMACD( 0, 15, gi150, gi154, gi158, 0, 1, 0 );

ld40 = iMACD( 0, 30, gi150, gi154, gi158, 0, 0, 0 );

ld48 = iMACD( 0, 30, gi150, gi154, gi158, 0, 1, 0 );

ld50 = iMACD( 0, 60, gi150, gi154, gi158, 0, 0, 0 );

ld58 = iMACD( 0, 60, gi150, gi154, gi158, 0, 1, 0 );

ld60 = iMACD( 0, 240, gi150, gi154, gi158, 0, 0, 0 );

ld68 = iMACD( 0, 240, gi150, gi154, gi158, 0, 1, 0 );

if (gb15C == 1)

{

ld70 = iMACD( 0, 1440, gi150, gi154, gi158, 0, 0, 0 );

ld78 = iMACD( 0, 1440, gi150, gi154, gi158, 0, 1, 0 );

ld80 = iMACD( 0, 10080, gi150, gi154, gi158, 0, 0, 0 );

ld88 = iMACD( 0, 10080, gi150, gi154, gi158, 0, 1, 0 );

ld90 = iMACD( 0, 43200, gi150, gi154, gi158, 0, 0, 0 );

ld98 = iMACD( 0, 43200, gi150, gi154, gi158, 0, 1, 0 );

}

 

gd118 = MarketInfo( Symbol(), MODE_TICKVALUE );

if (gd118 == 0.0){}

if (giF4 > giA4)

{

giA8 = OrdersTotal();

while (giA8 >= 0) {

OrderSelect( giA8, 0, 0 );

giE0 = OrderType();

if (((OrderSymbol() == Symbol()) && (OrderMagicNumber() == MagicNumber)) == 1)

{

if (giE0 == 0) OrderClose( OrderTicket(), OrderLots(), OrderClosePrice(), giB4, 16711680 );

if (giE0 != 1) return;

OrderClose( OrderTicket(), OrderLots(), OrderClosePrice(), giB4, 255 );

return( 0 );

}

 

giA8 = giA8-1;

}

 

}

 

giF4 = giA4;

if (giA4 >= MaxTrades) {

giE8 = 0;

}

else {

giE8 = 1;

}

 

if (gdEC == 0.0)

{

giA8 = 0;

while (giA8 < OrdersTotal()) {

OrderSelect( giA8, 0, 0 );

giE0 = OrderType();

if (((OrderSymbol() == Symbol()) && (OrderMagicNumber() == MagicNumber)) == 1)

{

gdEC = OrderOpenPrice();

if (giE0 == 0) giE4 = 2;

if (giE0 == 1) giE4 = 1;

if (((giA4 == 3) && (giE0 == 0)) == 1) giE4 = 1;

if (((giA4 == 3) && (giE0 == 1)) == 1) giE4 = 2;

}

 

giA8 = giA8+1;

}

 

}

 

if (giA4 < 1)

{

Comment( "OPEN TRADE ", " ", "SERVER TIME", ": ", Hour(), ":", Minute(), " ", "BALANCE", " :", AccountCurrency(), " ", AccountBalance(), " ", "FLOATING P/L", " :", AccountCurrency(), " ", AccountProfit(), " ", "PAIR", ":", Symbol(), " ", "P/L Percent", " : ", ((AccountProfit() / AccountBalance()) * 100.0), "%", "\n", "\n", "\n", "\n", "\n", "\n USE MEGATRON-EA FOR YOUR TRADING FOREX", "\n web site : http://pipscollector.com", "\n email : [email protected]", "\n Trading is Art of Strategy, Consistency controlling Psichology, and a Hope to be come true.", "\n So Let machine work, and the Human task is taking Profit and help to another human for better life", "\n", "\n BE SUCCESS AND ALWAYS PROFITABLE FOR YOUR TRADING FOREX", "\n Copyright 2008 Megatron-EA", "\n", "\n REGISTRASI ACCOUNT : ", AccountName(), " ", AccountNumber(), " ", "EXPIRED", " : ", ls0, "\n BROKER :", " ", AccountCompany(), " ", "SERVER :", " ", AccountServer() );

giE4 = 3;

if (((ld20 > ld28) && (ld10 > ld18)) == 1) giE4 = 3;

if (((ld20 < ld28) && (ld10 < ld18)) == 1) giE4 = 3;

if (((ld20 < ld28) && (ld10 > ld18)) == 1) giE4 = 3;

if (((ld20 > ld28) && (ld10 < ld18)) == 1) giE4 = 3;

if (((((ld30 < ld38) && (ld40 > ld48)) && (ld50 > ld58)) && (ld60 < ld68)) == 1) giE4 = 3;

if (((((ld30 > ld38) && (ld40 < ld48)) && (ld50 < ld58)) && (ld60 > ld68)) == 1) giE4 = 3;

if (((((ld30 < ld38) && (ld40 > ld48)) && (ld50 < ld58)) && (ld60 < ld68)) == 1) giE4 = 3;

if (((((ld30 > ld38) && (ld40 < ld48)) && (ld50 > ld58)) && (ld60 > ld68)) == 1) giE4 = 3;

if ((((((ld20 > ld28) && (ld30 > ld38)) && (ld40 > ld48)) && (ld50 < ld58)) && (ld60 > ld68)) == 1) giE4 = 3;

if ((((((ld20 < ld28) && (ld30 < ld38)) && (ld40 < ld48)) && (ld50 > ld58)) && (ld60 < ld68)) == 1) giE4 = 3;

if ((((ld30 < ld38) && (ld40 > ld48)) && (ld50 > ld58)) == 1) giE4 = 3;

if ((((ld30 > ld38) && (ld40 < ld48)) && (ld50 < ld58)) == 1) giE4 = 3;

if ((((ld30 < ld38) && (ld40 < ld48)) && (ld50 > ld58)) == 1) giE4 = 3;

if ((((ld30 > ld38) && (ld40 > ld48)) && (ld50 < ld58)) == 1) giE4 = 3;

if ((((ld30 < ld38) && (ld40 > ld48)) && (ld50 < ld58)) == 1) giE4 = 3;

if ((((ld30 > ld38) && (ld40 < ld48)) && (ld50 > ld58)) == 1) giE4 = 3;

if (((((ld20 < ld28) && (ld30 < ld38)) && (ld50 > ld58)) && (ld60 > ld68)) == 1) giE4 = 3;

if (((((ld20 > ld28) && (ld30 > ld38)) && (ld50 < ld58)) && (ld60 < ld68)) == 1) giE4 = 3;

if (((((ld30 > ld38) && (ld50 > ld58)) && (ld40 > ld48)) && (ld60 < ld68)) == 1) giE4 = 3;

if (((((ld30 < ld38) && (ld50 < ld58)) && (ld40 < ld48)) && (ld60 > ld68)) == 1) giE4 = 3;

if (((((ld30 > ld38) && (ld50 > ld58)) && (ld40 > ld48)) && (ld60 > ld68)) == 1) giE4 = 2;

if (((((ld30 < ld38) && (ld50 < ld58)) && (ld40 < ld48)) && (ld60 < ld68)) == 1) giE4 = 1;

if (((((ld30 > ld38) && (ld50 > ld58)) && (ld40 > ld48)) && (ld60 > ld68)) == 1) giE4 = 2;

if (((((ld30 < ld38) && (ld50 < ld58)) && (ld40 < ld48)) && (ld60 < ld68)) == 1) giE4 = 1;

if (((((ld30 > ld38) && (ld50 > ld58)) && (ld40 > ld48)) && (ld60 < ld68)) == 1) giE4 = 3;

if (((((ld30 < ld38) && (ld50 < ld58)) && (ld40 < ld48)) && (ld60 > ld68)) == 1) giE4 = 3;

if (giE4 == 3) Comment( "NO OPEN TRADE SIDEWAY" );

if (gi98 == 1)

{

if (giE4 == 1) {

giE4 = 2;

}

else {

if (giE4 == 2) giE4 = 1;

}

 

}

 

}

 

if (giA4 < 1)

{

if (((DayOfWeek() == 5) && (Hour() >= 13)) == 1)

{

Comment( "CLOSE TRADE ON FRIDAY", " ", "PAIR", ":", Symbol(), " ", "Floating :", AccountCurrency(), " ", AccountProfit(), " ", "Balance", " :", AccountCurrency(), " ", AccountBalance(), " ", "Server Time", " : ", Hour(), ":", Minute(), " ", "P/L Percent", " : ", ((AccountProfit() / AccountBalance()) * 100.0), "%", "\n", "\n RUNNING AGAIN AT MONDAY" );

giE4 = 3;

if (((ld20 < ld28) && (ld10 > ld18)) == 1) giE4 = 3;

if (((ld20 > ld28) && (ld10 < ld18)) == 1) giE4 = 3;

if (((((ld30 < ld38) && (ld40 > ld48)) && (ld50 > ld58)) && (ld60 < ld68)) == 1) giE4 = 3;

if (((((ld30 > ld38) && (ld40 < ld48)) && (ld50 < ld58)) && (ld60 > ld68)) == 1) giE4 = 3;

if (((((ld20 < ld28) && (ld30 < ld38)) && (ld50 > ld58)) && (ld60 > ld68)) == 1) giE4 = 3;

if (((((ld20 > ld28) && (ld30 > ld38)) && (ld50 < ld58)) && (ld60 < ld68)) == 1) giE4 = 3;

if (gi98 == 1)

{

if (giE4 == 1) {

giE4 = 2;

}

else {

if (giE4 == 2) giE4 = 1;

}

 

}

 

}

 

}

 

giA8 = OrdersTotal();

while (giA8 >= 0) {

OrderSelect( giA8, 0, 0 );

if (((OrderSymbol() == Symbol()) && (OrderMagicNumber() == MagicNumber)) == 1)

{

if (OrderType() == 1)

{

if (gd60 > 0.0)

{

if ((OrderOpenPrice() - Ask) >= ((gd60 + gi50) * Point))

{

if (OrderStopLoss() > (Ask + (Point * gd60)))

{

OrderModify( OrderTicket(), OrderOpenPrice(), (Ask + (Point * gd60)), ((OrderClosePrice() - (gd58 * Point)) - (gd60 * Point)), 800, 8388736 );

return( 0 );

}

 

}

 

}

 

}

 

if (OrderType() == 0)

{

if (gd60 > 0.0)

{

if ((Bid - OrderOpenPrice()) >= ((gd60 + gi50) * Point))

{

if (OrderStopLoss() < (Bid - (Point * gd60)))

{

OrderModify( OrderTicket(), OrderOpenPrice(), (Bid - (Point * gd60)), ((OrderClosePrice() + (gd58 * Point)) + (gd60 * Point)), 800, 65535 );

return( 0 );

}

 

}

 

}

 

}

 

}

 

giA8 = giA8-1;

}

 

gdF8 = 0;

gi100 = 0;

gi104 = 0;

gd108 = 0;

gd110 = 0;

giA8 = 0;

while (giA8 < OrdersTotal()) {

OrderSelect( giA8, 0, 0 );

if (((OrderSymbol() == Symbol()) && (OrderMagicNumber() == MagicNumber)) == 1)

{

gi100 = OrderTicket();

if (OrderType() == 0) gi104 = 0;

if (OrderType() == 1) gi104 = 1;

gd108 = OrderClosePrice();

gd110 = OrderLots();

if (gi104 == 0)

{

if (OrderClosePrice() < OrderOpenPrice()) gdF8 = (gdF8 - (((OrderOpenPrice() - OrderClosePrice()) * OrderLots()) / Point));

if (OrderClosePrice() > OrderOpenPrice()) gdF8 = (gdF8 + (((OrderClosePrice() - OrderOpenPrice()) * OrderLots()) / Point));

}

 

if (gi104 == 1)

{

if (OrderClosePrice() > OrderOpenPrice()) gdF8 = (gdF8 - (((OrderClosePrice() - OrderOpenPrice()) * OrderLots()) / Point));

if (OrderClosePrice() < OrderOpenPrice()) gdF8 = (gdF8 + (((OrderOpenPrice() - OrderClosePrice()) * OrderLots()) / Point));

}

 

}

 

giA8 = giA8+1;

}

 

gdF8 = (gdF8 * 5);

gs128 = (("Profit: $" + DoubleToStr( gdF8, 2 )) + " +/-");

if (((giA4 >= (MaxTrades - gi94)) && (gi90 == 1)) == 1)

{

if (gdF8 >= gi8C)

{

OrderClose( gi100, gd110, gd108, giB4, 65535 );

giE8 = 0;

return( 0 );

}

 

}

 

if (AccountProfit() >= 50.0)

{

OrderClose( gi100, gd110, gd108, giB4, 65535 );

giE8 = 0;

return( 0 );

}

 

if (((MM == 1) && (AccountProfit() >= 50.0)) == 1)

{

OrderClose( gi100, gd110, gd108, giB4, 65535 );

giE8 = 0;

return( 0 );

}

 

if (IsTesting()!=0 == 1)

{

if (giE4 == 3) gs120 = " ";

}

 

if (((giE4 == 1) && giE8) == 1)

{

if ((((Bid - gdEC) >= (gi50 * Point)) || (giA4 < 1)) == 1)

{

gdD0 = Bid;

gdEC = 0;

if (gd58 == 0.0) {

 

}

else {

gdC0 = (gdD0 - (gd58 * Point));

}

 

if (InitialStop == 0.0) {

 

}

else {

gdB8 = (gdD0 + (InitialStop * Point));

}

 

if (giA4 != 0) {

gdAC = gdD8;

giA8 = 1;

while (giA8 <= giA4) {

if (MaxTrades > 12) {

gdAC = NormalizeDouble( (gdAC * 1.5), 2 );

}

else {

gdAC = NormalizeDouble( (gdAC * 2.0), 2 );

}

 

if (giA4 == 3)

{

gdAC = gdD8;

giA8 = 1;

while (giA8 <= giA4) {

gdAC = (gd9C * 4.0);

gdC0 = (gdD0 - ((gd58 * 3.0) * Point));

giA8 = giA8+1;

}

 

}

 

giA8 = giA8+1;

}

 

}

else {

gdAC = gdD8;

}

 

if (gdAC > 100.0){}

OrderSend( Symbol(), OP_SELL, 100, gdD0, giB4, 0, 0, 0, MagicNumber, 0, 255 );

return( 0 );

}

 

}

 

if (((giE4 == 2) && giE8) != 1) return;

if ((((gdEC - Ask) >= (gi50 * Point)) || (giA4 < 1)) != 1) return;

gdC8 = Ask;

gdEC = 0;

if (gd58 == 0.0) {

 

}

else {

gdC0 = (gdC8 + (gd58 * Point));

}

 

if (InitialStop == 0.0) {

 

}

else {

gdB8 = (gdC8 - (InitialStop * Point));

}

 

if (giA4 != 0) {

gdAC = gdD8;

giA8 = 1;

while (giA8 <= giA4) {

if (MaxTrades > 12) {

gdAC = NormalizeDouble( (gdAC * 1.5), 2 );

}

else {

gdAC = NormalizeDouble( (gdAC * 2.0), 2 );

}

 

if (giA4 == 3)

{

gdAC = gdD8;

giA8 = 1;

while (giA8 <= giA4) {

gdAC = (gd9C * 4.0);

gdC0 = (gdC8 + ((gd58 * 3.0) * Point));

giA8 = giA8+1;

}

 

}

 

giA8 = giA8+1;

}

 

}

else {

gdAC = gdD8;

}

 

if (gdAC > 100.0){}

OrderSend( Symbol(), OP_BUY, 100, gdC8, giB4, 0, 0, 0, MagicNumber, 0, 16711680 );

return( 0 );

}

Link to comment
Share on other sites

  • 4 weeks later...
  • 2 years later...
dibaca dulu:

[center:fegx09an]KISAH SI CEMPLON DAN MEGATRON[/center:fegx09an]

 

Alkisah seorang trader dari daerah barat yang baru rugi(mbaca nya enaknya ada sound nya lagu sumatra), inilah kisah si **CEM'sinyal'BACEMMI eh salah BALSEMI (b.Ing Scalping) alias FJ ( wah ini orangnya berarti lebih gede dari pada BJ, HJ anaknya peling akhir KJ... haduh duso tok)untuk tidak menyinggu lebih dalam marilah kita sebut "CEMPLON". berhubung si cem .. mengalami kegagalan pada ea terakhirnya maka ia mengutak atik cara supaya maksudnya tercapai. oleh karena itu si cem naik bis trans sumatra lalu trans jakarta guna nongkrong di warnet sebelahnya trans tipi. setelah itu dia menemukan demo EA dari suatu situs ...

http://pipscollector.com

lalu merequest demo untuk di coba. berhubung author yang asli cuma mendemokan megatron (yang jahat) maka di bawalah ea tersebut kembali ke daerahnya. Si cem berpikir "kalo saya sendiri yang coba kan gak enak banget..." lalu si cem men share ea yang bakal menjadi ganti papan iklan tersebut ke suatu forum dari broker luar negeri kalo gak salah... www.forum.fx'bukaan.com (ganti " ' "ke b.ing)-subforum indonesia- sub forum EA-thread "ea hedging"... sengaja dia ber etok etok ... menjadi baik dengan membagikan tester kepada beberapa rekan. para tester dan sebenernya dia sendiri ( lha yang ngetes gak lebih dari 10 orang + demonya cuman berjalan gak sampe sebulan) menyimpulkan bahwa ea ini layak pake. Lalu berpikirlah si cem. untuk mengkomersilkan ea ini. setelah websitenya GPP (gak payu payu) maka dikumpulkan lah tenaga, resource, untuk membuat situs baru. Dengan bondo 10$ dia menkonpert megadon eh ... ea megatron menjadi mq4. akhirnya diresmikanlah situs baru tersebut ( walaupun sebenernya gak resmi dan gratisan ... apalagi design nya pake walpaper ....kalo diomongin baiknya situs nya "murahan" ) inilah situs nya : (lagu sumatra nya stop lalu ganti opening nya film bioskop jreng jreng ...)

http://megatronsystem.synthasite.com/

(lagu bioskop nya di stop ganti lagunya "im to sexy")

Dengan segala upaya si cem mengenalkan website nya kepada khalayak rame ... mulai dengan pasang iklan di koran bekas, di website bekas sampe sampe nunut posting thread dengan adik kelasnya yaitu solar-3 eh sonar ... ya. di forum media terkenal di indonesia dengan klaim "new amazing system in finansial krisis"bagai sales asuransi

hxxp://forum.kom****pas.com/saham-valas/8401-forex-robot-trading-sonar-3-profitable-3.html

sebagian dari situs tersebut menyatakan ...

 

 

Itulah kisah si cempe... eh cemplon yang mirip dengan vokalis gending mocopat pasar Bringharjo yang tampil hari Jum'at kliwon

dengan motifasi mendapat transfer dari kustomernya dan men transform dirinya untuk menjadi lebih baik, kan dia sudah naek trans sumatra, trans jakarta, setelah itu nongkrong di warnet sebelahnya trans tipi dan mengambil ea trans former.

Kepada mas cemplon kalo ke trans tipi mbok ya masuk tipi sekalian.... o iya gak cukup ya... sama anu kepada mas cemplon ... kelihatanya yang belom dilakukan adalah ..."transgender"

 

Kisah diatas, hanyalah piktip belaka... yang nyata sengaja di sensor (seperti utang utang yang ditunggak, perkelahian dengan klien yang lama, apalagi tunggakan dari nyonya cemplon... dst)

 

inilah ea nya ....

http://www.4shared.com/file/72010502/19051032/megatron.html

saya kasih PLUS... walpaper

Pesan Moralnya : JANGAN LAKUKAN YANG CEMPE..eh CEMPLON LAKUKAN .... CEMPLON BUKAN CONTO YANG BAEK

 

Akhirul kalam; Semoga saya diberi rejeki yang halal dan tidak di anggap ngerasani.

Untuk si Cemplon semoga amal ibadahnya di terima dan dosa dosa nya di maafkan ...lho ... anu semoga ditunjukkan jalan yang lurus.

Kepada pembaca budiman(yang masih ketawa tiwi ... jujur aja aku yang nulis, nulis "hahaha..." hampir 7 lembar hvs... tak hapus semua; guna menyingkat waktu), harap selangkanlah waktu untuk menanggapi atau pun mendoakan si cemplon supaya kembali ke jalan yang lurus.

 

Terima kasih.

 

Hi Karde sharpeye ;

Need this megatron pls upload

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...