Версия для печати темы

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