Скачать MetaTrader 5

Вопросы от Скриптера.

Авторизуйтесь или зарегистрируйтесь, чтобы добавить комментарий
Ваш брокер не поддерживает мобильные MetaTrader 5? Попроси приобрести их!
Scripter
152
Scripter 2010.11.10 15:59 

Господа! помогите написать нормальный советник, ато опыта программирования мало сам написал как мог, код работает но не всегда корректно.

bool OrdTiketOne, OrdTiketTwo, OrdTiketThree, OrdTiketFour, OrdTiketFive, OrdTiketSix, OrdTiketSeven, OrdTiketEight,
OrdTiketNine, OrdTiketTen, OrdTiketEleven, OrdTiketTwelve, OrdTiketThirteen, OrdTiketForteen,
OrdTiketOneSell, OrdTiketTwoSell, OrdTiketThreeSell, OrdTiketFourSell, OrdTiketFiveSell, OrdTiketSixSell, OrdTiketSevenSell,
OrdTiketEightSell, OrdTiketNineSell, OrdTiketTenSell, OrdTiketElevenSell, OrdTiketTwelveSell, OrdTiketThirteenSell,
OrdTiketForteenSell;
int Magic=111, MagicSell=222, Ord, Del, OrdSell, DelSell, Down;
int init() { return(0); }
int deinit() { return(0); }
int start() {

if (Ord==0) {
OrderSelect(OrdTiketOne, SELECT_BY_TICKET);
if (OrderCloseTime()!=0 || OrderOpenTime()==0) {
OrdTiketOne=OrderSend(Symbol(),OP_BUY,0.01,Ask,5,0,0,"Odin",11101,0,CLR_NONE);
OrderSelect(OrdTiketOne,SELECT_BY_TICKET);
bool ModifyOne=OrderModify(OrdTiketOne,OrderOpenPrice(),OrderOpenPrice()-10000*Point,OrderOpenPrice()+100*Point,0,CLR_NONE);
if (!ModifyOne)Print ("Ticket 1 ",OrderTicket(),", ошибка № - ",GetLastError()); }

OrderSelect(OrdTiketOne,SELECT_BY_TICKET);
double pricetwo=OrderOpenPrice();
OrdTiketTwo=OrderSend(Symbol(),OP_BUYLIMIT,0.01,pricetwo-200*Point,0,0,0,"Dva",11102,0,CLR_NONE);
OrderSelect(OrdTiketTwo,SELECT_BY_TICKET);
bool ModifyTwo=OrderModify(OrdTiketTwo,OrderOpenPrice(),OrderOpenPrice()-10000*Point,OrderOpenPrice()+200*Point,0,CLR_NONE);
if (!ModifyTwo)Print ("Ticket 2 ",OrderTicket(),", ошибка № - ",GetLastError());
if (OrderSelect(OrdTiketTwo,SELECT_BY_TICKET)==true) { Ord=2; Del=1; }}

if (Del==1) {
if (OrderSelect(OrdTiketOne, SELECT_BY_TICKET)==true) {
if (OrderCloseTime()>0) { Del=100; Ord=0; }}}

if (Ord==2){ OrderSelect(OrdTiketTwo,SELECT_BY_TICKET);
if (OrderType()==OP_BUY) { OrderSelect(OrdTiketOne,SELECT_BY_TICKET);
double pricethree=OrderOpenPrice();
OrdTiketThree=OrderSend(Symbol(),OP_BUYLIMIT,0.01,pricethree-300*Point,0,0,0,"Tri",11103,0,CLR_NONE);
OrderSelect(OrdTiketThree,SELECT_BY_TICKET);
bool ModifyThree=OrderModify(OrdTiketThree,OrderOpenPrice(),OrderOpenPrice()-10000*Point,OrderOpenPrice()+400*Point,0,CLR_NONE);
if(!ModifyThree)Print ("Ticket 3 ",OrderTicket(),", ошибка № - ",GetLastError());
Ord=3; Del=2;
}
}

if (Del==2) {
if (OrderSelect(OrdTiketTwo, SELECT_BY_TICKET)==true) {
if (OrderCloseTime()>0) { Del=100; Ord=0;
}
}
}

if (Ord==3) { OrderSelect(OrdTiketThree,SELECT_BY_TICKET);
if (OrderType()==OP_BUY) { OrderSelect(OrdTiketOne,SELECT_BY_TICKET);
double pricefour=OrderOpenPrice();
OrdTiketFour=OrderSend(Symbol(),OP_BUYLIMIT,0.01,pricefour-400*Point,0,0,0,"Chetire",11104,0,CLR_NONE);
OrderSelect(OrdTiketFour,SELECT_BY_TICKET);
bool ModifyFour=OrderModify(OrdTiketFour,OrderOpenPrice(),OrderOpenPrice()-10000*Point,OrderOpenPrice()+600*Point,0,CLR_NONE);
if(!ModifyFour)Print ("Ticket 4 ",OrderTicket(),", ошибка № - ",GetLastError());
Ord=4; Del=3;
}
}

if (Del==3) {
if (OrderSelect(OrdTiketThree, SELECT_BY_TICKET)==true) {
if (OrderCloseTime()>0) { Del=100; Ord=0;
}
}
}

if (Ord==4) { OrderSelect(OrdTiketFour,SELECT_BY_TICKET);
if (OrderType()==OP_BUY) { OrderSelect(OrdTiketOne,SELECT_BY_TICKET);
double pricefive=OrderOpenPrice();
OrdTiketFive=OrderSend(Symbol(),OP_BUYLIMIT,0.02,pricefive-500*Point,0,0,0,"Piat",11105,0,CLR_NONE);
OrderSelect(OrdTiketFive,SELECT_BY_TICKET);
bool ModifyFive=OrderModify(OrdTiketFive,OrderOpenPrice(),OrderOpenPrice()-10000*Point,OrderOpenPrice()+600*Point,0,CLR_NONE);
if(!ModifyFive)Print ("Ticket 5 ",OrderTicket(),", ошибка № - ",GetLastError());
Ord=5; Del=4;
}
}

if (Del==4) {
if (OrderSelect(OrdTiketFour, SELECT_BY_TICKET)==true) {
if (OrderCloseTime()>0) { Del=100; Ord=0;
}
}
}

if (Ord==5) { OrderSelect(OrdTiketFive,SELECT_BY_TICKET);
if (OrderType()==OP_BUY) { OrderSelect(OrdTiketOne,SELECT_BY_TICKET);
double pricesix=OrderOpenPrice();
OrdTiketSix=OrderSend(Symbol(),OP_BUYLIMIT,0.03,pricesix-600*Point,0,0,0,"Shest",11106,0,CLR_NONE);
OrderSelect(OrdTiketSix,SELECT_BY_TICKET);
bool ModifySix=OrderModify(OrdTiketSix,OrderOpenPrice(),OrderOpenPrice()-10000*Point,OrderOpenPrice()+600*Point,0,CLR_NONE);
if(!ModifySix)Print ("Ticket 6 ",OrderTicket(),", ошибка № - ",GetLastError());
Ord=6; Del=5;
}
}

if (Del==5) {
if (OrderSelect(OrdTiketFive, SELECT_BY_TICKET)==true) {
if (OrderCloseTime()>0) { Del=100; Ord=0;
}
}
}

if (Ord==6) { OrderSelect(OrdTiketSix,SELECT_BY_TICKET);
if (OrderType()==OP_BUY) { OrderSelect(OrdTiketOne,SELECT_BY_TICKET);
double priceseven=OrderOpenPrice();
OrdTiketSeven=OrderSend(Symbol(),OP_BUYLIMIT,0.03,priceseven-700*Point,0,0,0,"Sem",11107,0,CLR_NONE);
OrderSelect(OrdTiketSeven,SELECT_BY_TICKET);
bool ModifySeven=OrderModify(OrdTiketSeven,OrderOpenPrice(),OrderOpenPrice()-10000*Point,OrderOpenPrice()+600*Point,0,CLR_NONE);
if(!ModifySeven)Print ("Ticket 7 ",OrderTicket(),", ошибка № - ",GetLastError());
Ord=7; Del=6;
}
}

if (Del==6) {
if (OrderSelect(OrdTiketSix, SELECT_BY_TICKET)==true) {
if (OrderCloseTime()>0) { Del=100; Ord=0;
}
}
}

if (Ord==7) { OrderSelect(OrdTiketSeven,SELECT_BY_TICKET);
if (OrderType()==OP_BUY) { OrderSelect(OrdTiketOne,SELECT_BY_TICKET);
double priceeight=OrderOpenPrice();
OrdTiketEight=OrderSend(Symbol(),OP_BUYLIMIT,0.04,priceeight-800*Point,0,0,0,"Vosem",11108,0,CLR_NONE);
OrderSelect(OrdTiketEight,SELECT_BY_TICKET);
bool ModifyEight=OrderModify(OrdTiketEight,OrderOpenPrice(),OrderOpenPrice()-10000*Point,OrderOpenPrice()+600*Point,0,CLR_NONE);
if(!ModifyEight)Print ("Ticket 8 ",OrderTicket(),", ошибка № - ",GetLastError());
Ord=8; Del=7;
}
}

if (Del==7) {
if (OrderSelect(OrdTiketSeven, SELECT_BY_TICKET)==true) {
if (OrderCloseTime()>0) { Del=100; Ord=0; }}}

if (Ord==8) { OrderSelect(OrdTiketEight,SELECT_BY_TICKET);
if (OrderType()==OP_BUY) { OrderSelect(OrdTiketOne,SELECT_BY_TICKET);
double pricenine=OrderOpenPrice();
OrdTiketNine=OrderSend(Symbol(),OP_BUYLIMIT,0.06,pricenine-900*Point,0,0,0,"Deviat",11109,0,CLR_NONE);
OrderSelect(OrdTiketNine,SELECT_BY_TICKET);
bool ModifyNine=OrderModify(OrdTiketNine,OrderOpenPrice(),OrderOpenPrice()-10000*Point,OrderOpenPrice()+800*Point,0,CLR_NONE);
if(!ModifyNine)Print ("Ticket 9 ",OrderTicket(),", ошибка № - ",GetLastError());
Ord=9; Del=8;
}
}

if (Del== 8) {
if (OrderSelect(OrdTiketEight, SELECT_BY_TICKET)==true) {
if (OrderCloseTime()>0) { Del=100; Ord=0;
}
}
}

if (Ord==9) { OrderSelect(OrdTiketNine,SELECT_BY_TICKET);
if (OrderType()==OP_BUY) { OrderSelect(OrdTiketOne,SELECT_BY_TICKET);
double priceten=OrderOpenPrice();
OrdTiketTen=OrderSend(Symbol(),OP_BUYLIMIT,0.11,priceten-1000*Point,0,0,0,"Desiat",11110,0,CLR_NONE);
OrderSelect(OrdTiketTen,SELECT_BY_TICKET);
bool ModifyTen=OrderModify(OrdTiketTen,OrderOpenPrice(),OrderOpenPrice()-10000*Point,OrderOpenPrice()+1000*Point,0,CLR_NONE);
if(!ModifyTen)Print ("Ticket 10 ",OrderTicket(),", ошибка № - ",GetLastError());
Ord=10; Del=9;
}
}

if (Del==9) {
if (OrderSelect(OrdTiketNine, SELECT_BY_TICKET)==true) {
if (OrderCloseTime()>0) { Del=100; Ord=0;
}
}
}

if (Ord==10) { OrderSelect(OrdTiketTen,SELECT_BY_TICKET);
if (OrderType()==OP_BUY) { OrderSelect(OrdTiketOne,SELECT_BY_TICKET);
double priceeleven=OrderOpenPrice();
OrdTiketEleven=OrderSend(Symbol(),OP_BUYLIMIT,0.33,priceeleven-1100*Point,0,0,0,"Odinnadtsat",11111,0,CLR_NONE);
OrderSelect(OrdTiketEleven,SELECT_BY_TICKET);
bool ModifyEleven=OrderModify(OrdTiketEleven,OrderOpenPrice(),OrderOpenPrice()-10000*Point,OrderOpenPrice()+700*Point,0,CLR_NONE);
if(!ModifyEleven)Print ("Ticket 11 ",OrderTicket(),", ошибка № - ",GetLastError());
Ord=11; Del=10;
}
}

if (Del==10) {
if (OrderSelect(OrdTiketTen, SELECT_BY_TICKET)==true) {
if (OrderCloseTime()>0) { Del=100; Ord=0;
}
}
}

if (Ord==11) { OrderSelect(OrdTiketEleven,SELECT_BY_TICKET);
if (OrderType()==OP_BUY) { OrderSelect(OrdTiketOne,SELECT_BY_TICKET);
double pricetwelve=OrderOpenPrice();
OrdTiketTwelve=OrderSend(Symbol(),OP_BUYLIMIT,0.12,pricetwelve-1200*Point,0,0,0,"Dvenadtsat",11112,0,CLR_NONE);
OrderSelect(OrdTiketTwelve,SELECT_BY_TICKET);
bool ModifyTwelve=OrderModify(OrdTiketTwelve,OrderOpenPrice(),OrderOpenPrice()-10000*Point,OrderOpenPrice()+700*Point,0,CLR_NONE);
if(!ModifyTwelve)Print ("Ticket 12 ",OrderTicket(),", ошибка № - ",GetLastError());
Ord=12; Del=11;
}
}

if (Del==11) {
if (OrderSelect(OrdTiketEleven, SELECT_BY_TICKET)==true) {
if (OrderCloseTime()>0) { Del=100; Ord=0;
}
}
}

if (Ord==12) { OrderSelect(OrdTiketTwelve,SELECT_BY_TICKET);
if (OrderType()==OP_BUY) { OrderSelect(OrdTiketOne,SELECT_BY_TICKET);
double pricethirteen=OrderOpenPrice();
OrdTiketThirteen=OrderSend(Symbol(),OP_BUYLIMIT,0.39,pricethirteen-1300*Point,0,0,0,"Trinadtsat",11113,0,CLR_NONE);
OrderSelect(OrdTiketThirteen,SELECT_BY_TICKET);
bool ModifyThirteen=OrderModify(OrdTiketThirteen,OrderOpenPrice(),OrderOpenPrice()-10000*Point,OrderOpenPrice()+800*Point,0,CLR_NONE);
if(!ModifyThirteen)Print ("Ticket 13 ",OrderTicket(),", ошибка № - ",GetLastError());
Ord=13; Del=12;
}
}

if (Del==12) {
if (OrderSelect(OrdTiketTwelve, SELECT_BY_TICKET)==true) {
if (OrderCloseTime()>0) { Del=100; Ord=0; }}}

if (Del==100) {
OrderSelect(OrdTiketOne, SELECT_BY_TICKET);
OrderClose(OrdTiketOne, OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, CLR_NONE );
OrderSelect(OrdTiketTwo, SELECT_BY_TICKET);
OrderClose(OrdTiketTwo, OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, CLR_NONE );
OrderSelect(OrdTiketThree, SELECT_BY_TICKET);
OrderClose(OrdTiketThree, OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, CLR_NONE );
OrderSelect(OrdTiketFour, SELECT_BY_TICKET);
OrderClose(OrdTiketFour, OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, CLR_NONE );
OrderSelect(OrdTiketFive, SELECT_BY_TICKET);
OrderClose(OrdTiketFive, OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, CLR_NONE );
OrderSelect(OrdTiketSix, SELECT_BY_TICKET);
OrderClose(OrdTiketSix, OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, CLR_NONE );
OrderSelect(OrdTiketSeven, SELECT_BY_TICKET);
OrderClose(OrdTiketSeven, OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, CLR_NONE );
OrderSelect(OrdTiketEight, SELECT_BY_TICKET);
OrderClose(OrdTiketEight, OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, CLR_NONE );
OrderSelect(OrdTiketNine, SELECT_BY_TICKET);
OrderClose(OrdTiketNine, OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, CLR_NONE );
OrderSelect(OrdTiketTen, SELECT_BY_TICKET);
OrderClose(OrdTiketTen, OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, CLR_NONE );
OrderSelect(OrdTiketEleven, SELECT_BY_TICKET);
OrderClose(OrdTiketEleven, OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, CLR_NONE );
OrderSelect(OrdTiketTwelve, SELECT_BY_TICKET);
OrderClose(OrdTiketTwelve, OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, CLR_NONE );
OrderDelete(OrdTiketOne); OrderDelete(OrdTiketTwo); OrderDelete(OrdTiketThree); OrderDelete(OrdTiketFour); OrderDelete(OrdTiketFive);
OrderDelete(OrdTiketSix); OrderDelete(OrdTiketSeven); OrderDelete(OrdTiketEight); OrderDelete(OrdTiketNine); OrderDelete(OrdTiketTen);
OrderDelete(OrdTiketEleven); OrderDelete(OrdTiketTwelve);
}

return(0);
}
Victor Nikolaev
Модератор
14483
Victor Nikolaev 2010.11.10 16:07  
Scripter:

Господа! помогите написать нормальный советник, ато опыта программирования мало сам написал как мог, код работает но не всегда корректно.


Мне столько не выпить (в смысле - без бутылки не разберешься)
Victor Nikolaev
Модератор
14483
Victor Nikolaev 2010.11.10 16:11  

Хотя бутылочка хорошего коньяка могла бы помочь

Scripter
152
Scripter 2010.11.10 16:16  
Vinin:

Хотя бутылочка хорошего коньяка могла бы помочь



алкоголь вредит здоровью!
Alexander
4034
Alexander 2010.11.10 16:22  
Scripter:
алкоголь вредит здоровью!
А неотформатированный код пользу приносит? )))
IgorM М
4801
IgorM М 2010.11.10 16:23  
Scripter:


алкоголь вредит здоровью!


лень тоже!

ну и что? щас все кинутся читать и разбирать Ваш код? да и вопрос/просьба Ваша:

....код работает но не всегда корректно.

 выглядит тож некорректно или непонятно

Scripter
152
Scripter 2010.11.10 16:28  
IgorM:


лень тоже!

ну и что? щас все кинутся читать и разбирать Ваш код? да и вопрос/просьба Ваша:

выглядит тож некорректно или непонятно


просто мне кажется код написан не по совсем правильно и наверное можно было-бы его упростить. А как не знаю.
Scripter
152
Scripter 2010.11.10 16:29  
goldtrader:
А неотформатированный код пользу приносит? )))

как понять не отформатированный?
Victor Nikolaev
Модератор
14483
Victor Nikolaev 2010.11.10 16:29  
Scripter:

просто мне кажется код написан не по совсем правильно и наверное можно было-бы его упростить. А как не знаю.

А коньяк будет или его эквивалент?
Scripter
152
Scripter 2010.11.10 16:31  
Vinin:

А коньяк будет или его эквивалент?

смотря какому коньяку эквивалент!
Комбинатор
15918
Комбинатор 2010.11.10 16:32  
Меньше VSOP'а не пьемс.
1234
Авторизуйтесь или зарегистрируйтесь, чтобы добавить комментарий