Art Phantom EA

Actually I´m testing 3 Single_Pair_Phantom versions, all 10.000.-$, 500:1, MMTU:0.4, PP:0.5

1.- EUR/USD, M15, without any filter.

2.- EUR/USD, M1, without any filter.

3.- EUR/USD, M15, CutLoserCap:100, CutLoserMultiplier: 1.0

Today is not a good day to compare, the big move for EUR/USD is doing his job and all versions are doing extremely well, will wait this week....

cailou: I am testing single pair phantom too but in 30 min TF, it closed one basket but since then huge DD, presently at 10.92 %. I am not sure whether i am testing the correct single pair version. Can you give me the right link for download? Thanks

Hi Navk,

With Stoploss, TradingHours and Pipstep: I had tested version from post 998 and it works perfect for me.

With Stoploss, TradingHours, Pipstep, Totalmaxorders and Cutlosertrades: you must use version from post 1188. I only have tested this version for 2 hours, for now it works ok.

None of my single pair phantom doing well.
either not closing basket even after profit target or not opening trade properly
SO i stopped testing single pair phantom

Cailou.. my sincere request to you as you are inventor of 3 pair phantom..
Please do test art phantom light with pipstep for EU UC EC.

I have requested RoundRock to correct that EA.. If you can please please do it..

Regards
24hrs.

Hi 24Hrs,

Single_Pair_Phantom from post 998 works properly but anyway, you want to test Art_Phantom_Light with Pipstep for EUR, USD, CHF, with wich settings (MMTU, PP, Pipstep)?

Do you want me to test this version or to code this version? Maybe Roundrock is busy now, if tomorrow he can´t do it, I can try, I´m not a coder but I can try....

anybody who is saying a particular EA is not working, pl copy paste the logs from Experts tab. otherwise its impossible to fix the issues.

navk, always go to attachments and take the latest file if you are confused on what to take. just do a search on file name...

Round rock: This is the one i loaded. But not trading.

#property copyright "roundrock"
#property link ""

extern bool UseSmallestLot = false;
extern bool Email = false;

extern double MaxMarginToUse = 0.2; // Maximum percent of margin to commit to each trade.
extern double Lots = 0.1;
extern double ProfitPct = 0.1;
extern double MaxMiniProfit = 1000.0;
extern double MaxStdProfit = 10000.0;
extern int MiniSize = 10000;
extern int StdSize = 100000;
extern int Slippage = 3;
extern bool UseStopLoss = false;
extern double StopLoss = 300;
extern bool UseTradingHours = false;
extern int StartHour = 7;
extern int FinishHour = 15;
extern bool ShowComments = true;
extern int PipStep = 15;

extern int MagicNumber = 7783211;
int ExtCountedBars=0;
int ticketlong, ticketshort;
string ccy;
int tf;
double pnt;
int barsTotal = 0;
int barTime =0;
int prevbarTime =0;
double openHigh=0;
double openLow=0;
double phantomStartPrice=0;
bool NewBarFormed = false;
bool CloseAll;
bool SymbolMarksCleared = false;
int OrderSendResult;
int Leverage;
int NumBuys, NumSells;
int TotalTrades;
int AccountTypeVal;
bool AccountIsMini;
string CommentString;

double MaxLots;
double MinLots;
double UseLots, TotalLots, BuyLots, SellLots;
double EquityExit;
double PercentMarginLevel;
double DollarProfitTarget;
double MaxMarginVar;
double Investment;
string AccountTypeString;
double EAPL, BuyPL, SellPL;
double valLargestFloatingProfit;
string LastFlatBal; double valLastFlatBal;
string LastFlatEq; double valLastFlatEq;
string LowestMarginLevel; double valLowestMarginLevel=100000000.0;
string LargestFloatingLoss; double valLargestFloatingLoss=0.0;
string MaxFloatingDrawdown; double valMaxFloatingDrawdown=0.0;
datetime GMT;
int closeCount=1;
double Ticket_Array[];
string ticketNumberString="";
int orderCount=0;
int curHour =0;
int initialized=false;
int init()
{
SetGlobalVariableNames();
InitGlobalVars();
phantomStartPrice = iClose(NULL,0,0);
if ( Digits == 3 || Digits == 5 )
{
PipStep = PipStep*10;
StopLoss = StopLoss*10;
}
Print("^^^^^^^^^^^^^^^^ phantomStartPrice "+phantomStartPrice);

//---- indicators


//---- indicator buffers mapping


//---- initialization done
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
return(0);
}
void ClearSymbolMarks()
{
SymbolMarksCleared=true;
return(0);
}
//+------------------------------------------------------------------+
//| Set the lot size for any trades. |
//+------------------------------------------------------------------+
void SetLotSize()
{
Investment = MaxMarginToUse / 100.0;
// The symbol the EA is attached to should be good enough for the purposes of LOTSIZE
UseLots = valLastFlatEq * Investment * (Leverage / MarketInfo(Symbol(), MODE_LOTSIZE));

UseLots = StrToDouble(DoubleToStr(UseLots,2));

// Print("UseLots1 "+UseLots);
if (UseSmallestLot || UseLots < MinLots) {
UseLots = MinLots;
//Print("UseLots2 "+UseLots);
}
if (UseLots > MaxLots) {
UseLots = MaxLots;
//Print("UseLots3 "+UseLots);
}
return(0);
}
void GetAccountInfo()
{
// Get account leverage, account type.
Leverage = AccountLeverage();
AccountTypeVal = MarketInfo(Symbol(), MODE_LOTSIZE);
MaxLots = MarketInfo(Symbol(), MODE_MAXLOT);
MinLots = MarketInfo(Symbol(), MODE_MINLOT);
return(0);
}
//+------------------------------------------------------------------+
//| Add to winning trades. |
//+------------------------------------------------------------------+
void AddIfNeeded()
{

if (NewBarFormed == true &&
CloseAll == false && !SymbolMarksCleared)
{


if(!initialized) {
initialized=true;
return;
}

// orderCount=0;

string theSymbol=Symbol();
double point =MarketInfo(theSymbol,MODE_POINT);
int digits=MarketInfo(theSymbol,MODE_DIGITS);

// Print("phantomStartPrice "+phantomStartPrice+" close "+iClose(NULL,0,0)+" in profit "+AllSymbolTradesInProfit(theSymbol, OP_BUY) + " sell "+AllSymbolTradesInProfit(theSymbol, OP_SELL));

if (phantomStartPrice <= iClose(NULL,0,0) && AllSymbolTradesInProfit(theSymbol, OP_BUY))
{
double buySL = MarketInfo(theSymbol, MODE_ASK)-StopLoss*point;
// Comment("Adding a " + theSymbol + " buy trade..."+UseLots);
Print("Adding a " + theSymbol + " long.");
OrderSendResult = OrderSend(theSymbol,OP_BUY,UseLots,MarketInfo(theSymbol, MODE_ASK),
Slippage,0,0,"Single Pair Long",MagicNumber,Blue);
if (OrderSendResult > 0) {
orderCount=orderCount+1;
Print("Adding a " + theSymbol + " long. orderCount "+orderCount);
SymbolMarksCleared = true;
// int idx= ArraySize(Ticket_Array);
// Ticket_Array[idx]=OrderSendResult;
if(ticketNumberString==""){
ticketNumberString = OrderSendResult+" ";
}else{
ticketNumberString = ticketNumberString+OrderSendResult+" ";
}
}else{
Print("OrderSend failed with error #",GetLastError());
}
Sleep(1000);
if(UseStopLoss) {
int OrderSendResult1 = OrderModify(OrderSendResult,OrderOpenPrice(),NormalizeDouble(buySL, digits),0,0,Blue);
if(OrderSendResult1<=0){
Print("Stoploss OrderSend failed with error #",GetLastError());
}else{
Print(" OrderSendResult1 "+OrderSendResult1+" OrderSendResult "+OrderSendResult);
}
}
Sleep(1000);
}
else if (phantomStartPrice > iClose(NULL,0,0) && AllSymbolTradesInProfit(theSymbol, OP_SELL))
{
double sellSL = MarketInfo(theSymbol, MODE_BID)+StopLoss*point;
// Comment("Adding a " + theSymbol+ " sell trade...");
Print("Adding a " + theSymbol + " short.");
OrderSendResult = OrderSend(theSymbol,OP_SELL,UseLots,MarketInfo(theSymbol, MODE_BID),
Slippage,0,0,"Single Pair Short",MagicNumber,Red);
if (OrderSendResult > 0) {
orderCount=orderCount+1;
Print("Adding a " + theSymbol + " short. orderCount "+orderCount);
SymbolMarksCleared = true;
// idx= ArraySize(Ticket_Array);
// Ticket_Array[idx]=OrderSendResult;

if(ticketNumberString==""){
ticketNumberString = OrderSendResult+" ";
}else{
ticketNumberString = ticketNumberString+OrderSendResult+" ";
}
}else {
Print("OrderSend failed with error #",GetLastError());
}
Sleep(1000);
if(UseStopLoss){
int OrderSendResult2 = OrderModify(OrderSendResult,OrderOpenPrice(),NormalizeDouble(sellSL, digits),0,0,Red);
if(OrderSendResult2<=0){
Print("Stoploss OrderSend failed with error #",GetLastError());
}else{
Print(" OrderSendResult2 "+OrderSendResult2+" OrderSendResult "+OrderSendResult);
}
}
Sleep(1000);
}
}

return(0);
}

//+------------------------------------------------------------------+
//| Close all of the open trades. |
//+------------------------------------------------------------------+
void CloseAllTradesIfNeeded()
{
if (CloseAll && orderCount>0)
{

if (AccountEquity() > valLastFlatEq)
{
valLastFlatEq = AccountEquity();
//GlobalVariableSet(LastFlatEq, valLastFlatEq);
}
int orderCloseIdx=0;

if(orderCount>0){
Print("@@@@@@@@@@@@@@@@ Pop # "+closeCount+ " ...... OrdersTotal to close "+OrdersTotal()+" orderCount "+orderCount+" ticketNumberString"+ticketNumberString);
}
int startIdx=0;
string ticketNumber="";

for(int k=0;k<orderCount;k++){

int ticketIdx = StringFind( ticketNumberString, " ", startIdx) ;

if(ticketIdx <1){
Print("ticketNumberString "+ticketNumberString+" startIdx "+startIdx);
}

if(ticketIdx>-1){
ticketNumber = StringSubstr( ticketNumberString, startIdx, (ticketIdx-startIdx)) ;
Print("---- ticketNumber "+ticketNumber);

bool orderSelectResult = OrderSelect(StrToInteger(ticketNumber),SELECT_BY_TICKET,MODE_TRADES);

// bool orderSelectResult = OrderSelect(i,SELECT_BY_POS ,MODE_TRADES);


if(!orderSelectResult){
Print("OrderSelect returned the error of ",GetLastError());
}
// Print("---------------- MagicNumber "+OrderMagicNumber());
if (OrderMagicNumber() == MagicNumber)
{
// Print("---------------- OrderType "+OrderType());
if (OrderType() == OP_BUY)
{
Comment("In full closure mode. Closing a ", OrderSymbol(), " buy trade...");
Print("----------------- In full closure mode. Closing a ", OrderSymbol(), " buy trade...");
OrderClose(OrderTicket(),OrderLots(),MarketInfo(OrderSymbol(), MODE_BID),Slippage,White);
orderCloseIdx++;
Sleep(100);
}
else
if (OrderType() == OP_SELL)
{
Comment("In full closure mode. Closing a ", OrderSymbol(), " sell trade...");
Print("------------------In full closure mode. Closing a ", OrderSymbol(), " sell trade...");
OrderClose(OrderTicket(),OrderLots(),MarketInfo(OrderSymbol(), MODE_ASK),Slippage,White);
orderCloseIdx++;
Sleep(100);
}

}

}

startIdx = ticketIdx+1;

}


/*int orderTotal = OrdersTotal();

int orderSize = ArraySize(Ticket_Array);

for(int i = 0; i < orderTotal; i++)
// for(int i = 0; i < orderSize; i++)

{
Print("---------------- int i "+i + " orderTotal "+orderTotal );
bool orderSelectResult = OrderSelect(i,SELECT_BY_POS,MODE_TRADES);



// bool orderSelectResult = OrderSelect(i,SELECT_BY_POS ,MODE_TRADES);


if(!orderSelectResult){
Print("OrderSelect returned the error of ",GetLastError());
}
Print("---------------- MagicNumber "+OrderMagicNumber());
if (OrderMagicNumber() == MagicNumber)
{
Print("---------------- OrderType "+OrderType());
if (OrderType() == OP_BUY)
{
Comment("In full closure mode. Closing a ", OrderSymbol(), " buy trade...");
Print("----------------- In full closure mode. Closing a ", OrderSymbol(), " buy trade...");
OrderClose(OrderTicket(),OrderLots(),MarketInfo(OrderSymbol(), MODE_BID),Slippage,White);
orderCloseIdx++;
Sleep(10000);
}
else
if (OrderType() == OP_SELL)
{
Comment("In full closure mode. Closing a ", OrderSymbol(), " sell trade...");
Print("------------------In full closure mode. Closing a ", OrderSymbol(), " sell trade...");
OrderClose(OrderTicket(),OrderLots(),MarketInfo(OrderSymbol(), MODE_ASK),Slippage,White);
orderCloseIdx++;
Sleep(10000);
}
}

}*/

if(orderCloseIdx>0){
ticketNumberString="";
Print("------------------ Closed " +orderCloseIdx+ " trades ");

//Alert("Closing Full ...... ",TimeToStr(TimeCurrent(),TIME_SECONDS), " Time[0]=",TimeToStr(Time[0],TIME_SECONDS));
// if (Email) SendMail("DIBS", "Popped out");

}

orderCount=0;
closeCount=closeCount+1;


// OpenWelcomeTrades(Symbol()); // open next cycle welcome trades
phantomStartPrice = iClose(NULL,0,0);
Print("----------- resetting phantomStartPrice "+phantomStartPrice);
}


return(0);
}
//+------------------------------------------------------------------+
//| Return true if new bar is created |
//+------------------------------------------------------------------+
bool NewBar()
{



// // Print("iTime "+iTime(NULL, 0, 0));
// int curbar = TimeMinute(iTime(NULL, 0, 0));
// Print("curbar "+curbar +" period " +Period());

if(Bars > barsTotal )
{
barsTotal = Bars;

curHour = TimeHour(iTime(NULL, 0, 0));
//Print("curbar "+curbar );

// Print("New bar has been formed. "+curHour);

/* if(valLastFlatEq<AccountEquity()){
double currentDD = valLastFlatEq -AccountEquity();
double currentDDPct = (currentDD/AccountEquity())*100;
Print("<<<<<<<<<<< Current DD "+ DoubleToStr(currentDD,2)+" DD Percentage "+DoubleToStr(currentDDPct,2));
}
*/

// Print("valLastFlatEq "+valLastFlatEq +" AccountEquity "+AccountEquity()+" DollarProfitTarget "+DollarProfitTarget);


SymbolMarksCleared=false;
return(true);
}

return(false);


}
//+------------------------------------------------------------------+
//| Do some accounting -- count the profit/loss, the open trades, |
//| and the number of open lots. |
//+------------------------------------------------------------------+
void Count_PL_Trades_Lots()
{
NumBuys = 0;
NumSells = 0;
TotalTrades = 0;
EAPL = 0.0;
BuyPL = 0.0;
SellPL = 0.0;
TotalLots = 0.0;
BuyLots = 0.0;
SellLots = 0.0;

for (int i = 0; i < OrdersTotal(); i++)
{
OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
if (OrderMagicNumber() == MagicNumber)
{
int PairOverallPL = OrderProfit() + OrderSwap() + OrderCommission();
EAPL += PairOverallPL;
TotalLots += OrderLots();
if (OrderType() == OP_BUY)
{
BuyPL += PairOverallPL;
NumBuys++;
}
if (OrderType() == OP_SELL)
{
SellPL += PairOverallPL;
NumSells++;

}
}
}
TotalTrades = NumBuys+NumSells;
return(0);
}
//+------------------------------------------------------------------+
//| Keep track of lowest margin level and largest floating loss. |
//+------------------------------------------------------------------+
void ExamineMarginAndFloat()
{
if (AccountMargin() > 0.0)
{
PercentMarginLevel = StrToDouble(DoubleToStr(100 * AccountEquity() / AccountMargin(), 2));
if (PercentMarginLevel < valLowestMarginLevel)
{
valLowestMarginLevel = PercentMarginLevel;
}
}
if (EAPL < valLargestFloatingLoss)
{
valLargestFloatingLoss = StrToDouble(DoubleToStr(EAPL, 2));
}

if (EAPL > valLargestFloatingProfit)
{
valLargestFloatingProfit = StrToDouble(DoubleToStr(EAPL, 2));
}
if ((valLargestFloatingLoss / valLastFlatEq) * 100.0 < valMaxFloatingDrawdown)
{
valMaxFloatingDrawdown = StrToDouble(DoubleToStr((valLargestFloatingLoss / valLastFlatEq) * 100.0, 2));
}
return(0);
}
void RefreshGlobalVars()
{
/*valLowestMarginLevel = GlobalVariableGet(LowestMarginLevel);
valLargestFloatingLoss = GlobalVariableGet(LargestFloatingLoss);
valMaxFloatingDrawdown = GlobalVariableGet(MaxFloatingDrawdown);
valLastFlatBal = GlobalVariableGet(LastFlatBal);
valLastFlatEq = GlobalVariableGet(LastFlatEq);
*/

return(0);
}
//+------------------------------------------------------------------+
//| Check if all symbol trades in profit. |
//+------------------------------------------------------------------+
bool AllSymbolTradesInProfit(string theSymbol, int orderTypeI)
{
for (int j = 0; j < OrdersTotal(); j++)
{
OrderSelect(j,SELECT_BY_POS,MODE_TRADES);
/* if(OrderType()==orderTypeI && orderTypeI==OP_SELL)
Print("orderTypeI "+orderTypeI+ " op_sell "+OP_SELL + " open "+OrderOpenPrice() +" ask "+MarketInfo(OrderSymbol(),MODE_ASK) +
" diff "+ (OrderOpenPrice() - MarketInfo(OrderSymbol(),MODE_ASK))+" compare"+PipStep*MarketInfo(OrderSymbol(),MODE_POINT));
*/

if (OrderMagicNumber() == MagicNumber &&
OrderSymbol() == theSymbol && OrderType()==orderTypeI && orderTypeI==OP_BUY &&
((MarketInfo(OrderSymbol(),MODE_BID)-OrderOpenPrice())<PipStep*MarketInfo(OrderSymbol(),MODE_POINT)
|| OrderProfit() <= 0.0))
{
// Print("Not adding due to prev trades .........");
return(false);
}else if (OrderMagicNumber() == MagicNumber &&
OrderSymbol() == theSymbol && OrderType()==orderTypeI && orderTypeI==OP_SELL &&
( (OrderOpenPrice() - MarketInfo(OrderSymbol(),MODE_ASK))<PipStep*MarketInfo(OrderSymbol(),MODE_POINT)
|| OrderProfit() <= 0.0))
{
// Print("Not adding due to prev trades .........");
return(false);
}
}
return(true);
}

void OpenWelcomeTrades(string symbolToTrade){
Comment("Adding a welcome " + symbolToTrade + " buy trade...");
Print("Adding a welcome " + symbolToTrade + " long.");
OrderSendResult = OrderSend(symbolToTrade,OP_BUY,UseLots,MarketInfo(symbolToTrade, MODE_ASK),
Slippage,0,0,"Welcome Trade Long",MagicNumber,Blue);

if (OrderSendResult < 0) {
Print("Long OrderSend failed with error #",GetLastError());
}else{
if(ticketNumberString==""){
ticketNumberString = OrderSendResult+" ";
}else{
ticketNumberString = ticketNumberString+OrderSendResult+" ";
}
}

Sleep(1000);
Comment("Adding a welcome " + symbolToTrade + " sell trade...");
Print("Adding a welcome " + symbolToTrade + " short.");
OrderSendResult = OrderSend(symbolToTrade,OP_SELL,UseLots,MarketInfo(symbolToTrade, MODE_BID),
Slippage,0,0,"Welcome Trade Short",MagicNumber,Red);

if (OrderSendResult < 0) {
Print("Short OrderSend failed with error #",GetLastError());
}else{
if(ticketNumberString==""){
ticketNumberString = OrderSendResult+" ";
}else{
ticketNumberString = ticketNumberString+OrderSendResult+" ";
}

}
}

void SetAccountType()
{
if (AccountTypeVal == MiniSize || StringLen(Symbol()) == 7)
{
AccountIsMini = true;
AccountTypeString = "MINI";
}
else if (AccountTypeVal == StdSize || StringLen(Symbol()) == 6)
{
AccountIsMini = false;
AccountTypeString = "STANDARD";
}

return(0);
}
void SetExitTargets()
{
DollarProfitTarget = StrToDouble(DoubleToStr(valLastFlatEq*ProfitPct/100.0,2));

//Print("DollarProfitTarget "+DollarProfitTarget+" ProfitPct "+ProfitPct+" valLastFlatEq "+valLastFlatEq);
if (AccountIsMini)
{
if (DollarProfitTarget > MaxMiniProfit) DollarProfitTarget = MaxMiniProfit;
}
else
{
if (DollarProfitTarget > MaxStdProfit) DollarProfitTarget = MaxStdProfit;
}
return(0);
}
void SetGlobalVariableNames()
{
LowestMarginLevel = MagicNumber+"_LowestMarginLevel";
LargestFloatingLoss = MagicNumber+"_LargestFloatingLoss";
MaxFloatingDrawdown = MagicNumber+"_MaxFloatingDrawdown";
LastFlatBal = MagicNumber+"_LastFlatBal";
LastFlatEq = MagicNumber+"_LastFlatEq";
return(0);
}
void InitGlobalVars()
{
/*
if (!GlobalVariableCheck(LowestMarginLevel)) GlobalVariableSet(LowestMarginLevel, 100000000.0);
if (!GlobalVariableCheck(LargestFloatingLoss)) GlobalVariableSet(LargestFloatingLoss, 0.0);
if (!GlobalVariableCheck(MaxFloatingDrawdown)) GlobalVariableSet(MaxFloatingDrawdown, 0.0);
if (!GlobalVariableCheck(LastFlatBal)) GlobalVariableSet(LastFlatBal, AccountBalance());
if (!GlobalVariableCheck(LastFlatEq)) GlobalVariableSet(LastFlatEq, AccountEquity());
*/
valLastFlatEq = AccountEquity();
valLastFlatBal = AccountBalance();
// GlobalVariableSet(LastFlatEq, valLastFlatEq);

return(0);
}

int start()
{

RefreshGlobalVars();
GetAccountInfo();

SetAccountType();
SetLotSize();

SetExitTargets();
Count_PL_Trades_Lots();


NewBarFormed = NewBar();
CloseAllTradesIfNeeded();

ExamineMarginAndFloat();
// Sleep(3000);
// Print(" curHour "+curHour+"StartHour "+StartHour + " FinishHour "+FinishHour);
if(UseTradingHours) {
if(StartHour < curHour && FinishHour > curHour) {
AddIfNeeded();
}else{
phantomStartPrice = iClose(NULL,0,0);
}
} else if(!UseTradingHours){
AddIfNeeded();
}


if(valLastFlatEq<AccountEquity()){
double currentDD = valLastFlatEq -AccountEquity();
double currentDDPct = (currentDD/AccountEquity())*100;
// Comment("<<<<<<<<<<< Current DD "+ DoubleToStr(currentDD,2)+" DD Percentage "+DoubleToStr(currentDDPct,2));
}


if (TotalTrades == 0)
{
if (AccountBalance() > valLastFlatBal)
{
valLastFlatBal = AccountBalance();
// Print("valLastFlatBal "+valLastFlatBal+" AccountBalance() "+AccountBalance());
//GlobalVariableSet(LastFlatBal, valLastFlatBal);
}
// if (AccountEquity() > valLastFlatEq)
// {
// valLastFlatEq = AccountEquity();
// GlobalVariableSet(LastFlatEq, valLastFlatEq);
// }

CloseAll = false;
}

if (!CloseAll && valLastFlatEq != 0.0 && AccountEquity()-valLastFlatEq > DollarProfitTarget)
{
//Print("-------- CloseAll "+CloseAll );
CloseAll = true;
phantomStartPrice = iClose(NULL,0,0);
return(0);
}

if(ShowComments){
PrintChartComments();
}

}


//+------------------------------------------------------------------+
//| Print Info to Chart |
//+------------------------------------------------------------------+
void PrintChartComments()
{
CommentString =
"STRATEGY: When EA is loaded it takes the cuurent market price as the phantomStartPrice. If the prices moves up and all its," +
"nprevious long trades are in profit then it places a new long order. This happens at start of every new bar. Same thing on "+
"n short side. So this system can have both long and short trades on same pair at same time. Close all when current equity exceeds ProfitPct above last flat equity " +

"nnREMINDER: Be FLAT (all trades closed) before depositing/withdrawing funds." +
"nnAccount Type: " + AccountTypeString + " Account, Leverage: " + DoubleToStr(Leverage,0) + ":1" +
", Margin %: " + DoubleToStr(PercentMarginLevel,2) + "%, Lowest Margin %: " + DoubleToStr(valLowestMarginLevel,2) + "%" +
"nLargest Floating Loss: $" + DoubleToStr(valLargestFloatingLoss,2) + ", Max Floating Drawdown %: " + DoubleToStr(valMaxFloatingDrawdown,2) + "%" +
"nnBalance: $" + DoubleToStr(AccountBalance(),2) + ", Equity: $" + DoubleToStr(AccountEquity(),2) +
"nLast Flat Balance: $" + DoubleToStr(valLastFlatBal,2) + ", Last Flat Equity: $" + DoubleToStr(valLastFlatEq,2) +
"nnDollar Profit Target: $" + DoubleToStr(DollarProfitTarget,2) + ", Equity Profit Target: $" + DoubleToStr(valLastFlatEq+DollarProfitTarget,2) +
"nOpen Buys: " + DoubleToStr(NumBuys,0) + ", Open Sells: " + DoubleToStr(NumSells,0) + ", Total Open Trades: " + DoubleToStr(TotalTrades,0) +

"nnPhantom Start Price: $" + DoubleToStr(phantomStartPrice,4) +
"nn EA PL: $" + DoubleToStr(EAPL,2);


if (UseTradingHours){
if (StartHour < curHour && FinishHour > curHour )
CommentString = CommentString +
"nnnCURRENTLY INSIDE TRADING HOURS (Start: " + StartHour + " - Finish: " + FinishHour + ")";
else
CommentString = CommentString +
"nnnOUTSIDE OF TRADING HOURS (Start: " + StartHour + " - Finish: " + FinishHour + ")" +
"nI will not initiate a new set of trades, BUT I will continue with any existing set of trades.";
}
/*** the-game END (Added) ***/
Comment(CommentString);
return(0);
}

Me too testing ea from post 998 but sometimes it stop trading or opening trades very late.
Well I am testing AP full with pipstep for EU UJ EJ and its doing well. It has recover from minor dd after 3 day.. this is really gr8.
But I think there is more scope with EC UC EU... I am trying to do it with just replacing pairs from "Add wining pair" but it is not working well. Opens EC pairs only.
IF we will get that ea we can demo test simultaneously and compare results.

Regards,
24hrs

Ok, I will try this morning.....

I am testing the ones at post 998. The trading hours true or false?

Thanks.

False...

Hi 24hrs,

I have looked at the code for changing pairs to EURCHF, USDCHF and EURUSD but we have to change pairs from Phantom Sell Group to Phantom Buy Group and this is a difficult change for me. I can change pairs but not moving from one group to the other group.

I´m sorry but my coding skills are extremely limitated.

most of these EAs are copied from one EA, there is no externalization of pair names, its so tightly integrated with the code, its hard to do such modifications. i tried once last month, it took a lot of time. but the end result is original pairs are only doing better than my modified pairs.

so stick to the pairs

Caillou,

Would it be possible for you to provide a version of Art Phantom Light but trading at 45 minutes past the hour?

I am thinking that 2 versions of Art Phantom Light running on separate accounts could provide the action but without the DD experienced with the Art Phanton Full version.

This is a wonderful EA - I doth my cap to you sir.

Season's greetings go to all contributors to this thread

Done.

After a lot of versions tested, once again I changed my opinion (). Until today, the most interesting version of all Phantom EAs (just my opinion) is Phantom_AddSix_03bx_CLTHPS with these settings:

- 500:1
- MMTU: 0.4
- PP: 1.0
- TH: False
- PS: False (I´m not sure about the advantage of this setting on this version)
- CL: 2.0

The same settings as Frazerd unless PipStep.

I´m still interested in Single_Pair_Phantom version but for now only for testing modifications (like TH, PS, CL) because the more optimized gain and DD are, based on my results, for AddSix_03bx_CLTHPS version.

I´m not going to post results since it´s too early, but I recommend you to test it, the results will leave you speechless.....

Caillou,

Would it be possible for you to provide a version of Art Phantom Light but trading at 45 minutes past the hour?



Nicastro,

Very interesting idea. Thanks Caillou for the EA. Will test it.

Cheers

Thanks Caillou. You are a star!

I have not tested it, please do it in order to be sure it works as you want.