Welcome message

[Loading]

hi ppl

i converted this script to lua5 :

--Feito por nErBoS 
--Adicionado mais alguns perfis
--Converted to LUA 5 by [PT]Loading 03/07/05 

sBot = "?Bop2Bop??" 

--## Usar Welcomes para os Nivies ##-- 

Reg = 1 
Vip = 1 
Operator = 1 
Master = 1 
Moderator = 1 
NetFounder = 1 

--1 activa, 0 desactiva 

--## Mensagens ##-- 

   --## Mensagens para REG ##-- 
   --## MSG de Entrada 
   regwlcin = { 
         "O User registado ? ? ? ? ? ? [USER] ? ? ? ? ? ? entra a correr em grande..... e cai.", 
         "O User registado ? ? ? ? ? ? [USER] ? ? ? ? ? ? entra em busca de slots." 
   } 
   --## MSG de Saida 
   regwlcout = { 
         "O User registado ? ? ? ? ? ? [USER] ? ? ? ? ? ? sai do nosso Hub sem deixar rasto.", 
         "O User registado ? ? ? ? ? ? [USER] ? ? ? ? ? ? sai com o saco cheio de downloads." 
   } 

   --## Mensagens para VIP ##-- 
   --## MSG de Entrada 
   vipwlcin = { 
         "O Vip ? ? ? ? ? ? [USER] ? ? ? ? ? ? est? ? espera do cham...pomi.", 
         "O Vip ? ? ? ? ? ? [USER] ? ? ? ? ? ? chega no seu Ferrari Enzo." 
   } 
   --## MSG de Saida 
   vipwlcout = { 
         "O Vip ? ? ? ? ? ? [USER] ? ? ? ? ? ? sai tocado com uma garrafa de champomi vazia.", 
         "O Vip ? ? ? ? ? ? [USER] ? ? ? ? ? ? sai com o seu Ferrari Enzo num reboque." 
   } 

   --## Mensagens para OP ##-- 
   --## MSG de Entrada 
   opwlcin = { 
      "O Operador ? ? ? ? ? ? [USER] ? ? ? ? ? ? entrou para ajudar.", 
      "O Operador ? ? ? ? ? ? [USER] ? ? ? ? ? ? entra e pede um caf?."      
   } 
   --## MSG de Saida 
   opwlcout = { 
      "O Operador ? ? ? ? ? ? [USER] ? ? ? ? ? ? trope?a gritando!, '?m******! ?dassssssss! ?Bebida! ?Gajas!.", 
      "O Operador ? ? ? ? ? ? [USER] ? ? ? ? ? ? diz, 'Ouve com aten??o ... S? vou dizer isto uma vez!." 
   } 

   --## Mensagens para MASTER ##-- 
   --## MSG de Entrada 
   masterwlcin = { 
         "O Master ? ? ? ? ? ? [USER] ? ? ? ? ? ? entrou para mandar.", 
         "O Master ? ? ? ? ? ? [USER] ? ? ? ? ? ? entra num tapete vermelho."      
   } 
   --## MSG de Saida 
   masterwlcout = { 
         "O Master ? ? ? ? ? ? [USER] ? ? ? ? ? ? sai com bolhas nos dedos depois de tanto kickar.", 
         "O Master ? ? ? ? ? ? [USER] ? ? ? ? ? ? sai enrolado no tapete vermelho."      
   } 

   --## Mensagens para MODERATOR ##-- 
   --## MSG de Entrada 
   modwlcin = { 
         "O Moderador ? ? ? ? ? ? [USER] ? ? ? ? ? ? entra a correr em grande..... e cai.", 
         "O Moderador ? ? ? ? ? ? [USER] ? ? ? ? ? ? entra em busca de slots." 
   } 
   --## MSG de Saida 
   modwlcout = { 
         "O Moderador ? ? ? ? ? ? [USER] ? ? ? ? ? ? sai do nosso Hub sem deixar rasto.", 
         "O Moderador ? ? ? ? ? ? [USER] ? ? ? ? ? ? sai com o saco cheio de downloads." 
   } 

   --## Mensagens para NETFOUNDER ##-- 
   --## MSG de Entrada 
   netfndwlcin = { 
         "O Fundador do Hub ? ? ? ? ? ? [USER] ? ? ? ? ? ? entra a correr em grande..... e cai.", 
         "O Fundador do Hub ? ? ? ? ? ? [USER] ? ? ? ? ? ? entra em busca de slots." 
   } 
   --## MSG de Saida 
   netfndwlcout = { 
         "O Fundador do Hub ? ? ? ? ? ? [USER] ? ? ? ? ? ? sai do nosso Hub sem deixar rasto.", 
         "O Fundador do Hub ? ? ? ? ? ? [USER] ? ? ? ? ? ? sai com o saco cheio de downloads." 
   } 

function Main() 
   frmHub:RegBot(sBot) 
end 

function NewUserConnected(user, data) 
   if (user.iProfile == 3 and Reg == 1) then 
      local regmsg = regwlcin[math.random(1, table.getn(regwlcin))] 
      regmsg, x = string.gsub(regmsg, "%b[]", user.sName) 
      SendToAll(sBot, regmsg) 
   elseif (user.iProfile == 2 and Vip == 1) then 
      local vipmsg = vipwlcin[math.random(1, table.getn(vipwlcin))] 
      vipmsg, x = string.gsub(vipmsg, "%b[]", user.sName) 
      SendToAll(sBot, vipmsg) 
   elseif (user.iProfile == 0 and Operator == 1) then 
      local mastermsg = masterwlcin[math.random(1, table.getn(masterwlcin))] 
      mastermsg, x = string.gsub(mastermsg, "%b[]", user.sName) 
      SendToAll(sBot, mastermsg) 
   elseif (user.iProfile == 5 and NetFounder == 1) then 
      local netfndmsg = netfndwlcin[math.random(1, table.getn(netfndwlcin))] 
      netfndmsg, x = string.gsub(netfndmsg, "%b[]", user.sName) 
      SendToAll(sBot, netfndmsg) 
   elseif (user.iProfile == 4 and Moderator == 1) then 
      local modmsg = modwlcin[math.random(1, table.getn(modwlcin))] 
      modmsg, x = string.gsub(modmsg, "%b[]", user.sName) 
      SendToAll(sBot, modmsg) 
   elseif (user.bOperator and Operator == 1) then 
      local opmsg = opwlcin[math.random(1, table.getn(opwlcin))] 
      opmsg, x = string.gsub(opmsg, "%b[]", user.sName) 
      SendToAll(sBot, opmsg) 
   end 
end 

OpConnected = NewUserConnected 

function UserDisconnected(user, data) 
   if (user.iProfile == 3 and Reg == 1) then 
      local regmsg = regwlcout[math.random(1, table.getn(regwlcout))] 
      regmsg, x = string.gsub(regmsg, "%b[]", user.sName) 
      SendToAll(sBot, regmsg) 
   elseif (user.iProfile == 2 and Vip == 1) then 
      local vipmsg = vipwlcout[math.random(1, table.getn(vipwlcout))] 
      vipmsg, x = string.gsub(vipmsg, "%b[]", user.sName) 
      SendToAll(sBot, vipmsg) 
   elseif (user.iProfile == 0 and Operator == 1) then 
      local mastermsg = masterwlcout[math.random(1, table.getn(masterwlcout))] 
      mastermsg, x = string.gsub(mastermsg, "%b[]", user.sName) 
      SendToAll(sBot, mastermsg) 
   elseif (user.iProfile == 4 and Moderator == 1) then 
      local modmsg = modwlcout[math.random(1, table.getn(modwlcout))] 
      modmsg, x = string.gsub(modmsg, "%b[]", user.sName) 
      SendToAll(sBot, modmsg) 
   elseif (user.iProfile == 5 and NetFounder == 1) then 
      local netfndmsg = netfndwlcout[math.random(1, table.getn(netfndwlcout))] 
      netfndmsg, x = string.gsub(netfndmsg, "%b[]", user.sName) 
      SendToAll(sBot, netfndmsg) 
   elseif (user.bOperator and Operator == 1) then 
      local opmsg = opwlcout[math.random(1, table.getn(opwlcout))] 
      opmsg, x = string.gsub(opmsg, "%b[]", user.sName) 
      SendToAll(sBot, opmsg) 
   end 
end 

OpDisconnected = UserDisconnected

have fun

[Loading]

tnks man for your support

but i am a newbie in this programing

if you now sommething to help me to make this better
tel me

bet regards

Loading