You didn't post a topic yet. Let us show you how to make your first topic and upload your favorite forex robot. Guide me

Skip to forum content

Quick Login / Register with Facebook Account!

Login with Facebook

Login with Username and Password!

     Username:       Password:  Login

Register  |  Forgot Password?

 

The latest topics with attached files (Forex robots, Forex Indicators, etc..)

Forums in this category with details of Replies, Views, last post

EURUSD RFX- 1MIN

by ftoncu.bim

FOREX EA

by rossolebile

Hide

Highest Forex Leverage 1:3000!

Try your Forex Robot with with the highest leverage 1:3000!

All Forex robot strategies allowed! Scalping, hedging, martingale, etc...



Pages 1

You must login or register to post a reply

RSS

Posts: 2
Please rate this topic
Current rating: 0
Votes: 0

Embed topic to your site

PSAR

Topic: PSAR

//+------------------------------------------------------------------+
//|                                                 EA-PSAR_v1-0.mq4 |
//|                                                    Luca Spinello |
//|                                
//+------------------------------------------------------------------+

#property copyright     "Luca Spinello - mql4tradingautomation.com"
#property version       "1.00"
#property strict
#property description   "This Expert Advisor opens orders when the PSAR changes from above to below the price or vice versa"
#property description   " "
#property description   "DISCLAIMER: This code comes with no guarantee, you can use it at your own risk"
#property description   "We recommend to test it first on a Demo Account"

/*
ENTRY BUY: PSAR changes from above the previous bar to below the current bar
ENTRY SELL: PSAR changes from below the previous bar to above the current bar
EXIT: Take profit or trailing stop using PSAR
*/


extern double LotSize=0.1;             //Position size

extern double StopLoss=20;             //Stop loss in pips
extern double TakeProfit=500;          //Take profit in pips

extern int Slippage=2;                 //Slippage in pips

extern bool TradeEnabled=true;         //Enable trade

extern double PSARStep=0.2;            //PSAR Step         
extern double PSARMaxStep=0.02;        //PSAR Max Step

extern int MagicNumber=11223344;       //Magic Number to assign to the orders

//Functional variables
double ePoint;                         //Point normalized

bool CanOrder;                         //Check for risk management
bool CanOpenBuy;                       //Flag if there are buy orders open
bool CanOpenSell;                      //Flag if there are sell orders open

int OrderOpRetry=10;                   //Number of attempts to perform a trade operation
int SleepSecs=3;                       //Seconds to sleep if can't order
int MinBars=60;                        //Minimum bars in the graph to enable trading

//Functional variables to determine prices
double MinSL;
double MaxSL;
double TP;
double SL;
double Spread;
int Slip; 


//Variable initialization function
void Initialize(){          
   RefreshRates();
   ePoint=Point;
   Slip=Slippage;
   if (MathMod(Digits,2)==1){
      ePoint*=10;
      Slip*=10;
   }
   TP=TakeProfit*ePoint;
   SL=StopLoss*ePoint;
   CanOrder=TradeEnabled;
   CanOpenBuy=true;
   CanOpenSell=true;
}


//Check if orders can be submitted
void CheckCanOrder(){            
   if( Bars<MinBars ){
      Print("INFO - Not enough Bars to trade");
      CanOrder=false;
   }
   OrdersOpen();
   return;
}


//Check if there are open orders and what type
void OrdersOpen(){
   for( int i = 0 ; i < OrdersTotal() ; i++ ) {
      if( OrderSelect( i, SELECT_BY_POS, MODE_TRADES ) == false ) {
         Print("ERROR - Unable to select the order - ",GetLastError());
         break;
      } 
      if( OrderSymbol()==Symbol() && OrderType() == OP_BUY) CanOpenBuy=false;
      if( OrderSymbol()==Symbol() && OrderType() == OP_SELL) CanOpenSell=false;
   }
   return;
}


//Close all the orders of a specific type and current symbol
void CloseAll(int Command){
   double ClosePrice=0;
   for( int i = 0 ; i < OrdersTotal() ; i++ ) {
      if( OrderSelect( i, SELECT_BY_POS, MODE_TRADES ) == false ) {
         Print("ERROR - Unable to select the order - ",GetLastError());
         break;
      }
      if( OrderSymbol()==Symbol() && OrderType()==Command) {
         if(Command==OP_BUY) ClosePrice=Bid;
         if(Command==OP_SELL) ClosePrice=Ask;
         double Lots=OrderLots();
         int Ticket=OrderTicket();
         for(int j=1; j<OrderOpRetry; j++){
            bool res=OrderClose(Ticket,Lots,ClosePrice,Slip,Red);
            if(res){
               Print("TRADE - CLOSE - Order ",Ticket," closed at price ",ClosePrice);
               break;
            }
            else Print("ERROR - CLOSE - error closing order ",Ticket," return error: ",GetLastError());
         }
      }
   }
   return;
}


//Open new order of a given type
void OpenNew(int Command){
   RefreshRates();
   double OpenPrice=0;
   double SLPrice;
   double TPPrice;
   if(Command==OP_BUY){
      OpenPrice=Ask;
      SLPrice=OpenPrice-SL;
      TPPrice=OpenPrice+TP;
   }
   if(Command==OP_SELL){
      OpenPrice=Bid;
      SLPrice=OpenPrice+SL;
      TPPrice=OpenPrice-TP;
   }
   for(int i=1; i<OrderOpRetry; i++){
      int res=OrderSend(Symbol(),Command,LotSize,OpenPrice,Slip,NormalizeDouble(SLPrice,Digits),NormalizeDouble(TPPrice,Digits),"",MagicNumber,0,Green);
      if(res){
         Print("TRADE - NEW - Order ",res," submitted: Command ",Command," Volume ",LotSize," Open ",OpenPrice," Slippage ",Slip," Stop ",SLPrice," Take ",TPPrice);
         break;
      }
      else Print("ERROR - NEW - error sending order, return error: ",GetLastError());
   }
   return;
}


//Technical analysis of the indicators
bool CrossToOpenBuy=false;
bool CrossToOpenSell=false;


void CheckPSARCross(){
   CrossToOpenBuy=false;
   CrossToOpenSell=false;
   double PSARCurr=iSAR(Symbol(),0,PSARStep,PSARMaxStep,0);
   double PSARPrev=iSAR(Symbol(),0,PSARStep,PSARMaxStep,1);
   if(PSARCurr<Close[0] && PSARPrev>Close[1]){
      CrossToOpenBuy=true;
   }
   if(PSARCurr>Close[0] && PSARPrev<Close[1]){
      CrossToOpenSell=true;
   }
}


//Trailing Stop with PSAR
void UpdatePositions(){

   //Scan the open orders backwards
   for(int i=OrdersTotal()-1; i>=0; i--){
   
      //Select the order, if not selected print the error and continue with the next index
      if( OrderSelect( i, SELECT_BY_POS, MODE_TRADES ) == false ) {
         Print("ERROR - Unable to select the order - ",GetLastError());
         continue;
      } 
      
      //Check if the order can be modified matching the criteria, if criteria not matched skip to the next
      if(OrderSymbol()!=Symbol()) continue;
      if(OrderMagicNumber()!=MagicNumber) continue;
      
      //Prepare the prices
      double TakeProfitPrice=OrderTakeProfit();
      double StopLossPrice=OrderStopLoss();
      double OpenPrice=OrderOpenPrice();
      double NewStopLossPrice=StopLossPrice;
      double NewTakeProfitPrice=TakeProfitPrice;
      
      //PSAR Value of the current symbol, current time frame , PSARStep, PSARMaxStep, previous candle
      double PSARPrice=iSAR(Symbol(),0,PSARStep,PSARMaxStep,1);
      
      //Get updated prices and calculate the new Stop Loss and Take Profit levels, these depends on the type of order
      RefreshRates();
      if(OrderType()==OP_BUY){
         if(PSARPrice>StopLossPrice && PSARPrice<Close[1] && PSARPrice<TakeProfitPrice){
            NewStopLossPrice=NormalizeDouble(PSARPrice,Digits);
         }
      } 
      if(OrderType()==OP_SELL){
         if(PSARPrice<StopLossPrice && PSARPrice>Close[1] && PSARPrice>TakeProfitPrice){
            NewStopLossPrice=NormalizeDouble(PSARPrice,Digits);
         }
      }
      
      //If the new Stop Loss and Take Profit Levels are different from the previous then I try to update the order
      if(NewStopLossPrice!=StopLossPrice){
         Print("Modifying order ",OrderTicket()," Open Price ",OpenPrice," New Stop Loss ",NewStopLossPrice," New Take Profit ",NewTakeProfitPrice);
         if(OrderModify(OrderTicket(),OpenPrice,NewStopLossPrice,NewTakeProfitPrice,0,Yellow)){
            Print("Order modified");
         }
         else{
            Print("Order failed to update with error - ",GetLastError());
         }      
      
      }

   
   }
}




//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
  {
//---
   
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---
   
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
//---
   //Calling initialization, checks and technical analysis
   Initialize();
   CheckCanOrder();
   UpdatePositions();
   CheckPSARCross();
   //Check of Entry/Exit signal with operations to perform
   if(CrossToOpenBuy){
      CloseAll(OP_SELL);
      if(CanOpenBuy && CanOrder) OpenNew(OP_BUY);
   }
   if(CrossToOpenSell){
      CloseAll(OP_BUY);
      if(CanOpenSell && CanOrder) OpenNew(OP_SELL);
   }
  }
//+------------------------------------------------------------------+

Post's attachments

EA-PSAR_v1-0.ex4 15.2 kb, 37 downloads since 2017-12-13 

Share

Thanked for the post: jozmik

Re: PSAR

li will check this, thank you very much, i have some eas, i will post here, thank you for all information, see you later, thank you very much

Share

Posts: 2

Pages 1

You must login or register to post a reply

Last Posts

  • 20/11: MMA+MTF EA - MQ4 file (expert advisor)
  • 20/11: practice trading activities
  • 20/11: Technical Analysis
  • 20/11: "PAINFUL WITHDRAWAL FROM INSTAFOREX"
  • 20/11: market maker or ecn
  • 20/11: PRO VSA EA
  • 20/11: Banana Pips Updated Version Download Now
  • 20/11: Ctrader semi engulfing bot
  • 20/11: Multi purpose trade manager
  • 19/11: New paid Dynamic Trend indicator is distributed for free! Download it!
  • 19/11: SWB stealth v1.01 EA
  • 19/11: if trader wants to secure
  • 19/11: FOREX EA
  • 18/11: With the advancement of modern technologies
  • 18/11: very good EA make 100% in month try it its good
  • 18/11: i want one EA no risk
  • 18/11: EURUSD RFX- 1MIN
  • 17/11: price action monitor
  • Online Users & Stats

    • Total number of registered users: 25,176
    • Newest registered user: lukinhamaromba
    • Total number of topics: 11,373
    • Total number of posts: 37,233

    Online users: 1,968 guests, 167 Members:

    2trade2win, AdamVPS, admin, Aftab Sarwar, Alden Arends, Alecs1973, aleksandrbredichin, alesnetusil, Alexander Lamount Knowles, Allan Rubini, AmegaFX, Antoine Navarra, Artie6, Avhafunani Mavhungu, axel7969, Axmed Axm, Azh Aby Azhaby, ba-7777, bakang02, ball2goal, bayoumy_ahmed, bestkid321, betuboxem, bhash, Brayan, Brian Wallace, Carlo, cfx.forex, Chyka, cruelzhang, deone, deprofiters, digitalboy, dimaspamungkas454, dow017, dvorynen, eargueta181, Edi murdani, elipidius227, Emanuel Hakobyan, enter5, Erastomo Danang, Eric Bolo, fabianyoung, farmabioq, fatboy, filo, Fred Kodzo, freewilly, Fxmaster, ganbold936936, ganhardinheiro, gntgnt8, Goran Zoric, GRTrader, gys, hamidi.hamed, hexingchun89, Hitman, Homik, hopewell, ian.kungu, Ikhwan Casper, Ilir Zoto, InstaForex Partners Team, invoice, jaysonajax, jekas7514, Jesus Flores, Joe0013, Jonatan de Souza, Jordan Pritchett, Jorge Alexander Martinez Otero, José Luis Pérez, judeekatherinexx, juri-petro, justicebiggy7, kamalkumar_j, kashif_raza, kelmen.lau, kozura, kris69one, laszlolukee, laylwintguy, LCS68, Leandroleri, lee, Liviu Torac, llight08, locasahmed, lsgnaija, luciomacri, luigipalm, lukinhamaromba, Lunx OZ, m52422, machs_nochmal, makubbu, marcial03, Marco Antonio Dorantes, MarianNick123, marinho7, Martin Kirschner, Md Billal Hossain, Mdoodoozy Thembelani, Michael Khan, michal.grimm, Mipri, Montipora, mrmaggi007, mukundi2004, munkhgerelmgl, mwatcher, Myanmar River, myd1688, naderko2002, Noorfazli Elias, odavka20, Oumarou Badini, pier, pitbull0525, Rafał Gawroński, Ricardo Gabriel Beccari, Robert CP Chook, Roson Chea, Ruwan Chamara, Samuel Hartsock, sebastianvillenadubiel, serctes, shadysoft, shahbaz.star333, Shahzad Ahmad Qureshi, sivaram291, skorokhodoff4, soldado777, Solomon John Bukola, stanescumari, steveibiks1205, sudhirbgaikwad, Taposki99, Tarek Almaremi, tavonboonsam, Thammarat Baokhao, Thomas Schott, Tiago Silva, timbetapontos10, topcat275, topptoppiii, trader_f, tsholo13, tungiro, tuvix2, uvasile, vanwykvincent, vaverin, vodafone2066, vp789456, Vusi Sesoko, Waliu Ajose, Waqas Baig, warrenteoh, why, yada, yaprak, Zsolt Fábián, Энхболд Сандагдалай, 井上敦幹

     


    NOTE: Hacked or illegal versions of copyrighted Forex robots are highly prohibited on MT4talk.com. If you upload any illegal version of any copyrighted Forex robot, your forum account will be banned. No exceptions.

     

    IMPORTANT: MT4talk.com is a public Forex forum, where forum members can upload open source Forex robots to share with other members. MT4talk.com forum does not sell or rent Forex robots, and does not provide guarantee or support for the uploaded Forex robots! If you have any question about any Forex robot, please open a forum topic! If you have a question about your forum account, contact: mt4talk@gmail.com

    CFTC RULE 4.41 – HYPOTHETICAL OR SIMULATED PERFORMANCE RESULTS HAVE CERTAIN LIMITATIONS. UNLIKE AN ACTUAL PERFORMANCE RECORD, SIMULATED RESULTS DO NOT REPRESENT ACTUAL TRADING. ALSO, SINCE THE TRADES HAVE NOT BEEN EXECUTED, THE RESULTS MAY HAVE UNDER-OR-OVER COMPENSATED FOR THE IMPACT, IF ANY, OF CERTAIN MARKET FACTORS, SUCH AS LACK OF LIQUIDITY. SIMULATED TRADING PROGRAMS, IN GENERAL, ARE ALSO SUBJECT TO THE FACT THAT THEY ARE DESIGNED WITH THE BENEFIT OF HINDSIGHT. NO REPRESENTATION IS BEING MADE THAT ANY ACCOUNT WILL OR IS LIKELY TO ACHIEVE PROFIT OR LOSSES SIMILAR TO THOSE SHOWN.

    Disclaimer - No representation is being made that any Forex account will or is likely to achieve profits or losses similar to those shown on backtests in this forum. In fact, there are frequently sharp differences between hypothetical performance results and the actual results subsequently achieved by any particular trading program. Hypothetical trading does not involve financial risk, and no hypothetical trading record can completely account for the impact of financial risk in actual trading. 
    All information on this forum is for educational purposes only and is not intended to provide financial advice. Any statements posted by forum members about profits or income expressed or implied, do not represent a guarantee. Your actual trading may result in losses as no trading system is guaranteed. You accept full responsibilities for your actions, trades, profit or loss, and agree to hold the MT4talk team and forum members of this information harmless in any and all ways.


    Copyright MT4talk.com Forum Rules - Privacy Policy.