Лабораторная работа №1 (990535), страница 5
Текст из файла (страница 5)
{
return 1;
}
// this->flgStep = true;
return 0;
}
//---------------------------------------------------------------------------
//Функция "Движение по курсу"
int Ship :: __ShpMove(int int_StepX, int int_StepY)
{
if(this->int_Status != 0)
return 1;
switch(int_Direction)
{
case 0:
{
this->__ShpStep(0,int_StepY);
break;
}
case 1:
{
this->__ShpStep(0,-int_StepY);
break;
}
case 2:
{
this->__ShpStep(int_StepX,0);
break;
}
case 3:
{
this->__ShpStep(-int_StepX,0);
break;
}
}
return 0;
}
//---------------------------------------------------------------------------
//Функция "Швартовка"
int Ship :: __ShpDock(int int_StepX, int int_StepY, int int_DestinationX, int int_DestinationY, int int_DestinationW, int int_DestinationH)
{
int int_x1 = int_DestinationX - 30;
int int_y1 = int_DestinationY - 30;
int int_x2 = int_DestinationX + int_DestinationW;
int int_y2 = int_DestinationY + int_DestinationH;
int int_DockX;
int int_DockY;
if(this->int_Status != 1)
return 1;
//Первая четверть
if(this->GetX() >= int_x2 && this->GetY() < int_y2)
{
int_DockX = int_x2;
int_DockY = int_DestinationY + (int_DestinationH - this->Height)/2;
//x > X, y < Y
if(this->GetX() > int_DockX && this->GetY() < int_DockY)
{
this->__ShpStep(-int_StepX, int_StepY);
return 0;
}
//x = X, y < Y
else if(this->GetX() == int_DockX && this->GetY() < int_DockY)
{
this->__ShpStep(0, int_StepY);
return 0;
}
//x > X, y = Y
else if(this->GetX() > int_DockX && this->GetY() == int_DockY)
{
this->__ShpStep(-int_StepX, 0);
return 0;
}
//x > X, y > Y
else if(this->GetX() > int_DockX && this->GetY() > int_DockY)
{
this->__ShpStep(-int_StepX, -int_StepY);
return 0;
}
//x = X, y > Y
else if(this->GetX() == int_DockX && this->GetY() > int_DockY)
{
this->__ShpStep(0, -int_StepY);
return 0;
}
//x = X, y = Y
else if(this->GetX() == int_DockX && this->GetY() == int_DockY)
{
this->flgDock = true;
this->int_Direction = 0;
if(this->int_Mission == 0)
this->Picture->LoadFromFile("ArPos7.bmp");
else if(this->int_Mission == 1)
this->Picture->LoadFromFile("ArPosRed7.bmp");
return 1;
}
}
//Вторая четверть
else if(this->GetX() < int_x2 && this->GetY() <= int_y1)
{
int_DockX = int_DestinationX + (int_DestinationW - this->Width)/2;
int_DockY = int_y1;
//x < X, y < Y
if(this->GetX() < int_DockX && this->GetY() < int_DockY)
{
this->__ShpStep(int_StepX, int_StepY);
return 0;
}
//x = X, y < Y
else if(this->GetX() == int_DockX && this->GetY() < int_DockY)
{
this->__ShpStep(0, int_StepY);
return 0;
}
//x < X, y = Y
else if(this->GetX() < int_DockX && this->GetY() == int_DockY)
{
this->__ShpStep(int_StepX, 0);
return 0;
}
//x > X, y < Y
else if(this->GetX() > int_DockX && this->GetY() < int_DockY)
{
this->__ShpStep(-int_StepX, int_StepY);
return 0;
}
//x > X, y = Y
else if(this->GetX() > int_DockX && this->GetY() == int_DockY)
{
this->__ShpStep(-int_StepX, 0);
return 0;
}
//x = X, y = Y
else if(this->GetX() == int_DockX && this->GetY() == int_DockY)
{
this->flgDock = true;
this->int_Direction = 2;
if(this->int_Mission == 0)
this->Picture->LoadFromFile("ArPos5.bmp");
else if(this->int_Mission == 1)
this->Picture->LoadFromFile("ArPosRed5.bmp");
return 1;
}
}
//Третья четверть
else if(this->GetX() <= int_x1 && this->GetY() > int_y1)
{
int_DockX = int_x1;
int_DockY = int_DestinationY + (int_DestinationH - this->Height)/2;
//x < X, y > y
if(this->GetX() < int_DockX && this->GetY() > int_DockY)
{
this->__ShpStep(int_StepX, -int_StepY);
return 0;
}
//x = X, y > Y
else if(this->GetX() == int_DockX && this->GetY() > int_DockY)
{
this->__ShpStep(0, -int_StepY);
return 0;
}
//x < X, y = Y
else if(this->GetX() < int_DockX && this->GetY() == int_DockY)
{
this->__ShpStep(int_StepX, 0);
return 0;
}
//x < X, y < Y
else if(this->GetX() < int_DockX && this->GetY() < int_DockY)
{
this->__ShpStep(int_StepX, int_StepY);
return 0;
}
//x = X, y < Y
else if(this->GetX() == int_DockX && this->GetY() < int_DockY)
{
this->__ShpStep(0, int_StepY);
return 0;
}
//x = X, y = Y
else if(this->GetX() == int_DockX && this->GetY() == int_DockY)
{
this->flgDock = true;
this->int_Direction = 1;
if(this->int_Mission == 0)
this->Picture->LoadFromFile("ArPos3.bmp");
else if(this->int_Mission == 1)
this->Picture->LoadFromFile("ArPosRed3.bmp");
return 1;
}
}
//Четвертая четверть
else if(this->GetX() > int_x1 && this->GetY() >= int_y2)
{
int_DockX = int_DestinationX + (int_DestinationW - this->Width)/2;
int_DockY = int_y2;
//x > X, y > Y
if(this->GetX() > int_DockX && this->GetY() > int_DockY)
{
this->__ShpStep(-int_StepX, -int_StepY);
return 0;
}
//x = X, y > Y
else if(this->GetX() == int_DockX && this->GetY() > int_DockY)
{
this->__ShpStep(0, -int_StepY);
return 0;
}
//x > X, y = Y
else if(this->GetX() > int_DockX && this->GetY() == int_DockY)
{
this->__ShpStep(-int_StepX, 0);
return 0;
}
//x < X, y > Y
else if(this->GetX() < int_DockX && this->GetY() > int_DockY)
{
this->__ShpStep(int_StepX, -int_StepY);
return 0;
}
//x < X, y = Y
else if(this->GetX() < int_DockX && this->GetY() == int_DockY)
{
this->__ShpStep(int_StepY, 0);
return 0;
}
//x = X, y = Y
else if(this->GetX() == int_DockX && this->GetY() == int_DockY)
{
this->flgDock = true;
this->int_Direction = 3;
if(this->int_Mission == 0)
this->Picture->LoadFromFile("ArPos1.bmp");
else if(this->int_Mission == 1)
this->Picture->LoadFromFile("ArPosRed1.bmp");
return 1;
}
}
return 0;
}
//---------------------------------------------------------------------------
//Функция "Разгрузка"
int Ship :: __ShpUnload(int int_Time)
{
if(this->int_Status != 2)
return 1;
if(!tmr_Time->Enabled && !flgTmr)
{
this->tmr_Time->Interval = int_Time;
this->tmr_Time->Enabled = true;
return 1;
}
else if(!tmr_Time->Enabled && flgTmr)
{
this->SetStatus(0);
flgTmr = false;
return 0;
}
else if(tmr_Time->Enabled)
{
return 1;
}
return 1;
}
//---------------------------------------------------------------------------
//Функция возвращает состояние действия корабля
int Ship :: GetStatus()
{
return this->int_Status;
}
//---------------------------------------------------------------------------
//Принудительное изменение состояния действия корабля
int Ship :: SetStatus(int int_NewStatus)
{
try
{
this->int_Status = int_NewStatus;
}
catch(...)
{
return 1;
}
return 0;
}
//---------------------------------------------------------------------------
//Функция возвращает состояние груза корабля
int Ship :: GetLoad()
{
return this->int_Load;
}
//---------------------------------------------------------------------------
//Принудительное изменение состояния груза корабля
int Ship :: SetLoad(int int_NewLoad)
{
try
{
this->int_Load = int_NewLoad;
}
catch(...)
{
return 1;
}
return 0;
}
//---------------------------------------------------------------------------
//Функция возвращает назначение корабля
int Ship :: GetMission()
{
return this->int_Mission;
}
//---------------------------------------------------------------------------
//Функция возвращает направление движения корабля
int Ship :: GetDirection()
{
return this->int_Direction;
}
//---------------------------------------------------------------------------
//Принудительное изменение направления движения корабля
int Ship :: SetDirection(int int_NewDirectin)
{
try
{
this->int_Direction = int_NewDirectin;
}
catch(...)
{
return 1;
}
return 0;
}
//---------------------------------------------------------------------------
//Принудительное изменение родительского объекта
int Ship :: SetOwner(TWinControl* AOwner)
{
try
{
this->Parent = AOwner;
}
catch(...)
{
return 1;
}
return 0;
}
//---------------------------------------------------------------------------
//Функция возвращает координату X
int Ship :: GetX()
{
return Left;
}
//---------------------------------------------------------------------------
//Функция возвращает координату Y
int Ship :: GetY()
{
return Top;
}
//---------------------------------------------------------------------------
//Функция устанаваливает координату X
int Ship :: SetX(int int_NewX)
{
try
{
this->Left = int_NewX;
}
catch(...)
{
return 1;
}
return 0;
}
//---------------------------------------------------------------------------
//Функция устанаваливает координату Y
int Ship :: SetY(int int_NewY)
{
try
{
this->Top = int_NewY;
}
catch(...)
{
return 1;
}
return 0;
}
//---------------------------------------------------------------------------
//Обработчик события таймер
void __fastcall Ship :: tmr_TimeTimer(TObject *Sender)
{
this->tmr_Time->Enabled = false;
this->flgTmr = true;
}
//---------------------------------------------------------------------------
//Функция возвращает флаг хода
bool Ship :: GetFlgStep()
{
return this->flgStep;
}
//---------------------------------------------------------------------------
//Принудительное изменение флага хода
bool Ship :: SetFlgStep(bool NewFlgStep)
{
![](https://s.studizba.com/z.php?f=/templates/si/i/noavatar.png&w=100&h=100&t=1"){kind=avatar}
