Help please, conversion scripts
 

Help please, conversion scripts

Started by Braun, 21 March, 2008, 09:57:01

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

Braun

Help please, conversion scripts

Scripts message

-- by dunno who
-- remade by bastya_elvtars
-- lua5 version by bastya_elvtars


botname = "?Mensaje?"
minutes = 50
file = "MsgAll.txt"

function Main()
  SetTimer(minutes*60000)
  StartTimer()
end

function OnTimer()
  MessageToAll()
end

function MessageToAll()
  local msg=" texto "         
  

  local f=io.open(file)
  if f then
    for line in f:lines() do
      msg=msg.."\r\n"..line
    end
    f:close()
  end
  SendToAll(botname,msg)
end


Script ads

-- Converted in LUA 5 by 6Marilyn6Manson6 at 10/09/2005

bot="?Mensaje?"

timer = 115	-- In Mins

messarray={
[[



                 ------------------------------------------------

                      Texto
                ------------------------------------------------
                                           
 ]]
}

function Main()
	SetTimer (timer*60*1000)
	StartTimer()
end

function OnTimer()
	SendToAll(bot,messarray[math.random(1,table.getn(messarray))])
end


Script Pm filter

--PM Filter 1.0 LUA 5
--
--by Mutor 7/6/05
--
--
-- Filter PM's by profiles
--
--User Settings-------------------------------------------------------------------------------------
Bot = frmHub:GetHubBotName()
-- Adjust to your profiles
--profile_idx, PM send is filtered [0=PM Filter is bypassed / 1=PM's are filtered]
CanSendPm = {
[-1] = 1, --Unregistered User
[0] = 0, --Master
[1] = 0, --Operator
[2] = 0, --Vip
[3] = 1, --Registered User
[4] = 0, --Moderator
[5] = 0, --NetFounder
}
-- Adjust to your profiles
--profile_idx, PM Permission level
--Sender may only PM profiles equal to or greater than their own profile setting.
CanGetPm = {
[-1] = 0, --Unregistered User
[0] = 6, --Master
[1] = 3, --Operator
[2] = 2, --Vip
[3] = 0, --Registered User
[4] = 4, --Moderator
[5] = 5, --NetFounder
}
--End User Settings----------------------------------------------------------------------------------
ToArrival = function(user,data)
if CanSendPm[user.iProfile] == 1 then
local s,e,who = string.find(data,"$To:%s+(%S+)%s+From:")
local nick = GetItemByName(who)
if nick then
if CanGetPm[user.iProfile] >= CanGetPm[nick.iProfile] then
local FilterMsg = "\r\n\r\n\t*** Texto "..nick.sName.." Texto.***\r\n\t"..
(GetProfileName(user.iProfile) or "Unreg").."'s Texto"
return SendPmToNick(user.sName, nick.sName, Bot.." Hola "..user.sName..FilterMsg), 1
end
else
local OfflineMsg = " Texto "..who.." Texto."
return SendPmToNick(user.sName, Bot, OfflineMsg), 1
end
end
end



Thank you :)

Braun

Help please, I need this sripts

Than you

SMF spam blocked by CleanTalk