Эмулятор PARIX для VISUAL STUDIO / OPUEM v.1.0 / Examples / Neighbours_test / neighbours

/*************************************************************************
 * OPUS MULTICLASTER EMULATOR v.1.0.																		 *
 * File: neighbours.cpp   																										 *
 * Date: 15.05.04																												 *
 * Author: Sergey Ivochkin (9351)																				 *
 * E-mail: sivsivsiv@mail.ru																						 *
 * Description: neighbours test.        																 *
 *************************************************************************/

#include <stdlib.h>
#include <stdio.h>
#include <conio.h>

#include "sys/root.h"
#include "message.h"

int main(int argc, char* argv[]) {

	int mpid = GET_ROOT() ->ProcRoot->MyProcID;
	int myx = GET_ROOT() ->ProcRoot->MyX;
	int myy = GET_ROOT() ->ProcRoot->MyY;
	int dimx = GET_ROOT() ->ProcRoot->DimX;
	int dimy = GET_ROOT() ->ProcRoot->DimY;

	int nup=-1, ndown=-1, nleft=-1, nright=-1;

	if	(myy+1<dimy) nup = (myy+1)*dimx+myx;
	if	(myx+1<dimx) nright = (myy)*dimx+(myx+1);
	if	(myy>0)				ndown	= (myy-1)*dimx+(myx);
	if	(myx>0)				nleft = (myy)*dimx+(myx-1);

	PrintProcMessage(mpid, "Proc number %d!\nNeighbours:\n up=%d, right=%d, down=%d, left=%d",
		mpid, nup, nright, ndown, nleft);
	
 	return 1;
}