//+------------------------------------------------------------------+ //| demBot.mq4 | //| @2009 Desynced Tech | //| http://desynced.no-ip.org/fx | //+------------------------------------------------------------------+ #property copyright "@2009 Desynced Tech" #property link "http://desynced.no-ip.org/fx" #include <mysql.mqh> datetime lastOrder =0; int times =0; int ticket = 0; extern int takeprofit = 100; extern int MAGIC = 35; extern double lots = 0.1; int demarkerPeriods = 20; double tp; //+------------------------------------------------------------------+ //| expert initialization function | //+------------------------------------------------------------------+ int init() { //---- //---- return(0); } //+------------------------------------------------------------------+ //| expert deinitialization function | //+------------------------------------------------------------------+ int deinit() { //---- //---- return(0); } int getNumberTrades() { int total = OrdersTotal(); int numords = 0; for(int cnt=0; cnt<total; cnt++) { OrderSelect(cnt, SELECT_BY_POS); if(OrderSymbol() == Symbol() && OrderMagicNumber() == MAGIC) return (OrderTicket()); } return(-1); } //+------------------------------------------------------------------+ //| expert start function | //+------------------------------------------------------------------+ int start() { int ratio = MathFloor( AccountBalance() /1000 ); if ( ratio > 0 ) lots = 0.1*(ratio+1); // Print(lots); double markers[20]; ArrayInitialize(markers,0); double vol = (iMA(NULL,0,14,0,MODE_SMA,PRICE_HIGH,0)-iMA(NULL,0,14,0,MODE_SMA,PRICE_LOW,0))*1000; //if ( OrdersTotal() > 0 ) Print (" counter " , iDeMarker(NULL,0,14,0)); for(int i=0;i<demarkerPeriods;i++) { markers[i] = iDeMarker(NULL,0,demarkerPeriods,i); } int x =0, y=0; bool acima ; bool abaixo; for( i=demarkerPeriods-1;i>0;i-- ) { if ( markers[i] < 0.7 && markers[i-1] > 0.7 ) { x = i ; abaixo = true; continue; } if ( markers[i] > 0.7 && markers[i-1] < 0.7 ) { acima = true; y = i; continue; } } //if (iDeMarker(NULL,0,14,0) > 0.7 && iDeMarker(NULL,0,14,1) < 0.7) { int entrySafety = x -y; if ( abaixo && acima && entrySafety > MathFloor(demarkerPeriods/2) && (TimeCurrent() - lastOrder) > (60*60*1.5) ) { if ( getNumberTrades() < 0 ){ times++; // if ( (TimeCurrent() - lastOrder) > (60*60*1.5) && times > 3 ) { if ( takeprofit > 0 ) { tp = Bid-takeprofit*Point; } else tp = 0; Print( " vol entry" , vol , " entry " , x , " , " , y , " = " , (x -y ) ); ticket = OrderSend(Symbol(),OP_SELL, lots, Bid, 3, 0, tp,"", MAGIC, 0, Red); if ( ticket > 0 ) { /* mysql_connect("192.168.0.3","forex","forex","forex",3306); insertOrderDb(ticket,Symbol(),Bid,0, tp,MAGIC,"demBot",OP_SELL, TimeCurrent()); mysql_close(mysql); */ lastOrder = TimeCurrent(); times =0; return(0); } // } } else { if ( (TimeCurrent() - lastOrder) > (60*60*0.7) ) { //OrderClose(ticket,lots,Ask,3); } } } int ticket = getNumberTrades() ; acima =false; abaixo = false; for( i=demarkerPeriods-1;i>0;i-- ) { if ( markers[i] > 0.3 && markers[i-1] <0.3 ) { x = i ; abaixo = true; continue; } if ( markers[i] < 0.3 && markers[i-1] > 0.3 ) { acima = true; y = i; continue; } } entrySafety = x -y; if ( false &&abaixo && acima && entrySafety >= 15 /*MathFloor(demarkerPeriods/2)*/ && (TimeCurrent() - lastOrder) > (60*60*0.5) ) { if ( getNumberTrades() > 0 ) return(0); if ( takeprofit > 0 ) { tp = Ask+takeprofit*Point; } else tp = 0; ticket = OrderSend(Symbol(),OP_BUY, lots, Ask, 3, 0, tp,"", MAGIC, 0, Red); if ( ticket > 0 ) { Print( " vol entry" , vol , " entry " , x , " , " , y , " = " , (x -y ) ); /* mysql_connect("192.168.0.3","forex","forex","forex",3306); insertOrderDb(ticket,Symbol(),Bid,0, tp,MAGIC,"demBot",OP_SELL, TimeCurrent()); mysql_close(mysql); */ lastOrder = TimeCurrent(); return(0); } } return(0); }
Sample
Analysis
Market Information Used:
Indicator Curves created:
Indicators Used:
Moving average indicator
DeMarker indicator
Custom Indicators Used:
Order Management characteristics:
Checks for the total of open orders
It automatically opens orders when conditions are reached
Other Features: