Dim Random,Name
  Name = 'получить имя по-условию в посте 1
  Randomize
  Random = Int((9) * Rnd )
  AddQ "теперь " & UserName & " должен(а) " & MASSIV_STROK(Random) & " " & Name

if(( Command == "butilochka" || Command == "but" || Command == "бутылочка"  || Command == "бут"))
      {
     int range = 0;
     string MASSIV_STROK[22]={"поцеловать","обнять","поцеловать в губы","высосать мозг у","угостить пивом","угостить пивом","откусить ухо у","сделать все что захочет с","угостить пивом","угостить пивом","Дать 100$","Ливануть во время игры","угостить пивом","Вставить","угостить пивом","угостить пивом","Проиграть в игре","угостить пивом","угостить пивом","угостить пивом","угостить пивом","угостить пивом"};
     string name = "";
     //получение количества играков
     for( vector<CGamePlayer *> :: iterator i = m_Players.begin( ); i != m_Players.end( ); i++ )
     {
     range+=1;
     }
     //расчёт случаного числа из количества игркаов
     int random_int = rand() % (range+1);
     int sravnenie = 0; //число для сравнение
     //получение имени игкровка
     for( vector<CGamePlayer *> :: iterator i = m_Players.begin( ); i != m_Players.end( ); i++ )
     {
     sravnenie++;
     if(sravnenie==random_int){//сравнение
     name = (*i)->GetName( );
     }
     }
     if(User==name || name=="")
     {
     SendChat( player, " |cFF00C000[Бутылочка]|r: крутаника еще разочек :)");
     }else{//оповестим чат
     SendAllChat(" |cFF00C000[Бутылочка]|r: "+User+" крутит бутылочку, бутылочка крутится, крутится и указывает на "+name);
     SendAllChat(" |cFF00C000[Бутылочка]|r: теперь "+User+" должен(а)  "+MASSIV_STROK[rand() % (9)]+" "+name);
     }     
     }