myDC.ru

Здравствуйте, гость ( Вход | Регистрация )

 

a97873
Отправлено: 5.3.2010, 17:53


Абсолютный новичок


Группа: Пользователи
Сообщений: 2
Регистрация: 5.3.2010
Пользователь №: 6 266


Спасибо! =) Странно... вроде уже побывал так, но криво =) А после тебя все нормуль =)
  Форум: DC-клиенты · Просмотр сообщения: #27867 · Ответов: 2 · Просмотров: 7 043

a97873
Отправлено: 5.3.2010, 16:53


Абсолютный новичок


Группа: Пользователи
Сообщений: 2
Регистрация: 5.3.2010
Пользователь №: 6 266


Грей 0.17
Суть скрипта: По рзелульаттам илссеовадний одонго анлигйсокго унвиертисета,не иеемт занчнеия, в кокам пряокде рсапожолена бкувы в солве. Галвоне, чотбы преавя и пслоендяя бквуы блыи на мсете. Осатьлыне бкувы мгоут селдовтаь в плоонм бсепордяке, все-рвано ткест чтаитсея без побрелм. Пичрионй эгото ялвятеся то, что мы не чиатем кдаужю бкуву по отдльенотси, а все солво цликеом.
Проблема: не получается оседлать русскую кодировку о0
Код
dcpp = {}

math.randomseed(os.time())

function dcpp.PreviewPublicMessage(sHubUrl, sMsg)
  local sArg = sMsg:match"^/t(.*)"
  if sArg then sArg = sArg:match"%s+(.*)"
     if sArg then

    DC():SendPublicMessage(sHubUrl,sArg)
    DC():SendPublicMessage(sHubUrl,mag(sArg))


     return 1
     end
  end
  return nil
end


function tblr(t)
  local n = #t
  while n > 1 do
    local k = math.random(n)
    t[n], t[k] = t[k], t[n]
    n = n - 1
  end

  return t
end


function mag(ma)
  local mai,str,hj={},'',#ma-2
  if hj<2 then return ma end
  local h,j,k=ma:sub(1,1),ma:sub(-1),ma:sub(2,-2)

  for i=1, hj+1 do  mai[i]=k:sub(i,i) end
  mai=tblr(mai)
   for i=1, hj+1 do

    str=str..mai[i]

   end



  return h..str..j
end
  Форум: DC-клиенты · Просмотр сообщения: #27862 · Ответов: 2 · Просмотров: 7 043


New Posts  Открытая тема (есть новые ответы)
No New Posts  Открытая тема (нет новых ответов)
Hot topic  Горячая тема (есть новые ответы)
No new  Горячая тема (нет новых ответов)
Poll  Опрос (есть новые голоса)
No new votes  Опрос (нет новых голосов)
Closed  Закрытая тема
Moved  Тема перемещена
 

RSS Сейчас: 28.4.2024, 13:07