Замечания по MoveObject !

[Forex Trader]

Замечания по MoveObject !
// 1 - при первом выводе с цветом все нормально, но при следующем тике цвет берется черт знает откуда ... ?
// 2 - посмотрите внимательно как работает этот кусок.
// - Слово BOL, которое должно исчезать например тогда когда bid поднимается над полосой Болинджера не убирается !
// - Например в ситуации : когда низ предыдущего бара ниже полосы Болинджера, а текущий бар (его низ) уже выше полосы Болинджера почему то слово BOL перползает на него !!!
// - есть и другие замечания но потом ...

var : BOL_min("BOL");
var : BOL_max("BOL");
Define : BOL_per(12);
Define : BOL_sdvig(2); // Возьмем поменьше для примера
var : BOL_low(0),BOL_high(0);
var : z(0);
var : f_sdvig(0);
f_sdvig=10*point;
if z=0 then
{
SetObjectText("bolmax",bol_max,"Courier New",10,Gold);
SetObjectText("bolmin",bol_min,"Courier New",10,Gold);
z=1;
};
/-----------------------------------------------------------
BOL_low=iBANDS(BOL_per,BOL_sdvig,MODE_LOW,0);
BOL_high=iBANDS(BOL_per,BOL_sdvig,MODE_HIGH,0);
If bid<BOL_low then
{
MoveObject("bolmin",OBJ_TEXT,CurTime,l0-f_sdvig/2,CurTime,l0-f_sdvig/2);
blt=CurTime;
blp=l0-f_sdvig/2;
}
else
{
DelObject("bolmin",blt,blp,blt,blp);
SetObjectText("bolmin",bol_min,"Courier New",10,Gold);
};
If ask>BOL_High then
{
MoveObject("bolmax",OBJ_TEXT,CurTime,h0+f_sdvig,CurTime,h0+f_sdvig);
bht=CurTime;
blp=h0+f_sdvig;
}
else
{
DelObject("bolmax",bht,bhp,bht,bhp);
SetObjectText("bolmax",bol_max,"Courier New",10,Gold);
};
//-------------------------------------------------
BOL_low=iBANDS(BOL_per,BOL_sdvig,MODE_LOW,1);
BOL_high=iBANDS(BOL_per,BOL_sdvig,MODE_HIGH,1);
If l[1]<BOL_low Then
{
SetArrow(time[1],l1-f_sdvig/2,225,Ivory);
};
If h[1]>BOL_High Then
{
SetArrow(time[1],h1+f_sdvig,226,Ivory);
};