--Prefix Login Message 1.0
--by Mutor
--
-- Requested by madman 
--
-- Sends login message to users with specified prefix.
--
-- 
Bot = frmHub:GetHubBotName()
--Send to these prefixes
prefix = {
"[MBR]",
"[SP]",
"[MOD]",
"[OP]",
}
--Text file to send
file2send = "LoginMsg.txt"


function NewUserConnected(user)
	UserPrefix = 0
	for i=1, getn(prefix) do
			if (strsub(strlower(user.sName),1,strlen(prefix[i])) == strlower(prefix[i])) then
				UserPrefix = 1
				break
			end
	end
	if UserPrefix == 1 then
		ReadText(user)
	end
end

OpConnected = NewUserConnected

function ReadText(user)
readfrom(file2send)
while 1 do
local line = read()
if line == nil then break end
--user:SendPM(Bot,line)	--Send PM
user:SendData(Bot,line)	--Send in main

end
readfrom()
end