Скачать MetaTrader 5

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

Авторизуйтесь или зарегистрируйтесь, чтобы добавить комментарий
Scripter
152
Scripter  

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

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
Модератор
14790
Victor Nikolaev  
Scripter:

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


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

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

Scripter
152
Scripter  
Vinin:

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



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


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


лень тоже!

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

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

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

Scripter
152
Scripter  
IgorM:


лень тоже!

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

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


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

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

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

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

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

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