Сообщение Проблема с работой потока от 11.04.2019 6:34
Изменено 11.04.2019 6:39 RussianFellow
Проблема с работой потока
У меня вызывается поток с помощью функции _beginthreadex. При этом потоковая функция при вызове _beginthreadex--MyThreadFunc. Эта функция MyThreadFunc вызывает функцию MyInnerThreadFunc, в которой и выполняются все действия.
При этом в функции MyInnerThreadFunc происходит проверка на значение переменной *threadflag. (Значения переменной *threadflag: 0--завершить вычисления (т.е. завершить выполнение потока), 1--делать вычисления (т.е. выполнять поток), 2--приостановить вычисления (т.е. приостановить выполнение потока) ).
Перед запуском потока переменной *threadflag было задано значение 1--выполнять поток. Но внутри функции MyInnerThreadFunc в одном из мест проверки значения переменной *threadflag оказывается, что это значение равно 0, хотя внешне поток ниоткуда не прерывался. И как следствие этого--происходит выход из функции MyInnerThreadFunc, завершение работы MyThreadFunc и завершение работы потока.
В чём причина этого? Как сделать так, чтобы значение переменной *threadflag не менялось внутри функции MyInnerThreadFunc, если внешне не было команды завершить поток?
Код:
При этом в функции MyInnerThreadFunc происходит проверка на значение переменной *threadflag. (Значения переменной *threadflag: 0--завершить вычисления (т.е. завершить выполнение потока), 1--делать вычисления (т.е. выполнять поток), 2--приостановить вычисления (т.е. приостановить выполнение потока) ).
Перед запуском потока переменной *threadflag было задано значение 1--выполнять поток. Но внутри функции MyInnerThreadFunc в одном из мест проверки значения переменной *threadflag оказывается, что это значение равно 0, хотя внешне поток ниоткуда не прерывался. И как следствие этого--происходит выход из функции MyInnerThreadFunc, завершение работы MyThreadFunc и завершение работы потока.
В чём причина этого? Как сделать так, чтобы значение переменной *threadflag не менялось внутри функции MyInnerThreadFunc, если внешне не было команды завершить поток?
Код:
typedef struct
{
volatile int threadflag;
bool isthreadfinished;
int sat;
long jt0;
long double tj0;
long double step;
long double timeinterval;
long double myu;
long double Hpi;
bool isFalled;
CMyListCtrl3 *pMyList;
CMyStatic *pStatic12;
CMyStatic2 *pStatic9;
CMyStatic *pStatic13;
CMyStatic2 *pStatic10;
CMyStatic3 *pStatic11;
CMyEdit *pEdit3;
CMyEdit *pEdit4;
} MyStruct;
class CCalcDialog : public CDialogEx
{
DECLARE_DYNAMIC(CCalcDialog)
public:
CCalcDialog(CWnd* pParent = NULL); // стандартный конструктор
virtual ~CCalcDialog();
// Данные диалогового окна
enum { IDD = IDD_CALCDIALOG };
protected:
virtual void DoDataExchange(CDataExchange* pDX); // поддержка DDX/DDV
DECLARE_MESSAGE_MAP()
public:
CEdit m_IDC_EDIT1;
CMyListCtrl m_IDC_LIST1;
CMyListCtrl m_IDC_LIST2;
CComboBox m_IDC_COMBO1;
CEdit m_IDC_EDIT2;
CMyListCtrl3 m_IDC_LIST3;
CMyEdit m_IDC_EDIT3;
CMyEdit m_IDC_EDIT4;
CButton m_IDC_BUTTON2;
CButton m_IDC_BUTTON3;
CButton m_IDC_BUTTON4;
CStatic m_IDC_STATIC1;
CMyStatic2 m_IDC_STATIC9;
CMyStatic2 m_IDC_STATIC10;
CStatic m_IDC_STATIC2;
CStatic m_IDC_STATIC4;
CStatic m_IDC_STATIC8;
CNUDialog *pNUDialog;
void setValues();
afx_msg void OnBnClickedButton1();
afx_msg void OnBnClickedButton3();
afx_msg void OnBnClickedButton4();
afx_msg void OnBnClickedButton2();
afx_msg void OnTimer(UINT);
CMyStatic m_IDC_STATIC12;
CMyStatic m_IDC_STATIC13;
CMyStatic3 m_IDC_STATIC11;
CComboBox m_IDC_COMBO2;
CMyButton2 m_IDC_BUTTON1;
DWORD groupboxstyle;
DWORD editstyle;
int calcflag;
HANDLE hThread;
unsigned int threadID;
bool timerTest;
int timerCount;
MyStruct myStruct;
bool isthreadfinished;
};
void CCalcDialog::OnBnClickedButton1()
// если была нажата кнопка "Рассчитать"
{
// TODO: добавьте свой код обработчика уведомлений
int n, length, coordsys, timescale, year, month, day, hour, minute, countline, tpiyear, tpimonth, tpiday, tpihour, tpiminute;
long jt, jt0, jt2, countline2;
long double x, y, z, vx, vy, vz, Sb, kappa, second, partDay, tj, tj0, tj2, timeinterval, step, curtime, myu, a, e, ild, Omega, w, M0, tpisecond, p, rpi, ralpha, u0,
lambda0, teta0, T, h, Hpi, Halpha, step2, deltat, difftime;
CString myString;
LPCTSTR pzText;
wchar_t wsyear[5], wsmonth[3], wsday[3], wshour[3], wsminute[3], wssecond[15], ws[80], ws2[80], Buffer[MAX_PATH*4];
T3DVector rv[2];
NewSatInit nst;
int sat;
bool isFalled;
MyStruct myStruct;
//MSG msg;
//gta beg
NU_SO nu; // НУ
BX_co faf; // Модель сил
LDouble per;
//gta end
// ...
sat = CreateSatellite(&nu, &faf);
//gta end
myStruct.sat = sat;
myStruct.jt0 = jt0;
myStruct.tj0 = tj0;
myStruct.step = step;
myStruct.timeinterval = timeinterval;
myStruct.myu = myu;
myStruct.Hpi = Hpi;
myStruct.isFalled = isFalled = false;
myStruct.pMyList = &m_IDC_LIST3;
myStruct.pStatic12 = &m_IDC_STATIC12;
myStruct.pStatic9 = &m_IDC_STATIC9;
myStruct.pStatic13 = &m_IDC_STATIC13;
myStruct.pStatic10 = &m_IDC_STATIC10;
myStruct.pStatic11 = &m_IDC_STATIC11;
myStruct.pEdit3 = &m_IDC_EDIT3;
myStruct.pEdit4 = &m_IDC_EDIT4;
myStruct.threadflag = 1;
myStruct.isthreadfinished = false;
if (!timerTest)
{
timerTest = true;
SetTimer(ID_TIMER_1,500,NULL);
}
hThread = (HANDLE)_beginthreadex(NULL,0,&MyThreadFunc,&myStruct,0,&threadID);
}
unsigned int __stdcall MyThreadFunc(void *pParam)
{
int countline, year, month, day, hour, minute, sat, tpiyear, tpimonth, tpiday, tpihour, tpiminute;
long jt, jt0, jt2;
long double tj, tj0, tj2, curtime, second, partDay, difftime, T, Hpi, Halpha, ild, Omega, w, step, timeinterval, myu, a, e, M0, tpisecond, p, rpi, ralpha, u0, lambda0, teta0, h;
bool isFalled;
wchar_t ws[40];
T3DVector rv[2];
DWORD dwWaitResult;
CMyListCtrl3 *pMyList;
CMyStatic *pStatic12;
CMyStatic2 *pStatic9;
CMyStatic *pStatic13;
CMyStatic2 *pStatic10;
CMyStatic3 *pStatic11;
CMyEdit *pEdit3;
CMyEdit *pEdit4;
MyStruct *pMyStruct = (MyStruct*)pParam;
volatile int *threadflag = &(pMyStruct->threadflag);
dwWaitResult = 100;
sat = pMyStruct->sat;
jt0 = pMyStruct->jt0;
tj0 = pMyStruct->tj0;
step = pMyStruct->step;
timeinterval = pMyStruct->timeinterval;
myu = pMyStruct->myu;
Hpi = pMyStruct->Hpi;
pMyList = pMyStruct->pMyList;
pStatic12 = pMyStruct->pStatic12;
pStatic9 = pMyStruct->pStatic9;
pStatic13 = pMyStruct->pStatic13;
pStatic10 = pMyStruct->pStatic10;
pStatic11 = pMyStruct->pStatic11;
pEdit3 = pMyStruct->pEdit3;
pEdit4 = pMyStruct->pEdit4;
bool *pisthreadfinished = &(pMyStruct->isthreadfinished);
MyInnerThreadFunc(sat,jt0,tj0,step,timeinterval,myu,Hpi,pMyList,pStatic12,pStatic9,pStatic13,pStatic10,pStatic11,pEdit3,pEdit4,threadflag);
*pisthreadfinished = true;
return 0;
}
void MyInnerThreadFunc(int sat, long jt0, long double tj0, long double step, long double timeinterval, long double myu, long double Hpi, CMyListCtrl3 *pMyList, CMyStatic *pStatic12,
CMyStatic2 *pStatic9, CMyStatic *pStatic13, CMyStatic2 *pStatic10, CMyStatic3 *pStatic11, CMyEdit *pEdit3, CMyEdit *pEdit4, volatile int *threadflag)
{
int countline, year, month, day, hour, minute, tpiyear, tpimonth, tpiday, tpihour, tpiminute;
long jt, jt2;
long double tj, tj2, curtime, second, partDay, difftime, T, Halpha, ild, Omega, w, a, e, M0, tpisecond, p, rpi, ralpha, u0, lambda0, teta0, h;
bool isFalled;
wchar_t ws[40];
T3DVector rv[2];
DWORD dwWaitResult;
jt = jt0;
tj = tj0;
countline = 0;
do
{
if (*threadflag==0)
// если была послана команда выйти из вычислений
{
// очистка памяти, если нужно;
return;
}
if (*threadflag==2)
// если была послана команда приостановить вычисления
{
// выдача значений в ControlPointDialog;
while (dwWaitResult!=WAIT_OBJECT_0)
{
dwWaitResult = WaitForSingleObject(myevent,1);
}
if (*threadflag==0)
{
// очистка памяти, если необходимо;
return;
}
dwWaitResult = 100;
}
if(Hpi > 1500)
Progn_Step_interface_1500(sat, jt, tj, step, rv, &jt2, &tj2);
else
Progn_Step_interface(sat, jt, tj, step, rv, &jt2, &tj2);
curtime = jt2 + tj2;
jt2 = (long)curtime;
tj2 = curtime - (long double)jt2;
if ((curtime-jt-tj)<step) isFalled = true;
JD(jt2,tj2,&year,&month,&day,&partDay);
partDay *= 86400.0;
hour = (int)(partDay / 3600.0);
partDay -= hour * 3600.0;
minute = (int)(partDay / 60.0);
second = partDay - minute * 60.0;
vecttoelem2full(rv[0].x,rv[0].y,rv[0].z,rv[1].x,rv[1].y,rv[1].z,year,month,day,hour,minute,second,myu,1,a,e,ild,w,Omega,M0,tpiyear,tpimonth,tpiday,tpihour,tpiminute,tpisecond,p,rpi,ralpha,u0,lambda0,teta0,T,h);
if (*threadflag==0)
// если была послана команда выйти из вычислений
{
// очистка памяти, если нужно;
return;
}
if (*threadflag==2)
// если была послана команда приостановить вычисления
{
// выдача значений в ControlPointDialog;
while (dwWaitResult!=WAIT_OBJECT_0)
{
dwWaitResult = WaitForSingleObject(myevent,1);
}
if (*threadflag==0)
{
// очистка памяти, если необходимо;
return;
}
dwWaitResult = 100;
}
if (countline>=12) pMyList->InsertItem(countline,L"");
if (isFalled==false)
swprintf(ws,39,L"%.4f",(countline+1)*step/365.25);
else
{
difftime = (countline*step+curtime-jt-tj)/365.25;
swprintf(ws,39,L"%.4f",(countline*step+curtime-jt-tj)/365.25);
}
pMyList->SetItemText(countline,0,ws); // dt полета (годы)
swprintf(ws,39,L"%d.%02d.%02d/%02d:%02d:%06.3f",year,month,day,hour,minute,second);
pMyList->SetItemText(countline,1,ws); // дата
T *= 24.0;
swprintf(ws,39,L"%f",T);
pMyList->SetItemText(countline,2,ws); // период T
Hpi = rpi - REarth/AE;
Hpi = Hpi * AE;
swprintf(ws,39,L"%f",Hpi);
pMyList->SetItemText(countline,3,ws); // Hpi
Halpha = ralpha - REarth/AE;
Halpha = Halpha * AE;
swprintf(ws,39,L"%f",Halpha);
pMyList->SetItemText(countline,4,ws); // Halpha
swprintf(ws,39,L"%f",ild/PI*180.0);
pMyList->SetItemText(countline,5,ws); // наклонение i
swprintf(ws,39,L"%f",Omega/PI*180.0);
pMyList->SetItemText(countline,6,ws); // долгота восходящего узла Omega
swprintf(ws,39,L"%f",w/PI*180.0);
pMyList->SetItemText(countline,7,ws); // аргумент перицентра w
pMyList->RedrawWindow();
countline++;
int nCount = pMyList->GetItemCount();
if (nCount>0) pMyList->EnsureVisible(nCount-1,FALSE);
pMyList->RedrawWindow();
if (*threadflag==0) // здесь значение *threadflag становится равным 0
// если была послана команда выйти из вычислений
{
// очистка памяти, если нужно;
return;
}
if (*threadflag==2)
// если была послана команда приостановить вычисления
{
// выдача значений в ControlPointDialog;
while (dwWaitResult!=WAIT_OBJECT_0)
{
dwWaitResult = WaitForSingleObject(myevent,1);
}
if (*threadflag==0)
{
// очистка памяти, если необходимо;
return;
}
dwWaitResult = 100;
}
jt = jt2;
tj = tj2;
} while ((jt+tj)<=(jt0+tj0+timeinterval-step) && Hpi > 80);
pMyList->lastLine = countline - 1;
if (isFalled==false)
AfxMessageBox(L"Расчёт на заданный интервал времени завершён.");
else
{
pStatic12->paintstyle = 1;
pStatic12->RedrawWindow();
pStatic9->RedrawWindow();
pStatic13->paintstyle = 1;
pStatic13->RedrawWindow();
pStatic10->RedrawWindow();
pStatic11->RedrawWindow();
swprintf(ws,40,L" %d.%02d.%02d/%02d:%02d:%06.3f ET",year,month,day,hour,minute,second);
pEdit3->paintstyle = 1;
pEdit3->RedrawWindow();
pEdit3->SetWindowText(ws); // дата схода с орбиты
swprintf(ws,40,L" %.6f",difftime);
pEdit4->paintstyle = 1;
pEdit4->RedrawWindow();
pEdit4->SetWindowText(ws); // время баллистического существования КО
pStatic9->paintstyle = 1;
pStatic9->RedrawWindow();
pStatic10->paintstyle = 1;
pStatic10->RedrawWindow();
pStatic11->paintstyle = 1;
pStatic11->RedrawWindow();
pMyList->paintstyle = 1;
pMyList->RedrawWindow();
AfxMessageBox(L"Расчёт параметров схода КО с орбиты\nи времени его баллистического существования завершён");
}
}
Проблема с работой потока
У меня вызывается поток с помощью функции _beginthreadex. При этом потоковая функция при вызове _beginthreadex--MyThreadFunc. Эта функция MyThreadFunc вызывает функцию MyInnerThreadFunc, в которой и выполняются все действия.
При этом в функции MyInnerThreadFunc происходит проверка на значение переменной *threadflag. (Значения переменной *threadflag: 0--завершить вычисления (т.е. завершить выполнение потока), 1--делать вычисления (т.е. выполнять поток), 2--приостановить вычисления (т.е. приостановить выполнение потока) ).
Перед запуском потока переменной *threadflag было задано значение 1--выполнять поток. Но внутри функции MyInnerThreadFunc в одном из мест проверки значения переменной *threadflag оказывается, что это значение равно 0, хотя внешне поток ниоткуда не прерывался. И как следствие этого--происходит выход из функции MyInnerThreadFunc, завершение работы MyThreadFunc и завершение работы потока.
В чём причина этого? Как сделать так, чтобы значение переменной *threadflag не менялось внутри функции MyInnerThreadFunc, если внешне не было команды завершить поток?
Код:
При этом в функции MyInnerThreadFunc происходит проверка на значение переменной *threadflag. (Значения переменной *threadflag: 0--завершить вычисления (т.е. завершить выполнение потока), 1--делать вычисления (т.е. выполнять поток), 2--приостановить вычисления (т.е. приостановить выполнение потока) ).
Перед запуском потока переменной *threadflag было задано значение 1--выполнять поток. Но внутри функции MyInnerThreadFunc в одном из мест проверки значения переменной *threadflag оказывается, что это значение равно 0, хотя внешне поток ниоткуда не прерывался. И как следствие этого--происходит выход из функции MyInnerThreadFunc, завершение работы MyThreadFunc и завершение работы потока.
В чём причина этого? Как сделать так, чтобы значение переменной *threadflag не менялось внутри функции MyInnerThreadFunc, если внешне не было команды завершить поток?
Код:
typedef struct
{
volatile int threadflag;
bool isthreadfinished;
int sat;
long jt0;
long double tj0;
long double step;
long double timeinterval;
long double myu;
long double Hpi;
bool isFalled;
CMyListCtrl3 *pMyList;
CMyStatic *pStatic12;
CMyStatic2 *pStatic9;
CMyStatic *pStatic13;
CMyStatic2 *pStatic10;
CMyStatic3 *pStatic11;
CMyEdit *pEdit3;
CMyEdit *pEdit4;
} MyStruct;
class CCalcDialog : public CDialogEx
{
DECLARE_DYNAMIC(CCalcDialog)
public:
CCalcDialog(CWnd* pParent = NULL); // стандартный конструктор
virtual ~CCalcDialog();
// Данные диалогового окна
enum { IDD = IDD_CALCDIALOG };
protected:
virtual void DoDataExchange(CDataExchange* pDX); // поддержка DDX/DDV
DECLARE_MESSAGE_MAP()
public:
CEdit m_IDC_EDIT1;
CMyListCtrl m_IDC_LIST1;
CMyListCtrl m_IDC_LIST2;
CComboBox m_IDC_COMBO1;
CEdit m_IDC_EDIT2;
CMyListCtrl3 m_IDC_LIST3;
CMyEdit m_IDC_EDIT3;
CMyEdit m_IDC_EDIT4;
CButton m_IDC_BUTTON2;
CButton m_IDC_BUTTON3;
CButton m_IDC_BUTTON4;
CStatic m_IDC_STATIC1;
CMyStatic2 m_IDC_STATIC9;
CMyStatic2 m_IDC_STATIC10;
CStatic m_IDC_STATIC2;
CStatic m_IDC_STATIC4;
CStatic m_IDC_STATIC8;
CNUDialog *pNUDialog;
void setValues();
afx_msg void OnBnClickedButton1();
afx_msg void OnBnClickedButton3();
afx_msg void OnBnClickedButton4();
afx_msg void OnBnClickedButton2();
afx_msg void OnTimer(UINT);
CMyStatic m_IDC_STATIC12;
CMyStatic m_IDC_STATIC13;
CMyStatic3 m_IDC_STATIC11;
CComboBox m_IDC_COMBO2;
CMyButton2 m_IDC_BUTTON1;
DWORD groupboxstyle;
DWORD editstyle;
int calcflag;
HANDLE hThread;
unsigned int threadID;
bool timerTest;
int timerCount;
MyStruct myStruct;
bool isthreadfinished;
};
void CCalcDialog::OnBnClickedButton1()
// если была нажата кнопка "Рассчитать"
{
// TODO: добавьте свой код обработчика уведомлений
int n, length, coordsys, timescale, year, month, day, hour, minute, countline, tpiyear, tpimonth, tpiday, tpihour, tpiminute;
long jt, jt0, jt2, countline2;
long double x, y, z, vx, vy, vz, Sb, kappa, second, partDay, tj, tj0, tj2, timeinterval, step, curtime, myu, a, e, ild, Omega, w, M0, tpisecond, p, rpi, ralpha, u0,
lambda0, teta0, T, h, Hpi, Halpha, step2, deltat, difftime;
CString myString;
LPCTSTR pzText;
wchar_t wsyear[5], wsmonth[3], wsday[3], wshour[3], wsminute[3], wssecond[15], ws[80], ws2[80], Buffer[MAX_PATH*4];
T3DVector rv[2];
NewSatInit nst;
int sat;
bool isFalled;
MyStruct myStruct;
//MSG msg;
//gta beg
NU_SO nu; // НУ
BX_co faf; // Модель сил
LDouble per;
//gta end
// ...
sat = CreateSatellite(&nu, &faf);
//gta end
myStruct.sat = sat;
myStruct.jt0 = jt0;
myStruct.tj0 = tj0;
myStruct.step = step;
myStruct.timeinterval = timeinterval;
myStruct.myu = myu;
myStruct.Hpi = Hpi;
myStruct.isFalled = isFalled = false;
myStruct.pMyList = &m_IDC_LIST3;
myStruct.pStatic12 = &m_IDC_STATIC12;
myStruct.pStatic9 = &m_IDC_STATIC9;
myStruct.pStatic13 = &m_IDC_STATIC13;
myStruct.pStatic10 = &m_IDC_STATIC10;
myStruct.pStatic11 = &m_IDC_STATIC11;
myStruct.pEdit3 = &m_IDC_EDIT3;
myStruct.pEdit4 = &m_IDC_EDIT4;
myStruct.threadflag = 1;
myStruct.isthreadfinished = false;
if (!timerTest)
{
timerTest = true;
SetTimer(ID_TIMER_1,500,NULL);
}
hThread = (HANDLE)_beginthreadex(NULL,0,&MyThreadFunc,&myStruct,0,&threadID);
}
unsigned int __stdcall MyThreadFunc(void *pParam)
{
int countline, year, month, day, hour, minute, sat, tpiyear, tpimonth, tpiday, tpihour, tpiminute;
long jt, jt0, jt2;
long double tj, tj0, tj2, curtime, second, partDay, difftime, T, Hpi, Halpha, ild, Omega, w, step, timeinterval, myu, a, e, M0, tpisecond, p, rpi, ralpha, u0, lambda0, teta0, h;
bool isFalled;
wchar_t ws[40];
T3DVector rv[2];
DWORD dwWaitResult;
CMyListCtrl3 *pMyList;
CMyStatic *pStatic12;
CMyStatic2 *pStatic9;
CMyStatic *pStatic13;
CMyStatic2 *pStatic10;
CMyStatic3 *pStatic11;
CMyEdit *pEdit3;
CMyEdit *pEdit4;
MyStruct *pMyStruct = (MyStruct*)pParam;
volatile int *threadflag = &(pMyStruct->threadflag);
dwWaitResult = 100;
sat = pMyStruct->sat;
jt0 = pMyStruct->jt0;
tj0 = pMyStruct->tj0;
step = pMyStruct->step;
timeinterval = pMyStruct->timeinterval;
myu = pMyStruct->myu;
Hpi = pMyStruct->Hpi;
pMyList = pMyStruct->pMyList;
pStatic12 = pMyStruct->pStatic12;
pStatic9 = pMyStruct->pStatic9;
pStatic13 = pMyStruct->pStatic13;
pStatic10 = pMyStruct->pStatic10;
pStatic11 = pMyStruct->pStatic11;
pEdit3 = pMyStruct->pEdit3;
pEdit4 = pMyStruct->pEdit4;
bool *pisthreadfinished = &(pMyStruct->isthreadfinished);
MyInnerThreadFunc(sat,jt0,tj0,step,timeinterval,myu,Hpi,pMyList,pStatic12,pStatic9,pStatic13,pStatic10,pStatic11,pEdit3,pEdit4,threadflag);
*pisthreadfinished = true;
return 0;
}
void MyInnerThreadFunc(int sat, long jt0, long double tj0, long double step, long double timeinterval, long double myu, long double Hpi, CMyListCtrl3 *pMyList, CMyStatic *pStatic12,
CMyStatic2 *pStatic9, CMyStatic *pStatic13, CMyStatic2 *pStatic10, CMyStatic3 *pStatic11, CMyEdit *pEdit3, CMyEdit *pEdit4, volatile int *threadflag)
{
int countline, year, month, day, hour, minute, tpiyear, tpimonth, tpiday, tpihour, tpiminute;
long jt, jt2;
long double tj, tj2, curtime, second, partDay, difftime, T, Halpha, ild, Omega, w, a, e, M0, tpisecond, p, rpi, ralpha, u0, lambda0, teta0, h;
bool isFalled;
wchar_t ws[40];
T3DVector rv[2];
DWORD dwWaitResult;
jt = jt0;
tj = tj0;
countline = 0;
do
{
if (*threadflag==0)
// если была послана команда выйти из вычислений
{
// очистка памяти, если нужно;
return;
}
if (*threadflag==2)
// если была послана команда приостановить вычисления
{
// выдача значений в ControlPointDialog;
while (dwWaitResult!=WAIT_OBJECT_0)
{
dwWaitResult = WaitForSingleObject(myevent,1);
}
if (*threadflag==0)
{
// очистка памяти, если необходимо;
return;
}
dwWaitResult = 100;
}
if(Hpi > 1500)
Progn_Step_interface_1500(sat, jt, tj, step, rv, &jt2, &tj2);
else
Progn_Step_interface(sat, jt, tj, step, rv, &jt2, &tj2);
curtime = jt2 + tj2;
jt2 = (long)curtime;
tj2 = curtime - (long double)jt2;
if ((curtime-jt-tj)<step) isFalled = true;
JD(jt2,tj2,&year,&month,&day,&partDay);
partDay *= 86400.0;
hour = (int)(partDay / 3600.0);
partDay -= hour * 3600.0;
minute = (int)(partDay / 60.0);
second = partDay - minute * 60.0;
vecttoelem2full(rv[0].x,rv[0].y,rv[0].z,rv[1].x,rv[1].y,rv[1].z,year,month,day,hour,minute,second,myu,1,a,e,ild,w,Omega,M0,tpiyear,tpimonth,tpiday,tpihour,tpiminute,tpisecond,p,rpi,ralpha,u0,lambda0,teta0,T,h);
if (*threadflag==0)
// если была послана команда выйти из вычислений
{
// очистка памяти, если нужно;
return;
}
if (*threadflag==2)
// если была послана команда приостановить вычисления
{
// выдача значений в ControlPointDialog;
while (dwWaitResult!=WAIT_OBJECT_0)
{
dwWaitResult = WaitForSingleObject(myevent,1);
}
if (*threadflag==0)
{
// очистка памяти, если необходимо;
return;
}
dwWaitResult = 100;
}
if (countline>=12) pMyList->InsertItem(countline,L"");
if (isFalled==false)
swprintf(ws,39,L"%.4f",(countline+1)*step/365.25);
else
{
difftime = (countline*step+curtime-jt-tj)/365.25;
swprintf(ws,39,L"%.4f",(countline*step+curtime-jt-tj)/365.25);
}
pMyList->SetItemText(countline,0,ws); // dt полета (годы)
swprintf(ws,39,L"%d.%02d.%02d/%02d:%02d:%06.3f",year,month,day,hour,minute,second);
pMyList->SetItemText(countline,1,ws); // дата
T *= 24.0;
swprintf(ws,39,L"%f",T);
pMyList->SetItemText(countline,2,ws); // период T
Hpi = rpi - REarth/AE;
Hpi = Hpi * AE;
swprintf(ws,39,L"%f",Hpi);
pMyList->SetItemText(countline,3,ws); // Hpi
Halpha = ralpha - REarth/AE;
Halpha = Halpha * AE;
swprintf(ws,39,L"%f",Halpha);
pMyList->SetItemText(countline,4,ws); // Halpha
swprintf(ws,39,L"%f",ild/PI*180.0);
pMyList->SetItemText(countline,5,ws); // наклонение i
swprintf(ws,39,L"%f",Omega/PI*180.0);
pMyList->SetItemText(countline,6,ws); // долгота восходящего узла Omega
swprintf(ws,39,L"%f",w/PI*180.0);
pMyList->SetItemText(countline,7,ws); // аргумент перицентра w
pMyList->RedrawWindow();
countline++;
int nCount = pMyList->GetItemCount();
if (nCount>0) pMyList->EnsureVisible(nCount-1,FALSE);
pMyList->RedrawWindow();
if (*threadflag==0) // здесь значение *threadflag становится равным 0
// если была послана команда выйти из вычислений
{
// очистка памяти, если нужно;
return; // и здесь происходит выход из функции
}
if (*threadflag==2)
// если была послана команда приостановить вычисления
{
// выдача значений в ControlPointDialog;
while (dwWaitResult!=WAIT_OBJECT_0)
{
dwWaitResult = WaitForSingleObject(myevent,1);
}
if (*threadflag==0)
{
// очистка памяти, если необходимо;
return;
}
dwWaitResult = 100;
}
jt = jt2;
tj = tj2;
} while ((jt+tj)<=(jt0+tj0+timeinterval-step) && Hpi > 80);
pMyList->lastLine = countline - 1;
if (isFalled==false)
AfxMessageBox(L"Расчёт на заданный интервал времени завершён.");
else
{
pStatic12->paintstyle = 1;
pStatic12->RedrawWindow();
pStatic9->RedrawWindow();
pStatic13->paintstyle = 1;
pStatic13->RedrawWindow();
pStatic10->RedrawWindow();
pStatic11->RedrawWindow();
swprintf(ws,40,L" %d.%02d.%02d/%02d:%02d:%06.3f ET",year,month,day,hour,minute,second);
pEdit3->paintstyle = 1;
pEdit3->RedrawWindow();
pEdit3->SetWindowText(ws); // дата схода с орбиты
swprintf(ws,40,L" %.6f",difftime);
pEdit4->paintstyle = 1;
pEdit4->RedrawWindow();
pEdit4->SetWindowText(ws); // время баллистического существования КО
pStatic9->paintstyle = 1;
pStatic9->RedrawWindow();
pStatic10->paintstyle = 1;
pStatic10->RedrawWindow();
pStatic11->paintstyle = 1;
pStatic11->RedrawWindow();
pMyList->paintstyle = 1;
pMyList->RedrawWindow();
AfxMessageBox(L"Расчёт параметров схода КО с орбиты\nи времени его баллистического существования завершён");
}
}