Переменые (ошибка) - C++ - Ответ 4359377

char buf[1000];
 int sum,i;
 command_pos=-1;
 data_delt=0; // если лента уходила в минус
 data_pos=0;
 command_col=0;
 Edit4->Text="";
 strcpy (buf,Memo1->Text.c_str());
 i=0;
 while(buf[i]!=0)
  {
   if((buf[i]=='<')||(buf[i]=='>')||(buf[i]=='0')||(buf[i]=='1')||(buf[i]=='S')||(buf[i]=='?'))
    {command_mass[command_col].com=buf[i];
     if(buf[i]=='?')
       {i++;
        for(sum=0;(buf[i]<='9')&&(buf[i]>='0');i++)
            sum=sum*10+buf[i]-'0';
        command_mass[command_col].r1=sum;
        if(buf[i]!=',')
         {ShowMessage((AnsiString)"Ошибка при разборе команты №"+command_col+"нет запятой");
          return;
         } i++;
        for(sum=0;(buf[i]<='9')&&(buf[i]>='0');i++)
            sum=sum*10+buf[i]-'0';
        command_mass[command_col].r2=sum;
       }
     else
       {i++;
        if(buf[i]==',')
          {i++;
           for(sum=0;(buf[i]<='9')&&(buf[i]>='0');i++)
            sum=sum*10+buf[i]-'0';
           command_mass[command_col].r1=sum;
          }
        else
        command_mass[command_col].r1=command_col+1;
 
       }
     command_col++;
    } else i++;
  }
 strcpy(buf,Edit1->Text.c_str());
 i=0;
 data_col=0;
 data_delt=0;
 while(buf[i]!=0)
 {
  if(buf[i]=='*')
   data_pos=data_col;
  else
   if((buf[i]=='1')||(buf[i]=='0'))
    {data_mass[data_col++]=buf[i];
    }
  i++;
 }
 command_pos=0;
 
 print_sostoyanie(1);
}