// ******************************************************************
// п/п счета сигнатуры по записи BUF длиной N
// sign - начальное значение сигнатуры
// возвращает новое значение сигнатуры
// ******************************************************************
int signatura(int sign, char *B, int N)
  {
  int i,j;
  char c;
  for( i=0; i<N; i++ )
    {
    c=B;
    if ( c>='\0' && c<=' ' ) continue;
    for(j=0; j<8; j++)
      {
      asm push ax
      asm mov  ax,sign
      asm test ax,1001000000001000b
      asm mov  al,c
      asm jpe  metka1
      asm xor  al,1
      metka1:
      asm ror  al,1
      asm mov  c,al
      asm mov  ax,sign
      asm rcl  ax,1
      asm mov  sign,ax
      asm pop  ax
      };
    };
  return(sign);
  };

/*   set(drvname, drv, dsk);  */
   errs=0;
   drive=drvname-'A';
   head=HEAD;
   ptr3= (dsk == 0) ? bufer360 : (dsk == 1) ? bufer720 :
    (dsk == 2) ? bufer12 : bufer144;
   track= (dsk == 0) ? TRACK1 : TRACK2;
   _asm
      {
      push ds
      lds  bx,ptr2
      inc bx
      inc bx
      inc bx
      mov [bx],2h
      inc bx
      mov [bx],12h
      inc bx
      inc bx
      inc bx
      inc bx
      mov [bx],0h
      pop ds
      }