long  ica010(short nv,char *a, char kod,long l1,long l2)
{
short   t=0,k;
long  j,lf,li,lx;
char  *nam,*cl,c;
FILE  *VECTOR;

if (a==NULL) return(0);
if ( l1>l2 )  return(0);    // обмен с файлом не возможен
if (kod!='m' && kod!='w') kod='r';
nam=file_name(t,nv);
cl=(char *) &lf;
if ((VECTOR = fopen(nam, "rb")) != NULL) {
	for (j = 0; j<4; j++)	*(cl + j) = getc(VECTOR);
	k = feof(VECTOR);
}
else k = 1;
if (k != 0 || kod == 'w')  lf = 0;
li = (lf<l2) ? lf : l2;  lx = (l2>lf) ? l2 : lf;

if (kod == 'r') {                        // считование файла 
	if (k != 0 || l1 >= lf || l2 <= 0)
	{
		if (VECTOR != NULL) fclose(VECTOR); return(0);
	}       // считование файла не возможно

	if (l1>0) fseek(VECTOR, l1, 1);
	for (j = l1; (j<li && feof(VECTOR) == 0); j++)
		*(a + j - l1) = getc(VECTOR);
	fclose(VECTOR); return(li - l1);
}     // конец считования файла

 static pasat0   stp;
if (ica010(0, (char *)&stp, 'r', 0l, (long)sizeof(stp)) == 0) { return; } 
	ic = stp.kcp;  // кол. сква.
	ip = stp.plp;  // кол. 

  typedef struct {
.....................................
.....................................
.....................................
    char   a10buf[3]; // резерв                                                    224
//========== Защита ===================
	char   zasita;           // признак защиты  1-защищена 0-не защищена           225
	char   zasita2;          // признак строгой защиты                             226
	char   parol_zas[14];    // пароль защиты                                      240
    char   name_hoz_mod[32]; // имя компа (хозяин модели)                          272
	char   name_admin[32];   // имя администратора                                 304
 short  burbs[4];     // 

//
}   pasat0;

*(a + j - l1) = getc(VECTOR);

*(a + j - l1) = getc(VECTOR);

 static pasat0   stp;
if (ica010(0, (char *)&stp, 'r', 0l, (long)sizeof(stp)) == 0) { return; } 

*(a + j - l1) = getc(VECTOR);

stp[i] = fs.ReadByte();

        static byte[] ica010(long l1, long l2)
        {
            // создаем объект BinaryFormatter
            BinaryFormatter formatter = new BinaryFormatter();
            byte[] bytePasat;

            using (FileStream fileStream = new FileStream(GLBnam, FileMode.Open))
            {
                fileStream.Seek(l1, SeekOrigin.Begin);
                bytePasat = new byte[l2];
                for (int i = 0; i < l2; i++)
                {
                    bytePasat[i] = (byte) fileStream.ReadByte();
                }
            }
            return bytePasat;
        }

        static void ByteArrayToNewPasat0(byte[] bytes)
        {
            GCHandle handle = GCHandle.Alloc(bytes, GCHandleType.Pinned);
            pasat = (Pasat0)Marshal.PtrToStructure(handle.AddrOfPinnedObject(), typeof(Pasat0));
            handle.Free();
        }

        static Pasat0 ByteArrayToStructure<Pasat0>(byte[] bytes) where Pasat0 : struct
        {
            GCHandle handle = GCHandle.Alloc(bytes, GCHandleType.Pinned);
            Pasat0 pasat = (Pasat0)Marshal.PtrToStructure(handle.AddrOfPinnedObject(), typeof(Pasat0));
            handle.Free();
            return pasat;
        }

        static void Main(string[] args)
        {
            string put = "Z:\\L_TN\\ALM\\";

            acatconfig_read(put);       // считывание файла acat.cnf
            Console.WriteLine(GLBnam);

            file_name(0, 0);
            Console.WriteLine(GLBnam);

            byte[] bytePasat = ica010((long) 0, (long)Marshal.SizeOf(pasat));
            Pasat0 pasatTest = ByteArrayToStructure<Pasat0>(bytePasat);

            Console.WriteLine("babac");
            Console.ReadKey();
        }

public char[] shu;