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

Paul Cooke 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 2010.11.10 16:07 #1

Scripter:

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

Victor Nikolaev 2010.11.10 16:11 #2

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

Paul Cooke 2010.11.10 16:16 #3

Vinin:

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

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

Alexander Sevastyanov 2010.11.10 16:22 #4

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

А неотформатированный код пользу приносит? )))

Igor Makanu 2010.11.10 16:23 #5

Scripter:

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

лень тоже!

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

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

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

Paul Cooke 2010.11.10 16:28 #6

IgorM:

лень тоже!

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

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

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

Paul Cooke 2010.11.10 16:29 #7

goldtrader:
А неотформатированный код пользу приносит? )))

как понять не отформатированный?

Victor Nikolaev 2010.11.10 16:29 #8

Scripter:

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

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

Paul Cooke 2010.11.10 16:31 #9

Vinin:

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

смотря какому коньяку эквивалент!

TheXpert 2010.11.10 16:32 #10

Меньше VSOP'а не пьемс.

1 2 3 4

Новый комментарий