Kos = "[RuLeR]"

Command = "+rules"

MasRules = "text/masrules.txt"
OpRules = "text/oprules.txt"
VipRules = "text/viprules.txt"
RegRules = "text/regrules.txt"

function Main() 
	frmHub:RegBot(Kos) 
end 

function DataArrival(ustring,dstring) 
	if strsub(dstring, 1, 1) == "<" then
		dstring=strsub(dstring,1,strlen(dstring)-1)
		local s,e,cmd = strfind(dstring,"%b<>%s+(%S+)")
	
		if cmd == Command then
			if ustring.iProfile == 0 then
				file = MasRules
				WhileRead(ustring,file)
			elseif ustring.bOperator then
				file = OpRules
				WhileRead(ustring,file)
			elseif ustring.iProfile == 2 then
				file = VipRules
				WhileRead(ustring,file)
			else
				file = RegRules
				WhileRead(ustring,file)
			end
		end 
	end
end

function WhileRead(ustring,file)
	readfrom(file)
	while 1 do 
		line = read() 
		if line == nil then
			break
		end 
		ustring:SendPM(Kos,line) 
	end
 	readfrom()
end