New Zorro version 2.30

[size:8pt]function stp(var entStp) {
	
	print(TO_LOG,"\n in tmf: %s, high = %.5f, close = %.5f", strdate(HMS,wdate(0) ), priceHigh(0), priceClose(0) ); 
 
   if (TradeIsPending)
   {
	  if (TradeIsLong) 
		if (priceHigh(0)>priceOpen(0)+entStp )   // or priceClose(0)>
		{
			print(TO_LOG,"\n ---- long Entry Stop is hit!----open=%.5f, high=%.5f  close=%.5f  entStp=%.5f", priceOpen(0), priceHigh(0), priceClose(0), priceOpen(0)+entStp);
			
			return 2;
		} 
   }
  
  return 4;
  
}


function run()
{
	set(LOGFILE, TICKS);
		   
	Verbose = 3;
	
	Spread=Slippage = 0;
	
	BarPeriod = 60; 
		
	StartDate = 2019; //2015
	EndDate   = 2020;//0424; 
	
	
	asset("EUR/USD");
	
	var atr = ATR(24);
	
	LifeTime=1;
	
	Entry = 1.5*atr;
	
	enterLong(stp,0.5*atr);
	
}	[/size] 

for(all_trades) 
		{
			var vResult = toPIP(TradeResult);
			var vMAE = TradeMAE/PIP/vStep;
			int n = floor(vMAE);
			plotBar("Profit",n,n*vStep,0,AVG|BARS|LBL2,COLOR_PROFIT);
			if(vResult > 0)
				plotGraph("Win",vMAE,vResult,DOT,GREEN);
			else
				plotGraph("Loss",vMAE,vResult,DOT,RED);
		}

if ( (NumWinTotal+NumLossTotal)==30 )
	{
	var NumWins = results(1+24,30);	// Number of winning and won trades
	var NumLosses = results(1+4+24,30);	// Number of losing and lost trades

	var pipWins = results(2+24,30)/PIP;	   // Total win in pips
	var pipLosses = results(2+4+24,30)/PIP;	// /PIPTotal loss in pips
		
	print(TO_LOG,"\n NumWins=%i, NumLosses=%i, resNumWins=%.0f, resNumLosses=%.0f, pipWins=%.2f, pipLosses=%.2f", NumWinTotal,NumLossTotal,NumWins,NumLosses,pipWins,pipLosses);
		
	}

#include <profile.c>

function run()
{
	set(LOGFILE);
	set(PEEK);
   	
	BarPeriod = 60; 
		
	StartDate = 2019; 
	EndDate   = 2020;
		
	if (true) {
		var ibs=IBS();
		
		var st = 0.05;
		var Ret = (priceClose(-1)-priceClose(0));
		var Bin = floor(ibs /st) ;  

		plotBar(Asset, Bin , st*(Bin),Ret,AVG+LINE+NEW,GREEN);//
	}
	 else
		 plotDay(priceClose(0),0);
	
}

function stp(var entStp, var entT) {
	
	print(TO_LOG,"\n in tmf: %s, high = %.5f, close = %.5f", strdate(HMS,wdate(0) ), priceHigh(0), priceClose(0) ); 
 
        watch("#entT=",strdate(HMS,entT));
 
       return 4; //or 0  
}

function run()
{
	set(LOGFILE, TICKS);
		   
	Verbose = 3;
	
	Spread=Slippage = 0;
	
	BarPeriod = 60; 
		
	StartDate = 2020; 
	EndDate   = 2020;		
			
watch("#wdate=",strdate(HMS,wdate(0)));	

	enterLong(stp,10*PIP,wdate(0));		
} 

function run(){
	
	set(PLOTNOW);
		
	StartDate = 20190201; 
	EndDate   = 2020;
	
	BarPeriod = 60;

	var K=ifelse(!(Bar%120),1,0);
	
	plot("WHL",K,BARS+NEW,RED);	
}

function run(){
	if(is(INITRUN)) NumCores = -1;
	set(PARAMETERS+LOGFILE+PLOTNOW); //+PLOTNOW
	#ifdef USE_MONEY_MANAGEMENT
	set(PARAMETERS+FACTORS+LOGFILE);
	Capital = 2000;
	#endif
	if(Train){
		StartDate = 20190202;
		EndDate = 20200802;
		NumWFOCycles = 3;
        ...