Курсы онлайн обучения 1С

Автор: admin, 02.12.2010 рубрики: Изучаем программирование

CCode==0)&&(ECB. InUse==0)) return 1;

else return 0; }

//Инициализация для приема

void InitGet () {

ECB. FragmentCnt=1;

ECB. ESRAddress=0;

ECB. Socket=0×5555;

ECB. Address=&IPX;

ECB. Size=sizeof (IPX);

}

//Получение пакета

int GetPack () {

union REGS inregs, outregs;

struct SREGS segregs;

InitGet ();

inregs. x.bx=0×0004;

segregs. es=_DS;

inregs. x.si=(unsigned)&ECB;

int86x (0x7a,&inregs,&outregs,&segregs);

while (ECB. InUse!=0)

{ if (kbhit ()) if (getch ()==27) exit (-1);

}

return 1; }

// соединение компов

void Soed () {

int temp, temp1;

randomize ();

IPX. data[0][0]=random (10000);

temp=IPX. data[0][0];

SendPack ();

outtextxy (10,40,"Установка соединения...");

GetPack ();

temp1=IPX. data[0][0];

if (temp1!=temp) {

priem=1;

cv_sv=12;

cv_pr=10;

sv=1;

pr=2; }

SendPack ();

outtextxy (10,55,"Соединение установлено");}

// ЗАГРУЗКА СЕТЕВЫХ ФУНКЦИЙ

int Loadnet () {

setcolor (15);

if (LoadDriverIPX ()==1){outtextxy (10,10,"Драйвер IPX загружен.");

getch ();}

else {

clearviewport ();

outtextxy (10,10,"Драйвер IPX не загружен. Игра по сети не возможна");

getch ();

closegraph ();

exit (1);

}

if (OpenSocket ()==0×00) {outtextxy (10,25,"Сокет открыт.");

getch ();}

else {

outtextxy (10,25,"Невозможно открыть сокет.

Связанные записи

• Нет связанных записей.