local str = \"pöttyöslabda\"
local parameters = { \"almafa\", \"körtefa\", \"diófa\", \"meggyfa\" }
addCommandHandler(\"asd\",
function(playerSource)
local i = 0
local r = nil
for k,v in ipairs(parameters) do
   if str:find(v) then
      i = i + 1
      r = v
   end
end
if i == 1 then
   outputChatBox(r, playerSource)
else
   outputChatBox(\"Nincs ilyen\", playerSource)
end
end
)

function isint(n) -- http://lua-users.org/lists/lua-l/2008-11/msg00102.html
    return n==math.floor(n)
end
if tonumber(parameter_1) and isint(tonumber(parameter_1)) then
    -- egész szám
elseif not tonumber(parameter_1) then
    --szöveg
end