FIB
Tf 5min

var: openoggi(0), compressione(true), 
NonTerzileSup(true), NonTerzileInf(true);

NonTerzileSup = c of data2 < L of data2 + 0.66*(h of data2 - l of data2); 
NonTerzileInf = c of data2 > H of data2 - 0.66*(h of data2 - l of data2); 
compressione = (h of data2 - l of data2) < (h[1] of data2 - l[1] of data2);
If date<>date[1] then openoggi=o; 

setstoploss(1000);

//BIAS LONG OVERNIGHT
if t=1700 
and c > openoggi {c of data2} 
and  NonTerzileSup 
//and c > average(c of data2, 200)
and (month(date)<5 or month(date)>8)
then buy next bar at market;

//Uscita da Long
If (t=905 or date<>date[1]) then sell next bar at market;

//BIAS SHORT INTRADAY
If NonTerzileInf
//If compressione
And month(date)<>4
then 
begin
	If dayofweek(date)=1 and t=915 then sellshort next bar at market;
	//If dayofweek(date)=2 and t=915 then sellshort next bar at market;
	//If dayofweek(date)=4 and t=1100 then sellshort next bar at market;
	If dayofweek(date)=5 and t=905 then sellshort next bar at market;
end;

//Uscita da Short 
if dayofweek(date)=1 and t=1700 then buytocover next bar at market;
//if dayofweek(date)=2 and t=1115 then buytocover next bar at market;
//if dayofweek(date)=4 and t=1700 then buytocover next bar at market;
if dayofweek(date)=5 and t=1700 then buytocover next bar at market;
If marketposition=-1 then setexitonclose;