Hans123 breakout system

[Angel Zhelyazkov]

Georgi Това робот на стратегията ли е.
Ти ли я прави или я намери някъде.

[GeorgiRR]

Angel Zhelyazkov, би трябвало да е робот. Свалих го от един форум. И сега не мога да го открия. Утре ще го пусна на демо. За да видя какви ще ги върши. Само че още не съм му прегледал настройките.

[Angel Zhelyazkov]

Ами така може да е много мързелива работа
ако бачка както си трябва тоя робот няма да следиш нищо
то всеки ден ще си пердаши таргити ордери а у.
Ама дали ще излезе на плюс.

[pesho]

//+------------------------------------------------------------------+
//| Hans123MV22 |
//| Copyright © 2006, Milan Volf |
//| |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2006, Milan Volf"

//---- input parameters
extern int Start1=10; //началото на първата сесия
extern int Start2=14; //началото на втората сесия
extern int EOD=24; //време за затваряне на поръчки в края на деня
extern int FridayClosing=23; //петък края на работното време
extern bool FirstSessionOnly=0; //ако това се равнява на 1, то се търгува на първия кръг (за тестване)
extern int Length=4; //дължина на диапазон за определянена high/low
extern int Pips=5; //вход под/над нивото
extern int StopLoss=50;
extern int BreakEven=30;
extern int TrailingStop=0; //ако е равна на 0, той използва праговете
extern int TakeProfit=80;
extern double Lots=1;

//+------------------------------------------------------------------+
//| expert start function |
//+------------------------------------------------------------------+
int start()
{
//----
int i,Ticket,MN;

//Normalize times
if(EOD==24) EOD=0;
if(FridayClosing==0) FridayClosing=24;

//Setup comment
string Text="Hans123"+Symbol();

//Setup orders
if(Hour()==Start1 && Minute()<10){
MN=1;
SetOrders(Text,MN);
}
if(Hour()==Start2 && Minute()<10 && FirstSessionOnly==0){
MN=2;
SetOrders(Text,MN);
}

//Manage opened orders
for (i=0;i<OrdersTotal();i++){
OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
if(OrderComment()==Text){
//close open positions at EOD
if(Hour()==EOD || (DayOfWeek()>=5 && Hour()==FridayClosing-1 && Minute()>=50)){
switch (OrderType()){
case OP_BUY: OrderClose(OrderTicket(),OrderLots(),Bid,3,Red);
break;
case OP_SELL: OrderClose(OrderTicket(),OrderLots(),Ask,3,Red);
break;
default: OrderDelete(OrderTicket());
break;
}
Sleep(10000);
}
else {
//move at BE if profit>BE
if(TrailingStop==0){
if(OrderType()==OP_BUY){
if(High[0]-OrderOpenPrice()>=BreakEven*Point && OrderStopLoss()<OrderOpenPrice()){
OrderModify(OrderTicket(),OrderOpenPrice(),OrderOp enPrice(),OrderTakeProfit(),0,Green);
Sleep(10000);
}
}
if(OrderType()==OP_SELL){
if(OrderOpenPrice()-Low[0]>=BreakEven*Point && OrderStopLoss()>OrderOpenPrice()){
OrderModify(OrderTicket(),OrderOpenPrice(),OrderOp enPrice(),OrderTakeProfit(),0,Green);
Sleep(10000);
}
}
}
//use trailing stop
else {
if(OrderType()==OP_BUY){
if(High[0]-OrderStopLoss()>TrailingStop*Point){
OrderModify(OrderTicket(),OrderOpenPrice(),High[0]-TrailingStop*Point,OrderTakeProfit(),0,Green);
Sleep(10000);
}
}
if(OrderType()==OP_SELL){
if(OrderStopLoss()-Low[0]>TrailingStop*Point){
OrderModify(OrderTicket(),OrderOpenPrice(),Low[0]+TrailingStop*Point,OrderTakeProfit(),0,Green);
Sleep(10000);
}
}
}
}
}
}

return(0);
}
//+------------------------------------------------------------------+

void SetOrders(string Text,int MN){
int i,Ticket,Bought,Sold;
double EntryLong,EntryShort,SLLong,SLShort,TPLong,TPShort ;

//Determine range
EntryLong =iHigh(NULL,60,Highest(NULL,60,MODE_HIGH,Length,1) )+(Pips/*+MarketInfo(Symbol(),MODE_SPREAD)*/)*Point;
EntryShort =iLow (NULL,60,Lowest (NULL,60,MODE_LOW, Length,1))-Pips*Point;
SLLong =MathMax(EntryLong-StopLoss*Point,EntryShort);
SLShort =MathMin(EntryShort+StopLoss*Point,EntryLong);
TPLong =EntryLong+TakeProfit*Point;
TPShort =EntryShort-TakeProfit*Point;

//Send orders
for (i=0;i<OrdersTotal();i++){
OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
if(OrderComment()==Text && OrderMagicNumber()==MN){
if(OrderType()==OP_BUYSTOP || OrderType()==OP_BUY) Bought++;
if(OrderType()==OP_SELLSTOP || OrderType()==OP_SELL) Sold++;
}
}
if(Bought==0){ //no buy order
Ticket=OrderSend(Symbol(),OP_BUYSTOP,Lots,EntryLon g,3,SLLong,TPLong,Text,MN,0,Blue);
if(Ticket<0 && High[0]>=EntryLong)
Ticket=OrderSend(Symbol(),OP_BUY,Lots,Ask,3,SLLong ,TPLong,Text,MN,0,Blue);
Sleep(10000);
}
if(Sold==0){ //no sell order
Ticket=OrderSend(Symbol(),OP_SELLSTOP,Lots,EntrySh ort,3,SLShort,TPShort,Text,MN,0,Magenta);
if(Ticket<0 && Low[0]<=EntryShort)
Ticket=OrderSend(Symbol(),OP_SELL,Lots,Bid,3,SLSho rt,TPShort,Text,MN,0,Magenta);
Sleep(10000);
}
//Check orders
for (i=0;i<OrdersTotal();i++){
OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
if(OrderComment()==Text && OrderMagicNumber()==MN){
if(OrderType()==OP_BUYSTOP && (MathAbs(OrderOpenPrice()-EntryLong)>Point
|| MathAbs(OrderStopLoss()-SLLong)>Point || MathAbs(OrderTakeProfit()-TPLong)>Point))
OrderModify(OrderTicket(),EntryLong,SLLong,TPLong, 0,Blue);
if(OrderType()==OP_SELLSTOP && (MathAbs(OrderOpenPrice()-EntryShort)>Point
|| MathAbs(OrderStopLoss()-SLShort)>Point || MathAbs(OrderTakeProfit()-TPShort)>Point))
OrderModify(OrderTicket(),EntryShort,SLShort,TPSho rt,0,Magenta);
}
}
}

----------

Тоя експерт го ковнах от едно място. Само че не знам как да го кача като файл във форума.

Готово Георги направих го във фаил готов за прикачане към графиката . От тук може да си го дръпнете http://dox.bg/files/dw?a=7533f40264

[Angel Zhelyazkov]

Е Пеше голем си
то докато видиш нещо и го правиш достъпно.
Браво голем си.

[pesho]

Е Пеше голем си
то докато видиш нещо и го правиш достъпно.
Браво голем си.

Нали затова сме хора баце да си помагаме ....................

[stts]

ехе ,гледам и експерт сте намерили ,трябва да го пусна и аз на демо да видя дали работи добре .....

[daniwin]

Здравейте и от мен, браво на Георги и той се активизира на тоя фронт. Някой пусна ли го на тестера и дали се компилира без грешки

[stts]

има му нещо на тоз експерт , не иска да се прикачи към графиката .........................

[daniwin]

stts, ти компилира ли го през метата за грешки, че обикновено като се дава така кода на копи пейст се получават грешки