if( PP[0]== +1&&TSLM[0]==0) // Target is absent
{if(TBLM[0]>=1)REMO(BLM[0][0]);
Sleep(1000);SPOS();if(PP[0]== +1)
{if(BF==0&&TREN==YES)
{TCKV[0]=SymbolInfoDouble(TCKR[0],SYMBOL_TRADE_TICK_VALUE);
//TRPP= (CMMS-CHPR(ID[0]))/(TCKV[0]*LT[0]) ;
TRPP=MathCeil((CMMS-CHPR(ID[0]))/(TCKV[0]*LT[0]));
//TRG=NRDT(OP[0] + TCKS[0]*(TRPP+0.5)+RNG*TRML,DIGT[0]);
TRG=NRDT(OP[0] + TCKS[0]* TRPP +RNG*TRML,DIGT[0]);
ocom="Trg"+FIN0(PT-1,2)+"_"+DoubleToString(LT[0],2);
}
//else TRG=NRDT(OP[0]+POIN[0]*(BEPP+0.5),DIGT[0]);
else
if(BF==1) // !!! obliged
{TCKV[0]=SymbolInfoDouble(TCKR[0],SYMBOL_TRADE_TICK_VALUE);
//BEPP= (CMMS-CHPR(ID[0]))/(TCKV[0]*LT[0]) ;
BEPP=MathCeil((CMMS-CHPR(ID[0]))/(TCKV[0]*LT[0]));
//TRG=NRDT(OP[0] + TCKS[0]*(BEPP+0.5) ,DIGT[0]);
TRG=NRDT(OP[0] + TCKS[0]* BEPP ,DIGT[0]);
ocom="BE_"+FIN0(PT-1,2)+"_"+DoubleToString(LT[0],2);
}
if(BF==1||TREN==YES) // !!! obliged
{s=SSLM(MAGIC,LT[0],TRG,0,0,ocom);
}
}
}else
//if( PP[0]== -1&&TBLM[0]==0) // Target is absent
//if(TREN==YES&&PP[0]== -1&&TBLM[0]==0) // Target is absent
if( PP[0]== -1&&TBLM[0]==0) // Target is absent
{if(TSLM[0]>=1)REMO(SLM[0][0]);
Sleep(1000);SPOS();if(PP[0]== -1)
{if(BF==0&&TREN==YES)
{TCKV[0]=SymbolInfoDouble(TCKR[0],SYMBOL_TRADE_TICK_VALUE);
//TRPP= (CMMS-CHPR(ID[0]))/(TCKV[0]*LT[0]) ;
TRPP=MathCeil((CMMS-CHPR(ID[0]))/(TCKV[0]*LT[0]));
//TRG=NRDT(OP[0] - TCKS[0]*(TRPP+0.5)-RNG*TRML,DIGT[0]);
TRG=NRDT(OP[0] - TCKS[0]* TRPP -RNG*TRML,DIGT[0]);
ocom="Trg"+FIN0(PT-1,2)+"_"+DoubleToString(LT[0],2);
}
//else TRG=NRDT(OP[0]-POIN[0]*(BEPP+0.5),DIGT[0]);
else
if(BF==1) // !!! obliged
{TCKV[0]=SymbolInfoDouble(TCKR[0],SYMBOL_TRADE_TICK_VALUE);
//BEPP= (CMMS-CHPR(ID[0]))/(TCKV[0]*LT[0]) ;
BEPP=MathCeil((CMMS-CHPR(ID[0]))/(TCKV[0]*LT[0]));
//TRG=NRDT(OP[0] - TCKS[0]*(BEPP+0.5) ,DIGT[0]);
TRG=NRDT(OP[0] - TCKS[0]* BEPP ,DIGT[0]);
ocom="BE_"+FIN0(PT-1,2)+"_"+DoubleToString(LT[0],2);
}
if(BF==1||TREN==YES) // !!! obliged
{b=SBLM(MAGIC,LT[0],TRG,0,0,ocom);
}
}