//+------------------------------------------------------------------+ //| TFX_Include_v1_4.mq4 | //| Copyright © 2008 Wolfe | //| www.forex-tsd.com | //+------------------------------------------------------------------+ #property copyright "Copyright © 2008 Wolfe" #property link "www.forex-tsd.com" //+------------------------------------------------------------------+ //| defines | //+------------------------------------------------------------------+ // #define MacrosHello "Hello, world!" // #define MacrosYear 2005 //+------------------------------------------------------------------+ //| DLL imports | //+------------------------------------------------------------------+ // #import "user32.dll" // int SendMessageA(int hWnd,int Msg,int wParam,int lParam); // #import "my_expert.dll" // int ExpertRecalculate(int wParam,int lParam); // #import //+------------------------------------------------------------------+ //| EX4 imports | //+------------------------------------------------------------------+ // #import "stdlib.ex4" // string ErrorDescription(int error_code); // #import //+------------------------------------------------------------------+ int OTBM(int intMagic)//OrdersTotalByMagic { int intCount=0; int intPOS=0; bool boolTerm=false; while(boolTerm==false) { if(OrderSelect(intPOS,SELECT_BY_POS)) { if(OrderMagicNumber()==intMagic) intCount++; intPOS++; } else boolTerm=true; } return(intCount); } int CBM(int intMagic)//CloseByMagic { int intOffset=0; int Count = OTBM(intMagic); while(OTBM(intMagic)>0 && Count > 0) { OrderSelect(intOffset,SELECT_BY_POS); if(OrderMagicNumber()==intMagic) { if(OrderType()==OP_BUY) OrderClose(OrderTicket(),OrderLots(),MarketInfo(OrderSymbol(),MODE_BID),999,Red); else if(OrderType()==OP_SELL) OrderClose(OrderTicket(),OrderLots(),MarketInfo(OrderSymbol(),MODE_ASK),999,Orange); Count--; } else { intOffset++; } } return(0); } double OPBM(int intMagic)//OrderProfitByMagic { double dblProfit=0; int intPOS=0; bool boolTerm=false; while(boolTerm==false) { if(OrderSelect(intPOS,SELECT_BY_POS)) { if(OrderMagicNumber()==intMagic) dblProfit=dblProfit+OrderProfit(); intPOS++; } else boolTerm=true; } return(dblProfit); }